Top 10k strings from grandna1.tap in <root> / bin / z80 / software / ZxTapGames.zip / games /
Back to the directory listing
4 3 (((m5+e4)*8 3 (((m2+e4)*8 3 (((m1+e4)*8 2 e7;e25,139 2 e7;e24,140 2 e20,e;"Press 'Y' if correct 'N' if not" 2 e1;e25,139 2 e1;e24,140 2 Parade Ring 2 (((m4+e4)*8 2 (((m3+e4)*8 2 1 y$=" " 1 w(f)=w(f+e1) 1 w(f)=w(f)-l*e10 1 w(e3)=w(e2) 1 version>e4 1 version=e4 1 version=e3 1 version=e3 1 version=e1 1 version<e1 1 sound=sound+e1 1 o(f,e2)=e1 1 o(f,e1)=q: 1 o(e5,e2)=z 1 o(e5,e1)=z 1 o(e4,e2)=z 1 o(e4,e1)=z 1 o(e3,e2)=z 1 o(e3,e1)=z 1 o(e2,e2)=z 1 o(e2,e1)=z 1 o(e1,e2)=z 1 o(e1,e1)=z 1 n$=" 1 m$=" 1 k=e28+r*e4 1 j$=" 1 h*e4,e2;"Player No.";h;" is " 1 h$=" 1 graphics 1 gn S| 1 f,e27;" " 1 f,e14;" " 1 f*e2+e3,e14;f;" ";z$ 1 e;" PLAYER HORSE No STAKE " 1 e;" ": 1 e9,e;" the bookmaker has left!...." 1 e9,e29;"/";o(e3,e2) 1 e9,e27;o(e3,e1); 1 e9,e14;"3 ";Q$(r(e3)) 1 e9,e12;" Wins ";l$;bw;p$ 1 e9,e12;" Loses ";l$;bw;p$ 1 e8,e;" or 'n' for no" 1 e8,e;" Up to five players may make"," bets. Each player starts"," with `100 (or 100p), and may " 1 e8,e;" Let's see how much you all have left!" 1 e8,e;" 3) SERIOUS PUNTER Automatic selection of horses but YOU enter the odds." 1 e7;e25,145 1 e7;e25,144 1 e7;e25,142 1 e7;e25,141 1 e7;e25,140 1 e7;e24,144 1 e7;e24,143 1 e7;e24,142 1 e7;e24,141 1 e7;"RACE ";r; 1 e7,e;" Unfortunately it looks as if" 1 e7,e;" Press 'y' for yes" 1 e7,e;" next race." 1 e7,e;" first race." 1 e7,e29;"/";o(e2,e2) 1 e7,e29;"/" 1 e7,e27;o(e2,e1); 1 e7,e14;"2 ";Q$(r(e2)) 1 e7,e12;" Wins ";l$;aw;p$ 1 e7,e12;" Loses ";l$;aw;p$ 1 e6,e;" ""Press 'L' for 'Pounds' or 'P' for 'Pence' " 1 e5,e;k$(e1 1 e5,e;" between you!" 1 e5,e;" see what the odds are on the" 1 e5,e;" Do you want to start again?" 1 e5,e;" 2) AMATEUR PUNTER Automatic selection of horses but shorter odds." 1 e5,e;" Your Spectrum will be the"," bookmaker to take your bets." 1 e5,e31;k$(k); 1 e5,e29;"/";o(e1,e2) 1 e5,e29;"/" 1 e5,e27;o(e1,e1); 1 e5,e14;"1 ";Q$(r(e1)) 1 e4,e;m$(e1 1 e4,e;" That's the end of the day's racing." 1 e4,e31;m$(k) 1 e3500=3500 1 e3400=3400 1 e3300=3300 1 e3200=3200 1 e3100=3100 1 e3,e;j$(e1 1 e3,e;" all their money!" 1 e3,e;" You have won over ";l$;"100,000";p$ 1 e3,e;" seven races. See how many"," winners you can pick." 1 e3,e;" Lets meet the bookmaker and" 1 e3,e31;j$(k): 1 e21,e;"Sorry, I said 1 to 5 players." 1 e21,e;"Press 'y' for another game." 1 e21,e;"CHOOSE VERSION - Press 1 to 4" 1 e21,e;" Player (1 to 5) or (9 to end) " 1 e21,e;" ";hh;" -Bet (Min. ";l$;"1";p$;" - Max.=Stake)" 1 e21,e;" ";g$;" "; 1 e21,e;" 2nd - No.";p2;" 3rd - No.";p3 1 e21,e;" VERSION ";version;" CHOSEN. " 1 e21,e;" " 1 e21,e12;"Horse No.? (1 1 e20,e;l$;ee;p$; 1 e20,e;"(Maximum 2 digits for each No. " 1 e20,e;" (Maximum 10 letters each.)" 1 e20,e23;l$;es;p$;" " 1 e20,e21;eh; 1 e20,e18;E$ 1 e2,e;h$(e1 1 e2,e;" The final option is whether to have an initial stake and place bets in '`'s or 'p's. " 1 e2,e;" 1) FUN Automatic selection of horses and long odds." 1 e2,e;" This is a race meeting of" 1 e2,e31;h$(k) 1 e2,e2;"Please tell me their name(s) - " 1 e2,e16;" HONEST CLIVE " 1 e1;e25,145 1 e1;e25,144 1 e1;e25,142 1 e1;e25,141 1 e1;e25,140 1 e1;e24,e32: 1 e1;e24,144 1 e1;e24,143 1 e1;e24,142 1 e1;e24,141 1 e1;"______________" 1 e1;"______" 1 e1;"No. 5 is the WINNER" 1 e1;"No. 4 is the WINNER" 1 e1;"No. 3 is the WINNER" 1 e1;"No. 2 is the WINNER" 1 e1;"No. 1 is the WINNER" 1 e19,e;n$(e1 1 e19,e;l$;dd;p$; 1 e19,e;" Press any key to see other options available." 1 e19,e;" 2/7 enter 2 then 7 " 1 e19,e6;E$; 1 e19,e31;n$(k) 1 e19,e23;l$;ds;p$;" " 1 e19,e21;dh; 1 e19,e16;" ";l$;ee;p$ 1 e18,e;l$;cc;p$; 1 e18,e;k$(e1 1 e18,e;"Please enter names of 5 horses " 1 e18,e;" e.g. 4/1 enter 4 then 1 " 1 e18,e;" Bye! 1 e18,e6;D$; 1 e18,e31;k$(k) 1 e18,e31;" " 1 e18,e23;l$;cs;p$;" " 1 e18,e21;ch; 1 e18,e16;" ";l$;dd;p$: 1 e17,e;l$;bb;p$; 1 e17,e;"(Both figures required - " 1 e17,e6;C$; 1 e17,e23;l$;bs;p$;" " 1 e17,e21;bh; 1 e17,e16;" ";l$;cc;p$: 1 e16,e;l$;aa;p$; 1 e16,e;"Please enter odds for each horse" 1 e16,e6;B$; 1 e16,e23;l$;as;p$;" " 1 e16,e21;ah; 1 e16,e18;D$ 1 e16,e16;" ";l$;bb;p$: 1 e15,e;" (Note:- In all versions BETS are only accepted in either `'s or p's (option on next screen) and winnings are rounded UP to the nearest ` or p.)" 1 e15,e6;A$; 1 e15,e2;E$: 1 e15,e16;" ";l$;aa;p$: 1 e15,e12;" Wins ";l$;ew;p$ 1 e15,e12;" Loses ";l$;ew;p$ 1 e14,e;"If he'd stayed you'd have had;-" 1 e14,e;" O.K. Hope you enjoyed the game." 1 e14,e;" You have chosen 'p's " 1 e14,e;" You have chosen '`'s " 1 e14,e9;" " 1 e14,e2;" "; 1 e13,e;"4"; 1 e13,e;" Your 'friendly' bookmaker"," 'Honest Clive' Spectrum will"," pay the full odds on the"," winner and 1/4 the odds on"," second place." 1 e13,e2;D$: 1 e13,e2;" 1 e13,e29;"/";o(e5,e2) 1 e13,e29;"/" 1 e13,e27;z; 1 e13,e27;o(e5,e1); 1 e13,e14;"5 ";Q$(r(e5)) 1 e13,e12;" Wins ";l$;dw;p$ 1 e13,e12;" Loses ";l$;dw;p$ 1 e12,e;" 4) DEAD SERIOUS PUNTER YOU name the horses and enter the odds!" 1 e12,e31;" " 1 e12,e18;C$ 1 e11,e;"3"; 1 e11,e;" back one horse in each race." 1 e11,e6;" " 1 e11,e2;C$: 1 e11,e29;"/";o(e4,e2) 1 e11,e29;"/" 1 e11,e27;z; 1 e11,e27;o(e4,e1); 1 e11,e14;"4 ";Q$(r(e4)) 1 e11,e12;" Wins ";l$;cw;p$ 1 e11,e12;" Loses ";l$;cw;p$ 1 e1,e;h$(e1 1 e1,e;" Well done! " 1 e1,e;" Thank you." 1 e1,e;" Oh dear, everyone has lost" 1 e1,e8;"GRAND NATIONAL" 1 e1,e31;h$(k); 1 e,e;" ";" 1 e,e;" There are 4 alternative versions available:-" 1 e,e9;"______________" 1 e,e9;"Value of Stake"; 1 e,e2;"O.K. ";p;" person(s) want to play." 1 e,e14;"THE GRAND NATIONAL" 1 e,e14;" JOCKEYS HANDICAP " 1 e,e14;" SELLERS CHASE " 1 e,e14;" RAMTOP STAKES " 1 e,e14;" RAINBOW STAKES " 1 e,e14;" NOVICES PLATE " 1 e,e14;" CHALLENGE CUP " 1 bkr>100000 1 bkr=aw+bw+cw+dw+ew 1 bkr=aa+bb+cc+dd+ee 1 a(e7)=e19: 1 a(e6)=e16: 1 a(e5)=e15: 1 a(e4)=e14: 1 a(e3)=e13: 1 a(e2)=e12: 1 a(e1)=e11: 1 YOU CAN'T AFFORD IT-BET AGAIN 1 WAITING FOR PHOTO FOR PLACES 1 No more bets - lets start race 1 LOAD HORSES 1 GRAND NATIONAL 1 B<$$$$BBf< 1 ;"THANK YOU - Please STOP tape." 1 ;"PLEASE LEAVE TAPE RUNNING"; 1 ;"GRAND NATIONAL"; 1 ;" WHILE I LOAD GRAPHICS" 1 *e5+e2)*e10)+800 1 )=m5*e10+e5 1 )=m4*e10+e4 1 )=m3*e10+e3 1 )=m2*e10+e2 1 )=m1*e10+e1 1 )="ZAGROA " 1 )="WINTERTIME" 1 )="WESTWOOD " 1 )="WASHINGTON" 1 )="TULA FANCY" 1 )="TIEPOLINO " 1 )="TERRYASH " 1 )="TARQUIN " 1 )="SUPER SOLO" 1 )="SUB ROSA " 1 )="SNOWTOWN " 1 )="SANDWALKER" 1 )="ROYAL RUBY" 1 )="RED RUM " 1 )="RED CLERIC" 1 )="QUITE HOT " 1 )="QUEENSLAND" 1 )="QUAY MAN " 1 )="PENROYAL " 1 )="PEGECEE " 1 )="PANARAMA " 1 )="NEWS KING " 1 )="NAJAM " 1 )="MR SUNBIRD" 1 )="MIGRATOR " 1 )="LITTLE BAY" 1 )="LA GAVINA " 1 )="KATE ASTRO" 1 )="JUNGLE JIM" 1 )="ISLAY MIST" 1 )="ICE CONE " 1 )="HIGH HILLS" 1 )="GUN METAL " 1 )="FERNEZ " 1 )="EBORACUM " 1 )="DOORSTEP " 1 )="DEVIL BOY " 1 )="CRUMBS " 1 )="BRONWYN " 1 )="ALDO " 1 (w(f)/e10) 1 (w(e3)/e10) 1 (w(e2)/e10) 1 (es*o(eh,e1)/o(eh,e2)+.5 1 (ds*o(dh,e1)/o(dh,e2)+.5 1 (cs*o(ch,e1)/o(ch,e2)+.5 1 (bs*o(bh,e1)/o(bh,e2)+.5 1 (as*o(ah,e1)/o(ah,e2)+.5 1 ((m5+e4)*8 1 ((m4+e4)*8 1 ((m3+e4)*8 1 ((m2+e4)*8 1 ((m1+e4)*e8,112 1 (((m4+e4)*e8)+e7,64 1 (((m3+e4)*e8)+e7,80 1 (((es*o(eh,e1)/o(eh,e2))/e4)+.5 1 (((ds*o(dh,e1)/o(dh,e2))/e4)+.5 1 (((cs*o(ch,e1)/o(ch,e2))/e4)+.5 1 (((bs*o(bh,e1)/o(bh,e2))/e4)+.5 1 (((as*o(ah,e1)/o(ah,e2))/e4)+.5 1 "graphics" 1 "Max.10 letters",F$ 1 "If names correct - enter 'Y'",F$ 1 "How much? ";ss 1 "How many players?",p 1 "Horse 5 ",z 1 "Horse 4 ",z 1 "Horse 3 ",z 1 "Horse 2 ",z 1 "Horse 1 ",z 1 ";" " 1 " 1 P.G.CURTIS 1983 1 H