VENTURE jADON'T DELETE THIS LEVEL PROG AS ALSO LOADS GRAPHICS  1 L6:1:0:7,2;"LEVEL 0.K. D0 N0T ST0P TAPE"  0,6,7,244,124|,124|,120x,0,0,96`,224,47/,62>,62>,28,0,0,66B,126~,90Z,24,90Z,126~,90Z,0,145,4,32 ,10 ,64@,1,4,145,82R,524,31,248,44,,66B,137,568,568,568,254,254,254,568,124|,0,36$,24,90Z,255,189,153,0,40(,568,568,16,579,125},579,30,568,568,16,254,186,146,40(,108l $I=071G:A:"A"+I,A:I 612 ,0;"WHEN GAME STARTS, THEN ST0P TAPE" AI=1200 DI F18,5; J"48K" H48K ;;f; Y$=" ":X$="":U="0":Z="5000":V="1":W="1000":P="5010":M="5":L=M+M-V:K=W:S=M+V: O=W+M+V:X="968":Y="952":LL="1018":D$=" S=START " V::M+V:P:U:V:"3","12";"VENTURE";"12";"";L,U;"YOU HAVE `1000 TO START. IF YOU LOSE A GAME YOUR CASH IS HALVED (CAN WIN `1000 IN MOST GAMES) .............................":"951":L+M,M+M;D$ ="S"Ŧ="s""20" L+L &M+V:L+M,U;X$:"950":I="21"U-V *I<"20"I>UI-V,L-V;"WE HAVE LIFT-OFF" ٰ"3":I,U;X$:.005y# =,502-I:I:LL:S="7":Z:A$=" ":L+V,M;"SELECT WHICH WILL WIN";L-V;"`1000 IF CORRECT.":M-V:I=VL+L:"3",U;A$;L+L,U;A$:O:.001wn,*10 +30:I JI=V̰"14":1;"15","13";"`1000";"15",I;"";"31"-I;"":ٰ"7";"15",I;"";"31"-I;"":.01z# =,*38&+30:I:U:"15",L-V;"SELECT 1,2 OR 3" ZD=()-"48" \D"3""90" ^:A$="":B$="":C$="":A=U:B=U:C=U:1:V,L;"YOU SELECTED ";("1"D=1)+("2"D=2)+("3"D=3) b|R=(*"3"):ٰ"7":L+V,U;A$;:2:V;"":7:12 ,U;B$;:4:V+V;"":7:L+M,U;C$;:V:"3";"" d3A$=28űB$=28űC$=28118v f("108"+R:.01z# =,V+R*5:"96" l A$=A$+" ": m B$=B$+" ": n C$=C$+" ": vqA=(A$="28")+2*(B$="28")+3*(C$="28"):U:L+L,"12";("1"A=V)+("2"A=V+V)+("3"A="3");" WINS" z A=DW=W+K |ADX ~A=DY LL I=VL+V >S=M+V:Z:"3":U:A$=" 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 ":B$=" 4 9 6 9 1 4 0 3 2 5 5 6 8 2 4 ":C$=" 8 5 7 3 8 9 9 5 0 0 3 2 4 1 1 " ~V+M,L-V;" LAS VEGAS. ";L-V;"  ";L-V;"YOU HAVE 10 GOES";L-V;"TO WIN OVER `999":I=V I>LL+M,"12";D$ ="S""236" (*4)*4+286 I=I+V:"226" eM-V:ڰ"7":U:A$=" ` ` ` ` ` ` ` ` ":I=Ṵ"21":I,U;A$:O:װ".03",*"10"+"25":I V;M,L+L;"VEGAS";M+V,"17";" ";V;"  ";U;"GO NUMBER 1   A B C  `    ";U;"CASH=`    S=STOP ";V;"   ";L+M,"16";"A=1.....`150 ``WINNING=`0  B=2.....`150";"16","16";"C=3.....`150";"17","16";"2 SAME..`250";"18","16";"3 SAME..`500" M+M,"7";W:G=U:1;8,19;"A":1;8,21;"B":1;8,23;"C":J=Ṵ"500":J I=VL+V:L-V,"11";I A=(*L) B=(*L) C=(*L) =8,19;A;8,21;B;8,23;C ="S"256 244 DD=U A=VB=V+VC="3"DD="150" A=BA=CB=CDD="250" A=BB=CDD="500" /G=G+DD:"15",M+M;G:DDU.1}L,30  DD=U.3,1  J=V̰"250":J::I  G>"999"W=W+G  4"10","7";" ";"10","7";W:G>"999""316" "314" "3",U;A$;"17",U;A$  "232" ""3",U;B$;"17",U;A$ $"232" &"3",U;C$;"17",U;C$ ("232" *"3",U;C$;"17",U;C$ ,"232" :X < G>"999"Y ?LL:S=U:Z:V+V:U:ٰ"7":M,L-V;" TREASURE HUNT ";L-V;"  ";L-V;"`1000 BURIED IN";L-V;"AN AREA 8 X 8. ";L-V;"ENTER GRID REF ";L-V;"ACROSS AND DOWN";L-V;" & PRESS ENTER.";L-V;"REDUCES BY `100";L-V;"FOR EACH TRY.IF";L-V;"`0, CASH HALVED";M+V;"(TYPICAL INPUT IS D4)":950 @"16","11";D$;V+V,V+V;٥*7+1;"`1000";"26";٥*7+1;"`1000";"19",V+V;٥*7+1;"`1000";"26";٥*7+1;"`1000" B="S""334" D 320@ N:V:M-V:U Ou:V:M:V:U:F=(*"8"+V):E=(*"8"+V):A$=" ` A B C D E F G H ` ":B$=" ":A$ VNI=VL-V:V+M;B$;V+M;(I+"48");" ";(I+"48");" ":I XV+M;B$;U;A$;Y$;Y$;Y$;M,U;"YOUR";M+V,U;"CASH:";"7",U;"`";W:I=VL+V:M,"26";"VALUE";M+V,"26";"` ";M+V,"27";"100"*("11"-I);"8","26";"GO ";I b"ENTER GRID REF ";A$ dA$V+V"354" f#A=(A$)-"64":B=(A$(V+V))-"48" jA>L-VAL-VBF)+("RIGHT"AE)+(" DOWN"B"54"ůA$<"48""448" J L"21",U;Y$;I+"3","11";A$;"CHECKING":C=U:A=U:J=VM-V:O=UL+L:O C(J)+"48"ɯA$(J)"472" C=C+V:C(J)=L:A$(J)="9" J C=M-V"504"  J=VM-V A$(J)="9""496" B=A$(J)-"48":E=VM-V C(E)B"494" A=A+V:C(E)=L:A$(J)="9":B=U E J "I+"3","15";" ";C;" ";A;" " I "506" I+M-V,V;"WELL DONE." W=W+K 1I+M-V,"11";"CODE=";X(V);X(V+V);X("3");X(M-V)  C=M-VY  CM-VX O="627":Y$=" ":X$="":U="0":V="1":K="1000":Z="631":M="5":L="9":X="629":Y="628":D$="S=START" V::S=M+V:M:Z+V:"630":O :S=V:Z:V+V:ٰ"7" M+V,"13";"TRACK";L-V,V+M;"STAY ON THE ROAD FOR";V+M;"OVER 50% OF TIME TO ";V+M;"WIN UPTO `1000.STEER";L+V;"WITH 5 & 8" 5A$="":I=V̰"30"V+V:V+V,I;"`";;"19",I;"`":O-V ="S""520" 2I:"15","12";D$;V+V,U;Y$;"19",U;Y$:"517" >:S=U:Z:S=M+V:Z+1:V:U:C="11":H=U:A=M:B="16"  'I=V̰"116":A,B;"":"23692","255"  #I>"16"A$":".05|L,5  jH=H+(A$=":"):R=(*"2"):C=C+(R=VC<"25")-(R=UC>M):"21",C;"*::*";A,B;"";A,B;" ":"21",U;::  1B=B+(="8"B<"29")-(="5"B>V+V):A$=(A,B):I  AL+V,M;"ON TRACK ";H;"% OF TIME":I=V̰"50":I:H>"49""527"  X:"528" =" YOU WIN ";H;"% OF `1000 (`";"10"*H;")":W=W+H*"10":Y  "630":U:S=V:Z:S=M+V:P:V "7","12";"BOMBER";L,M;"BOMB AWAY THE OLD ZX81";M;"ON THE RUNWAY. PRESS B";M;"TO RELEASE BOMBS. ":F=U:E=U:B=U:A$=" " AI=V̰"16":V+V:V,F;A$;"19",F;A$:I>LV;V;"17","12";D$ A$=A$("32")+A$(̰"31"):I "S""532" M+V:S="7":Z+V:U F,L;"HEIGHT";"13",M;" SINCLAIR";X$(L+M);M;"";X$(̰"23");M;"";X$(̰"23");M;"ZX81";X$(̰"19");M;" 1 2 3 4 5 6 7 8 9 0 ";M;" Q W E R T Y U I O P ";M;" A S D F G H J K L n ";M;" s Z X C V B N M ; ` ":M-V;"21",U;X$ ~A=-V:J=UL+V:U,16;" ";U,16;1000-J*100d;"FT":A$=" ":A=A+V+V A=13 552( A=21A=20 :I=V̰"29":A,U;A$:A$=A$(32 )+A$(31):F=F+V F> 29F=V !="B"BVA<27546" B=V550& I J30E=30 # B=V:T=F-V $rC=E20:3;C,T;"****":.005y# =,25+2*C:;C,T;" ":I=29A,28;" " %I29542 &C 'B=U:542 (#C="19429"̰"19452":CU"554" ) C:"545" *"ٰ"3";V;L,L+V;"OBSTRUCTION":X +"630":"559" ,:W(E,F)="E"R=V+V ?*(E,F)>"32"7;C,D;":":"570" @"573" AR=U:A=(*"6"+V):B$=("CHEESE"A=V)+("COIN"A=V+V)+("AEROSOL PAINT"A="3")+("OIL CAN"A=M-V)+("TORCH"A=M)+("FISH"A=M+V):"17",U;A$;B$;"19",U;"T=TAKE. L=LEAVE." BB$=:B$"T"B$"L""578" C7B$="T"A(A)M-V;L+L,U;"ALREADY HAVE...L=LEAVE" DB$"L"A(A)"578" EB$="L""569" FA(A)=V G"614":A("7")>M-V"585" H"569" IHV+V;L+L,U;"ONLY 4 ITEMS ALLOWED";U;"LEAVE WHICH NUMBER? " J!A=()-"48":AM+V"586" KA(A)"586" LA(A)=U:"583" MR=U:"17",U;Y$:I=VL+M:M+V;"17",M-V;"GOLD":װ".02","40":"17",M-V;"GOLD":I:B=(*"6"+V):C$=("HUNGRY MICE"B=V)+("GIANT MONEY SPIDER"B=V+V)+("INVISIBLE OGRE"B="3")+("RUSTY ROBOT"B=M-V)+("VAMPIRE BAT"B=M)+("WILD CAT"B=M+V) N9"17",U;"GUARDED BY ";C$;U;"  F=FIGHT R=RUN " OB$=:B$"F"B$"R""591" PB$="F""596" QW<"1000""556" RW=W-K S"17",U;Y$;Y$;Y$;"19",U;"CASH NOW `";W;". GOLD NOW `";G;V,"24";" ";V+V,"24";" ";V,"24";W;V+V,"24";G:O:"569" Th"17",U;Y$;Y$;Y$;"17",U;"FIGHT WITH WHAT?";U;"ENTER NUMBER OF ITEM";U;"(IF NONE, ENTER 0 TO RUN)" UA=()-"48":A=U"593" VAM+V"597" WA(A)"601" XB V+V;"17",U;Y$;Y$;Y$;"17",U;"YOU DO NOT HAVE ";A:O:"596" YC$=(""B=V)+(""B=V+V)+("?"B="3")+(""B=M-V)+(""B=M)+(""B=M+V):C$=C$+"<--> ":A(A)=U:"614":"17",U;Y$;Y$;Y$;"17",U;"LET BATTLE COMMENCE":A=BF=V+V+(*L>"6.5") ZABF=V+V+(*L>"1.5") [I=VF:J=VL+V:V+V;"19",U;C$:C$=C$(C$)+C$(̱C$-V):װ".05","25":J:J=VL+V:M-V;"19",U;C$:C$=C$(V+V)+C$(V):װ".05","35":J:I:"17",U;Y$;Y$;Y$:F="3""605" \zE=C:F=D:I=VM-V:"17",M-V;"YOU WIN":װ".02","45":"17",M-V;"YOU WIN":װ".02","40":I:G=G+"1000":O:"595" ][E=C:F=D:I=VL+L:V;"17",M-V;"LOST.....CASH HALVED":װ".02","5":I:W>UW=(W/"2") ^WUW=W-"1000" _"595" `R=U:G>"1999""613" a`V+V;"17",U;"NOT ENOUGH GOLD--TRAPPED IN MAZE":L,"13";" ":I=UM:װ".03","20":I b="18",U;"  PRESS R TO REPLAY ""VENTURE"" ":="R" c1="".01z# =,*100d-502:610b d ezG=G+W-"2000":L,15;;" ";"17",U;"OUT OF MAZE";;U;"GOLD+CASH-EXIT FEE=`";G;Y$:S=M:O:Z:S=U:P:"617" fr"17",U;Y$;Y$;Y$:I="11"̰"15":I,"20";" ":I:A("7")=U:"11",L+L;:I=VM+V:A("7")=A("7")+A(I) g"20";:A(I)("1.CHEESE "I=V)+("2.COIN "I=V+V)+("3.AEROSOL"I="3")+("4.OIL CAN"I=M-V)+("5.TORCH "I=M)+("6.FISH "I=M+V) hI: i S="7":Z+V jA$=X$(̰"21") kJ"3",M;A$;"12",M;A$:I=M-V̰"11":I,M;"";"25";"":I:GS:I=Ṵ"21":I,U;Y$(̰"16");"21"-I,"16";Y$("17"):I: xAS:I="21"U-V:I,U;Y$(̰"16");"21"-I,"16";Y$("17"):I: Q=Ṵ"50":Q: Q=Ṵ"250":Q: 4I=VM:V;"20","12";"YOU WIN":װ".5","30":I: ?I=VM:V;"20",L+V;"CASH HALVED":װ".5",M:I:W=(W/"2"): A$=A$("32")+A$(̰"31"):  'L+V,M;" YOUR CASH NOW `";W:"950": >S:I=Ṵ"21":I,U;Y$(̰"16");"21"-I,"16";Y$("17"):I: AS:I="21"U-V:I,U;Y$(̰"16");"21"-I,"16";Y$("17"):I: V::S=M+V:M:Z+V:"630":O & @