Top 10k strings from chinesep.tap in <root> / bin / z80 / software / ZxTapGames.zip / games /

Back to the directory listing

   9 q$(den,suit)
   7 ,x;"     ";
   6 Cmoved     
   5 frompi=pfr:
   4 ;o$;o$;o$;
   4 ***********************
   3 u(a$(pto,a(pto)))
   3 t(a$(pto,a(pto)))
   3 spaces=spaces+1
   3 mvwholepi:
   3 e$(j)="  "
   2 z$="s"))+(2
   2 spaces=spaces-1
   2 s$=r$(q2):
   2 points=points+
   2 pn=frompi:
   2 pile9=pile9+1
   2 pile0=pile0+1
   2 mvwhto=pto:
   2 mvwhfr=pfr:
   2 frompi=topi
   2 e$(i)="  "
   2 a(pn)=a(pn)+1
   2 a$(pn,a(pn))=m$:
   2 a$(pfr,a(pfr))=n$
   2 CHINESEPAT
   2 CHINESE PATIENCE
   2 ;"I'm THINKING........."
   2 --Can card be placed on           pile(
   2 ,pile9)=m$:
   2 ,pile0)=n$
   2 ,pile0)=m$:
   2 ,(points-256
   2 )=s$+" "+s$
   2 )=" "+s$+" ":
   2 (points/256
   2 "YOU HAVE WON!"
   2 "YOU ARE";
   2 "WE DREW!"
   2 "POINTS SCORED=";
   2 "I HAVE WON!"
   2 "GAMES WON=";
   1 z$=a$(pn,i,2
   1 z$=a$(pn,a(pn),2
   1 wprpup"VWw
   1 wPBP%p"Tru
   1 vG WE@E`uT Dg
   1 v bUd%VDwwp%W
   1 t$="  ")+((
   1 setspcs=220
   1 prpi18=500
   1 pn=mvwhto:
   1 pile9=pile9-1
   1 pile0=pile0-1
   1 ove option)":
   1 o,o;o$;o$;
   1 mvwholepi=2700
   1 mvwhfr=i+4
   1 mvto9=2500
   1 mvto18=2300
   1 mvto0=2100
   1 mvfr9=2400
   1 mvfr58=2200
   1 mvfr0=2000
   1 m$=a$(pn,a(pn)):
   1 m$="2c3c4c5c6c7c8c9cTcJcQcKc2d3d4d5d6d7d8d9dTdJdQdKd2h3h4h5h6h7h8h9hThJhQhKh2s3s4s5s6s7s8s9sTsJsQsKs"
   1 ink;a$(pn,i);
   1 i$="1")+(49
   1 i$="0")+(48
   1 fPuP'`EuRe
   1 f$(k)=a$(4
   1 f$(k)="  ":
   1 f$(i)="  "
   1 e$(k)=a$(k,a(k))
   1 e$(k)="  ":
   1 cdeck=pile9:
   1 cdeck=cdeck-1
   1 cdeck=bdeck
   1 bdeck=pile0:
   1 bdeck=bdeck-1
   1 b eUREU%R$`Ev
   1 alarm=4190
   1 a(pn)=a(pn)-1
   1 a(mvwhto)=a(mvwhto)+ct:
   1 a(mvwhfr)=0
   1 a$(pn,a(pn))="  ":
   1 a$(pfr,a(pfr))=u$
   1 a$(pfr,a(pfr))=l$
   1 a$(pfr,a(pfr))=j$
   1 a$(mvwhto,a(mvwhto)+ct)=a$(mvwhfr,k):
   1 a$(mvwhfr,k)="  "
   1 YOUR RECORD
   1 YOU ARE THE OVERALL WINNER
   1 WU&PTU PvU
   1 WU$PTU@PtU
   1 VPUTf%@DdE UTf`
   1 VE UE@E`UT Ee
   1 U`%Wf%pGTr %Wf`
   1 UE UE@EPuTPEUE
   1 UDDRfeF DRUDf`
   1 THE SERIES IS AN OVERALL DRAW!
   1 T %$TB%PUU
   1 SPECTRUM WINS
   1 SHUFFLE CARDS
   1 SET UP SCREEN
   1 RwwRfbu GRVwf`
   1 R %&V"%@EU
   1 PLAYER WINS
   1 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOhhhhhhhhhhhhhhhhhhhhhhOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWWWWWOOOOOOWWWWWWWWWWWWWWWWWWWWWWWWWWOOOOOOWWWWWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOhhhhhhhhhhhhhhhhhhhhhhhhOppppppOppppppppppppppppppppppppOppppppOppppppppppppppppppppppppOppppppOhhhhhhhhhhhhhhhhhhhhhhooOppppppOoooooooohhhhhhhhhhhhhhooOppppppOppppppppppppppppppppppppOppppppOpppppppppppppppppppppppwOOOOOOOOpppppppppppppppppppppppwOOOOOOOOhhhhhhhhhhhhhhhhhhhhhhhoOOOOOOOOhooooooooooooohhhhhhhhhoOOOOOOOO
   1 MOVE WHOLE PILE
   1 MOVE NOT ALLOWED
   1 MACHINE SUBROUTINES
   1 INVERT Pile 9
   1 INVERT Pile 0
   1 I AM THE OVERALL WINNER
   1 Ee UE`uPuVPDU'
   1 END SERIES/START AGAIN
   1 END OF MACHINE SUBR
   1 DPE`%@UTRF
   1 DPE`%@EvRF
   1 DPEP%@UuRE
   1 DEAL CARDS
   1 Copyright 1984
   1 Ccantw=o1:
   1 Bcantw=o1:
   1 BREAK PRESSED
   1 A UvRGe&R$@wt
   1 A UVTUeDTD@UT
   1 ;o$;o$;o$;o$;o$;o$;o$;o$;o$;
   1 ;a$(pn,a(pn));
   1 ;'"   TURNING YOUR DECK OVER...":
   1 ;'"      TO the END of Pile ";
   1 ;'"           TO the END of PILE ";
   1 ;'"                    [
   1 ;"and THEN PRESS ";
   1 ;"YOUR HAND";
   1 ;"YOU HAVE ONLY 
   1 ;"WHICH PILE-";
   1 ;"WHAT IS YOUR 
   1 ;"Type your name (NO MORE THAN";
   1 ;"TO Pile-";
   1 ;"TO END of PILE ";
   1 ;"THANK YOU FOR PLAYING ";
   1 ;"PRESS ";
   1 ;"MY HAND";
   1 ;"MOVE TOP CARD FROM Pile ";pfr;'"              ";
   1 ;"MOVE TOP CARD ";
   1 ;"IS YOUR NAME CORRECT 
   1 ;"I'M AFRAID THAT YOU'LL HAVE TO   START AGAIN AT THE BEGINNING":
   1 ;"HELLO ";k$;
   1 ;"FROM Pile-";
   1 ;"EIGHTS-THE CARD GAME OF STRATEGY";
   1 ;"DO YOU WANT TO SAY 
   1 ;"DO YOU WANT TO PLAY AGAIN 
   1 ;"CHECKING.....";:
   1 ;"CARDS LEFT ";cdeck+pile9;:
   1 ;"CARDS LEFT ";bdeck+pile0;:
   1 ;"10 LETTERS, please).....";
   1 ;"....IT'S 
   1 ;"-Spectrum":
   1 ;", which won":
   1 ;", ";k$;","
   1 ;"***READ INLAY FOR FULL RULES***"
   1 ;") IN SERIES";
   1 ;" is to play the 
   1 ;" if you CANNOT MOVE":
   1 ;" POINT";("S"
   1 ;" GOODBYE ":
   1 ;" GAMES." 
   1 ;" ANY KEY"
   1 ;"  TO Pile ";
   1 ;"  DO YOU WISH TO SAY 
   1 ;"  DO YOU WANT TO PLAY AGAIN 
   1 ;"  'The BEST BOARD/CARD/PUZZLE            GAME OF 1984'          "
   1 ;"   I'm MOVING 
   1 ;"     ";:
   1 ;"      I'm MOVING TOP CARD            FROM Pile ";
   1 ;"            PRESS                  
   1 ;"              ":
   1 ;"               ";
   1 ;"                 ";
   1 ;"                      ";
   1 ;"                        ";
   1 ;"                         "
   1 ............."
   1 -move WHOLE PILE 
   1 -TWIST a fresh card":
   1 -SINGLE GAMES/END SERIES       
   1 -QUIT and return to main menu"
   1 -Now Cmoved=0                    and Ccantw=0
   1 -NEXT GAME (";
   1 -MOVE the TOP CARD":
   1 -FINISH    ";
   1 --- Can card be placed              on pile 
   1 - will FINISH your turn.          I will then take mine!"
   1 ,pile9)="  ":
   1 ,pile0)=u$
   1 ,pile0)=l$
   1 ,pile0)=j$
   1 ,pile0)="  ":
   1 ,cdeck+pile9:
   1 ,cdeck)="  ":
   1 ,c;s$;"ab";
   1 ,c;s$;"AB";
   1 ,c;s$;"01";
   1 ,c;"lm";s$;
   1 ,c;"LM";s$;
   1 ,c;";<";s$;
   1 ,bdeck+pile0:
   1 ,bdeck)="  ":
   1 ,accordingto certain sequence rules."
   1 , you may then  TWIST again.....until you can nolonger do anything. Then it is  MY TURN - and so on......"
   1 *a(pn);a$(pn,a(pn)):
   1 *a(pn);a$(pn,a(pn))
   1 *a(mvwhfr)+6
   1 *****PLAYER'S TURN*****
   1 *****PLAYER MENUS*****
   1 *****MACHINE'S TURN****
   1 *****MACHINE MENUS*****
   1 ). If you can then  MOVE this card onto any one of  piles 
   1 'rpREprpRwPrr5
   1 & u'Wbu %V
   1 %u %wpBPRW rUe
   1 %ewpd%0 W'
   1 %G'PGR`PWU
   1 #pwww7w "v
   1 "your mind with ";
   1 "you should really try to stretch":
   1 "the 1984 CRASH MICRO AWARD -":
   1 "WITH A SCORE OF ";
   1 "WE ARE DRAWING on POINTS.":
   1 "WE ARE DRAWING on GAMES":
   1 "Usually you will move only the  TOP card of a pile."
   1 "REMEMBER that...."
   1 "CLEVER ";:
   1 "CHINESEPAT"
   1 ".... NEITHER OF US CAN BOAST OF  COMPLETE VICTORY ON ALL FRONTS!"
   1 "-YOU WON ";g1;" and I WON ";g2
   1 "-YOU SCORED ";p1;" and I SCORED ";p2
   1 "********* CONTROL KEYS *********":
   1 "******* CHINESE PATIENCE *******"
   1 "(and it responds QUICKLY!....)  --------------------------------"
   1 " WINNING on POINTS."
   1 " WINNING on GAMES, and"
   1 "  You can also move cards from  piles 
   1 "  The game of CHINESE PATIENCE  really demands only a careful   examination of the current stateof the piles +finnicky attentionto detail [+ PATIENCE!]...If youwould prefer an intellectually  involving card game that will   really make you THINK-try ";
   1 "  Sometimes you may even be ableto place a card on MY pile(
   1 "  In this game, we EACH commencewith a deck of 22 cards; and thewinner is the first player to   dispose of all his cards."
   1 "  If you ARE bored, then perhaps":
   1 "  At your turn, you may TWIST a card from your deck onto your   pile (Pile 
   1 "   BOTH GAMES and POINTS!"
   1 "    You'll need PATIENCE to playthis game - it is not as fast asEIGHTS.... The keys that controlthe game are shown below."
   1 "     written by David SIMON":
   1 "     IN THIS SERIES WE PLAYED A TOTAL of ";
   1 "        CHINESE PATIENCE"
   1 !                                     
   1  will specify PILE NUMBERS":
   1  will move a WHOLE PILE          (during 
   1  of Pile ";
   1  of PILE ";pfr;'"      ";
   1  WHOLE of PILE ";
   1  TWIST NOW!":
   1  TOP CARD FROM ";
   1  TO piles 
   1  TO START PLAYING AGAIN     or 
   1  TO DATE..."
   1  TO CLEAR THE MEMORY    ";
   1  THIS GAME":
   1  PILE - ";
   1  HAVE WON THIS GAME *****"
   1  HAVE WON THIS GAME ****"
   1  FOR NOW...."
   1  DESCEND in order in    suits of ALTERNATE COLOURS."
   1  CONGRATULATIONS 
   1  CARD LEFT...":
   1  ASCEND in SINGLE SUIT  ORDER."
   1  1985 ATLANTIS SOFTWARE LTD"
   1    ARE YOU BORED, PERHAPS 
   1            PRESS 
   1            ( 
   1                                     YOU HAVE PRESSED 
   1                                      
   1                     
   1