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

Back to the directory listing

   6 e6)="00000"
   6 e11)="00000"
   5 f,e4;z$(e1
   4 h$="000000000000"
   4              
   3 m$="000000000000"
   3 e19,e4;"Press any key to continue" 
   3 e11)="0000000000"
   3 col=c(e1):
   3 c$="000000000000"
   2 x(e1)=22794
   2 shots=shots-e1
   2 shots=shots+e1
   2 n(c)=n(c)+e1:
   2 h         
   2 f,e16;z$(e1
   2 f,e0;b$(c,f+e1):
   2 e9;"   Do you want instructions?    ":
   2 e9;"           Press key  Y  or  N  ":
   2 e7,e4;"  The object of the  game";
   2 e6,e4;"The White is Cue ball."
   2 e5,e4;"5 Yellow,1 Black,1 White.";
   2 e4,e4;"a set of 12 balls. 5 Blue";
   2 e3,e4;"  The game is played with";
   2 e19,e4;"Press any key to continue"
   2 e18,e6;z$(e1
   2 e0;"                                ":
   2 ;"is LOADING"
   2 ;"THE HUSTLER"
   2 ;"-----------"
   2 ;"   PLEASE LEAVE TAPE RUNNING    ";"    WHILE I COMPLETE LOADING":
   1 zz=(x(e1)-(zz*256
   1 zz;" program"
   1 z$="                                "
   1 x(e9)=22906
   1 x(e8)=22838
   1 x(e7)=22774
   1 x(e6)=22744
   1 x(e5)=22778
   1 x(e4)=22842
   1 x(e3)=22872
   1 x(e2)=22804
   1 x(e12)=22808
   1 x(e11)=22714
   1 x(e10)=22812
   1 x(e1)=22826
   1 x(e1)=22825
   1 x(e1)=22824
   1 x(e1)=22793
   1 x(e1)=22792
   1 x(e1)=22762
   1 x(e1)=22761
   1 x(e1)=22760
   1 x(e1)=(22528
   1 spin=spin+e1:
   1 shots=shots+sk1
   1 score=score+50
   1 score=score+(8
   1 score=score+(4
   1 score=score+(2
   1 r(e2)=r(e1)
   1 pool      
   1 p$="111111111111"
   1 p$(e1)="1":
   1 p$(e1)="0"
   1 p         
   1 n(e2)=n(e2)+e1:
   1 n(e2)=n(e2)+e1
   1 n(e1)=n(e1)+e1:
   1 n(e1)=n(e1)+e1
   1 n(c)=n(c)-e1
   1 n(c)=n(c)+e1
   1 f-e1,e0;A$(f):
   1 f-e1,e0;" ":
   1 f,e3;z$(e1
   1 f,e3;"          ":
   1 f,e0;b$(e3,f+e1):
   1 e9;" Please CHOOSE GAME  by         ":
   1 e9;"        Pressing key  1 or 2    ":
   1 e9,e4;"shot if ball is potted.";
   1 e9,e4;"of one colour (Yellow  or";
   1 e9,e4;"given on each option  and";
   1 e9,e4;"either  a lack of chalk or";
   1 e9,e4;"any  colour may be potted";
   1 e9,e4;"and blue balls before the";
   1 e9,e4;" first. ";
   1 e8,e4;"will be BLACK to indicate";
   1 e8,e4;"whether miscue was  due to";
   1 e8,e4;"shots(skill level),gain a";
   1 e8,e4;"is to  pot all the yellow";
   1 e8,e4;"is to  pot all the  balls";
   1 e8,e4;" Hitting the wrong colour";
   1 e8,e4;"  Full  instructions  are";
   1 e7;"HI=";HIS;
   1 e7,e4;"determined the background";
   1 e7,e4;" SPIN      ( 9 choices)" 
   1 e7,e4;" Not hitting a ball. ";
   1 e7,e4;"  You start with  5 to 45";
   1 e7,e4;"  The referee  will decide";
   1 e6,e4;"miscue on long shots."
   1 e6,e4;" STRENGTH  (54 choices)";
   1 e6,e4;" Potting White ball.";
   1 e6,e4;"  Until the colours  are";
   1 e6,e4;"        x 8 Black ball."
   1 e5,e4;"so there is a tendence  to";
   1 e5,e4;"player's colour." 
   1 e5,e4;"any fouls.   Fouls are:-";
   1 e5,e4;" DIRECTION (16 choices)";
   1 e5,e4;"          x 4 Yellow ball";
   1 e4,e4;"to the other  player  for";
   1 e4,e4;"the pocket  x 2 Blue ball";
   1 e4,e4;"is  used  to indicate the";
   1 e4,e4;"indicate the following;-";
   1 e4,e4;"any chalk in this Poolroom";
   1 e3,e4;"  You score the value  of";
   1 e3,e4;"  Unfortunately there isnt";
   1 e3,e4;"  The  background  colour";
   1 e3,e4;"  For each shot you  must";
   1 e3,e4;"  A free shot is  awarded";
   1 e21,e9;z$(e1
   1 e21,e9;"Press 'ENTER' to fix."
   1 e21,e6;n(c);" "
   1 e21,e6;"Press 'ENTER' to fix."
   1 e21,e16;"'ENTER' to fix."
   1 e21,e0;"Shots=";n(c);" "
   1 e21,e0;"Colour? Blue(key5) Yellow(key6) " 
   1 e21,e0;"2 Player game selected          "
   1 e21,e0;"1 Player game selected          "
   1 e21,e0;" (N returns to choice screen)  "
   1 e21,e0;"   (N returns to choice screen) " 
   1 e21,e0;"    Press any key to continue   "
   1 e21,e0;"      (Press key  1 to 9)       "
   1 e20,e9;z$(e1
   1 e20,e9;"ANY key moves indicator"
   1 e20,e2;"miscue due to lack of chalk!"
   1 e20,e16;"ENTER to fix."
   1 e20,e16;" '6' to decrease";
   1 e20,e0;"Want another game?  Press Y or N"
   1 e20,e0;"Another game? Press Y or N"
   1 e20,e0;"    and a bonus score of 50.    "
   1 e2,e1;" ";
   1 e1;e8,-e8:
   1 e1;e6,e11:
   1 e1;e3,-e8:
   1 e1;e24,e24:
   1 e1;e24,e22:
   1 e1;e24,e19:
   1 e1;e24,e17:
   1 e1;e24,e15:
   1 e1;e22,e24:
   1 e1;e22,e15:
   1 e1;e20,e24:
   1 e1;e20,e15:
   1 e1;e18,e24:
   1 e1;e18,e15:
   1 e1;e15,e24:
   1 e1;e15,e22:
   1 e1;e15,e19:
   1 e1;e15,e17:
   1 e1;e15,e15:
   1 e1;e13,e0:
   1 e1;e12,e6:
   1 e1;e12,-e6:
   1 e1;e0,-e8:
   1 e1;-e9,e9:
   1 e1;-e8,-e8:
   1 e1;-e6,e11:
   1 e1;-e4,-e9:
   1 e1;-e12,e0:
   1 e1;-e11,e6:
   1 e1;-e11,-e6:
   1 e1;"        PLEASE STOP TAPE        ":
   1 e19,e9;"     
   1 e19,e6;"Using keys 5,6,7 and 8";
   1 e19,e2;"Press any key to START game." 
   1 e19,e16;"clockwise."
   1 e19,e16;" '7' to increase";
   1 e19,e0;"YOU BEAT THE HIGH SCORE!":
   1 e19,e0;"Shots 45 40 35 30 25 20 15 10  5"
   1 e19,e0;"   You lose 1 shot"
   1 e19,e0;"    You get bonus of ";sk1;" shots. "
   1 e18,e9;"Player ";c;" Wins!"
   1 e18,e6;"YOU POTTED THE CUE BALL!"
   1 e18,e6;"STRENGTH - Press";
   1 e18,e6;"DIRECTION move indicator  ";
   1 e18,e2;"Referee awards a free shot,   ";
   1 e18,e0;"Level  1  2  3  4  5  6  7  8  9"
   1 e18,e0;" Referee awards a free shot.    "
   1 e18,e0;"     You scored :  ";score
   1 e17,e9;"SELECT";
   1 e17,e6;"Position Cue Ball";
   1 e17,e6;"FOUL! You potted black!"
   1 e17,e16;"Press ANY key to";
   1 e17,e0;"^"
   1 e17,e0;" You potted the black too soon! "
   1 e17,e0;" You have run out of shots!     "
   1 e17,e0;" ";
   1 e17,e0;"  You cleared the table!        "
   1 e17,e0;"   Choose SKILL LEVEL  1 to 9   "
   1 e17)="  SPECTRUM POOL  "
   1 e15,e30;r(e6)
   1 e15,e2;r(e4);
   1 e15,e16;r(e5);
   1 e14,e4;"will be given the choice."
   1 e14,e4;"the border to Magenta!"
   1 e14,e4;"black too soon!"
   1 e14,e1;" ";
   1 e13,e4;"shown. Fouls shots change";
   1 e13,e4;"same shot (unlikely!)  he";
   1 e13,e4;"out of shots,  or pot the";
   1 e13,e4;"free shot."
   1 e13,e4;"changed after each pot."
   1 e13,e4;"by the 1st ball potted."
   1 e12,e4;"to simplify your choice."  
   1 e12,e4;"is to play  is determined";
   1 e12,e4;"chalk  you will be given a";
   1 e12,e4;"a Yellow and Blue in the";
   1 e12,e4;"1 to 6(at random) and are";
   1 e12,e4;" The number of  shots are";
   1 e12,e4;"  Game ends when  you run";
   1 e11,e4;"pot the white ball.";
   1 e11,e4;"is  used for  each option";
   1 e11,e4;"Should a player pot  both";
   1 e11,e4;" The pockets are numbered";
   1 e11,e4;" (unless as last ball!)"
   1 e11,e4;"  The colour each  player";
   1 e11,e4;"  If is because of lack of";
   1 e11)="00000000000"
   1 e10,e4;"a lack of skill!" 
   1 e10,e4;"a  different  graphic aid";
   1 e10,e4;"Blue)  and the Black."
   1 e10,e4;"Black."
   1 e10,e4;"(except Black!)."
   1 e10,e4;" Hitting the black first";
   1 e10,e4;"  You lose a shot  if you" 
   1 e1,e30;r(e3)
   1 e1,e2;r(e1);
   1 e1,e16;r(e2);
   1 d=(d-e1)*16
   1 col=c(e2):
   1 clear table 2
   1 clear table 1
   1 c$(e1)=e$:
   1 b$(e3,e17)
   1 b$(e3)="Max              "
   1 b$(e2)="   PLAYER 2      "
   1 b$(e1)="   PLAYER 1      "
   1 SPECTRUM POOL
   1 SKILL LEVEL
   1 Reset Cue Ball
   1 REPEAT LOOP
   1 Position cueball
   1 POT CUE BALL
   1 INSTS. 1 PLAYER
   1 INITIALISE CONSTANTS
   1 INITIAL SET UP ETC
   1 INITIAL SET UP BALLS
   1 HI-SCORE POOL
   1 Fix Direction
   1 END OF GAME -NEW?
   1 DIRECTON  Sub-routines
   1 CHOOSE GAME
   1 BX"X#X/X0X1X=X>X^X
   1 A$="                 "
   1 ;"                                ":
   1 8020000000000022"""""""""""22
   1 00000111111111122222222222222200000000000000000222222222222222000000((((((((((((************((((((((((((((((((((**((((****(((((((((((11111111111**((((**(((((((((((((1111111111(**((((**((((((((((((((((((((((((**((((**(((((((((((((1111111111111111(**(((((((((((((11111111111((((((((((((((((((((((((((((((((((((((((((((((((((((
   1 00000000000000000000000000000000000000000000000000003300000000000000000000000000033033000000000000333000000000300330330000000000000000000003303003303300000000000000000033033030033033000000000000000330330330330000000088000000003303303303300000000000880000000033033033000000000022000800000000330330000000022222"    0000000003300000002222"""'''''''"A
   1 - P.G.Curtis 
   1 ,e6;"    SPIN";
   1 );" memory"
   1 (x(e1)/256
   1 (r(e6)=r(e5))
   1 (r(e6)=r(e4))
   1 (r(e6)=r(e3))
   1 (r(e6)=r(e2))
   1 (r(e6)=r(e1))
   1 (r(e5)=r(e4))
   1 (r(e5)=r(e3))
   1 (r(e5)=r(e2))
   1 (r(e5)=r(e1))
   1 (r(e4)=r(e3))
   1 (r(e4)=r(e2))
   1 (r(e4)=r(e1))
   1 (r(e3)=r(e2))
   1 (r(e3)=r(e1))
   1 (e9,e9)=a5
   1 (e9,e8)=a5
   1 (e9,e10)=a5
   1 (e8,e9)=a5
   1 (e8,e8)=a5
   1 (e8,e10)=a5
   1 (e7,e9)=a5
   1 (e7,e8)=a5
   1 (e7,e10)=a5
   1 "Shots=";shots;" Score=";score;" ";
   1 "000000000001"
   1 "000000000000"
   1  CRL Group PLC "