ZXTape!  GPC Z 0:0: n=0183  n/3 )8n,0;1;" " *7n+1,0;" " +@n+2,0;1;" " <n ?m13 ,0;4;0;0;" COPYRIGHT 1991",1;" CHALLENGE SOFTWARE" AZ16,0;0;5;0;0;" GRAND PRIX CHALLENGE " B1:6:0:18,0;" Designed & Programmed by":19,0;0;" VINCENT VITY ":20,0;1;" & GRAHAM SHAW" FW0:0,175:255,0:0,-175:-255,0 G_1,1:0,173:253,0:0,-173:-253,0 H_2,2:0,171:251,0:0,-171:-251,0 KQ21,0;0;1;7;" Now Loading " N 70F Py0:0:0,0;:""63600p,131:63599o:63600p:""64102f,1434:""   GtraP p :F\`i*=\s#r>2\v{=\!:\~2\(M(I(E6} (+('(!"B\>2D\*E\"n\:G\2p\}:\(*E\"B\:G\2D\}*=\6#62\ WHEEL f x Z " Zs^jT}   {_!@~w#  :\wT]:H\w? 2&:H\yC%  32&:H\yC%  :H\&.U\RR}8=g= x J.SMITH N.MANSELL A.PROST G.BERGER A.SENNA J.ALESI D.WARWICK N.PIQUET R.PATRESE T.BOUTSEN FERRARI 2MCLAREN _WILLIAMS _BENETTON ZTYRRELL UT.BURGESS PD.BLAND FJ.LUND <M.WESTY 2D.STEM (G.SHAW T.ESSEX B.SUMNER V.VITY D.WAREHAM OLIVETTI MARLBORO CANON AGIP CHALLENGE 88pDDzzrd pp|rr<~88<LZ^ZZL .LM-, Ԕ P2Lf2rr~rrr>>~\8rtxxtrppppp~bvzrrrbrzvrrp|>|>rrrrr<rrrr4rrrzvbq::qrrr><~8p~3333 PTGBЕ! @ OP "up UOD@ @P @P(P@\|T@@*P&3333U*UT????????34$##l@@00DLSSL̀D23DG   Xh``p  'H008b GP MAIN ֏֏؏.VERSION 28.01.91 V.VITY/G.D.SHAW T;#0;10 ;7-F/2;"[INTERVAL[";0,0: vF=110 :2:N=110 :A$(((F-1)*10 )+N)=¾((64395+F*12 )+N):N:F: uF=15:2:N=110 :T$(((F-1)*10 )+N)=¾((64515+F*12 )+N):N:F: vF=110 :2:N=110 :M$(((F-1)*10 )+N)=¾((64575?+F*12 )+N):N:F: uF=15:2:N=110 :C$(((F-1)*10 )+N)=¾((64695+F*12 )+N):N:F: MY=(64538*(64102f*500))+(*(64102f*10000')): 7:0: Y="50" F="12"̰"20":T(F)=Y:F: "23659","2":"23607","252":"23658","8":ç:ç:ٰ"7":ܼ:"63596":GDS="13":'''"4";"PROGRAMMED @ DESIGNED BY"'" VINCENT VITY AND GRAHAM SHAW"'''"9";"COPYRIGHT 1991"'"7";"CHALLENGE SOFTWARE"'''" "" 1991 ALL RIGHTS RESERVED" BET="250":SC=-:S("5"):M("11"):Y("32"):T("20"):X("15"):Z("20"):T$("50"):C$("50"):A$("100"):M$("100"):Z("11")="9":Z("12")="6":Z("13")="4":Z("14")=:Z("15")="2":Z("16")= W$("11","6"):W$()="WET kA":W$("2")="WET kB":W$()="DRY kA":W$("4")="DRY kB":W$("5")=" WET":W$("6")=" DRY":W$("7")=" GOOD":W$("8")=" FAIR":W$("9")=" POOR" qW$("10")=" EVEN":W$("11")="ROUGH":D$(,"10"):D$()=" CAREFUL":D$("2")=" NORMAL":D$()="AGGRESSIVE" |Y=̰"6":Y:Y:F=̰"10":T(F)="(64406+F*12)":F:F=̰"11":M(F)="(64127+F)":F:F=̰"5":S(F)="(64140+F)":F N$="":PT=ç:"3020":"3000":M("10")="64104*256+64103":CASH="(64107*65536)+64106*256+64105":LOAN="64140*256+64139" 2rT=:SB=ç:"64146=0""64146",:LOAN=ç:M()="80":M("2")="69":M("4")="9":M("8")="90":"1500" 3%YO=:M("7")="99":M("5")="99" 4X="30":F=10 :64184+F,8-(((11 -X(F))*25)+((64526+F*12 )))/60<:(64184+F)"6""300" 8X()ɰ"10"SB=ç <]X()>"5"N$=N$+" DIRECTORSkIMPROVE YOUR POSITION.":SB>"6"N$=N$+"FINAL WARNING!!!" =LEF="(*20)+25":MAX=LEF-5:TRAV=:T="2":W="(*2)+5":PO="240":"M(9)>3"ư"M(9)<11"PZ>"64185Ǿ(64184+PZ)""63" >"90" ?"499":Y="(*2500)+1250":PX="7":PY="10":"11";"INDUCEMENT"'''"13";"ACCEPT":"200":"1140":'"OFFERS YOU $";Y;" TO MISS A RACE!" @0"9510":"9506":K$="A"CASH=CASH+Y:"3900" AK$GDS"64" B"90" Cټ:"500":"9";"EXTRA OPTIONS"'''"9";"SAVE SITUATION"''"9";"LOAD SITUATION"''"9";"NAMES DESIGNER"''"9";"SS/RESIGN TEAM":"200" F""9510":"9506":K$=GDS"90" GK$=":""9950" KK$="S""7000" LK$="L""80" MK$="<":"300" NK$="N""8000" O"68" Pٰ"5":"500":"14";"LOAD"'''"INSERT SAVED SEASON @ PRESS PLAY":"23607","60":ç:"23659","0":"":"23659","2":ٰ"7":"20" ZY"M(9)>10""7":Y=(Y/"5"):N$=N$+" SPONSORS GIVE $"+Y+".":CASH=CASH+Y:"6100" _%N$=" "+N$:SC=ç d$CASH>"16777215"CASH="16777215" e2200+M(9 ):UTD=UTD*TRAV:T(1)+1:PX="15":PY="10":PZ=:"500":" [[ GRAND PRIX CHALLENGE [[" f''"5";"RACE PREP TABLE DATA"''"5";"OPTIONPAGE PLACE BETS"''"5";"SEASN ROTA GARAGE"''"5";"CAR DETAILS MONEY INFO" h"";T(1)+1;13 ,5;T$(T(1)*10 -9 T(1)*10 ):"1136":T(1)+1;13 ,15;"";8-S(T(1));"";C$(S(T(1))*10 -9 S(T(1))*10 ):'''"10";"SKILL k";"64538";"%" i"19","5";T(1)+1;"(;;;;;;;NEWS;;;;;;;&";"5";"+";"26";"*";"5";",))))))HkHOLD))))))#" nkSC>-.004yn,20:"20","6";N$(̰"20"):N$()=N$("2")+N$():SC=SC+:SC>N$SC=- sK$=:K$="""110" uK$="H""115" x"9506":K$="M""5900" zK$="P""4000" |K$="O""67" }K$="T""2000" ~K$="G""3500" K$="S""2100" K$="R""3800":"1000" K$="C""3200" "110" '' +#ç;"11";"PRESS ENTER";ç,ç: ̷ç,ç;"(;;MBC TV;;&":F=113 :"+[[[[[[[[[[[[*":F:",))))))))))))#":6,;"PRESS ENTER ";8,;"TO CONTINUE!": mç,ç;"(;;MBC TV;;&":F=113 :"+";F,13 ;"*":F:",))))))))))))#" λF=17:F,1;"ho os";14-F,1;"ho os":F:T(1)+1;7,AA;"\]";8,AA;"^_": ^Q="7":ٰ"T(1)+1":F=113 :F,1;"ho";F,11 ;"os":F: EZ(1)=(36$-(*5))+(((2-T)+(*(3-T)))) ZW=6M(3)<3W=5M(3)>2Z(1)=Z(1)-3 FM(3)=1M(3)=3Z(1)=Z(1)+1 YLEF>9 Z(1)=Z(1)-2:LEF>15Z(1)=Z(1)-5 8 64102 f<3 Z(1)=Z(1)+1 dZ(1)="(Z(1)-(((99-M(7))/10)+((99-M(2))/12)+((99-M(5))/10)+((99-M(8))/12)+((99-M(1))/12)))" 9Z(1)=Z(1)-PS:Y(22)=SHAW-Z(1): Z(N)=(32 -(*5))+(6*(((64526+N*12 ))/100d)):LEF>9 Z(N)=Z(N)-2:LEF>15Z(N)=Z(N)-5 \(*3)=0Z(N)=Z(N)+(*3):(*8)=0Z(N)=Z(N)+(*2) "64102"=Z(N)=Z(N)- >LEF<15ƺ(*3)+1>1Z(N)=Z(N)-2  ,"499":PZ=T():"11";"BOARDROOMk"'''"THE DIRECTORS OF TEAM ";:ݼ:"1145":ç:''"ARE NOT HAPPY WITH YOUR RESULTS!"''"YOUR CONTRACT IS NOW TERMINATED." ."64146",ç:M("9")<"11"F="2"̰"10":Y="Z(11+(*10))":"64407+F*12","Y+(64407+F*12)":"64527+T(F)*12","Y+(64527+T(F)*12)":F:"64160+M(9)","(*10)+1":"64149+M(9)","T((64160+M(9)))":M("9")="M(9)+1":"302" 5"9500":"6100" 6mF=̰"5":"64527+F*12",ç:F:F=̰"10":"64407+F*12",ç:F:M("9")=ç:"2200":M("10")="M(10)+1": 521,;"LTGk";:LEF<11 "0"; "";LEF-1;")";18,15;"TYREk";W$(M(3));"k";M("7");"% ";19,15;"AEROk";M("8");"% ";19,24;"ENk";M(5);"% ";20,15;"DRIVEk";D$(T): "LAPLENGTHk";SHAW;" ML";17;"NO. LAPSk ";LEF;" "'"1ST PRIZEk$";PRI;"";17;"PITLANE k";PL;" SEC"'"TRACK CDNk";W$(TR);" WEATHER k";W$(W)': '"499":"9";"CAR NOT READYk"''': ٰ"2" d:"pqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqr"''"pqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqr";,ç;:ٰ"7": X"11","16";:Z()>Y("22")="Y(Z(X(1)-1))-Y(1)":"";("47+X(1)");" ";("48+Z(X(1)-1)");" ";:ڼ:"1171":"605" Y"" ]^"12","16";"";("48+X(1)");" 1 ";:64107k+64108l>06 _"";A$(̰"10");"13","16";:7:X()"4"M()= 1K$="R"CASH="CASH-((LEF-5)*M(6))":M("6")=ç (K$="P"TRAV=CASH=CASH-UTD:TRAV=ç K$="D"T=T+:T>T= K$"G""1001" :TRAVç"415":" PAY TRAVEL FARES FIRST":"999" 8M("6")>ç"415":"8";"REFUEL CAR FIRST":"999" G"M(11)=0""415":" FIRST HIRE A MECHANIC!":"9500":"5020" "(((M(1)+M(2)+M(8)+((10-M(4))*33)))/4)<60""499":" RACE OFFICIALS REPORTk"'''" YOUR CAR IS NOT RACEWORTHY":"999" PS=ç aY()=Y("22"):PZ=:ٰ"5":"500":"12";"THE RACE"'':PO="240"'"12";"PRACTISE"  '"12";"START UP":"200" $"9510":"9506":K$=GDS"1000" K$="P"PO="240""3700" K$"S""1052" $lYO=:"2200+M(9)":ٰ"4":"500":PX="12":PY="10":PZ="(64160+M(9))":" ";V$'''':"410":"3800" %PZ>ç'''" THE WINNER IN ";M(10 )-1;" WAS":"1140":"(64149+M(9))"T(PZ)PZ="(64149+M(9))":" WHEN DRIVING FOR ";:"1145" &oPX="17":PZ="(64205+M(9))":"1140":" HOLDS THE LAP RECORD k";:Y("21"+PZ)="(64216+M(9))":"1170" .Y("22")=PO:Y()=PO:N="2"̰"10":230:Y(21+N)=SHAW-Z(N):Y(N)=Y(21+N):N:N=̰"10":X(N)=ç:N:F=110 :N=110 :X(N)=0X(N)=F:Z(F)=N:10808 3N 8\N=110 :NZ(F)X(N)=0Y(N)19PY=4 DT(PZ)+1;PX,PY+3;"\]";PX+1,PY+3;"^_":N:N=̰"10":Y(Z(N))=12 -N:Y("21"+N)=ç:Y("10"+Z(N))=Y(Z(N)):N:AA="6":LEF=LEF+ HEJ=:PI=ç:MAD=Z():"9500":"204":ç,"14";"(;LEADERBOARD ;&":F=16:F,14;"+";F,31;"*":F:F,14;",))))))))))))))))#" J15,0;"(;;ACTION;;&":F=1620:"+";F,13 ;"*":F:",))))))))))))#";8,14;"(;RACE DETAILS;&":F=9 15:F,14;"+";F,31;"*":F:F,14;",))))))))))))))))#" K17,14;"(;CAR DETAILS;&":F=1820:F,14;"+";F,31;"*":F:F,14;",))))))))))))))))#" L400:10 ,15;"PDTIME DIFF.";14,15;"LAPTIMEO.LEAD";15,17;"0'00 0'00":1185 VXN=110 :Y(10 +N)=Y(N):N:220:Y(1)=Y(1)+Z(1) Y+N=210 :Y(N)=0"1128" ZTPS=ç:230:LEF>5LEF0"(*T(10+N))=0"TPS=:T("10"+N)=ç:Y(21+N)="(*8)+PL+3":1160:1149}:PX+2,PY;"PITSTOPk";:PZ=N:1:1171:Z(N)=Z(N)-Y(21+N) [(*45-)=0Z(N)="Z(N)-((*3)+4)":1160:1149}:19,;"SPUN CAR AND";20,;" LOST TIME!":L=64332L:MC>"7"ư"(*15)=0""9800" \)Y(N)=Y(N)+Z(N):Y(21+N)=SHAW-Z(N) ]Y(N)=ç"1128" _DPS=çY(N)>Y()Y(10 +N)Y(11 )F=:Y=-:"9600" `>TPS=çY(N)Y()Y(10 +N)>Y(11 )Y=:"9600" h N:PS=ç i'"(*((T*10)+(10-M(4))))>0""1135" j<Y=1:X=100d:AA>6Y=-1:X=96` kDF=1̺(*3)+2:AA+Y>3AA+Y<9 AA=AA+Y lT(1)+1;7,AA-1;" ";X;(X+1);" ";8,AA-1;" ";(X+2);(X+3);" ";9 ,AA-1;ٺ(*2)*4+2;" ij " mVK=64332L:F:9 ,AA;" ":PS=PS+2:(*M(7))=0"1300" n%"1160":"18","2";"LOST TIME!" o@T(1)+1;7,AA;"\]";8,AA;"^_":"1175" pPX,PY;1;(480+PZ);" ";:1PZ=1:(64106j+PZ*2)+(64107k+PZ*2)>06 q9A$(PZ*10 -9 PZ*10 ):0:7: rT(PZ)=T(1)1 sdPX+1,PY-2;T(PZ)+1;T$(T(PZ)*10 -9 T(PZ)*10 -6):0: t<PX,PY;1;(480+PZ);" ";:PZ=11 uIA$(PZ*10 -9 PZ*10 ):0:T(PZ)=T(1)1 w\PX+1,PY+2;T(PZ)+1;T$(T(PZ)*10 -9 T(PZ)*10 ):0: xT(1)=PZ1 y=PZ+1;T$(PZ*10 -9 PZ*10 );:0: zPZ=T(1)1 {L8-S(PZ);C$(S(PZ)*10 -9 S(PZ)*10 );" ";:0: }-PX=17:PY=1:PZ=N:1140t: 5L=1720:L,1;" ":L: <1:(64216+M(9 ))=Y(21+PZ)2 b6:M=(Y(21+PZ)/60<):S=(Y(21+PZ)-(M*60<)):M;"'";:S<10 "0"; S:0:7: hN=110 :N>1Y(N)=Y(1)Y(N)=Y(N)-1:Y(21+N)=Y(21+N)+1 Y(N)>0Y(21+N)Ǿ(64216+M(9 ))"64216+M(9)",Y("21"+N):"64205+M(9)",N:"1160":"1149":"19",;"LAP RCDk";:PZ=N:"1170":װ".01","31":װ".01","30" N wF=110 :X(F)=0:F:F=110 :N=110 :X(N)=0X(N)=F:Z(F)=N:1182 N 9 ,AA+1;(108l+(*3)):N=110 :NZ(F)X(N)=0Y(N)>Y(Z(F))X(Z(F))=0:Z(F)=N:X(Z(F))=F N:F 8;9 ,AA+1;" "YO=0:Z(1)MADMAD=Z():N=Z():"1160":"1149":"19",;" GOES INTO";"20",;" THE LEAD!":װ".01","41":װ".01","40" PY=18:N=13:PZ=Z(N):PX=-1+N*2:PX,PY-2;"";N:1136p:1138r:PX+1,PY+3;:1170:N N=23:PX=-1+N*2:PZ=N:Y(21+PZ)=Y(Z(1))-Y(Z(N)):PX+1,PY+8;:1:1171:N N:PZ=1:15,17;:1170:Y(22)=Y(Z(1))-Y(1):15,25;:1:1171:600X:YO=01190 -"9506":"9510":"9506":K$GDS"1188" YO=ç:"205" RLEFȺPS=ç:1160:17,;" PITSTOP";19,;" DRIVE" i8:1:F=113 :F,3;" ":F>1F-1,3;" " )LEF<.0008vQX,33!-F:"1199" 1.0008vQX,20+F:="P"8:"1400" "D"1199 "8":T=T+:T>T= +"400":A=643040:ٰ"8":޼:"1195" JF:8:F-,;" ":TR="11""(*M(7))=0"M("7")="80" "M(7)<81""1210" EJɼEJ>"-2"F=W:"1209" `"(*50)>0""1160":ٰ"(*3)+4";"17",;" CHALLENGE";"19",;" SOFTWARE ":"1210" 4EJ=LEF>"9"LEF15M("7")="M(7)-(.125*PI)" =T=2H=(*400)+1:H=5021300 HT=1H=(*400)+1:H502H5461300 PI=:"M(7)<81""1160":"17",;" YOU HAVE A";"19",;"PUNCTURE":F=̺:װ".1","-10":װ".01","-22":F::M("7")="M(7)-10":M("7")0Q,AA;"\]"  Q>-1Q+1,AA;"^_" p.005y# =,-4:.005y# =,-16:Q>-1Q+1,AA;" ":Q=Q-1:Q>-11221 ͺ"8":F=̰"7":F,1;" ";14-F,1;"":F:9 ,2;"VICTORIOUS";11 ,4;"WINNER";3,6;8-S(T(Z(1)));"xy";8-S(T(Z(2)));4,4;"xy";t(z(1))+1;"z{";8-S(T(Z(3)));"xy";5,4;t(Z(2))+1;"z{ 1";T(Z(3))+1;"z{";6,4;"23" RF=̰"10":X(F)=ç:F:F=̰"10":N=̰"10":X(N)=çX(N)=F:Z(F)=N:"1234" N \N=110 :NZ(F)X(N)=0Y(N)>Y(Z(F))X(Z(F))=0:Z(F)=N:X(Z(F))=F XN:2:F:64160+M(9 ),Z(1):64149+M(9 ),T(Z(1)) uX=PRI:PY="2":"9500":ٰ"4":"500":"10";"RESULT BOARD"'''''"POSDRIVER TM PRIZE PLUSP" +N=̰"10":F=110 :X(F)NF Y(F)<ç"1245" ?PZ=F:PX=X(PZ)+7:1136p:T(PZ)=T(1)1 PX,15;T(PZ)+1;T$(T(PZ)*10 -9 T(PZ)*10 -7);:0:Y(PZ)>0" $";X;PX,0;"";(480+X(PZ));PX,31;Z(10 +X(PZ));PX,26;:PZZ(1)Y(21+PZ)=Y(Z(1))-Y(PZ):1:1171 Y(PZ)=ç" CRASH D.N.F." ݟX=(X/1.90s333):N:N$="":F=̰"10":X="((64107+F*2)*256)+(64106+F*2)":X>çF=Z()Y="(X*((64184+Z(1))))":CASH=CASH+Y:N$="BOOKIES PAY $"+Y+"." 1F:F=110 :F=X(1)1248 +PRI=(PRI/1.9s333):F:Y()F=110 :X(F)064526+F*12 ,((64526+F*12 ))+Y:64407+F*12 ,((64407+F*12 )+(Z(10 +X(F)))):64527+T(F)*12 ,((64527+T(F)*12 )+(Z(10 +X(F)))) E(64526+F*12 )<35#64526+F*12 ,35# E(64526+F*12 )>99c64526+F*12 ,99c F:X()<"4""(*X(1))=0"Y="2000-(X(1)*500)":CASH=CASH+Y:N$=N$+" [FORMULA[RACING[ MAGAZINE PAY YOU $"+Y+" FOR A FEATURE." 1M("9")="M(9)+1":"M(9)<11""3020":"3000" tY()>çM()="M(1)-(*2)":M("2")="M(2)-(*2)":"(*20)=0"M("4")="9":N$=N$+" STEERING AFFECTED." M("2")<çM("2")=ç M("8")20000"CASH="CASH-(LOAN-20000)":LOAN="LOAN-(LOAN-20000)"  "1291"  "9500":"51"  1M("6")=:F="64108"̰"64127":F,0:F: "207" L=64332L:Q,AA;" ";Q+1,AA;" ";Q+2,AA;" ":AA=AA+.5:Q=Q-.5:F=(*3)*4:Q,AA;(92\+F);(93]+F);Q+1,AA;(94^+F);(95_+F);Q+2,AA;ٺ(*2)*4+2;"ij":AA<9 1310  Q+2,AA;" ":L=64360h:"8":N=̰"8":.05|L,-20:F=120x+((*2)*4):8-S(T(1));Q,7;F;(F+1);Q+1,7;T(1)+1;(F+2);(F+3):N #7L="64257":ٰ"2":"500":"8";"OUT OF THE RACE!" -kY()=ç:'''"9";"DAMAGE TO CAR!":M()="M(1)-5":M("2")="M(2)-5":M("4")="9":M("8")="M(8)-15" nIF=LEF/:"2":N="2"̰"10":Y(N)>ç"230":Y(N)="Y(N)+(Z(N)*2)" sN:F:"1232" xIPI=ç:U="(*3)+1":A=:B=:PZ=:Y("22")="PL+(10-(M(11)/4))" y"1160":17,;" MECHANICS";19,;"AWAIT ORDERS":F=̰"7":14-F,;" ";F,1;" ":F:"2",;"PITSTOPk" z>"5","2";"TYRECHANGE":A="7","2";"BODYWORK" {A"11","2";"ENTER EXIT":B="9","2";"EN. RETUNE" ,"400":"9510":"9506":K$GDS"1410" Y("22")"4"M()=  "1407" K$="B"A=A=ç:Y("22")="Y(22)+(*3)+1":F=̰"10":M("8")<"99"M("8")="M(8)+1":400:.001wn,30:F K$="E"B=B=ç:Y("22")="Y(22)+(*3)+4":F=̰"10":M("5")<"99"M("5")="M(5)+1":400:.001wn,20:F  "1401" "200":"9506" $PZ="(*5)":K$=:K$="""1501" "9506":BADMAN=ç:"2500" PZ=PZ+:PZ=T()"1503" PZ>"5"PZ=ç:"1503" vٰ"4":"500":"9";"TEAM SELECTION":"200":"10";"SIGN UP FORk"''"8";:ݼ:ٰ"PZ+1";"TEAM ";:"1145" #"9510":"9505":K$"S""1503" "1510":"1590" <F="2"̰"10":T(F)=PZ"(*5)=0"T(F)=T():T()=PZ:  F:"1510" 6P=ç:F=̰"5":Y(F)=ç:F @-ٺ:"500":"7";"SPONSORSHIP OFFERS"''' AHF=̰"5":Y(F)=ç'"10";"";F;" ";ٰ"8"-F;C$("F*10-9"̰"F*10") BF CB"9510":"9506":PZ=K$-"48":PZ>çPZ<"6"Y(PZ)=ç"1605" D "1603" EV"7":''8-PZ;" ";C$("PZ*10-9"̰"PZ*10");" OFFER $";Y;" Y/N" F#"9510":"9506":K$="Y""1680" GK$"N""1606" H#Y(PZ)=:P=P+:P<"4""1600" I "7":F=̰"5":Y(F)=çPZ=F JF y8-PZ:"500":" ";8-PZ;C$("PZ*10-9"̰"PZ*10");" GIVE YOU $";Y:CASH=Y:F=̰"5":S(F)=PZ"1690" F X=S(T()):S(T())=PZ:S(F)=X:N$=A$(̰"10")+" JOINS TEAM "+T$("T(1)*10-9"̰"T(1)*10")+" "+C$("S(T(1))*10-9"̰"S(T(1))*10"):"50" yٰ"6":"500":" WORLD F1 CHAMPIONSHIPS":"200":"12";"DRIVERS"''"12";"TEAMS"''"12";"HISTORY" #"9510":"9506":K$=GDS"100" K$="D""2015":"2000" K$="T""2020":"2000" K$="H""6200"  "2001" mPY="5":ٰ"6":"500":" WORLD F1 DRIVERS STANDINGS"'''''"S%PDRIVER TEAM PTS" N=110 :PX=X(N)+7:PZ=N:1136p:PZ=T(PZ):PX,18;:1144x:PX,0;"";(64526+N*12 );PX,;(480+X(N));PX,29;(64407+N*12 ):N  "9500": bٰ"6":"500":"WORLD F1 CONSTRUCTORS STANDINGS"'''''" PTEAM SPONSOR PS" N=15:PZ=N:"";7+X(N+10 ),3;X(N+10 );" ";:1144x:" ";:1146z:"";(64527+N*12 ):N * "9500": 4[ٰ"5":F="M(9)":M("9")="-1":"500":"";M("10");" THE GRAND PRIX SEASON ROTA"'' 9KM(9 )=M(9 )+:M(9 )>10 M("9")=F:"9500":"100" >zM(9 )=F'"pqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqr"'"";M(10 )-1;"  THE NEXT MEETING IS AT" B=F>M(9 )(64149+M(9 ))=T(1)1 C"(64160+M(9))=1"ٰ"5" D"";(480+(64160+M(9 )));:0;2;:1+(64149+M(9 ));T$(((64149+M(9 ))*10 )-9 );T$(((64149+M(9 ))*10 )-8);:7:0 HC2200+M(9 ):M(9 )F"";4;V$:2190 RM"";4;V$:410:"pqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqr"''  21059 \UTD="105":PRI="30000":PL="12":TR="10":V$=" PAUL RICARD IN FRANCE":SHAW="2.2": YUTD="145":PRI="34000":PL="14":TR="11":V$=" SALZBURGRING IN AUSTRIA":SHAW=: YTR="11":UTD="200":PRI="37000":PL="13":V$=" MISANO IN ITALY":SHAW="3.2": \UTD="250":PRI="33000":PL="12":TR="10":V$=" RIJEKA IN YUGOSLAVIA":SHAW="3.5": ZTR="10":UTD="550":PRI="55000":PL="15":V$=" GOIANIA IN BRAZIL":SHAW="4.1": YUTD="120":PRI="38500":PL="12":TR="11":V$=" JARAMA IN SPAIN":SHAW="2.7": `TR="10":UTD="110":PRI="19500":PL="13":V$=" SPAFRANCORCHAMPS IN BELGIUM":SHAW="2.3": YUTD="950":PRI="52000":PL="14":TR="10":V$=" SUZUKA IN JAPAN":SHAW="2.5": \UTD="50":PRI="38000":PL="12":TR="11":V$=" SILVERSTONE IN BRITAIN":SHAW="2.1": ]UTD="750":PRI="75000":PL="14":TR="10":V$=" INDIANAPOLIS IN U.S.A.":SHAW="3.8": ]UTD="1250":PRI="47000":TR="10":PL="15":V$=" ADELAIDE IN AUSTRALIA":SHAW="2.9":  BADMAN= m"500":"10";"SKILL LEVELS"'''''"13";"1 EASY"''"13";"2 FAIR"''"13";"3 HARD":"200" y"12-(64102*2)","20";"tu":"9510":"9506":F=K$-"48":F>çFǺ"12-(64102*2)","20";" ":"64102","4"-F K$GDS"2505" BADMAN="95" "1503" ^F=10 :X(F)=ç:F:F=10 :N=10 :X(N)=çX(N)=F:Z(F)=N:3005 N N=10 :NZ(F)X(N)=0(64407+N*12 )>(64407+Z(F)*12 )X(Z(F))=0:Z(F)=N:X(Z(F))=F N:2:F: |F=5:X(F+10 )=ç:F:F=5:N=10 :X(N+10 )=0X(N+10 )=F:Z(F)=N:3025 N ћN=5:NZ(F)X(N+10 )=0(64527+N*12 )>(64527+Z(F)*12 )X(Z(F)+10 )=0:Z(F)=N:X(Z(F)+10 )=F N:2:F: ٺ:"500":"7";"MACHINES DETAILS"''''"15";ٰ"T(1)+1";;"\]"'"15";"^_"'''"7";"TOP SPEED k";"100+M(1)";"MPH"''"7";"ENGINE k";M("2");"%" S'"7";"AERODYNAMICk";M("8");"%"''"7";"STEERING k";W$(M("4")) L''"7";"CAR OVERALLk";"(((M(1)+M(2)+M(8)+((10-M(4))*33)))/4)";"%" "9500":"100" "9500" ټ:"500":"11";"THE GARAGE":"200":"12";"MECHANIC"''"12";"ENGINES"''"12";"STEERING"''"12";"POWER"''"12";"BODYWORK" #"9510":"9506":K$=GDS"100" -K$"E"K$"S"K$"P"K$"B"K$"M""3501" Fټ:"500":''':"3597":"200":1,0;:K$="E""3510" K$="S""3520" K$="P""3525" K$="B""3530" "5000" "13";"ENGINE"'''''" 1 MACMILLANS 79% k$15000"''" 2 SPROSTONS M6 89% k$30000"''" 3 IMPERIAL 109 99% k$45000" q"9510":"3592":F>çFǺ"CASH-(F*15000)>-1"CASH="CASH-(F*15000)":M("2")="F*10+69":"9505":"3200" "3590":"3512" "12";"STEERING"'''''"8";"1 POOR k$1000 "''"8";"2 FAIR k$1500 "''"8";"3 GOOD k$2000 " x"9510":"3592":F>çF<"4""CASH-(500+(F*500))>-1"CASH="CASH-(500+(F*500))":M("4")="10-F":"9505":"3200" "3590":"3521" ŵ"13";"POWERk"'''''" 1 JEEPSTER 189MPH k$10000"''" 2 BOXELDER 194MPH k$15000"''" 3 SHATNERS 199MPH k$20000" x"9510":"3592":F>çF<"4""CASH-(5000+F*5000)>-1"CASH="CASH-(5000+F*5000)":M()="84+F*5":"9505":"3200" "3590":"3526" <"12";"BODYWORK"'''''"8";"IMPROVE FORk$100" R"4",ç;:"3597":"8","8";"AERODYNAMICSk";M("8");"%":"9510":"3590" P"9506":K$="I"ư"M(8)<99"ư"CASH-100>-1"CASH=CASH-"100":M("8")="M(8)+1" "3531" K$=GDS"9505":"3500"  F=K$-"48":  ç,ç;  )"8";"BALANCE k $";CASH;" ": tY("22")=PO:"500":" PRACTISE HIGHLIGHTS";"20","9";"LAP TIME k0'00";"21","9";"GRID TIMEk";:ڼ:"1171":"4","9";"(;;MBC TV;;&":F=113 :9 ;"+";22;"*":F:9 ;",))))))))))))#" uF=512 :F,10 ;"ho";f,20;"os";22-f,10 ;"ho";22-f,20;"os":F xdF=̰"2":T(1)+1:AA=(*5)+12 :Q=16:Q,AA;"\]";Q+1,AA;"^_" zQ>3Q+1,AA;" " |$Q=Q-1:Q>4Q,AA;"\]" }'Q+1>4Q+1,AA;"^_" ~1.0005vn,40(-Q:Q>-10 3706z ("8":"220":Y("22")"500"BET="50" lF=K$-64@:F>çF<"11"CASHBETX="((64107+F*2)*256)+(64106+F*2)"+BET:X<650004005  4001 mCASH=CASH-BET:"64107+F*2","(X/256)":"64106+F*2","X-((X/256)*256)":PX=F+"9":PX,25;"";X PZ=F:1136p:4001 M("11")=ç:P=ç:,"5";"MECHANICS k UP TO FOUR"'''''" KSKILLMECHANIC COST":F=̰"10":F+7,7;"";1+(F*9.8);"% ";M$(F*10 -9 F*10 ); " $";(F-1)*(1000-(M(9 )*90Z));F+7,5;:N=6418164184:NFN:"";(64@+F):5004 .M(11 )=M(11 )+N:P=P+:"";P &F:''" STAY UNTIL SEASON ENDS" &"9510":"9506":K$=GDS:"3500" UF=K$-"64":F>çF<"11"P<"4"Y="(F-1)*(1000-(M(9)*90))":CASH-Y>-"5010"  "5005" $N="64181"̰"64184":N=F"5005" N:"64181"+P,F:CASH=CASH-Y +ټ:"500":''':"3597":"200":"5000" }ٰ"4":"500":"7";"$ WOODLANDS BANK $"''''"13";"HIGHER"''"13";"LOWER"''"13";"AGREE":"200": ""11","13";"$";X;" ":  wٰ"5":"500":" COLE/SMITH @ GEDGE FINANCE"''':"3597":'"8";"2% LOAN k $";LOAN;"";'''"13":"200"  /"9",ç;:LOANǰ"19000""13";"OBTAIN" LOAN>ç'"13";"PAYOFF" #"9510":"9506":K$=GDS"100" :K$="O"LOANǰ"19000"X="20000"-LOAN:"5800":"6005" "K$="P"LOAN>ç"5800":"6010" f "5904" u@"5805":"9510":"9506":K$="H"X<"20000"-LOANX=X+"1000" v K$="L"XȰ"1000"X=X-"1000" w+K$="A"LOAN=LOAN+X:CASH=CASH+X:"5900" xK$=GDS"5900" y "6005" z*X="((CASH/1000))*1000":X>LOANX=LOAN {U"5805":"9510":"9506":K$="H"ư"CASH-(X+1000)>-1"ư"X+1000"1000"X=X-"1000" ~+K$="A"LOAN=LOAN-X:CASH=CASH-X:"5900" K$=GDS"5900"  "6011" _F="2"̰"10":"64225+F",("64226+F"):"64235+F",("64236+F"):"64245+F",("64246+F"):F }"9505":ټ:"500":"7";"END OF SEASON ";"M(10)":"3000":"64236",Z():"64246",T(Z()):"3020":"64256",Z() בPX="8":PY="10":PZ="64236":PX-"3","15";"<="'"15";">?":"1140":'"9";"WORLD CHAMPION"''"15";"<="'"15";">?"''"5"; 'PZ=N$="DIRECTORSkWELL DONE! "+N$ HPZ="64256":"1144":" ";:"1146":''"5";"CONSTRUCTORS CHAMPIONS" I"9500":"2015":"2020":M("11")=ç:F="64181"̰"64184":"F",ç:F  "1291" "500":M("11")=ç:"11";"NEW SEASON"'''" MECHANICS OUT OF CONTRACT!":"64146=1"Y="64419*50":'"7";"POINTS BONUSk$";Y''''" GOOD LUCK IN THE COMING SEASON":CASH=CASH+Y AQ=ç:F="2"̰"10":Y="(64526+F*12)":Y<"50"Y=Y+"(*12)" (Y>"90"Q<"2"Q=Q+:Y=Y-"(*5)" "64526+F*12",Y:F:"310" "64146=0""50" #PZ="(*5)+1":PZ=T()"6136" "9500":"7":Q=(Y/):ٰ"5":"500":"11";"JOB OFFERS"''''" TAKE UP THIS OFFER FROM"'" ";:"1145":" FOR k $";Q y"7":Y=(Y/):''" SIGN A NEW CONTRACT WITH"'" ";ٰ"T(1)+1";T$("T(1)*10-9"̰"T(1)*10");" FOR k $";Y 0"9510":"9506":K$="S"CASH=CASH+Y:"2490" 'K$="T"CASH=CASH+Q:"1510":"2490"  "6151" 8dٰ"6":"500":" WORLD F1 CHAMPIONSHIP HISTORY"'''''"YEARDRIVER OFkCONSTRUCTOR" 9MF=̰"10":F+"7",ç;"";"M(10)-(11-F)";" ";:"(64226+F)=1"ݼ :#1;("48+(64226+F)");""; <A$("(64226+F)*10-9"̰"(64226+F)*10"):ç:0:F+"7","17";ٰ"1+(64236+F)";T$("(64236+F)*10-9"̰"(64236+F)*10-7") =Hٰ"1+(64246+F)";F+"7","21";T$("(64246+F)*10-9"̰"(64246+F)*10") Bç:F:"9500":"2000" XF=̰"9":"64127"+F,M(F):F:F=̰"5":"64140"+F,S(F):F:"64104","(M(10)/256)":"64103","M(10)-((M(10)/256)*256)":"64138",M("11"):"64140","(LOAN/256)":"64139","LOAN-((LOAN/256)*256)":F=̰"10":"64406+F*12",T(F):F Yo"64107","(CASH/65536)":"64106","((CASH-64107*65536)/256)":"64105","CASH-(64107*65536)-64106*256" ]"499":"14";"SAVE"'''" INSERT BLANK TAPE TO RECORD ON":"23607","60":°"17"+°"2"+"S"+"M(10)"+" E"+("M(9)"+)"64102","666":"23607","252":"67"  %ٺ:"500":Y=:E$=" ": Ev"7200":"10";"DRIVER NAMES":"200":F=̰"10":F+,"10";"";("64"+F);" ";A$("F*10-9"̰"F*10"):F F$"9510":"9506":K$=GDS"8010" G<F=K$-"64":F>çF<"11"Q=ç:ST="64396+F*12":"8090" H "8006" Js"7200":"11";"TEAM NAMES":"200":F=̰"5":F+,"10";"";("64"+F);" ";T$("F*10-9"̰"F*10"):F K$"9510":"9506":K$=GDS"8015" L;F=K$-"64":F>çF<"6"Q=:ST="64516+F*12":"8090" N "8011" Ow"7200":"9";"MECHANIC NAMES":"200":F=̰"10":F+,"10";"";("64"+F);" ";M$("F*10-9"̰"F*10"):F P$"9510":"9506":K$=GDS"8020" Q>F=K$-"64":F>çF<"11"Q="2":ST="64576+F*12":"8090" R "8016" Tv"7200":"9";"SPONSORS NAMES":"200":F=̰"5":F+,"10";"";("64"+F);" ";C$("F*10-9"̰"F*10"):F U$"9510":"9506":K$=GDS:"67" V;F=K$-"64":F>çF<"6"Q=:ST="64696+F*12":"8090" Y "8021" K$=:K$="""8080" G"9506":K$>"64"ƯK$<"91"K$=" "K$="."Y<"11"E$(Y)=K$:Y=Y+ 'Y>K$=°"12"E$(Y-)=" ":Y=Y- :K$=GDSF=ç̰"9":ST+F,E$(F+):F:+Q:"8005+Q*5"  F+,"12";"";E$:"8080" %I#ç;"11";"PRESS ENTER":.01z# =,5:.01z# =,17 %K$= %GDS"9501" %!*.01z# =,5:.01z# =,8:: %".01z# =,5 %#.01z# =,8: %&K$= %'K$="""9510" %( %IYY=3+(*7):Y=-1YY=3:AA<6YY=9 %$P=-:AA<6YY>5P= %]Y(N)>Y(1)+12 Y(N)11 Y>09650% %#XX>4XX<10 P=0 %Y19625% %)YY>AA-2YY09632% % 9640% %KYY>AA-2YYAA-2YY09632% % 9640% %P19635% %AA>7P=-1 % 9639% %AA<5P=1 %_P0AA=AA+P:T(1)+1;7,AA-1;" \] ";8,AA-1;" ^_ " % 9610% %3XX,YY;" ";XX+1,YY;" ":"1160":"1128" %l"(*(T*8))=0""M(8)>20""20",;"CLIPPED CAR!":װ".05","-30":M("8")="M(8)-((*5)+5)":"400" %Y=Y*-:"9610" &Mo"1160":"1149":"19",;"CRASHED CAR";"20",;"OUT OF RACE":װ".2","-17":MC=MC-:Y(N)=ç:"1117" &Z$:Z$="LIST""9999" &Z$="VISA"CASH="1000000" &"67" ')236077\,60<:"65535"-"7962"