ADVENT P%+%vR% ADVENT LOAD PROG &0:4:0::1 <95;5,3;"S T O P T H E T A P E" FV6;16,14;"ADVENT";19,8;3;"QUANTUM SOFT 1985" K*2;20,12 ;"P Sproston" Pn9 ,11 ;"PLEASE WAIT":3000 :C=65368X65368X+(21*8)-1:A:C,A:C U" C=110 :C:15 cMENU d%:9 ,9 ;"1=INSTRUCTIONS" n&10 ,9 ;"2=LOAD ADVENTURE" " OPTION:";O O=1300, O=2:5;9 ,2;"S T A R T T H E T A P E";12 ,11 ;:7:"adv cd":13 ,10 :"ADVENT"  200 ,9:0,12 ;"ADVENT";1,12 ;"======" 6e''"'ADVENT'IS AN ADVENTURE BASED ON A LABRINTH CONTAINING A NUMBER OF LEVELS WITH VARIOUS OBJECTS" ;''7;2;"";:"=A WALL"'4;"";:"=FOOD"'6;"";:"=A KEY"'4;"";:"=STAIRS DOWN"'2;"";:"=STAIRS UP"'5;""; ="=ROPE DOWN"'7;"";:"=A HOLE"'5;"";:"=WATER"'7;"";:"=A SHIELD"'4;"";:"=A MONSTER"'7;"";:"=WHERE YOU ARE" @2'6;3;"";:"=A PIECE OF SPELL BOX" E$ #0;" PRESS ANY KEY" J=""330J T%C=221:C,0,,:C Y3,0;"THE AIM IS TO COLLECT 8 PIECES OF AN ANCIENT SPELL BOX WHICH MUST BE ASSEMBLED IN THE CORRECTORDER."''"YOU MUST THEN FIND YOUR WAY OUTAGAIN." c'"YOU CANNOT OPEN A CHEST WITHOUT A KEY."''"BUT BE CAREFUL!!!-"''"(THE SHIELD MAY BE FOUND USEFUL)"''"AND BEWARE OF THE MONSTERS!" h X=1 rZX=X+(X=1)-(X=2):C=0303:20,C;7;""(X):C |=""370r %C=221:C,0,,:C n3,0;"IF YOU RUN OUT OF ABILITY YOU ARE DEAD."''"IF YOU ARE BITTEN BY A MONSTER YOU ARE DEAD" b'"IF YOU ARE RUN OVER BY A VERY LARGE STEAM ROLLER YOU ARE DEAD-AND DON'T COME RUNNING TO ME!"  3;''"ALL RIGHTS RESERVED ON THIS GAME"'"IT TOOK ME A MIND-BOGGLEING AMOUNT OF INCREDIBLY VALUABLE TIME SO PLEASE DON'T PINCH, PILFER OR SWIPE ANY BITS!" '6;'" QUANTUM SOFT 1985" =""398  100d ************************ xFOR THOSE OF YOU WITH A BIT OF THINGY--THE DATA USED FOR THE LEVELS--POKED INTO 45,000 ONWARDS--(20*20)*10=4000 BYTES ************************ :REMEMBER!!!-NO WAY UP ONLEVEL 1--NO WAY DOWN ON LEVEL 10 ************************  LV1 /"AAAAAAAAAAAAAAAAAAAA","A A A A A" /"A A A A A A","A ABA A A AAAAA" /"A AAAA A A AEA","A A A A" /"A A A AAAAA","A A A AAA A" "A A AAA A" /"A AAAAAA AH AAAAA","A A A A A" /"AAG A A A A","AAAAA A AAAAA"  /"A A A A AA","A A AAAAB A AA" /"A A AAAA AA","A AAA A A" F"A A AAAAA AEAA","A A A AJ AAAA","AAAAAAAAAAAAAAAAAAAA"  LV2 /"AAAAAAAAAAAAAAAAAAAA","A A A A HA" /"A AAAA A A A A A","A A AA A A A A" $/"AAAA A AE A A","A A AA AAAA AAAA" )/"AF A A A H A","A A H AAA A" ./"AAAA AAAAAAAAA A","A A A AAA" 3/"A AA A A AAA","A A A A AF AAA" 8/"A AAA A A AAAAAA","AAA AE A A" =/"AJA A AA AB A A","A AB AAA A AA" B/"A AAA A AA","A A AAAAAA AA" G/"AAAA A A AA","AAAAAAAAAAAAAAAAAAAA" K LV3 L/"AAAAAAAAAAAAAAAAAAAA","A A A A A" Q/"A A BA AAAA A A","A A AAAA A AAAA A" V/"A A AAA A A A","A A" [/"A AAAAAA A A A","A GA A A A" `/"A A A A A","A A AA A" e/"A A AA A","A A AF A A" j/"A AF A A A","A AAAAAA A A A" o/"A A","A A AAA AA A" t/"AAA A AAA A A","A AA AA A AAAAA" y/"A AF AA A FA","AAAAAAAAAAAAAAAAAAAA" } LV4 ~/"AAAAAAAAAAAAAAAAAAAA","A G A" /"AAAA A A","A A AAAAAAAAAAA" /"A HA EA","AAAA A AAAAAAAAAAA" /"A A A","A A A A A A" /"AAAA AAAAA AAAAA A","AF A A" /"A A AAAAAAAAAAA","AAAA AH FA" /"AG A AAAAAAAAAAA","A A HA" /"AAAA A AAAAAAAAAAA","A A A" /"A A AAAAAAAAAAA","AAAA A A" /"AF FA","AAAAAAAAAAAAAAAAAAAA"  LV5 /"AAAAAAAAAAAAAAAAAAAA","AB A" /"AAAAAAAAAAAAAAAAAA A","A A A" /"A AAAAAAAAAAAAAA A A","A AF A A A" /"A A F A A A","A A AAAAAAAAA A A A" /"A AH A A A A","A A A AAA A A A A" /"A A A A A A A A","A A A AG FA A A A" /"A A A AAAAA A A A","A A A A A A" /"A A AF A A A","A A AAAAAAAAAAA A A" /"A A A A","A AAAAAAAAAAAAAAAA A" /"A J A","AAAAAAAAAAAAAAAAAAAA"  LV6 /"AAAAAAAAAAAAAAAAAAAA","AEA A" /"A A AAA AAAAAAA A","A A AGA A A A" /"A A A AAAAAA A A","A A A A A" /"A A A A A AEAEA A A","A A A AAAAAAAAA A A" /"A A A A A A A A A A","A A A A A" /"A A A AFA A A A A A","A A AH AAAAAAAAA A A" /"A A A A A","A A A AAAAAAAAAAAA A" /"A A A A A","A A A AAAAAAAAAAAA A"  /"A A A AE A","A A A A AAAAAAA A" /"A AFA A","AAAAAAAAAAAAAAAAAAAA"  LV7 /"AAAAAAAAAAAAAAAAAAAA","A HAFA A GAG A" /"A AA AA AAA AAA A A","A A A A A AEA" /"A AAA","A AAAAAA A A" #/"A A A A A","A A A A A" (/"AB A A A A","A A JA A A" -/"A A A A A","A A A A A" 2/"A A AFAB A A","A A AA A A" 7/"A AAA AA AAAAAA A","A AA F A" ,62>,28,8,8,28,28,9 ,62>,72H,20,36$,102f 60<,36$,255,153,219,24,36$,102f,28,28,72H,62>,9 ,20,36$,102f 127,101e,235,255,255,224,223,191,255,255,255,255,255,0,255,255,254,254,255,255,255,7,251,253 R+ 255,136,136,255,255,136,136,255,255,143,143,255,255,143,143,255 255,136,136,255,255,240,112p,127,255,143,143,255,255,135,134,254 ""'""'"" Uaox/adv cd ȯAAAAAAAAAAAAAAAAAAAAA A A A AA A A A A AA ABA A A AAAAAA AAAA A A AEAA A A AA A A AAAAAA A A AAA AA A AAA AA AAAAAA AH AAAAAA A A A AAAG A A A AAAAAA A AAAAAA A A A AAA A AAAAB A AAA A AAAA AAA AAA A AA A AAAAA AEAAA A A AJ AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA A A A HAA AAAA A A A A AA A AA A A A AAAAA A AE A AA A AA AAAA AAAAAF A A A H AA A H AAA AAAAA AAAAAAAAA AA A A AAAA AA A A AAAA A A A AF AAAA AAA A A AAAAAAAAA AE A AAJA A AA AB A AA AB AAA A AAA AAA A AAA A AAAAAA AAAAAA A A AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA A A A AA A BA AAAA A AA A AAAA A AAAA AA A AAA A A AA AA AAAAAA A A AA GA A A AA A A A AA A AA AA A AA AA A AF A AA AF A A AA AAAAAA A A AA AA A AAA AA AAAA A AAA A AA AA AA A AAAAAA AF AA A FAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA G AAAAA A AA A AAAAAAAAAAAA HA EAAAAA A AAAAAAAAAAAA A AA A A A A AAAAA AAAAA AAAAA AAF A AA A AAAAAAAAAAAAAAA AH FAAG A AAAAAAAAAAAA A HAAAAA A AAAAAAAAAAAA A AA A AAAAAAAAAAAAAAA A AAF FAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB AAAAAAAAAAAAAAAAAAA AA A AA AAAAAAAAAAAAAA A AA AF A A AA A F A A AA A AAAAAAAAA A A AA AH A A A AA A A AAA A A A AA A A A A A A AA A A AG FA A A AA A A AAAAA A A AA A A A A AA A AF A A AA A AAAAAAAAAAA A AA A A AA AAAAAAAAAAAAAAAA AA J AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEA AA A AAA AAAAAAA AA A AGA A A AA A A AAAAAA A AA A A A AA A A A A AEAEA A AA A A AAAAAAAAA A AA A A A A A A A A AA A A A AA A A AFA A A A A AA A AH AAAAAAAAA A AA A A A AA A A AAAAAAAAAAAA AA A A A AA A A AAAAAAAAAAAA AA A A AE AA A A A AAAAAAA AA AFA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA HAFA A GAG AA AA AA AAA AAA A AA A A A A AEAA AAAA AAAAAA A AA A A A AA A A A AAB A A A AA A JA A AA A A A AA A A A AA A AFAB A AA A AA A AA AAA AA AAAAAA AA AA F AA AA AAAAAAAAAAAAAAA AAE JAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAG GGHHH HHAAAAAAAAAAA G G H H AAAAAAGGA H AAAAG GAAA G AAAGAG G AAAAAA G AAA GAG AAAA AAA GAG GAA G G GAAG GA GAA AAG G AAA G AA AAAAAAAAAA AA AAAAAAAAAA A AA AAAAAAAA AAA AAFA AAAA A AAAAA A AA AFAAAEA A AA AAFAA AA AAA A AA A AA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AA AA AA AA A AAAAAAAA AA AA AAAA A AAA AA AA A AA AA AA AA A A AA AA AA AAA AAAA AA AA AA FA A AA AA AAAAAA A AAAA AA AA AA A AG AA AA AA AAAAA AAA AABAA AA A A AA AA AA A A AA AA AA A AAA A AA AA AA A AFAAA AA AA AA A AA AA AAAAAAAAAAAAA AA AA AAAAAAAAAAAAA AAHAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJ BAA F AA AA AAAAA AAAA AA AF A A A AA A BA A F AA A A A AA A A A AA A AAA AAAA FAA A J A AA A A AA A A AA AB A A AA A A AAAA A AA AAB A A ABABA A A AA A A A A A AJA AJAA AAAAAAAAAAAAAAAAAAAAA>:H\˧W_!8z>>>z~A >- >2\> B >-E >-F >-G >-H >-J >-C >-D >-I >->-#{x“{xƒ2\O!@~w# x y #!ȯ8:H\W_n>o(&D{Dz|g>>x2\ j >xy > x ! Bj~ ((# x çy">zyH< yO#~ NOTHINGWAIT I HAVEN'T FINISHED YETYOU FIND A PIECE OF SPELLBOXYOU NOW HAVE X PIECESYOU MUST CONTINUE ANYWAYOUCH! A WALLSOME WATER -SLURP -SLURPOH! SOME GRUB YUM YUM!OY! YOU!!OUCH! A MONSTER BITES YOUARE YOU PLAYING THIS GAME OR NOT?SOME STAIRS LEADING UPCOOEY! I'M WAITINGSOME STAIRS LEADING DOWNEEEK! A LARGE HOLE AAAGGGHHH!A ROPE LEADING DOWNYOU FIND A SHIELDYOU FIND A GOLDEN KEYYOU ARE NOW ON LEVEL XSPELLBOX PIECES ARE NOT IN ORDERBUT YOU ALREADY HAVE ONEPIECES ARE IN ORDER NOW GET OUTYOU FIND A TREASURE CHESTYOU HAVE A KEY AND OPEN IT UPOOH! A DEAD, LOST PI-MANA JAM BUTTY SUPPLYYOU DROP A PIECE OF SPELLBOXHI THERE I'M YOUR INFO WINDOWYOU'LL SEE ME LATEREXCUSE ME NOW WHILE I SET UP A GAMEA BOMB -TICK -TICK BANG!EEEK! A MONSTEROK I'M READY NOWTHAT WILL DO NICELYBUT YOU HAVEN'T GOT A KEYYOU ARE DEADA SHIELD WOULD BE HANDYLUCKY YOU HAD A BLAST SHIELDMOVE AWAY FASTPOOH! WHAT A PONGTHAT'S HANDYYOU CAN'T DROP ANYTHING HEREYOU HAVE NO PIECES TO DROP HAVE YOU?ADVENT K,GEK,0:7:0: 695;5,3;"S T O P T H E T A P E" @V6;10 ,14;"ADVENT";14,8;4;"QUANTUM SOFT 1985" J/2;16,9 ;"Phillip Sproston" TZ3;18,5;"written with aid of the excellent PICTURESQUE assembler" ^HUP=-6:Z=100d2204:X=Z/2:8100:Z h 8700! e23658j\,8:T()=((65536*23674z\+256*23673y\+23672x\)/502) h5;2,10 ;"WELCOME TO";4,12 ;4;"ADVENT";5,12 ;"" $10 ,2;"PRESS KEY FOR:" VUP=2:X=10 :C=-100d100d20:Z=C*2:8100:C 'PX=157:UP=-2:X=20 10 ,17;"UP="; 6D$=:D$=""ů(D$)>90Zů(D$)<480435 u(D$)>90Zů(D$)<480X=200:UP=4:Z=100d:8100:UP=-2:X=20:435  D$:B$=D$ ?Z=15:8100:Z:11 ,17;"DOWN="; D$=:D$=""445 490:N$="N"440 D$:B$=B$+D$ ?Z=15:8100:Z:12 ,17;"LEFT="; D$=:D$=""455 490:N$="N"450 D$:B$=B$+D$ @Z=15:8100:Z:13 ,17;"RIGHT="; D$=:D$=""465 490:N$="N"460 D$:B$=B$+D$ ?Z=15:8100:Z:14,17;"DROP="; D$=:D$=""475 490:N$="N"470 0D$:B$=B$+D$:Z=15:8100:Z K#0;" PRESS 'DROP' TO START OR 'ENTER' TO RE-DEFINE KEYS" 0,0;" ":C=2184:C,0;"";C,30;"";C+2,0;"";C+2,30;"":C:20,0;" " &=13 8700!::410 =B$(5)500 0,0;" ":C=2184:C,0;"";C,30;"";C+2,0;"";C+2,30;"":C:20,0;" "  482 C=1̱B$:D$=B$(C)ů(D$)<480ů(D$)>90ZX=200:UP=4:Z=100d:8100:UP=-2:X=20:N$="N":  C:N$="Y": :1:0:7:0:8700!::0,12 ;4;"ADVENT";1,12 ;"":HI=198:LO=104h:1850::UP=-1:X=70F:V=10 1-1:Z=V*10 :8100:V X_10 ,5;"PLEASE WAIT":I$(8):O$(8):J(8):U(8):I(8) H$(2,7):K$(5,20):N(5):M(5):K(5):F(3):G(3):H(3):X(3):Y(3):Z(3):Q(5):R(5):S(5) HI=198:LO=134:1850::UP=2:X=250:Z=100d:8100:X=20:Z=10 5025:8100:Z C=18:I$(C)=""(C):C:K$(1)="196010":K$(2)="198190":K$(3)="198056":K$(4)="198215":K$(5)="198031" HI=198:LO=154:1850::C=13:975:J(C)=B:975:K(C)=B:975:F(C)=B:975:X(C)=B:975:Q(C)=B:C OC=45:975:J(C)=B:975:K(C)=B:975:Q(C)=B:C )C=68:975:J(C)=B:C  VARS GC=110 :12 ,10 ;11 -C;" ":L=C:950 &V=18:J(V)C740 [970:D=B:970:E=B:(446008+20*(E-1)+D)32 720 U(V)=D:I(V)=E V>5870f K(V)C770 [970:D=B:970:E=B:(446008+20*(E-1)+D)32 750 GM(V)=E:N(V)=D:W=1V:K(V)=J(W)N(V)=U(W)M(V)=I(W)750 W V>3830> F(V)C800   [970:D=B:970:E=B:(446008+20*(E-1)+D)32 780  GG(V)=D:H(V)=E:W=1V:F(V)=J(W)G(V)=U(W)H(V)=I(W)780  W  X(V)C830> *[970:D=B:970:E=B:(446008+20*(E-1)+D)32 810* 4Y(V)=D:Z(V)=E 67W=1V:X(V)=J(W)Y(V)=U(W)Z(V)=I(W)810* 8W >Q(V)C870f H[970:D=B:970:E=B:(446008+20*(E-1)+D)32 840H \GR(V)=D:S(V)=E:W=1V:Q(V)=J(W)R(V)=U(W)S(V)=I(W)840H aW fWV:C:J(1)=K(1):U(1)=N(1):I(1)=M(1):8000@  SETUP  950 PC=13:X(C)=L(446008+20*(Z(C)-1)+Y(C)),75K =F(C)=L(446008+20*(H(C)-1)+G(C)),67C SC:C=15:K(C)=L(446008+20*(M(C)-1)+N(C)),68D SC:C=28:J(C)=L(446008+20*(I(C)-1)+U(C)),73I C: CHNG LVL 8400 :8600!: B=(1+*19): B=(1+*9 ): B=(1+*2): B=(1+*4):  SCREEN LUSC=49000h (0,22;"LEVEL:";L;2,20;"TIME: ";4,21;"YOU HAVE:";5,21;"1)";2;H$(1);7;6,21;"2)";4;H$(2) 21;7;8,21;"WHATS THIS?";1;8,21;"___________":C=9 13 :7;C,21;" ":C F15,22;"ABILITY:";16,24;3;A;"% ";7;18,22;"PIECES:";6;P:C=01:V=14:20+C,23+V;O$(V+(C*4));:V:C: w UDT x70,28;L;" ";18,29;6;P 3V=14:20,23+V;O$(V);:V ;V=14:21,23+V;O$(V+4);:V E-1,D;"" T1=T()-T:2,25;(T1/60<);"'";(T1-(((T1/60<)*60<)));" ";16,24;3;A;"% ":A<13;16,23;"OOPS!!":2600( E-1,D;"":  MAN =B$(3)1550 =B$(4)1580, =B$(1)1600@ =B$(2)1630^ =B$(5)2350.   LF i(446008+20*(E-1)+D-1)65A8300l :1800:D=D-1:1900l " 1650r +RT ,i(446008+20*(E-1)+D+1)65A8300l :1800:D=D+1:1900l ; 1650r ?UP @a(446008+20*(E-2)+D)65A8300l :1800:E=E-1:1900l T 1650r ]DN ^W(446008+20*E+D)65A8300l :1800:E=E+1:1900l rHI=196:LO=86V:1850::A=A-1:UP=1:X=70F:Z=062:8100:Z:1900l PT  X$=" "  %X$="C"E-1,D;6;"": %X$="B"E-1,D;4;"": %X$="D"E-1,D;6;"": .X$="I"E-1,D;6;3;"": !%X$="J"E-1,D;5;"": &E-1,D;7;"": 9 MSG :450050,HI:50049,LO:USA=50000P: kNW l-X$=((446008+20*(E-1)+D)) qX$" "1915{ s=UP=-1:X=10 :Z=1:8100:A=A-1 v'HI=195LO=2306000p x4HI=195:LO=230:1850::6000p {X$="B"HI=196:LO=124|:A=100d:1850::X=502:UP=-5:Z=100d104h:8100:Z:6000p X$="C"HI=197:LO=96`:1850::X=30:UP=-1:Z=1155:8100:Z:1925  1960 #H$(1)"A KEY "1930 UP=2:X=40(:HI=197:LO=174:1850::Z=50260<2:8100:Z:Z=13:F(Z)=LG(Z)=DH(3)=EF(Z)=0:(446008+20*(E-1)+D),32 :X$=" ":1929 Z A=A-1:6000p H$(1)="A KEY":HI=198:LO=248:1850::2;5,23;H$(1):UP=-3:X=502:Z=1202:8100:Z 'V=12:F(V)L1950 V QF(V)=0:(446008+20*(E-1)+D),32 :X$=" ":6000p {X$="D"HI=197:LO=231:1850::UP=-1:X=70F:Z=100d110n:8100:Z:1980  2070 H$(1)"A KEY "UP=1:X=180:Z=502:8100:HI=199:LO=12 :1850::A=A-1:6000p &HI=198:LO=1:1850: iW=14:K(W)=LN(W)=DM(W)=EHI=K$(W,3):LO=K$(W,4):1850::2020 CW:HI=K$(5,3):LO=K$(5,4):1850: GUP=-2:X=502:Z=10 20020:8100:Z \W=1K(W)=0:X$=" ":(446008+20*(E-1)+D),32 :2310 W=2H$(2)"SHIELD "HI=199:LO=38&:1850::UP=1:X=180:Z=60<:8100:HI=199:LO=513:1850::UP=-1:X=30:Z=115:8100:Z:2600( W=2HI=199:LO=75K:A=A-5*(A>4):A=A-5*(A>4):K(W)=0:(446008+20*(E-1)+D),32 :X$=" ":C=1502:C:1850::6000p LW=3A=100d:HI=199:LO=137:1850::6000p W=4UP=-1:X=502:Z=45-:8100:A=(A/2):HI=199:LO=104h:1850::6000p  ~UP=-1:X=80P:Z=20:8100:HI=199:LO=119w:1850::A=A-5*(A>4):6000p X$="E"HI=197:LO=3:1850::UP=1:X=30:Z=100d15010 :8100:Z:A=A-1:L=L+1:2400`  X$="F"HI=196:LO=217:1850::UP=-1:X=30:Z=150100d-10 :8100:Z:L=L-1:A=A-1:2400` %X$="G"HI=197:LO=58::1850::UP=-4:X=150:Z=502:8100:A=A-1:L=L+1:2400` *X$="H"HI=197:LO=28:1850::UP=1:X=200:Z=10 :8100:A=(A/2):L=L+1:2400` /X$="I"2300 4X$="J"HI=196:LO=99c:1850::A=100d:UP=-1:X=20:Z=100d1-10 :8100:Z:6000p >xX$="K"HI=197:LO=78N:1850::UP=-2:X=80P:Z=10 16:8100:Z:2130R H 2190 RH$(2)="SHIELD "UP=2:X=150:Z=502:8100:HI=197:LO=174:1850::A=A-1:6000p \XUP=1:X=502:Z=80P:8100:HI=199:LO=137:1850: fRH$(2)="SHIELD ":4;6,23;H$(2):Z=12 p"X(Z)=LY(Z)=DZ(Z)=E2170z uC zQX$=" ":(446008+20*(E-1)+D),32 :X(Z)=0:6000p PK 'HI=196:LO=10 :1850: UP=-5:X=502:Z=10 202:8100:Z:P=P+1:V=71-1:O$(V+1)=O$(V):V 5V=18:J(V)=LU(V)=DI(V)=E2340$ V $O$(1)=I$(V):J(V)=0:(446008+20*(E-1)+D),32 :X$=" ":502284,(P+480):HI=196:LO=39':P=150235;,0 &v1850::UP=-2:X=80P:Z=502:8100:50235;,83S:1400x:P=82450 )1400x:6000p -DR .X$" "HI=199:LO=150:1850::UP=1:X=502:Z=010 2:8100:Z:6000p 8-V=18:J(V)=02380L B{V:HI=199:LO=179:1850::UP=1:X=40(:Z=205025:8100:Z:6000p LP=P-1:I$(V)=O$(1):J(V)=L:U(V)=D:I(V)=E:(446008+20*(E-1)+D),73I:HI=198:LO=75K:1850::UP=1:X=30:Z=10 50210 :8100:Z [X$="I":1800:V=28:O$(V-1)=O$(V):V:O$(8)=" ":502284,(P+480):HI=196:LO=39':P=150235;,0 \k1850::UP=1:X=20:Z=0P:8100:Z:50235;,83S:1400x:U$="NO" ]JL=1 44789,65A:9 ,9 ;2;7;"" ^ 6000p _LV `S900:1100L:50571,(L+480):L=10 50571,491 ycHI=197:LO=118v:1850::UP=-4:X=100d:Z=100d:8100:X$=" " {6L=10 7;0;11 ,28;"0" ~ 970:D=B:970:E=B <(446008+20*(E-1)+D)32 2430~ 7M$="N":C=15:Q(C)=LM$="Y":2445 C 1400x:6000p CK 7C=18:O$(C)=""(C)C:2470 dHI=197:LO=141:1850::UP=1:X=502:Z=20:8100:6000p HI=197:LO=199:1850::UP=-2:X=80P:Z=40(:8100:U$="YES":D2=10 :E2=10 :6100 MS 'B=25:Q(B)=L2530 B: vOX=R(B):OY=S(B):R(B)>Dƾ(446008+20*(S(B)-1)+R(B)-1)=32 R(B)=R(B)-1:2560 XR(B)Eƾ(446008+20*(S(B)-2)+R(B))=32 S(B)=S(B)-1:2570 FS(B).6UP=-(1+*3) n>X=30+*70F:Z=*150:8100:2630F C=110 :C:0:0::7:C=180P:C:7:0::#1;" 1985 Sproston Research Ltd" =""2710 HI=195:LO=238:1850::UP=-1:C=110 :X=502:Z=502+(C*10 ):8100:C:UP=27:X=70F:HI=196:LO=61=:1850::Z=0100d10 :8100:Z:10 ,5;"PRESS ANY KEY" =""2740 500 FN gUP=-6:X=122:X-1,0,,:Z=X*10 :8100:X:0,0; gC$="" V=15:UP=-V:X=V*15:Z=V*20:8100:V;C$'':V:8100:19,0;"WELL DONE YOU GOT OUT-----------NOW TRY AGAIN WITH A CHANGE OF LOCATION" 6"#0;" PRESS ENTER" @13 2880@ JB8700!::6;9 ,11 ;"WELL DONE!":480 o CNT p W=0  1450  1500 M$="Y"2500 8W<206300 =4W=20HI=196:LO=147:1850: B4W=25HI=196:LO=183:1850: LSW=35#HI=196:LO=240:W=10 :1850::A=A+(A<100d) #W=W+1:U$"YES"6020 dL16020 n`44789,32 :9 ,9 ;1;2;"":E=10 D=9 2800  6020 ?ST @X=200:Z=10 :8100::L=1:H$(2,7):A=502:P=0:O$(8):X$=" ":Y$=" ":Z$=" ":U$="NO":H$(1)="NOTHING":H$(2)=H$(1):O=1:T1=0:T=T():HI=198:LO=231:1850::2400` :6000p BP B49920,X:49931 ,Z:49923,UP:USB=49900: kOVER MAN lE-1,D;" ": CALC LEVEL L>48450! ;L=149806,175:49805,200: :L=249806,177:49805,88X: ;L=349806,178:49805,232: 049806,180:49805,120x: !9L=549806,182:49805,8: ! ;L=649806,183:49805,152: !:L=749806,185:49805,40(: ! ;L=849806,186:49805,184: !*:L=9 49806,188:49805,72H: !4049806,189:49805,216: !DUMP LVL !USB=49800: ! DISS !USF=49250b: #' #(mC=18:C;"=";O$(C);" ";J(C);" ";U(C);" ";I(C);" ";:C<6K(C);"=";N(C);" ";M(C);" ";K$(C) #2:C: #FL=110 :8400 :8600!:1100L:0:L: #>D=19:E=19:(446008+20*(E-1)+D) #)(446008+20*(E-1)+D): $Bc=3499565000:c;" ";c;:C>47/" ";(C) $:c: 'D"M";1;"ADVENT":*"M";1;"ADVENT":*"M";1;"ADVENT" ^\ ssbdsP lde apot sh  D0NYB98670C` ++  +  i196010 198190 198056 198215 198031        NOTHINGNOTHING  Y Z UNOMYX