Top 10k strings from bingsete.tap in <root> / bin / z80 / software / ZxTapGames.zip / games /
Back to the directory listing
9 ;" ":
4 ;" ":
4 +(S(K,J,Q)))
4 "BINGSETE"
2 Z(Q)=Z(Q)-2
2 Z(Q)=Z(Q)+1
2 P$="CAMB":
2 CXD,CYD;D$(10
2 ;"PULSA UNA TECLA":
2 ;"PULSA UNA TECLA PARA COMENZAR":
2 ;" "
2 ;" "
2 ,CYD;E$(10
1 z$="HIJKLMN":
1 z$="ABCDEFG":
1 f$="0000000000123456789"
1 e$=" $%&'()*<
1 d$="
1 cibercomp
1 c$="01234455666777888999"
1 bingsete
1 Z(Q)=Z(Q)-EL*2
1 Z(Q)=Z(Q)-1
1 Z(Q)=Z(Q)+EL:
1 Z$=N$(Q)+" GANA "+
1 Z$=J$+" EL SETE "+
1 Z$=I$+" LOS BLANCOS "+
1 Z$="POR LO TANTO":
1 Z$="HA GANADO EL BINGSETE"+" "+
1 Z$="BINGSETE":
1 Y$=" "
1 X$=N$(R1):
1 SUBRUTINA CARACTERES GIGANTES
1 S(XE,YE,Q)=9
1 S(XE,YE,Q)=0
1 S(CX,CY,K)=L
1 S(CX,CY,K)
1 PS+" PTAS.":
1 PR=PP+PS+PB:
1 PR+" PTAS.":
1 PP=PT-PB-PS
1 PB+" PTAS.":
1 P(B)=S(XE,YE,Q)
1 O(B)=O(B)-20
1 O(B)=O(B)+10
1 N$(R1)=N$(R2):
1 N$(I),(V(I)+1
1 CV=CV+V(I):
1 CM
1 BINGSETE g
1 BINGSETE
1 ALFREDO PAYA 1984
1 ;PR;" PTAS. "
1 ;N$(Q);" ,TIRO TU DADO ":
1 ;'''''"1-4 Y A-N: COLOCAR LAS FICHAS"''"P PASAR"''"T PASAR DE TODAS"''"C CAMBIAR FICHAS POR SOBRANTES"''"G GIRAR"
1 ;"VOY A SORTEAR EL ORDEN DE SALIDA"
1 ;"UN MOMENTO, VOY A BARAJAR"
1 ;"TIRAS OTRA VEZ":
1 ;"TIRA EL DADO, ";N$(Q):
1 ;"SOBRANTES ";Z(Q):
1 ;"SOBRAN ";Z(Q)
1 ;"SETE PARA ";N$(Q):
1 ;"PULSA UNA TECLA PARA CONTINUAR":
1 ;"PULSA T PARA TERMINAR O"'"CUALQUIER TECLA PARA COMENZAR":
1 ;"PROGRAMA CARGADO":
1 ;"PRECIO DEL CARTON ?":
1 ;"PARA EL CASSETTE";
1 ;"NUMERO DE JUGADORES ?"''"-MAXIMO 9.MINIMO 2-":
1 ;"NO TIENES BASTANTES FICHAS":
1 ;"MUY BIEN, PUEDES CAMBIAR":
1 ;"LO SIENTO, NO PUEDES COMPRAR";:
1 ;"LO SIENTO, NO PUEDES CAMBIAR Y PIERDES 2 FICHAS SOBRANTES ":
1 ;"HASTA LUEGO":
1 ;"GIRANDO":
1 ;"FICHA #";
1 ;"ESTE ES TU NUEVO CARTON":
1 ;"ESTE ES TU CARTON , ";N$(Q);''"QUIERES OTRO ? -S/N-":
1 ;"CONTESTA S/N":
1 ;"CONTESTA DEL 1 AL 9":
1 ;"COLUMNA";
1 ;"BLANCOS PARA ";N$(Q):
1 ;"BINGSETE PARA ";N$(Q):
1 ;"; ; ; ; ; ;":
1 ;": : : : : :";
1 ;" TODAS ":
1 ;" TIEMPO";
1 ;" Pasar";
1 ;" Girar";
1 ;" Cambiar";
1 ;" CAMBIO ":
1 ;" ";XE;" - "
1 ;" PASA ":
1 ;" JUGAROS ALGO DECENTE!!! ":
1 ;" TIRO EL DADO DE -SI O NO- "''" PARA VER SI PUEDES COMPRARLO ":
1 ;" TIRO EL DADO DE -SI O NO- "''" PARA VER SI PUEDES CAMBIAR ":
1 ;" ":
1 ;" RECUERDALO BIEN ";
1 ;" ":
1 9999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999???????????999999999999999999999????????????????99999??999999999????????????????999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999998888888888888888888888888888888888888888888888888888888888888888\
1 01234455666777888999
1 0000000000123456789
1 +I),LO+I*24
1 +I),LO+I*-24
1 )=H(Q,CAR,3
1 )=H(Q,CAR,2
1 )=H(Q,CAR,1
1 );;" "+(" "
1 )+("=A-G="
1 )*PR;" PTAS.":
1 (PP)+" PTAS.":
1 ''"POR FAVOR, PAGUEN SUS CARTONES":
1 ''"DIF RELOJ SEGUNDOS "'"--- ------- ---------":
1 "cibercomp"
1 "bingsete"
1 "TIEMPO PARA COLOCAR LAS FICHAS ?"
1 "SIGUEN LOS MISMOS JUGADORES Y EL MISMO RELOJ DE LA PARTIDA ANTERIOR ?"
1 "PULSA ENTER DESPUES DE CONTESTAR ";
1 "NOMBRE JUGADOR NO. ";I;" ? ";:
1 "JUGADOR ";I;"* ";N$(I):
1 "COMIENZA LA PARTIDA"
1 "CARTONES VENDIDOS ";CV'' "PREMIO BLANCOS ";PB;" PTAS."'' "PREMIO SETE ";PS;" PTAS."'' "PREMIO BINGSETE ";PP;" PTAS."
1 " ";I;" ";10
1 CIBERCOMP 1984":
1 CIBERCOMP 1984
1 $%&'()*<
1
1
1