ZXTape! 0Created with Ramsoft MakeTZXTOUR .z y?0z ********************* *** TOURIST TRAP *** ********************* 0a=2:b=7:o=-:w=/:b-a:b-a: i=o21 (Ni,8;a;b;w;" STOP THE TAPE ":.2~L,20:.2~L,-10 2c=a:a=b:b=c:i:8650! <::7:0::9000(#:PL=1+(*2):PL::12 ,6;"PLAYER ";PL;(143+PL);0;" TO START ":.73333,20:8650!::0 F<V(2):H(2):J(2):C(2):P(2) PBN=12:J(N)=0:C(N)=250:P(N)=5:N Z1FWD=2:FSF=0:TI=0:D=1 dPV(1)=1:V(2)=1:H(1)=1:H(2)=2 n 8000@ x$LO=0:8430 :6500d 2C(1)>0C(2)>0120x 85004!:7,11 ;1;1;1;" GAME OVER";10 ,6;5;0;"PLAYER ";1+(C(2)0),(144+(C(2)0));1;" OUT OF CASH";14,5;"PRESS ENTER FOR SCORES":Z$ xJ(1)=J(1)+P(1):J(2)=J(2)=P(2):P(1)=0:P(2)=0:8600! \J(1)=J(2)85004!:10 ,7;" GAME DRAWN ":8650!:190 8650!:7,5;" PLAYER ";1+(J(2)>J(1));(144+(J(2)>J(1)));0;" WINS " ""180 11 ,5;" DO YOU WANT TO PLAY";12 ,12 ;" AGAIN? ";14,5;"PRESS YES OR NO ";15,5;"OR DIFFERENT FOR ";17,8;" A NEW GAME":="Y"Ŧ="y"60< $="N"Ŧ="n"85004!:230 @="D"Ŧ="d":10 ,5;5;"START THE TAPE":"" 190 O10 ,7;"THANKS FOR PLAYING ";11 ,10 ;"BYEEE":230 ### CHECK PETROL ### HTI=TI+1:P(PL)=P(PL)-((MI/.3))/100d:P(PL)>0  DTV=D:LO=1:P(PL)=0:85004!:130,90Z,32 :130,90Z,30:115s,80P:30,0,-.5*:117u,82R:-5,20:12 ,14;"FUEL";9 ,14;2;" ";9 ,16;1;" " ,4,4;" YOU ARE OUT OF PETROL " 16,4;" YOU MUST PAY `10 + ";17,4;"THROW OF DICE FOR A TOW":250:8430 :C(PL)=C(PL)-(10 +D) CJ(PL)=J(PL)-5*(TI=1)-2*(TI=2):8610! $8650!:85004!:TI=110 ,4;" DAY RUINED ";11 ,4;" LOSE 5 POINTS ";12 ,4;" SCORE NOW ";J(PL) .16,4;" YOU HAVE TO PAY `";10 +D;" ";17,4;" TOTAL CASH NOW ";C(PL);" ":TI=210 ,4;" LOSE 2 POINTS ";11 ,4;" SCORE NOW ";J(PL) 8 8650! B!85004!:4360:D=DTV: *### RESTAURANT ### 48650!:85004!:5,5;" GO OUT FOR A MEAL ";6,10 ;" INSTEAD ";10 ,6;7;1;1;" BURPIOS ";11 ,6;" Italian Restaurant":8650! >l85004!:557,138:81Q,0:0,-100d:-81Q,0:0,100d H#SCM=0:T$(8,10 ) R#"OYSTERS","PRAWNS","MELON","SOUP" \""FISH","CHICKEN","STEAK","PIZZA" f."ICE CREAM","GATEAUX","FRUIT PIE","PANCAKES" p "SQUASH","TEA","COFFEE","COKE" zwM=10 40(10 :NN=1+(*4):(2120H+M):N=1NN:T$(M/10 ):N:SCM=SCM+NN:M eN=516:N,7;T$(5):N:5,9 ;3;7;1;" MENU " ZN=713 2:25:.02{# =,N:N,7;T$((N-5)/2):N BT$(6)="YUK !!":T$(7)="NOT BAD":T$(8)="YUMMY" 70F:12 ,17;5;"MEAL WAS ";13 ,17;T$(6+(SCM>8)+(SCM>11 )):.4L,1-20*(SCM<9 )+20*(SCM>11 ):14,17;"SCORE ";(SCM/2):J(PL)=J(PL)+(SCM/2) 8650!:12 ,17;4;" PRES ";13 ,17;" ENTER ";14,17;" TO FIND ";15,17;" COST ";16,17;" `1+DICE " ""2230 g8650!:85004!:8430 :C(PL)=C(PL)-1-D:14,6;" MEAL COST `";1+D SCM>11 (1+D)<316,6;" GOOD & CHEAP ";17,6;" BONUS SCORE 2 ":J(PL)=J(PL)+2  d### CASTLE ### n3960x:3990: x5,5;6;" ";6,5;" ";7,5;" " N=18:N+7,5;6;"":N:N=11 15:N,14;7;"":N U10 ,6;2;7;1;"CRUMBLY";11 ,7;"CASTLE": MI=15+(*15):17,4;5;"A JOURNEY OF ";MI;" MILES";14,20;4;"ENTRY";15,20;" `1.50 " ="DO YOU WANT TO GO YES OR NO?";Z$:Z$="N"Z$="n" &1000:LO=1TI=0: .1+(*14)=1502:14,20;"CLOSED";15,20;"TODAY ":J(PL)=J(PL)-5:16,4;4;"DISAPPOINTED!";17,4;" LOSE 5 POINTS ":N=10  1-1:.3,N:N:8650!:1000:TI=0:8600!: 9C(PL)=C(PL)-1.5@:4030:H$(6,11 ) E"BORING","VERY DULL","BEARABLE","FASCINATING","EXCITING","FABULOUS" ȇN=16:.1}L,N:Q$:H$(N)=Q$:N:4,4;5;"THROW DICE TO SEE IF IT";5,4;"IS INTERESTING" 68650!:N=1200:N:""4050 ܪ85004!:8430 :n=1300,:n:3960x:4,4;4;"IT IS ";H$(D);5,4;" SCORE ";D:J(PL)=J(PL)+D:FC=1:4080 `8650!:4,4;6;" ";5,4;" ": <.2~L4070:4,4;"YOU SEE THE GHASTLY ":502:5,4;1;3;" GHOST ";0;6;" SCORE 5 ":4130":J(PL)=J(PL)+5:FC=0 <.34070:4,4;"GOOD PHOTOS FROM TOWER ";5,4;"SCORE 3 ":J(PL)=J(PL)+3:FC=0 <.25~4070:4,4;3;7;1;"YOU GET LOST IN THE ";5,4;"DUNGEON, LOSE 4 POINTS":J(PL)=J(PL)-4:FC=0 <.34070:4,4;4;" SMASHING CREAM TEA ! ";5,4;"SCORE 4 ":J(PL)=J(PL)+4:FC=0 FC4080 >8650!:85004!:1000:TI=0:8600!: "N=110 ,310 ,20;1;7;0;"" 1411 ,20;1;7;0;"" 6412 ,20;1;7;0;"" @20:N: ### BUY PETROL ### )P(PL)7ť<.5LO4497 48610!:P(PL)0C(PL)0140  5,4;"YOU MAY BUY PETROL,YOU ";6,4;"HAVE ";P(PL);" GALLONS ";7,4;"AT THE MOMENT ";8,4;"FULL TANK =10 ";14,13 ;" CASH `";C(PL);" " H$(5,6) H$(1)="" &H$(2)=" " 0H$(3)=" " :H$(4)="" DH$(5)="" NA1,2,3,4,4,4,5,1 Xq4430N:N=18:A:8+N,5;H$(A):N:PR=160+(*10 ):15,6;PR ]I"ENTER GALLONS TO BE BOUGHT";R$:R$<480ůR$>58:4445] bGA=R$:GA*(PR/100d)>C(PL)GA=C(PL)/(PR/100d):P(PL)=P(PL)+GA:C(PL)=0:8610!:9 ,13 ;"CASH FOR ONLY";10 ,13 ;(GA*100d)/100d;" GAL.";14,20;" ":4470v fP(PL)+GA>10 4445] gBP(PL)+GA10 P(PL)=P(PL)+GA:C(PL)=C(PL)-GA*(PR/100d) qY8610!:10 ,13 ;"FUEL ";P(PL);" GAL.";14,13 ;" CASH `";C(PL) v8650!:85004! LOť>.5 #### SITE FEES #### FSF=14550 eN=57:N,6;" ":N:6,7;4;" A CAMPING SITE " SF=3+(*3):8,4;"YOU MUST PAY SITE FEES ";9 ,4;" PRESS ENTER TO FIND ";10 ,13 ;" COST ";13 ,4;" COST WILL BE `";SF;" TIMES ";14,4;" THROW OF DICE " G0:.2~L,20:N=1150:N:""4500  ^85004!:8430 :11 ,4;" COST IS `";SF*D;" ":C(PL)=C(PL)-(SF*D) pN$(3,8):N$(1)="TERRIBLE":N$(2)="GOOD":N$(3)="PRETTY":ST=1+(*3) 100d:J(PL)=J(PL)+(ST=3)+(ST=2ST=3)-(ST=1):15,4;"IT IS A ";N$(ST);" SITE ";16,4;"SCORE ";(ST=3)+(ST=2ST=3)-(ST=1):FSF=1:8650!:8600! 4555:4590 ː85004!:N=811 :N,5;3;"":N:N=9 10 :N,7;1;"":N @10 ,8;7;2;1;"SWIZWAYS STORES" EN=12 17:N,5;3;" ":N 917,5;1;3;"": 45,5;"YOU NEED PROVISIONS":8650! {6,5;4;"DICE WILL DECIDE WHAT";7,5;"HAPPENS.IN STORE":8650!:85004!:8430 X4610:"OUTRAGEOUS","EXPENSIVE","AVERAGE","FAIRLY CHEAP","VERY CHEAP","GIVE AWAY"  cN=1D:Q$:N:DV=D:12 ,4;"THE PRICES IN THE SHOP ";13 ,4;"ARE ";Q$ :15,5;" SCORE ";D:J(PL)=J(PL)+D:8650!  85004!:PR=12 +(*5):12 ,4;"YOU EXPECT TO SPEND `";PR;13 ,4;"DICE WILL TELL YOU ";14,4;"SIZE OF BILL ":90Z:8430 *oPP=5+D*3:13 ,4;"YOU ACTUALLY SPEND `";PP;14,4;6;" " 4C(PL)=C(PL)-PP >PPPR+216,4;"YOU OVER SPEND ":DV>416,19;"ALTHOUGH";17,4;"IT'S ";Q$;" " \PP>PR+217,20;"SCORE";-3-3*(DV>4):J(PL)=J(PL)-3-3*(DV>4):4720p fe16,4;"YOU ARE CLOSE TO YOUR ";17,4;"BUDGET. SCORE 2":J(PL)=J(PL)+2 p%FSF=0:8650!:8600! #### LAZY DAY #### `SCD=0:39',120x:502,10 ,-.5*:N=15:-10 ,-2,.5*:N:64@,125}:5,-40(:39',64@:175,0:100d,104h:30,30:30,-30:130,134:502,8:30,-30:-502,-8:-568,0 90Z,80P,7:30,0:10 ,16:14,-16:5,5:100d,77M:22,-4:14,4;"A LAZY DAY AT CAMP" 15,4;"SUNBATHE AS LONG AS";16,4;"YOU CAN THROW OVER 3";17,4;4;"PRESS ENTER TO GO":0:8430 :10 ,20;1;;"AGAIN":J(PL)=J(PL)+D:SCD=SCD+D:D>34770 t10 ,12 ;5;"SUN'S GONE IN":N=0-10 -1:.05|L,N:N:SCD82000 $8650!:85004!:8600! #### GOLF #### 4810:4860: EN=49 :N,4;5;" ":N GN=10 17:N,4;4;" ":N +12 ,6;4;6;"" +13 ,6;4;6;"" +14,6;4;6;"" A180,120x:0,-24:7,23;"1": 6,6;" A DAY AT ";7,6;" THE GOLF CLUB ":75K:12 ,12 ;" YOU PLAY YOUR ";13 ,12 ;" OPPONENT IN ";14,12 ;" THIS GAME " 8650!:4810:6,6;"LOSER OF GAME";7,6;" PAYS FOR";8,6 ;"THE GAME. COST `10";9 ,6;"WINNER GETS 10 POINTS" S(2,18) 8650!:85004!:10 ,5;"PLAYER ";1;"","PLAYER ";2;"";4,4;"HOLD ""S"" TO SPEED GAME " $2,3,4,3,4,2,3,3,4,4,2,3,5,4,3,2,4,3 .aDR=0:GSA=0:GSB=0:4900$:HOL=1+(*80P):N=118 8JP:6,6;"HOLE NUMBER ";N;7,6;"PAR = ";P+1 BS(1,N)=P+(*3) LS(2,N)=P+(*3) V,GSA=GSA+S(1,N):GSB=GSB+S(2,N) `m12 ,7;S(1,N);12 ,17;S(2,N);15,7;GSA;15,17;GSB jGSA=HOLDR=012 ,7;"1":M=140(4:.4L,M:17,4;1;"HOLE IN ONE PLAYER ";1;"":M:GSA=GSA-S(1,N)+1:DR=1:17,4;6;" " tGSB=HOLDR=012 ,17;"1":M=140(4:.4L,M:17,4;1;"HOLE IN ONE PLAYER ";2;"":M:GSB=GSB-S(2,N)+1:DR=2:17,4;6;" " ~7150:.5,20:N:502:4810 GSA=GSB100d:5,4;"GAME DRAWN. ";6,4;"SHARE COST AND POINTS":J(1)=J(1)+5:J(2)=J(2)+5:C(1)=C(1)-5:C(2)=C(2)-5 GSA>GSBJ(2)=J(2)+10 :C(1)=C(1)-10 :5,4;"PLAYER ";2;"";0;" WINS" GSA010 ,10 ;"A ROUND AT 19th";11 ,10 ;"TEE WILLCOST :";12 ,10 ;"`2xTHROW OF DICE":200:8430 IDR>0C(DR)=C(DR)-2*D:17,5;"COST `";2*D  8650!  8600! #### BEACH TRIP #### (#D=6:51702:5230n 2SUB=51702:N=410 :N,4;5;" ":N:N=11 12 :N,4;1;" ":N <]D4N=110 :6:5:160,120x,N:N:0:7 FD36,18;5;7;"";7,18;"";8,18;"";9 ,18;"" P|D2N=10 162:M=11 172:N,18;"' ' ' ' '";N,18;" ' ' ' ' ":M:N Z|D=1180,90Z:5:1:-5,-10 :3,0:-5,-15:0:0 d nN=13 17:N,14;7;3;" ":N:9 ,5;" A TRIP TO BEACHY BAY";13 ,14;3;"";17,14;"";14,15;1;"CAR PARK";15,17;"`1";16,15;"A DAY":8650! s;N=13 17:N,14;6;" ":N xMI=20+(*10 ):13 ,5;"YOU MAY GO ON A VISIT";14,5;" TO THE SEA ";15,5;" IT IS ";MI;" MILES ":" ENTER ";1;"Y";0;"ES OR ";1;"N";0;"O";Z$:Z$="N"Z$="n" }&1000:LO=1TI=0: C(PL)=C(PL)-1:LO=0:85004!:10 ,5;" THROW DICE TO FIND ";11 ,5;" OUT THE WEATHER. ";12 ,5;" THE HIGHER SCORE ";13 ,5;" THE BETTER " !8430 :H$(6,6) }H$(1)="STORMY":H$(2)="RAINY":H$(3)="CLOUDY":H$(4)="WARM":H$(5)="HOT":H$(6)="SUPER" 25:85004!:SUB:J(PL)=J(PL)+D:10 ,5;" THE WEATHER IS ":502:11 ,5;H$(D);" SCORE ";D SUB51702 D>2ƥ<.68650!:5,5;"YOU WIN A";6,4;"SANDCASTLE";7,4;"COMPETITION":PRI=2+(*4):8,4;"SCORE ";PRI;" POINTS":J(PL)=J(PL)+PRI D>25580 s70F:5,4;" GO ON THE ";6,4;" PIER OUT OF";7,4;" THE RAIN":8650! 85004!:N=5172:N,4+N/2;1+(*5);9 ;ۺ(*2);ܺ(*2);"PENNY ARCADE":M=15027:.2~L-N/100d,M:M:N ZJ$(11 ,13 ):30:85004!:5,5;5;" FRUIT MACHINE " J$(1)=" " J$(2)="" J$(4)=" " J$(9 )=" " J$(3)=J$(2):J$(5)=J$(4):J$(6)=J$(4):J$(7)=J$(2):J$(8)=J$(2):J$(10 )=J$(2):J$(11 )=J$(4) N=111 :6+N,6;7;J$(N):N:N=10 15:N,20;6;"":N:15,19;6;"" _6,21;4;"POINTS";8,23;7;" 2 ";9 ,23; "--" e11 ,23;" 4 ";12 ,23;"-";14,23;" 8 ";15,23;"" WT=0:TU=1:GO=3+(*3):17,8;2;7;1;"10p A GO ";10 ,8;1;"YOU HAVE";11 ,8;" ";GO;" GOES ";12 ,8;" " "&"PRESS ENTER TO PLAY";Z$:W=0 ,P7,8;3;7;1;"GO ";7,14;" ";TU;" " 6NN=20+(*10 ):N=1NN:FMA=(144+(*3)):FMB=(144+(*3)):FMC=(144+(*3)) @9M=10 12 :M,8;5;" ":M Jf11 ,9 ;3;FMA;11 ,12 ;1;FMB;11 ,15;2;FMC:N TFMC=144W=2 ^(FMB=145FMC=145W=4 h6FMA=146FMB=146FMC=146W=8 rV15,12 ;W:TU=TU+1:WT=WT+W:TUGO+1.5,TU:5410" |8650!:85004!:6,5;" YOU SCORED ";WT;" POINTS ";8,5;" IT COST YOU `";GO/10 :J(PL)=J(PL)+WT:C(PL)=C(PL)-(GO/10 ) 06850:1000:TI=0:8600! ##### RAILWAY ##### %DSL=0:5620:5700D J$(6,17) J$(1)=" " J$(2)=" "  J$(3)=" "  J$(4)=" " J$(5)=" " J$(6)=" " 9N=16:8+N,5;6;J$(N):N &xN=513 :80P,546,N:120x,546,N:N:N=502535:75K,N:568,0:N 0617,4;6;"" :eN=717:N,26;"":N:8,22;2;"";7;"";2;"": Dg5,8;" THE FULL O TYN ";6,11 ;" RAILWAY ":8650!:5710N:5720X NGN=46:N,4;6;" ":N: XMI=15+(*10 ):5,5;"THE RAILWAY IS ";MI;6,10 ;" MILES AWAY";16,18;4;"COST `2":"DO YOU WANT TO GO YES OR NO";Z$:Z$="N"Z$="n" b&1000:LO=1TI=0: l,C(PL)=C(PL)-2:65780 v5710N:4,5;"NO STEAM TRAINS TODAY";5,5;"LOSE 3 POINTS";16,18;6;" ":J(PL)=J(PL)-3 Q8650!:>.9ffff5710N:4,5;"NEITHER ANY":DSL=1 5,5;"DIESELS RUNNING TODAY";6,5;"SCORE ";-3*(DSL=1)+4*(DSL=0):J(PL)=J(PL)-3*(DSL=1)+4*(DSL=0):5790 5710N:4,5;"YOU'RE IN LUCK";5,5;"STEAM TRAINS RUNNING";6,5;"TODAY. SCORE 5":J(PL)=J(PL)+5 $FL=1:<.8L5850 \8650!:5710N:4,10 ;2;7;1;1;" ACCIDENT " pS$(3,7):S$(3)="BROKEN":S$(2)="TWISTED":S$(1)="GRAZED":Q=1+(*3) 5,4;"YOU HAVE FALLEN OFF THE";6,4;"PLATFORM AND ";S$(Q);7,10 ;"YOUR ANKLE":LG=3+2*(Q=2)+7*(Q=3) Ƅ8650!:5710N:5,5;"LOSE ";LG;" POINTS";7,10 ;6;" ":J(PL)=J(PL)-LG:FL=0 ڔ>.58650!:5710N:5,5;" YOU SEE FAMOUS TRAIN ";6,5;" SCORE 4 POINTS ":J(PL)=J(PL)+4:FL=0 >.92k8650!:5710N:5,5;" YOU GET A RIDE ON ";6,5;" THE FOOTPLATE ";7,5;"SCORE 8 POINTS ":J(PL)=J(PL)+8:FL=0 FL5790  28650!:1000:TI=0:8600!: f##### PARK ##### p3MI=25+(*10 ):6010z:6080 zJ$(9 ,16) J$(1)=" " J$(2)=" " J$(3)=" " J$(4)=" " J$(5)=" " J$(6)=" " J$(7)=" " J$(8)=" " J$(9 )=J$(8) SUB=6070:N=19 :N+6,5;J$(N):N:4,5;4;" WILDWOODS ";5,5;" SAFARI PARK ": l7,22;5;"ENTRY";8,22;"`2.50";17,4;"TO GET THERE ";MI;" MILES" 4"WANT TO GO? YES NO";Z$:Z$="N"Z$="n" &1000:LO=1TI=0: $C(PL)=C(PL)-2.50 :5250 i"LIONS","TIGERS","ELEPHANTS","MONKEYS","GIRAFFES","RHINOS","CAMELS","BUFFALOS","WOLVES","ZEBRAS","GNUS" WAN=0:6120:8650!:85004!:N=111 :Q$:<.3N 7,5;5;"IN THE ";8,5;"RESERVE";9 ,5;"YOU SEE";10 ,5;"THESE ";11 ,5;"ANIMALS";13 ,5;"SCORE 2 ";14,5;"FOR EACH" AN>4FWD<01+(*502)56300 80P:N+5,15;Q$:J(PL)=J(PL)+2:AN=AN+2:15,22;"SCORE";16,25;AN:N:100d $FL=1:85004!:6070 $>.8L8650!:4,5;"YOU SLIP IN SEALION ";5,5;"POOL LOSE 3 POINTS ":J(PL)=J(PL)-3:FL=0 .>.68650!:4,5;"HAVE SUPER ICE CREAM ";5,5;"SCORE 2 POINTS ":J(PL)=J(PL)+2:FL=0 8>.733338650!:4,5;"GET STUNG BY A WASP ";5,5;"LOSE 4 POINTS ":J(PL)=J(PL)-4:FL=0 BFL6180$ ~A8650!:1000:TI=0:FWD=FWD-1:8600! aN=813 :N,4;2;7;1;1;" ":N F10 ,7;1;7;" D I S A S T E R ":8650! 9 ,4;" YOU BREAK DOWN IN THE ";10 ,4;" RESERVE ";11 ,4;" PRESS ENTER TO SEE HOW";12 ,4;" MANY POINTS YOU LOSE " E0:.05|L,0:N=190Z:N:""6330 ċ85004!:15,8;"LOSE 3+ DICE ":8430 :15,8;4;" LOSE ";3+D;" POINTS":J(PL)=J(PL)-D-3 =8650!:1000:TI=0:FWD=4:8600! Z### MOVE PIECES ### d""6500d n_V(PL),H(PL);" ":.3,D:P(PL)=P(PL)-.25~:P(PL).009ztj1020:LO=0 xN=1D:V(PL)=1H(PL)=H(PL)+3:H(PL)>28+(PL=2)V(PL)=V(PL)+(H(PL)-(28+(PL=2))):H(PL)=28+(PL=2):D=D-N:6540 N  N=1D V(PL)>1H(PL)=28+(PL=2)V(PL)=V(PL)+3:V(PL)>19H(PL)=H(PL)-(V(PL)-19):V(PL)=19:D=D-N:6570 N  N=1D V(PL)=19H(PL)<28+(PL=2)H(PL)=H(PL)-3:H(PL)<1+(PL=2)V(PL)=V(PL)+(-1+H(PL)-(PL=2)):H(PL)=1+(PL=2):D=D-N:6600 N  N=1D ҎV(PL)<18H(PL)=1+(PL=2)V(PL)=V(PL)-3:V(PL)<1H(PL)=H(PL)+(1-V(PL)):V(PL)=1:D=D-N:6500d N ,V(PL),H(PL);PL;(144+(PL=2)) QSUB=(V(PL)+1,H(PL)):SUB104h85004!:SUB*502:LO=0 PL=PL+(PL=1)-(PL=2):85004!:8510>!:2+18*(PL=2),31;1+(PL=2);(144+(PL=2)): 6### SET UP BOARD #### @+4,28,148,172,4,28,244,220,5,0,5,0,5,0,4,0,5,0,5,0,2,7,5,0,5,0,4,7,5,0,5,0,5,0,5,0,2,7,5,0,5,0,6,0,5,0,5,0,5,0,2,7,1,7,5,0,3,7,5,0,5,0,7,0,2,7,5,0 C8000@:N=14:A:4,A:240,0:N Y=417224 ?4,Y:25,0:220,Y:24,0:Y 7N=14:A:A,4:0,168:N X=424824 ?X,4:0,24:X,148:0,24:X  85004! 2NA=0:NB=34":NC=29:ND=5 bL=12:N=1283:L=1A:B:2,N;A;1;B;NA;" " 0L=2A:B:20,N;A;1;B;NB $NA=NA+1:NB=NB-1:N:L ^L=12:N=5173:L=1A:B:N,1;1;A;B;NC &0L=2A:B:N,28;A;1;B;ND 0$NC=NC-1:ND=ND+1:N:L : 8510>! D=1,1;1;"";1,2;2;"" NY2+17*(PL=2),31;1+(PL=2);(144+(PL=2)) l#### DICE #### v?A$(6,3):B$(6,3):C$(6,3) A$(1)=" " B$(1)=" " C$(1)=A$(1) A$(2)=" " B$(2)=A$(1) C$(2)=" " KA$(3)=A$(2):B$(3)=B$(1):C$(3)=C$(2) EA$(4)=" ":B$(4)=A$(1):C$(4)=A$(4) KA$(5)=A$(4):B$(5)=B$(1):C$(5)=A$(4) EA$(6)="":B$(6)=A$(1):C$(6)=A$(6) D$="":E$="": ###PRINT DICE ### AD=1+(*6):5,5;D$;9 ,5;E$ 5N=68:N,5;"";N,9 ;"":N !s6,12 ;"PRESS ENTER TO";7,12 ;" ""THROW"" DICE ";8,11 ;" RELEASE TO STOP":Z$ ! D=7D=1 !F6,6;A$(D);7,6;B$(D);8,6;C$(D) ! ="" !*D=D+1:8460 ! !/### BLANK BOARD ### !4JY=417:Y,4;6;" ":Y: !9### BLANK LAST COL ### !>1N=021:N,31;0;" ":N !H"P","L","A","Y","E","R" !Rb8520H!:N=712 :R$:N,31;1;0;6;R$:.005y# =,N:N: !### DISPLAY SCORE ### !8610!:8620! !NP(PL)=((P(PL)*100d))/100d:C(PL)=((C(PL)*100d)/100d): !p85004!:6,6;"PLAYER ";1;" ";8,6;0;"SCORE-NOW ";J(1);9 ,6;"CASH NOW `";C(1);10 ,6;"PETROL LEFT ";P(1);12 ,6;"PLAYER ";2;" ";14,6;0;"SCORE-NOW ";J(2);15,6;"CASH NOW `";C(2);16,6;"PETROL LEFT ";P(2) !""8650! !4"PRESS ENTER TO CONTINUE";Z$:.2~L,20: #(###INSTRUCT ### #2S1,8;2;7;1;" TOURIST TRAP ":9100#:4 #< 3,2;" YOUR OBJECT IS TO SCORE AS "'" MANY POINTS AS POSSIBLE BEFORE"'" ONE OF THE PLAYERS RUNS OUT"'" OF MONEY."'" YOU MOVE ROUND THE BOARD TO"'" THE THROW OF A DICE."'" YOU THROW RIGHT THROUGH YOUR"'" TURN EVEN IF DICE APPLIES TO"'" YOUR OPPONENT." #F13 ,2;" IT IS AS WELL TO BUY PETROL"'" WHEN YOU CAN. ANY LEFT AT"'" THE END OF THE GAME WILL BE "'" CREDITED AS POINTS" #Pl18,2;"PLAYER ONE HAS SYMBOL ";1;"";0;'" PLAYER TWO HAS SYMBOL ";2;"" #Z8650!: #### GRAPHICS ### #255,153,153,255,255,153,153,255,255,195,165,153,153,165,195,255,0,0,60<,60<,60<,60<,0,0 #0,0,0,0,5,15,7,15,0,12 ,28,125},255,255,255,255,0,0,0,0,193,231,239,255,0,0,0,0,192,192,224,240,15,15,31,63?,127,63?,63?,15,240,224,252,252,248,240,224,240,15,15,3,1,0,0,0,0,255,255,255,255,124|,60<,24,16,255,255,223,135,6,4,0,0,240,224,224,128,0,0,0,0  #D9110#:N=012 :M=07:M:.005y# =,N #A:(97a+N)+M,A:M:N: &"TOUR"10 &p10 ,2;5;"REWIND TAPE.CHANGE PLUGS FOR"'" VERIFY. START THE TAPE "'" PRESS ENTER TO VERIFY " abowcZ ##