start sidey yQ{ u40854:0:0:0::"TITLE"16384@:7,0;:"MC":7,0;:"START" QB  2:2:6::6,6;"ENTERING FINAL QUEST";12 ,0;"Please allow tape to run through":2:"QUEST" TITLE ?8> 0<a88G 0pxh|ax0C`08Pf3@3D Hth(g@`0ÆH8x aC8CBXaD~N9h9P\ca†D8p aa8??2H01P8HXLcю~?a†D8q ap8?  H 8c<???a BD8c! `>Lx|<@  `s<$0c< xx`0f< <a CD8 ! ` x0AC`?!BDA?@BDhx@8D8@8xb DBB8(@8h?zp?`  ?#?À|D  ?|~DTDx DD@@D<b1BB| 0@0xTB ~? pBD  B@BDTDD xD8D f8@8H%5?~0?^ !281~Jq&@"@<0"@@8~>N8q&D" oB<<< B>B~|<<~<@@|>B"DBJ@|B@~@@|NB|@@|B@BR/A p&?@@`BB"<ZF@DBB@B@@DBBBD@B@D$@Dc.@f @@B><<<<$>B~B<<@B~~B> _###!<~w# ##ӃPZ2*DR"D!@XSH!J6 !K6 "F*D~8> 2L_#!\*F~w##~w# (R:L_##!d*H~w##~w#>R"H*F##*D#"D!K5t&"F*H"H*DG"D:J=2J !H"F !P"F*Fl80 $fÀq R&2L8p!`$K#&l@#@@@@pyp6  /O0 H ?H(0 H?T((8:x 0 0 0 0D @p @)- @@#GAAB@"@p 04,<<80 @D"JR'?o p00000MMMM44443333221144220000LLLLOOOO22002222111100223311LLLLNNNNk^k^*>2>Y2>22~# B >2N >2U g@O|GW|_a}o{_))))){G>G>w*x(4:( ,-:( $%| & &"`:("̾BD"NRLERFBU*NR LFREL DJBLNUJU NRU NRU NRU NRU NRU NRU NRBD"NRLERFL U4BLND4D NRD NRD NRD NRD NRBU*LFRELDJBD"LERFLU4BDBRLDRNUEUNGLGBU REU GLHD FRURLRDBUHBRGBRE RFD HDHDHGNHFNRNFNGHGLHNEGNLNGNFEHGUGUGU ERF BDEUEUEUEUGDHLGUHDFDFDFDFBU BLUHDFBRUEDGBR NHFDGHGBUEBUGBFDGNHDBLNUBLNUHLGNUBLNUBLUNEHUEFBUHBUFBGHUE BUREUEUHL GDFDFRBUUBLDBRUBUBRREUHLGDFBL LHUERFDGBRBD DNLNRDNLNRDNLNRDGD LNGNDRNFNDBR NGNDRNFNDLU HURFDNGNDFDBLUENDNFUERBU REUEUEUHLGDFDFDFRBUUBULURFBRRULGBDDBUBRRGDRFD GDGLNULHUHU ERUHRLBDDFRERDGNG DGLFNRNHLGLHLREUEL HLGL FDFR BU NFBLGBU LUFBREDLBRBD FD G BDDFDLUHLGDLUEU H U EBF ELUGLDGNRHNUFDNUEFNEFNEFNEFEHENUGHBGBDFENHEHBDRFGL HER EHGFGDBLUHEFGBGUGBLE FLFBRELEF BLHDBUEHGFBL EHGFBFFBREBDE HL GF REDG FRFDGRGL!HUERGR"BUEUHLGBDR LH E UBDREUEUHUGDL UHDGDFDFRBURBLLBU BHFRHLBRLGREBRF DNFNDLNDNGUHGDGDGFDFDFDFDLUEUHL GDFDLUEUEUEUENR HUHUHGDNFNDLNDNGUE BU NLRFEUHL GDFEBUHGFEBREFGHBDBR FD GDLDFDFRFDLHGLHUHL GDGLHGLUEREUEULUHU EBD BLDFRDHGFBREHGUREUBDEHLGFRBDREHL GFR BFEUH L G DFREFGD FBLU EHLDGBRUH ULD F BLUEHEFGD GFBU RGULFUBUHLNLDFRUBRDREUNRLGBU NLRFRGDGBLHUHREBDBLGDFDGR UEU RD FDR HU EUREU HFBDDLHGNRFERBL LHUBD DFRUNHRUBDRDGLHUNHRNEEDGLHUBUR F DGNFNDHUFGDGD RDLURU EGLHFD RDLURU HUHEDGNDNGHUE RBURE HUHLGDGF RBU ERDGLHURFBDBLGBGGDFDGNRGR U ERFD R HNLHUEUHU NGEUH BDBRDGLHRUHLDHLNFFLGFEUFDRNHFNL DFRFUHUBL BDGDFBREUHBUEUHL GDFG D FDFDGRUDRUDRUDRUDRUDRUDRHUEUEU H BHEUHLGDFR EBDRNDRFBDGNUGLNUHBUENDERBUERGLBLLHRFBU NLRF DEUHEDRUFGDG FD FLHLU HGNL DFLHU LD GLEUHGD LGLEU EUHGHLUFEHRDFEUE BURHBLGRBUBRERGLBLHLFRBLHERERFRFGDGL HUHG D FDFDGDRNURNURNUREUHUERFDGDFRNURNURNURUHUEUEU H BD BRFDGDEDGDEBLFUHUFUHUEBUEUHLGDFBLUERFDGLHBLUER FDGL HLGFEHBR GFEHUFDL FGHEBRGFEHEL UEDGFEHBR GFEHLBUBLUHDFBRUEDGBRDGDFRFD GDFND DFDGDGLHUGLHDGLHNU UHUEUERU BU BLDFRED HLHUEREUHUERFDBDBRDGLFLGDBL UHBUREU EHLDLHGLULGFD FRBU DRHBHBDDLEBERUGBLHDRBLG UF G DFDFD FDFGR HLRERFGR HLREUEU EUEUG F H BDGDEBLFUH!@6#|P 6#    12King        M         a        g     i     c                 P     u      b            SmithArms     zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz888888888888888888888888888888zz888888888888888888888888888888zz882222222222222889999988zz88288882888828888888288988888zz88288882888828888888288988888zz88228822288228888888288888:88zz88888888888828888888288888888zz88888888888828888888288988888zz888(:(6 80y0  +#  R~( w6 !u~86#| }a >222j2222>2222H2҄vӀӌNҀ!@~#|[ !@ w#|[ ͸ @#O4x?!ЈH$n881:o!@N h@@Ȉ@@p# @@aQBB 8,d,NO NAME  #$!"%  \Wq !v>$"""""""""""""""""">$VN<<~:START +-FCopyright  1983 by WINTERSOFT. J.F.Humphreys & D.A.Briskham.  545848 40854 )I=13:.1}L,24:I 6:6:0: _0,0:0,175:255,0:0,-175:-255,0 \6,12 ;"WELCOME";7,14;"to";8,6;"THE RING OF DARKNESS" #7C$(6,7):H$(1,15):C(7) (1:1:7:2:15,9 ;"STOP THE TAPE":0:0:6:0:20,1;"Then "; -100d:1000 22"ELF","DWARF","HUMAN","THIEF","WARRIOR","WIZARD" Fg:"NAME: ";H$(1):P>02,0;"You have ";P;" points":"to distribute amongst:" K5,0;"INTELLIGENCE ";C(1);6,0;"STRENGTH ";C(2);7,0;"AGILITY ";C(3);9 ,0;T$;10 ,0;S$: P&C(4-A)=C(4-A)+10 : d"press any key" i""105i nA$=:A$=""110n s A=0:N$="0":A$="" ;K=1̱A$:Q=A$(K):Q<480Q>579165 N$=N$+A$(K) K:A=(N$): A$ A$="" 2A$=A$(1):A$>90ZA$=(A$-32 )  2:2:7::3,0;34";"Four Rings the Ancient Wizards Forged and cast upon the Earth.":6,1;"One Ring the Evil Sage called Forth from the Void." 9 ,1;"Shedir, the Ring of Darkness.":11 ,1;"May luck travel with all who Tread this path.";34" <20,0;:100d:I=16:C$(I):I 5:1:7::5,0;"PLEASE CHOOSE:":7,0;"1. Continue a saved game":"2. Start a new game";11 ,0;"Which?";:A$:150:A=13000 A21010 T$="":S$=""::5,0;"SET UP NEW CHARACTER";7,0;"Please give your character a name upto 15 letters in length.";11 ,0;"Name:":A$:A$=""1020 A=A$:A>151020 TA$(1)>96`ƯA$(1)<123{A$(1)=(A$(1)-32 ) H$(1)=A$ CI=17:C(I)=0:I:P=40(:I=12 Q=0:70F:14,0;"NO LESS THAN 10 POINTS EACH":1:4+I,13 ;" ":0:A$:150:A=01028  XC(I)=A:A>20A<10 C(1)+C(2)>30C(I)=0:1030 #P=P-A:I:C(3)=P:P=0 U70F:16,0;"Any changes (Y or N)?";:200:A$="Y"1028 A$"N"1045 ^70F:12 ,0;"Select a character type:"::I=13:I;". ";C$(I):I $M19,0;"Which?":A$:150:A<1A>31055 &"C(6)=A:T$=C$(A):80P 'A>180P )e70F:12 ,0;"Select character skill:"::I=13:I;". ";C$(I+3):I .M19,0;"Which?":A$:150:A<1A>31065) 0IC(7)=A:S$=C$(A+3):80P:A=280P:80P 3]70F:14,0;"Is this character OK (Y or N)?":200:A$="N"1010 5A$"Y"10753 BwQ=55129Y:Q,C(1):Q+2,C(2):Q+4,C(3):Q+10 ,C(6):Q+12 ,C(7) GFQ=55252:Q,40(:I=115:Q+I,H$(1,I):I L7:0:0::1,0;H$(1):"Your character is complete":6,0;"Now turn the cassette onto GAME SIDE and REWIND it.":3020 :5,0;"LOAD CHARACTER":7,0;"Insert your SAVE cassette and wind into position, then":100d:0::54600H:1:16,6;"START TAPE THEN WAIT":0:0:0:7,0; "PLAYER":0:7 J:6,0;"Replace RING cassette on GAME SIDE and REWIND it." -10 ,0;"When done, ";:100d i54600H:1:16,9 ;"START THE TAPE":0:0:0:7,0; "GAME SIDE" b /  &AqQUEST d41f4 47767 )I=13:.1}L,12 :I |4:1:6::1:6,9 ;"STOP THE TAPE":0:7:20,0;"Please wait."  3000 1"CART= 200","MULE= 400","RAFT= 550","SHIP= 950","HOVERCRAFT=2500","DAGGER= 9","LEATHER ARMOUR= 25","AXE= 20","CHAIN MAIL= 50","SPIKED ROPE= 35","SWORD= 60" 6y"STEEL SUIT= 150","GREAT SWORD= 100","DEFLECT SUIT= 300","LONG BOW= 200","RIFLE= 290","LIGHT SWORD= 350","BLASTER= 500" @"UNLOCK= 15","MAGIC ZAPPER= 17","DOWN LADDER= 30","UP LADDER= 40","CREATE= 45","REMOVE= 48","JUMP= 55","BRIDGE= 60","KILL= 80" |#"Copper","Bronze","Silver","Gold" 3780,4000,4450b,3540 ,4250,3540 ,3540 ,3540 ,3545 ,1460,3540 ,3540 ,3540 ,4100,3540 X9A=A+1:A,B;:K=1̱S$:S$(K);:5:K: 'Y1,X1;"";Y1+1,X1;"": #Y2,X2;"";Y2+1,X2;"": Y2,X2;" ";Y2+1,X2;" ":6:X2*8,8*(21-Y2):10 ,0:0:2+X2*8,2+(20-Y2)*8:10 ,0:-2,0:-1,1:-6,0:1,1:2,0: A=0:(Y3,X3)" " (Y3,X3+1)" "  (Y3+1,X3+1)" " (Y3+1,X3)" "  A=1: 8K=17:K:Y3,X3;A$;Y3+1,X3;B$:K:  WLG=0:M=47768:K=1̱A$:S$=A$(1K):1185:4:K: tN$="":I$="":Q$=S$:X4=S$:X=X4+1:R1=0:R2=0:R$="":IK=0:1170:.1}L,0 :Q=0:S$=Q$+R$:1185:22495W+X,255 =""Q=0:1040  3Q2=:Q=Q+1:Q=250R$="":1090B  1030 9K$=:Q2=:Q=Q+1:Q=300,R$="":1090B K$=""1040 .6.01z# =,12 :IK=K$:IK13  1100L 81R$""I$=R$(11):N$""R2=(N$) =%R$2R$=R$(12) B22495W+X,0: L+IK>96`IK<123 {IK=IK-32 QR$""1110V S1IK>78NIK<82RIK=87W1090B VIK12 1140t `722495W+X,0:X=X-1:X=X4X=X+1 e;H=07:20703P+X+(256*H),0:H jR$=""1020 lEQ=(R$(R$̱R$)):Q>47/Q<58:N$=N$(1̱N$-1) o(R$=R$(1̱R$-1):1020 t1X=X+1:X>31X=31:1020 ~$IK>47/IK<58:N$=N$+IK R$=R$+IK:1020 LG=0:1182 LG=100d:1182 LG=LAG M=47768 EV$="":S$>32 V$=S$(33!(S$)):S$=S$(132 ) *M=54616X:V$""S$=V$:1182 LG>01:LG  FJ=13:K=04:.0125zL,12 *K:K:J: PJ=13:K=04:.0125zL,-24+12 *K:K:J:  IS$="Huh!"::K=127:A$:R$=A$(12)1295  K:P1=0: LQ1=A$:A=(A$(Q1-3Q1)):A$=A$(1Q1-5):P1=K+10 :  ZcS2=.01z# =:J=02:S1=12 *J:S2,S1:S2,S1:K=011 :S2,S1+K:K:J: n"Press any key" p""1392p qA$=:A$=""1393q s Q=55128X:K=160<:C(K)=(Q)*256+(Q+1):Q=Q+2:K:UP=(Q):X1=(Q+1)*256+(Q+2):T2=(Q+3):LAG=(Q+4) ~Q=Q+5:H$="":K=115:H$=H$+(Q):Q=Q+1:K:C(60<)=0W$="HANDS":RW=4:1440 9:K=1C(60<):A$:K:1295:W$=A$:RW=A  ^S$="Enter lag time (0-9):":1000:LAG=R2*10 :R2<0R2>9 LAG=30 S$=" ":3530 LX3=(1+*28):Y3=(1+*18):700:A=0 `A$="":B$="":750:A$="":B$="":750:A$="":B$="":750:0 #Y3,X3;" ";Y3+1,X3;" ": @0::2:I=062:I,I+8:0,167-I*2:255-I*2,0:0,-(167-I*2):-(255-I*2),0:I B3:235,90Z:9 ,0:-2,0:I=15:0,1:-5,0:5,0:I E-1,0:-1,1:0:2,2:0,1:-2,2:-1,0:-2,-2:0,-1:2,-2 J$650:660:1520:  /O$(4,6):C(60<):L(15) W:I=127:A$:I:I=14:O$(I):I:I=115:L(I):I Z1430:55251,10 :I=0159:65368X+I,(54635k+I):I T2=10 ǩLAG=30:GB=0:M$="":RG=0:GA=0:GE=0:X1=1:Y1=9 :X2=29:Y2=7:GP=(C(5)/6):GS=GP:GF=(GP/6) 1:7:5: A=1:B=4:S$="Five hundred years ago":600X:S$="The Evil Sage called":600X:S$="Forth the Darkling Ring.":600X:A=A+1:S$="T'was then the Wizards":600X:S$="Forged The Four to seal":600X S$="It from the minds":600X:S$="Of men.":600X:A=A+1:S$="Five hundred years has":600X:S$="Darkness slept deep in":600X:S$="Its tomb of stone,":600X:A=A+1 !tS$="Yet now stange forces":600X:S$="Come to play......":600X:S$="And SHEDIR stirs again.":600X & 21,1;:1390n +6:2:6::A=5:S$="You enter The Gate of":600X:S$="Mist. A sense of":600X:S$="evil and foreboding":600X:S$="surrounds you.":600X:A=A+1:S$="Then the mists begin":600X:S$="to clear.....":600X -#19,2;"Press any key" 01:J=07:J,J:0,175-J*2:255-J*2,0:0,-(175-J*2):-(255-J*2),0:J 2I=17:I:0,0:0,175:255,0:0,-175:-255,0:""3130: 5J:I:31222 :.1600@:I=19 :1520:I ]A$="You are in a sealed chamber.":800 :A$="Look! There's the Ring on its":800 :A$="dais, but who is that?":800 :400 _A$="Its GRON, the servant of The":800 :A$="Evil One. He is guarding the":800 :A$="Ring until his master can":800 :A$="arrive to reclaim it.":800 :400 bA$="The spell of The Four Rings has":800 :A$="been broken. There is not much":800 :A$="time. You must get the Ring":800 :A$="before its too late.":800 :400 gGA$="This is it "+H$:800 :100d:A$="Good luck!":800  "(*4)=31520 4C(5)<1C(10 )<14200h (C(8)<1C(8)=1 ES$="?":1000:IK>78NIK<82RIK=87W3600 5I=115:I$="RAZECSBXILKUTG#"(II)L(I) $I:R$""S$="Pardon?":3530 S$="Pass" 1180 3800 )S$="You can't do that now!":3530 )S$="Its all up to you now!":3530 1175:3535 6X3=X1:Y3=Y1:IK=80PX3=X1+1:3610 (IK=81QX3=X1-1:3610 (IK=79OY3=Y1-1:3610 Y3=Y1+1 CY1,X1;" ";Y1+1,X1;" ":700:A=03630. %X1=X3:Y1=Y3:650:3535 .N650:.05|L,24:X3X2X3+1X2X3-1X23535 3/Y3Y2Y3+1Y2Y3-1Y23535 8|1370Z:GD=(GS/5):C(5)=C(5)-GD:S$="Gron is HOT!! Damage "+GD:GE=0:1175:3535 =S$="Ready which item?":1000:R$<23525 %1290 :P1<163530 9C(P1)=0S$=A$+"? You don't have one":3530 .P1=24C(47/)=5:3789 .P1=17C(47/)=2:3789 .P1=19C(47/)=3:3789 .P1=22C(47/)=4:3789 ?P1>15P1<29W$=A$:RW=A:C(60<)=P1-10 P1>28M$=A$:RS=P1 #S$="OK! "+A$+" ready":3530 ;(X1-X2)>5X1<18ƽ(Y1-Y2)<63500 'GE>0GE=GE-1:3500 $Y1=Y2ƽ(X1-X2)=23900< 0X3=X2:Y3=Y2:Y1Y2Y3=Y2+1:3808  3810 Y2=Y33810 CY2,X2;" ";Y2+1,X2;" ":700:A=13825 )Y3=Y2:X1X2X3=X2+1 IY2,X2;" ";Y2+1,X2;" ":700:A=0X3=X23900< %X2=X3:Y2=Y3:660:3500 2Ž(Y1-Y2)>2GA=0GE>03500 >GD=(GS/(11 -GL)):GD=((GD/2)+(1+*(GD/2))):S$="Attack by Gron":1180:GD>0ƺ(*20)<193910F A&S$="Missed!":1180:3500 F1:1:650:0:0:1265:650:C(5)=C(5)-GD:S$="Damage "+GD:1180:3500 N(X1-X2)>2Ž(Y1-Y2)>2GP0S$="Attack what??":3530 GE=0:GL=(GS/GF)+1:S$="Attack with "+W$:1180:GD=((((GF*.728Q)/(19-C(60<)))/GL)/2):GD=(GD+(1+*GD))+1:(1+*30)>GL4015 S$="Missed!":3530 *GA=1:S$="Gron hit "+GD:GS=GS-GD ^1:1:660:0:0:1260:660:GL>13530 GB=GB+1:GS=(GF*1.5@):670:GE=1:S$="Gron is DEAD!! Or is he?":GB>4GE=2:GB>8GE=3:GB>11 GE=5  3530 K(X1-29)>2Ž(Y1-9 )>2S$="Get what??":3530  1370Z:S$="AHHHG! Its HOT!":1180:Q=(C(5)*.6):S$="Damage "+(Q):C(5)=C(5)-Q:1180 @RG=RG+1:RG<3S$="You didn't get it!":3530 O1370Z:9 ,29;" ":S$="You have it!!":1175:200 6:2:7::"You hear a strange voice:":3,0;34";H$:"You are now the Bearer of Shedir. The quest for The Ring Of Darkness is fulfilled.":"We, the people of Ringworld, charge you to return it to our" "planet from whence it was taken by the Evil One.";34"::"But that is another story..... (Ring Of Darkness Part 2. To be released shortly).":20,0;:1390n "2:6:0::"The Universe is safe again..... for the time being.":3,0;"Please report your success to: Wintersoft,":"30 Uplands Park Road,":"Enfield, Middx. EN2 7PT." 'dY1=9 :X1=15:Y2=9 :X2=17:650:670:120x,93],2 ,12 ,9 ;H$;13 ,9 ;"Hit points:";C(5);15,9 ;"The Bearer of";16,6;"The Ring Of Darkness";20,11 ;"THE END...." 6 41506 h0:7:0::1370Z:5,0;H$:"You are DEAD!":10 ,0;"What hope is there for us now?" m 4205m QS$="Cast a spell":1180:M$=""S$="You don't have one ready":3530 GE=0:R$=M$(12):1290 :GS=GS+A*5:S$="It seemed to make Gron stronger!":1370Z:3530 b7:0:J3=((6,10 ))::"Status Check:";H$:"A level ";C(4);" ";:C(7)>3"Gorn Slayer":4475{ g*A$="Elf":C(6)=2A$="Dwarf" l C(6)=3A$="Human" q.Q$="Thief":C(7)=2Q$="Warrior" v!C(7)=3Q$="Wizard" x A$;" ";Q$ {"Intelligence ";C(1):"Strength ";C(2):"Agility ";C(3):"Hit Points ";C(5):"Experience ";C(8):"Gold ";C(9 ):"Food Units ";C(10 ) }6I=14:C(546+I)=04480 ~%"Rings of ";O$(I);" ";C(546+I) I IQ=13 ::K=127:A$:C(K+10 )=04485 b1295:23692\,255:A$;"S ";C(P1):Q=Q+1:Q=201390n:Q=0 K:1390n:4565 *6:6:1600@:3535 C:700:660:0::670:0:5000 1520:5020  CopperBronzeSilverGold /<,dNb    qXaHNO NAME WHANDSM 22abSAnd SHEDIR stirs again.A~GAME SIDE  47767:2:6:2::8,6;"NOW ENTERING MIDWORLD";14,11 ;"PLEASE WAIT":2:"RING1" RING1 XWX 47767 )I=13:.1}L,12 :I 1:7::2:1:6,9 ;"STOP THE TAPE":0:19,0;"Then press any key";:1392p::0:"One moment please"  3000 ,"CART= 200","MULE= 400","RAFT= 550","SHIP= 950","HOVERCRAFT=2500","DAGGER= 9","LEATHER ARMOUR= 25","AXE= 20","CHAIN MAIL= 50","SPIKED ROPE= 35","SWORD= 60" 6y"STEEL SUIT= 150","GREAT SWORD= 100","DEFLECT SUIT= 300","LONG BOW= 200","RIFLE= 290","LIGHT SWORD= 350","BLASTER= 500" @"UNLOCK= 15","MAGIC ZAPPER= 17","DOWN LADDER= 30","UP LADDER= 40","CREATE= 45","REMOVE= 48","JUMP= 55","BRIDGE= 60","KILL= 80" J"Wilderton05","Briskham Harbour11","Ocean Town14","City Of Eagles06","Castle Pepper12","Port Stillwater13","Borderton08","Entwood Castle07","Hammer's Pit01","Death's Reach02","Maze Of Minos03","Doom Labyrinth04" T"Houston Hollow01","Xandra's Quest05","Barrows Of Bran02","Northern Sign20","Solomon's Throne01","Gondor's Monument40","Southern Sign02","Tower Of Acheron60","Midsea Bouy03","Sinclair's Sign80" r"this beer is very potent!","this is a great game!","there is a hidden quest","the Princess Xandra has been locked up","on foot you eat more!","beware the Midworld Dungeons","you must slay a Gorn","the Dark Ring has awakened!","Xandra's Quest holds the darkestsecret" |"the Evil One cursed us all","the Princess will be especially grateful to a level 8 Gornslayer","the 4 Bright Rings will lead youto the Final Quest","the Reckon Day is near!" 22,19,15,11 ,5,5,1,12 ,12 ,9 ,23,5,16,9 ,10 ,14,20,19,17,6,7,16,15,16,27,6,27,13 3780,3790,4450b,38902,4100,4390&,3830,3850 ,3870,1460,3545 ,4430N,3540 ,3545 ,4550 L"Copper","Bronze","Silver","Gold","Balrog","Jelly Cube","Seeker","Incubus" tN$="":I$="":Q$=S$:X4=S$:X=X4+1:R1=0:R2=0:R$="":IK=0:1170:.1}L,0 :Q=0:S$=Q$+R$:1185:22495W+X,255 =""Q=0:1040  3Q2=:Q=Q+1:Q=250R$="":1090B  1030 9K$=:Q2=:Q=Q+1:Q=300,R$="":1090B K$=""1040 .6.01z# =,12 :IK=K$:IK13  1100L 81R$""I$=R$(11):N$""R2=(N$) =%R$2R$=R$(12) B22495W+X,0: L+IK>96`IK<123 {IK=IK-32 QR$""1110V S1IK>78NIK<82RIK=87W1090B VIK12 1140t `722495W+X,0:X=X-1:X=X4X=X+1 e;H=07:20703P+X+(256*H),0:H jR$=""1020 lEQ=(R$(R$̱R$)):Q>47/Q<58:N$=N$(1̱N$-1) o(R$=R$(1̱R$-1):1020 t1X=X+1:X>31X=31:1020 ~$IK>47/IK<58:N$=N$+IK R$=R$+IK:1020 LG=0:1182 LG=150:1182 LG=LAG M=47768 EV$="":S$>32 V$=S$(33!(S$)):S$=S$(132 ) *M=54616X:V$""S$=V$:1182 LG>01:LG  FJ=13:K=04:.0125zL,12 *K:K:J:  IS$="Huh!"::K=127:A$:R$=A$(12)1295  K:P1=0: LQ1=A$:A=(A$(Q1-3Q1)):A$=A$(1Q1-5):P1=K+10 : ":J=1K:A$:J:1295 (w:K=1UP+12 :A$:K:Q1=A$:T2=(A$(Q1Q1)):T1=(A$(Q1-1Q1-1)):T$=A$(1Q1-2): 2?:K=1UP-4:A$:K:A$=A$(1(A$)-5): P^X2=X(P1)+((*3)-1):Y2=Y(P1)+((*3)-1):(Y2,X2)" "Y2>20 U3Y(P1),X(P1);" ":Y2,X2;A$:X(P1)=X2:Y(P1)=Y2: ZcA2=.01z# =:J=02:A1=12 *J:A2,A1:A2,A1:K=011 :A2,A1+K:K:J: n"PRESS ANY KEY" p""1392p qA$=:A$=""1393q s IQ=55128X:K=160<:A=C(K):A>65535A=65535 P1=(A/256):Q,P1:Q+1,A-P1*256:Q=Q+2:K:Q,UP:P1=(X1/256):Q+1,P1:Q+2,X1-P1*256:Q+3,T2:Q+4,LAG AQ=Q+5:K=115:Q,(H$(KK)):Q=Q+1:K: Q=55128X:K=160<:C(K)=(Q)*256+(Q+1):Q=Q+2:K:UP=(Q):X1=(Q+1)*256+(Q+2):T2=(Q+3):LAG=(Q+4) ~Q=Q+5:H$="":K=115:H$=H$+(Q):Q=Q+1:K:C(60<)=0W$="HANDS":RW=4:1440 (K=C(60<):1300:W$=A$:RW=A ?C(46.)>1K=C(46.)-1:1300:U$=A$  GM1 PQ=(X1/256):47941E,Q:47940D,X1-Q*256:M=47950N: ^S$="Enter lag time (0-9):":1000:LAG=R2*10 :R2<0R2>9 LAG=30 S$=" ":3530 LY(1),X(1);"":X(2)>0Y(2),X(2);"" (PR<2Y(3),X(3);"" 1K=49 :X(K)>0Y(K),X(K);"" :K:K=11 14:X(K)>0Y(K),X(K);"" K: JO$(8,10 ):L(15):C(60<):X(14):Y(14) q:I=162>:A$:I:I=128:A:I:I=115:L(I):I:I=18:O$(I):I ‡MK=(1+*20):T1=0:T2=0:MG=0:AT=0:GM=1:1430:T2=10 T2=0:4490 $X1,C(46.)+3:4565 1450:P=1000*C(4):C(4)>1P=(1+C(4))*(6000p/(12 /C(4))):C(4)>4P=10000'+(6000p*(C(4)-4)) SC(8)PC(4)=C(4)+1:I=480546:C(I)=0:I 4C(5)<1C(10 )<14490 (C(8)<1C(8)=1 >C(10 )<11 C(5)<21.01z# =,24 hGM=2MG=0ƺ(1+*80P)=80PS$="Jester says...I've got the key!":1180 ES$="?":1000:IK>78NIK<82RIK=87W3600 4 I=115:I$="RAZETSBXILKUCG#"(I)L(I) $I:R$""S$="Pardon?":3530 S$="Pass" +1180:GM=1X2=X1:36353 4010 /S$="Magic only works in dungeons":3530 )S$="You can't do that now!":3530 GM=23980 -C(10 )=C(10 )-1/C(46.) (IK=80PX2=X1+1:3620$ (IK=81QX2=X1-1:3620$ )IK=79OX2=X1-84T:3620$  X2=X1+84T $8IK=79OX2=55730X2=64886v:36353 ),IK=87WX2=64970X2=55814 32MK=MK-1:AT=0MK>03680` 8-MK=(1+*20):AT>0X3,UE :"X2=X1X2=X1+1:3650B ;vAT>0ƺ(1+*((4+C(4))/C(4)))=((4+C(4))/C(4))AT=0:3680` B0UE=(X2):X3=X2:X2=X1:AT>03675[ G1370Z:S$="WATCH OUT!":1180:AT=(1+*3):E$="bandit":ES=12 :AT=1E$="evil ranger":ES=11 LDUP=2AT>1AT=3:E$="hidden archer":ES=13 QTUP=1E$="giant squid":ES=15:AT=1E$="sea demon":ES=14 VxAS=((16+*20)/AT):AG=AS:AN=1:AT>1ƺ(*3)=2AN=(1+*2)*C(4) []X3,ES:1450:A=AS*AN:C(5)=C(5)-A:S$=(AN)+" "+E$:AN>1S$=S$+"s" ]0S$=S$+". Damage "+(A):1260:1180 `X2=X13500 cdX1,UP:Q=X2:C(46.)>3C(46.)<6Q1S$=U$+"s like water!":3715 j!C(46.)>33705y m!Q1Q33720 oMS$="You can't walk on water":Q=3S$="You can't climb the mountains" t 3715 y!Q<2Q>33720 ~IS$=U$+"s don't like forests":Q=3S$=U$+"s don't like mountains" 1180:X2=X1:Q=UP 1UP=Q:X1=X2:X1,C(46.)+3:3500 =S$="Ready which item?":1000:R$<23525 %1290 :P1<163530 9C(P1)=0S$=A$+"? You don't have one":3530 .P1=24C(47/)=5:3789 .P1=17C(47/)=2:3789 .P1=19C(47/)=3:3789 .P1=22C(47/)=4:3789 ?P1>15P1<29W$=A$:RW=A:C(60<)=P1-10 P1>29M$=A$:RS=P1 #S$="OK! "+A$+" ready":3530 GM=24340 @AT=0S$="Attack what??":.3,-30:3530 ~S$="Attack with "+W$:1180:RW<200AT=3UP=2RW<200UP=1S$="Out of range!":3530 D(1+*(20-C(4)))=20-C(4)3810 nQ=((C(2)+RW)/3):(1+*(C(4)+3))=C(4)+3S$="Missed!":3530 KAS=AS-Q:S$=E$+" hit "+Q:1260:1180:AS>036353 1370Z:Q=(AG/(1+*3)):Q1=(AG/(1+*3)):S$="Killed! You get "+Q+" gold. "+Q1+" exp.":1180:C(9 )=C(9 )+Q:C(8)=C(8)+Q1 .AN=AN-1:AN>0AS=AG:36353 AT=0:X3,UE:3500 6S$="Board what??":UP<5UP>9 3530 BC(46.)>1S$="You must exit "+U$+" first":3530 +13302:U$=A$:C(46.)=UP-3 /UP<7UP=9 UP=0:3840  UP=1 7X1,C(46.)+3:S$=U$+" boarded!":3530  3C(46.)=1S$="Exit what??":3530 7S$="You can't leave it here!":UP=03865 @C(46.)<4C(46.)=6UP13530 WUP=C(46.)+3:C(46.)=1:X1,4:S$=U$+" exited!":3530 -GM=2S$="You are in "+T$:3530  GUP>4UP<10 13302:S$="You are by a "+A$:3530 #5AT>0S$="You are being attacked":3530 %?UP>151320(:S$="You are outside "+T$:3530 (,S$="There is nothing here":3530 27GM=2UP<16S$="Enter what??":3530 7%1320(:UP<313950n <S$="You enter "+T$:1170:1370Z:S$="Dark clouds gather in the skies":1175:S$="You feel strong magic present":1175 AT1>03930Z C$C(UP+17)=13925U FT2=1S$="intelligence" KT2=2S$="stength" MT2=3S$="agility" PSC(T2)=C(T2)+10 :S$="You get "+S$+" +10":C(UP+17)=1:3530 U7T1=0:S$="but nothing else happens":3530 Z$C(T1+37%)13935_ ]KC(T1+37%)=2:1370Z:S$="A quest is completed":1180 _$C(UP+17)=13925U aHC(UP+17)=1:A=(1+*10 ):A>83935_ dC(8)=C(8)+100d:K=A+5::I=1K:A$:I:1295:C(P1)=C(P1)+1:S$="You find 1 "+A$:T1=0:3530 nAT>0X3,UE:AT=0 pUP>234600 s:S$="Entering "+T$:.3,12 :.5,16:1180:I=162>:A$:I:I=114:X(I),Y(I):I:4:4::7:54624` }IPR=0:1470:D=0:GM=2:MG=0:GS=180  3500 FX2=X(1):Y2=Y(1):IK=80PX2=X2+1:3990 (IK=81QX2=X2-1:3990 (IK=79OY2=Y2-1:3990 Y2=Y2+1 Y2>204060 -(Y2,X2)" ".1}L,24:3535 Y(1),X(1);" ":Y2,X2;"":PR=1Y(3),X(3);" ":Y(1),X(1);"":X(3)=X(1):Y(3)=Y(1) *X(1)=X2:Y(1)=Y2:3535 PR>04015  P1=3:A$="":1360P  X(2)=04030 IP1=2:A$="":1360P:X2X(1)Y2Y(1)4030 A=1637%:C(A)=0C(60<)+10 =AC(A)=1A=17A=19A=22A=244025 mC(A)=C(A)-1:S$="Jester stole something":.1}L,12 :.2~L,0:1180:4030 A MG=03500 -I=49 :X(I)=04055 <X2=X(I):Y2=Y(I):X2>X(1)X2=X2-1:4040 X2Y(1)Y2=Y2-1:4045 Y27C(7)>31370Z:S$="Now heed me well.The last ordeal awaits you in Xandra's Quest. Good luck!":LG=300,:1182:C(7)=5 ,S$="Leaving "+T$:LG=100d:1182 ?T1=0:GM=1:X2=X1:5:5::3500 #GM=1MG=13545  >X=X(1):Y=Y(1):X=17Y=74130" 8X>4X<10 Y>13 Y<174200h 9X>12 X<18Y>13 Y<174190^ 7X>24X<28Y>3Y<9 4215w 9X>24X<28Y>10 Y<164300 ZS$="Go to a counter":X>13 X<21Y>3Y<11 S$="Approach the King"  3530 "$C(37%+T2)241451 %S$="AH!You're back "+H$:1175:C(37%+T2)=3:C(8)=C(8)+300,:S$="For this I give you":1175:X=T2/2:X=XX=151+(*300,):S$=(X)+" gold pieces":C(9 )=C(9 )+X:3530 'HS$="A ring of "+O$(X):C(546+X)=C(546+X)+1:3530 1DS$="Do you offer gold or service?":1000:I$="G"4170J 2I$"S"4180T 3;C(37%+T2)=3S$="My quest is done":3530 6GC(37%+T2)=1S$="You already work for me fool":3530 ;S$="Go forth, "+H$:1180:X=T2/2:X=X:I=141)+T2:A$:I:S$="and find "+A$(1̱A$-2):4165E @ S$="and kill a "+O$(X+4) ET1175:C(37%+T2)=1:S$="Return when thy quest is done":3530 JJS$="How much (upto 50)?":1000:R2<1R2>5024180T MR2>C(9 )4330 OwC(9 )=C(9 )-R2:X=(R2*2.5 ):C(5)=C(5)+X:S$="I give you "+(X)+" hit points":3530 TS$="BEGONE FOOL!":3530 ^eI3=5:J3=C(4)*3:J3>6J3=J3-(C(4)-2):J3>10 J3=13 c&S$="Will's Weapon Store":4220| h3I3=0:J3=C(4):J3>4J3=5 m#T1=0J3>2J3=2 r.S$="Honest Hank's Transport Lot":4220| w,I3=18:J3=9 :S$="Magic Galore" |?1180:S$="Buy or sell?":1000:I$="B"4255 I$"S"3235 7I35S$="We don't buy second hand":3530 iS$="Whatcha got?":1000:1290 :P1<16P1>28S$="We don't buy those":3530 rS$=A$+" I'll give you "+(A/3):1180:S$="OK?":1000:I$"Y"S$="Clear off then":3530 >C(P1)=0S$="You don't have one? GET LOST":3530 wC(P1)=C(P1)-1:C(9 )=C(9 )+(A/3):S$="Done":RW=ARW=4:W$="HANDS":C(60<)=0  3530 :I3=04257 I=1I3:A$:I I=1J3:S$:1180:I:S$="Which?":1000:1290 :P1J3+I3+10 S$="We don't sell those":3530 @A>C(9 )S$="You haven't the gold. Clear off":3530  P1>154285 1I3=0:P1=13 P1=14I3=1 RI=-11:J=-11:X=X1+J+(I*84T):(X)=I34280 0J:I:S$="The parking lot is full":3530 X,P1-6 YI3=18P1>32 C(7)<3S$="Those are for wizards only":3530 1I3=18C(8)=C(8)-(A/4) EC(9 )=C(9 )-A:C(P1)=C(P1)+1:S$="Sold":3530 B S$="Do you want food or drink?":1000:I$="D"4315 I$"F"3525 aS$="Food packs 1 gold each":1180:S$="How many?":1000:R2<13535 R2>C(9 )4330 MC(10 )=C(10 )+R2:C(9 )=C(9 )-R2:S$="Sold":3530  C(9 )=04330 S$="Have a beer mate":1180:C(9 )=C(9 )-1:D=D+1:D=31370Z:S$="You got drunk":1180:S$="and someone stole your money":C(9 )=0:D=0:3530 "(*2)=04325 tS$="You had best know":1170:C(59;)=C(59;)+1:C(59;)>13 C(59;)=1 5:I=1491+C(59;):S$:I:1175 "S$="Have a nice day":3530 &S$="You can't afford it":3530 ^X2=X(1):Y2=Y(1):S$="Attack direction?":1000:IK=80PX2=X2+1 IK=81QX2=X2-1 IK=79OY2=Y2-1 IK=87WY2=Y2+1 )X2=X(1)Y2=Y(1)3525 1I=214:X2=X(I)Y2=Y(I)4360 "I:S$="Attack who??":3530 ?I=10 S$="King hit":MG=1:1370Z:3530  !I<4I>9 4365   [S$="Guard hit!":1260:MG=1:GS=GS-(RW/20):GS>03530  GS=502:4380  0(*5)<4S$="Missed!":3530 mMG=1:I=2S$="Jester killed! You found a key":1370Z:T1=(2+*2):4385! 2I=3S$="Princess":PR=2:4380 S$="Shopkeeper" S$=S$+" killed!" !@Y2,X2;" ":X(I)=0:Y(I)=0:1370Z:3530 &#MG=1GM=144000 )IX(1)>13 X(1)<17Y(1)=1644022 +IX(1)=27Y(1)>11 Y(1)<154410: 0S$="Steal what??":3530 2.Q=9 +C(4):Q>13 Q=13 5BJ3=1:K=(6+*Q):1300:S$="1 "+A$:4415? :7J3=(5+*20):S$="Some food":P1=10 ?(1+*(((C(4)+2)/C(7))))=((C(4)+2)/C(7))S$="OH NO! You were caught":MG=1:1370Z:3530 D0S$="You stole "+S$:C(P1)=C(P1)+J3:3530 N6Q=0:GM=1Y(1)74440X QbX(1)>4X(1)<7Q=1:T1=2PR=1:X2=5:4445] SXX(1)>9 X(1)<12 Q=1:T1=3X2=10 :4445] X<S$="Unlock what??":Q=1S$="You don't have the key" Z 3530 ]6,x2;" ":S$="Open":T1=0:PR=1Y(3),X(3);" ":X(3)=X(1):Y(3)=Y(1)-1:Y(3),X(3);"" _ 3530 b7:J3=((6,10 ))::"Status Check: ";H$:"A level ";C(4);" ";:C(7)>3"Gorn Slayer":4475{ g*A$="Elf":C(6)=2A$="Dwarf" l C(6)=3A$="Human" q.Q$="Thief":C(7)=2Q$="Warrior" v!C(7)=3Q$="Wizard" x A$;" ";Q$ {"Intelligence ";C(1):"Strength ";C(2):"Agility ";C(3):"Hit Points ";C(5):"Experience ";C(8):"Gold ";C(9 ):"Food Units ";C(10 ) }6I=14:C(546+I)=04480 ~2"Rings of ";O$(I)(17);C(546+I) 3I:T1>1"The key to cell #";(T1-1) IQ=13 ::K=127:A$:C(K+10 )=04485 b1295:23692\,255:A$;"S ";C(P1):Q=Q+1:Q=201390n:Q=0 2K:1390n:GM=15::3500 E4::7:54624`:PR>06,5;" " %J3=32 6,10 ;" " 1470:3500 .1}L,-20:.5,-30:0:6:0::10 ,0;H$:A$="You are DEAD!!":C(10 )<1A$="You have starved!!" A$:16,0;"Resurrecting now.":1:300,:C(46.)>1C(9 +C(46.))=C(9 +C(46.))-1:C(46.)=1 AT>0X3,UE:AT=0 =X1,UP:X1=64556,:(*2)=1X1=62866 AUP=(X1):I=1637%:(*2)=14505 C(I)=0 I:C(5)=250:X2=X1:C(10 )=90Z:C(9 )=61=+(*100d):C(60<)=0:W$="HANDS":RW=4:X1,4:GM=1:T1=0:4565 #AT>0GM=23545 ~7:0::"SAVE CHARACTER":5,0;"Do you wish to save now?":1392p:A$"Y"A$"y"4565 x7,0;"Insert your SAVE CASSETTE and prepare it. Then":1390n:14,0;"One moment please" Ъ1410:7::"PLAYER"55128X,10240(::1:"STOP THE TAPE":0:7,0;"Replace RING cassette on":"GAME SIDE, then":1390n )5:0:5::3500 1:1:7::T$:"is a deep, dark dungeon!":5,0;"Are you sure you want to go in?":1392p:A$"Y"A$"y"4565 n:"Very well... one moment":1410::1:6,9 ;"START THE TAPE":0:1:"D" A FD | |n~ x1:7:1::8,6;"ENTERING THE DUNGEON";14,11 ;"PLEASE WAIT":1:"DUNJ" ZDUNJ MIM 47767 )I=13:.1}L,12 :I |0:7:0::1:6,9 ;"STOP THE TAPE":0:6:12 ,0;"Please wait."  3000 ,F"Giant Bat0025","Giant Rat0025","Skeleton0035","Thief0045","Etin0085","Giant Spider0110","Jelly Cube0200","Slither0300","Griffin0400","Mimic0450","Gorgon0450","Tangler0600","Incubus0700","Gremlin0400","Invisible Slayer0900","Seeker0850","Ghost0950","Flesh Leach1100","Balrog2200","Mind Drainer1300","Wanderer1900","Gorn3700" 1"CART= 200","MULE= 400","RAFT= 550","SHIP= 950","HOVERCRAFT=2500","DAGGER= 9","LEATHER ARMOUR= 25","AXE= 20","CHAIN MAIL= 50","SPIKED ROPE= 35","SWORD= 60" 6y"STEEL SUIT= 150","GREAT SWORD= 100","DEFLECT SUIT= 300","LONG BOW= 200","RIFLE= 290","LIGHT SWORD= 350","BLASTER= 500" @"UNLOCK= 15","MAGIC ZAPPER= 17","DOWN LADDER= 30","UP LADDER= 40","CREATE= 45","REMOVE= 48","JUMP= 55","BRIDGE= 60","KILL= 80" |;"Copper",1,"Bronze",-1,"Silver",26,"Gold",-26,0,175,8,44,,146,37%,72H,127,557,91[,115s,68D,104h,106j,76L,112p,101e,81Q,118v,97a,85U,8,6,4,3,2,1 3780,4000,4450b,3540 ,4200h,3540 ,3540 ,3540 ,3800,1460,4100,4300,3540 ,3540 ,3545 Q49150,49165 ,49225I,49275{,49291,49307,49334,494571,49632,49830,49995K,50179,49307,50258R,50366,49307,50567,507371,50850,51032X,49307,51161,51345,51471,51660,51866,52001!,52175 tN$="":I$="":Q$=S$:X4=S$:X=X4+1:R1=0:R2=0:R$="":IK=0:1170:.1}L,0 :Q=0:S$=Q$+R$:1185:22495W+X,255 =""Q=0:1040  3Q2=:Q=Q+1:Q=250R$="":1090B  1030 9K$=:Q2=:Q=Q+1:Q=300,R$="":1090B K$=""1040 .6.01z# =,12 :IK=K$:IK13  1100L 81R$""I$=R$(11):N$""R2=(N$) =%R$2R$=R$(12) B22495W+X,0: L+IK>96`IK<123 {IK=IK-32 QR$""1110V S1IK>78NIK<82RIK=87W1090B VIK12 1140t `722495W+X,0:X=X-1:X=X4X=X+1 e;H=07:20703P+X+(256*H),0:H jR$=""1020 lEQ=(R$(R$̱R$)):Q>47/Q<58:N$=N$(1̱N$-1) o(R$=R$(1̱R$-1):1020 t1X=X+1:X>31X=31:1020 ~$IK>47/IK<58:N$=N$+IK R$=R$+IK:1020 LG=0:1182 LG=100d:1182 LG=LAG M=47768 EV$="":S$>32 V$=S$(33!(S$)):S$=S$(132 ) *M=54616X:V$""S$=V$:1182 LG>01:LG  FJ=13:K=04:.0125zL,12 *K:K:J:  ^S$="Huh!"::K=I22:A$:K:K=127:A$:R$=A$(12)1295  K:P1=0: LQ1=A$:A=(A$(Q1-3Q1)):A$=A$(1Q1-5):P1=K+10 : +:J=1K+22:A$:J:1295 (w:K=1UP+12 :A$:K:Q1=A$:T2=(A$(Q1Q1)):T1=(A$(Q1-1Q1-1)):T$=A$(1Q1-2): 2?:K=1UP-4:A$:K:A$=A$(1(A$)-5): P^X2=X(P1)+((*3)-1):Y2=Y(P1)+((*3)-1):(Y2,X2)" "Y2>20 U3Y(P1),X(P1);" ":Y2,X2;A$:X(P1)=X2:Y(P1)=Y2: ZcS2=.01z# =:J=02:S1=12 *J:S2,S1:S2,S1:K=011 :S2,S1+K:K:J: n"PRESS ANY KEY" p""1392p qA$=:A$=""1393q s IQ=55128X:K=160<:A=C(K):A>65535A=65535 `P1=(A/256):Q,P1:Q+1,A-P1*256:Q=Q+2:K:Q+3,T2:Q+4,LAG AQ=Q+5:K=115:Q,(H$(KK)):Q=Q+1:K: Q=55128X:K=160<:C(K)=(Q)*256+(Q+1):Q=Q+2:K:UP=(Q):X1=(Q+1)*256+(Q+2):T2=(Q+3):LAG=(Q+4) ~Q=Q+5:H$="":K=115:H$=H$+(Q):Q=Q+1:K:C(60<)=0W$="HANDS":RW=4:1440 (K=C(60<):1300:W$=A$:RW=A ?C(46.)>1K=C(46.)-1:1300:U$=A$  ^S$="Enter lag time (0-9):":1000:LAG=R2*10 :R2<0R2>9 LAG=30 S$=" ":3530 bQ,P(I+1):Q1-Q,P(I+4)-P(I+1):Q,P(I+2):Q1-Q,P(I+5)-P(I+2): Q,P(I+1):0,P(I+2)-P(I+1):Q,P(I+4):Q1-Q,0:0,P(I+5)-P(I+4):Q-Q1,0: P(I),P(I+1):(255-P(I))-P(I),0:0,P(I+2)-P(I+1):P(I)-(255-P(I)),0:0,P(I+1)-P(I+2): 1520:A=(((255-P(I))-P(I))/3):B=(5*((P(I+1)-P(I+2))/6)):P(I)+A,P(I+2):0,B:A,0:0,-B: B=((P(I+1)-P(I+2))/4):C=((255-P(I)-P(I))-(P(I+3)-P(I))):D=((P(I+3)-P(I))/2):K=13:P(I)+D,P(I+1)-B*K:C,0:K: A=((Q1-Q)*.3):B=((P(I+5)-P(I+2))*.3):C=((P(I+1)-P(I+2))*.2~L):D=((P(I+4)-P(I+5))*.12}u[) Q+A,P(I+2)+B:0,(P(I+1)-C)-(P(I+2)+B):(Q1-A)-(Q+A),(P(I+4)-D)-(P(I+1)-C):0,(P(I+5)-B)-(P(I+4)-D): $P>8P=P+2:1553 $P>6ƽX1=1P=P+2 =P=21P=MI:MI=0MI=(5+*7):P=MI +Q1=P:P=P-4:P>2P=P-1 Q=(T(P)/256):48811,Q:48810,T(P)-Q*256:48812,S((I/3)+1):M=48830:P=Q1: ^:K=1P-9 :A$:K:Q1=(A$):A1=(A$(Q1-3Q1)):A$=A$(1Q1-4): "9I=14:P=(X2+A(I)):P<10 1610J #)E$""A(I)=X1A$=E$:A1=AS:1573% $ 1560 %S$="Attack by "+A$:1260:1180:P=23C(10 )=C(10 )-(31+*70F):S$="It stole some food":1605E 'IP16ź(1+*6)<6C(47/)=11580, (hS$="ARMOUR DISSOLVED":1370Z:1175:Q=C(47/)*2+13 :Q>19Q=Q+1 )4C(Q)=C(Q)-1:C(47/)=1:1610J ,vP=29C(1)>3C(1)=C(1)-(1+*3):S$="AHH! My head":1170:1370Z 1,P13 C(47/)>115906 3Q=(16+*13 ):C(Q)>0Q-10 C(60<)C(Q)=C(Q)-1:S$="He stole something":1370Z:1605E 6.(1+*C(3))<10 1600@ 8"(*3)<21600@ ;S$="Missed":1605E @*Q=A1/C(47/):Q<10 1595; BWQ=((Q*.8L)+(1+*(Q*.4L))):C(5)=C(5)-Q:S$="Damage "+Q E 1180 JI: T rHA1=(1+*492)+53876t:(A1)0A1=X21650r tA1,A: |uQ=8:J=03:A=(8+LV*2)+J:K=2Q:1650r:CC=CC+1:K:Q=Q-1:J:  bO$(8,10 ):L(15):C(60<):P(21):T(28):A(4):S(6) :I=1491:A$:I:I=14:O$(I):A(I):I:I=121:P(I):I:I=16:S(I):I:I=115:L(I):I:I=128:T(I):I »1430:M$="":RS=30:T2=T2-2:LV=1:P=8:S$="Its dark in here":X1=-26:X5=-1:E$="":HP=0:MI=0:AS=0:AK=0:MV=0 6Q=0:T23C(7)<54120 `2:0::5:I=37:I,1;" ":I 2:6:0,0;"High upon the stone entrance yousee a message:":7:1:4,2;"KNOW, O Slayer of the Gorn,":5,2;"That the Bearer of the Four":6,2;"Shall enter the Gate of Mist" 0:8,151:239,0:0,-39':-239,0:0,39':8,151:7,-7:247,151:-7,-7:247,112p:-7,7:8,112p:7,7 !2:6:10 ,0;"A dais rises from the ground, its ebon surface marked in four places: ";:0:7:" C B S G ":2:6:I=55758::C(I)=03110& #I:3115+ &T16,0;"You do not have them all!"::1390n:0::4120 +1:16,0;"You put the Rings in place":0::1390n:6:0:2::H$:"The Ultimate Quest awaits...":5,0;"Turn cassette to START side and rewind it.":"When done ";:1390n 0Q1=1:4560 MV=13503 g1570":CC<6ź(*200)=199CC<100dS$="ONE MOMENT":1170:1660| MV=0:P=1000*C(4):C(4)>1P=(1+C(4))*(6000p/(12 /C(4))):C(4)>4P=10000'+(6000p*(C(4)-4)) -C(8)PC(4)=C(4)+1 4C(5)<1C(10 )<14490 (C(8)<1C(8)=1 >C(10 )<11 C(5)<21.01z# =,24 ES$="?":1000:IK>78NIK<82RIK=87W3900< 5I=115:I$="RAZECSBXILKUTG#"(II)L(I) $I:R$""S$="Pardon?":3530 S$="Pass" 1180 wP=(X2/256):47941E,P:47940D,X2-P*256:P=(X2):X2,255:M=54396|:X2,P:3600 )S$="You can't do that now!":3530 3S$="You must leave the dungeon first":3530 1175:3535 _M=52350~:X3=X2:I=1213:P=(X3):P=11520:3500 \P=5LV<10 P>6P<10 1550:P=11 S$="Chest":1180 -I>1P=31520:3500 -I>1P=21530:3500 P=61533 RQ=P(I):Q1=P(I+3):P=(X3+X5):P>0P<41500:3615  1510 P=21535 $fQ=255-P(I):Q1=255-P(I+3):P=(X3-X5):P>0P<41500:3623' & 1510 'P=21535 ),P=(X3):P<10 P=243650B .$P=161520:3650B 8$1550:I<13 3500 B7X3=X3+X1:I:0,0;X2:1,0;X1 G 3500 =S$="Ready which item?":1000:R$<23525 %1290 :P1<163530 9C(P1)=0S$=A$+"? You don't have one":3530 ǗP1=17P1=19P1=22P1=24S$="OH DEAR! The passages are too":1170:S$="narrow to get armour on":1175:3545 ?P1>15P1<29W$=A$:RW=A:C(60<)=P1-10 P1>28M$=A$:RS=P1 #S$="OK! "+A$+" ready":3530 hS$="Inform and search":X3=X2:I=12:X3=X3+X1:P=(X3):P=4X3,5:3530 #P=3X3,2:3530 P>03530 I:3530 0C(60<)10 ƺ(1+*(C(3)/3))ɺ(C(3)/3)C(20)=C(20)-1:S$="SAVED by spiked rope":1370Z:x3,5:3530 OP=8:4103 PS$="Path blocked":3530 ZiI=14:P=(X2+A(I)):P>9 ƾ(X2)=0X2+A(I),0:X2,P:MV=1:3950n _I n+C(10 )=C(10 )-.125}:X2=X3 x4X5=-26:X1=-1X5=26:3975 }'X1=-26X5=-1:3975 X1=26X5=1 1170:3535 0SP=0:X3=X2+X1:RW<2004015 GI=15:P=(X3):P>0P<4P=64010 P>9 4020  X3=X3+X1:I  S$="Attack what??":3530 !P=(X3):P<10 4010 !E$=""1560:E$=A$:AS=A1 SP=14025 S$="Attack with "+W$:1180:Q=(RW*.4L)+(1+*(RW/2))+C(2):(1+*(C(4)+1))=2S$="Missed":3530 >1260:S$=E$+" hit":AK=AK+Q:AS-AK>03530 uE$="":X3,0:S$=S$+"...KILLED!":1370Z:1180:MI=0:HP=HP+(AS*.75@):Q=((AS/5)+(1+*(AS/3))):Q1=((AS/5)+(1+*(AS/3))):C(9 )=C(9 )+Q:C(8)=C(8)+Q1:S$="You get "+Q+" gold & "+Q1+" exp.":CC=CC-1:AK=0:P=16C(40()=1C(40()=2:4060 AP=22C(44,)=1C(44,)=2:4060 AP=25C(42*)=1C(42*)=2:4060 AP=28C(38&)=1C(38&)=2:4060 wP=31C(7)<4C(7)=4:1180:1370Z:S$="You are now a GORN SLAYER":3550  3530 ?1180:1370Z:S$="A quest is completed":3550 6Q=0:P=(X2):P=7LV=14550 .P=5LV<10 P=8:4103  4105  MQ=1:X2=(1+*492)+53876t:(X2)>04103  4110  4P7P8S$="Climb what??":3530  1(X1)=1S$="Face the ladder":3530  -P=7X2LUP=8X2LD4103 7P=8S$="Going down":LV=LV+1:4120 S$="Going up":LV=LV-1 1180:M=54502 'P=84140, (*T2=T2-2:T2<1T2=T2+9 ) 41451 ,*T2=T2+2:T2>9 T2=T2-9 1A=54562"+T2*2:B=(A+2)+(A+3)*256:A=(A)+(A+1)*256:LU=A:LD=B:A,7:LV<10 B,8 6"Q=0X2=A:P=7X2=B ;0CC=0:1660|:LV<34170J @ I=12+(*4) BEP=(1+*492)+53876t:(P)>0P=X24162B ES(P-1)+(P+1)2ƾ(P+26)+(P-26)24162B GP,6:I JLV=14565 O I=14+(*4) Q@P=(1+*492)+53876t:(P)>04177Q TP,9 :I:4565 h@S$="Cast a spell":1180:M$""C(RS)>04215w m&S$="You're out of those":3530 rS$="Spell failed":3530 wAC(RS)=C(RS)-1:C(6)=1RS<34"4225 |[(1+*C(1))<(11 -C(4))ź(1+*C(4))=44210r "4225+5*(RS-28) 4S$="Openus":1180:(X2)9 4210r  4325 [S$="Zam Zagrabor":1180:Q=513+(*85U):SP=1:X3=X2+X1:4015 :S$="Down Creatus":(X2)>0LV=10 4210r X2,8:3530 ,S$="Up Creatus":(X2)>04210r X2,7:3530 sS$="Fieldus":(X2)>0ž(X2-1)+(X2+1)2ƾ(X2+26)+(X2-26)24210r X2,6:3530 0S$="Destructium":(X2+X1)64210r X2+X1,0:3530 OS$="Jumpus":X2=(1+*492)+53876t:(X2)04260 1370Z:3530 7S$="Transportium":A=(X2+X1):A<10 4210r 3X2+X1,0:1650r:1370Z:3530 S$="Oblitoratus":1180:Q=1400x:X3=X2+X1:SP=1:(*3)=2C(7)<4ƾ(X2+X1)=314210r  4015 /(X2)9 S$="Unlock what??":3530 "(*3)24325 BS$="WATCH OUT!":1370Z:X3=X2+X1:(X3)=04320 DI=14:P=(X2+A(I)):P=0X3=X2+A(I):4320 I:4325 :X3,(1+*4)+(7+LV*2):3530 }Q=10 +((1+*502)*LV):C(9 )=C(9 )+Q:S$="You found "+(Q)+" gold pieces":X2,0:3530 b7:0:J3=((6,10 ))::"Status Check:";H$:"A level ";C(4);" ";:C(7)>3"Gorn Slayer":4475{ g*A$="Elf":C(6)=2A$="Dwarf" l C(6)=3A$="Human" q.Q$="Thief":C(7)=2Q$="Warrior" v!C(7)=3Q$="Wizard" x A$;" ";Q$ {"Intelligence ";C(1):"Strength ";C(2):"Agility ";C(3):"Hit Points ";C(5):"Experience ";C(8):"Gold ";C(9 ):"Food Units ";C(10 ) }6I=14:C(546+I)=04480 ~2"Rings of ";O$(I)(17);C(546+I) I dQ=13 ::K=122:A$:K:K=127:A$:C(K+10 )=04485 b1295:23692\,255:A$;"S ";C(P1):Q=Q+1:Q=201390n:Q=0 K:1390n:4565  C(5)=0:C(10 )=1:.1}L,-20:.5,-30:0:7:0::5,0;H$:"You are DEAD!!":10 ,0;"To attempt ressurection":"PRESS ANY KEY":1392p:6:0:T2=10 ::4557 Ʃ6:0:5::5,0;"This ladder leads to the surfaceDo you wish to climb it?":1392p:A$=A$(11):A$"Y"A$"y"4565 _HP=HP::"On leaving the dungeon you":"recieve ";HP;" hit points":C(5)=C(5)+HP e5,0;"Leave the cassette on GAME side and REWIND it. When done":1390n:Q1=0 Р6:0::"One moment please":1410:6::2:1:6,9 ;"START THE TAPE":0:6:Q1=0"GAME SIDE" "QB" S0:4:1::K=23200Z23231Z:K,15:K:3535  U Copper Bronze Silver Gold Nb h  /<l,%H7[sDhjLpeQvaU I{1KR1X!!A KILL= 80qaHWHANDSMpSIts dark in hereE3