MAP 1 tq{t "MAP 1" wBLACK CRYSTAL  CARNELL SOFTWARE 1982**************** "Map 1" not to be sold or rented without maps 1 to 6. :ATT=502:9705% 6:6:0: gMARK=1:ATT=600X:QUE=0:COL=0:RA=0:RB=0:RD=0:MO=0 .N$(10 ):X$(640):N$="0000000000" P8,15;"",9 ,15;"",10 ,15;"" 9 ;" BLACK CRYSTAL " 23658j\,8  ]"Press key 1 for black and white television. Press key 2 if using colour television." A$=  25 a=13 14 /a,0;" " a s13 ,4;"Do you wish to start a new", 8;"adventure? Y or N?":" "  15 /5;0;9 ,16;"#" 211 ,6;" ";11 ,26;" " 11 ,9 ;"" b=(*3)+1 d6;0;9 ,16;"*":b=31;4;10 ,16;"*" ?3:b=11; 6;10 ,16;"*" !11 ,25;"" "c5;0;9 ,16;"-":b=11;2;8,15;"*" # 2 $11 ,9 ;"" %Q9 ,16;" ":b=21;5;9 ,17;"*" '11 ,25;"" (+b=32;11 ,8;"" ),b=22;11 ,26;"" *,b=32;11 ,6;"" +-b=22;11 ,27;"" , 3 -D10 ,16;"";8,15;"";9 ,17;"" .b3491 /,b=32;11 ,6;"" 0-b=22;11 ,27;"" 2A$=""15 4!QUE=0A$="1"COL=1 6" QUE=0A$="2"COL=2 8COL=015 9a=13 14 :QUE=QUE+1 < QUE>1A$="Y"5000 >QUE>1A$="N"70F ?QUE=117 @ 15 FK:10 ,0;"Please enter your map reference number: ----------." GA$ HA$10 350^ J11 ,8;A$ LN$=A$ PKN$(1)<2ŰN$(1)>6ŰN$(1)=3350^ R6N$(2)<1ŰN$(2)>2350^ T6N$(3)<1ŰN$(3)>3350^ V!N$(7)>2350^ X!N$(8)>2350^ Z!N$(9 )>2350^ \"N$(10 )>3350^ _SE=N$(2) `TY=N$(3) bPH=N$(4) dSP=N$(5) fPU=N$(6) hWS=N$(7) jFR=N$(8) lCU=N$(9 ) nTR=N$(10 )+FR+CU o#TY=1SP>3SP=3 p#TY=2PH>6PH=6 q#TY=2SP>6SP=6 r#TY=3PH>3PH=3 xCOL=2125} zow=0:u=0:l=0:i=2:z=7:o=7:p=7:t=0:r=7:5086 }ow=1:u=2:l=3:i=4:z=5:o=6:p=7:t=0:r=4:5086 ^.13 ,4;"You have made a mistake." c11 ;"Try again." hA$ mB=13 14 r/B,0;" " wB | 72H  "map 1"1  a=1TR %0;O;19,7+a;"O" a    TR=0:N$(1)="1" COL=25003 ow=0:u=0:l=0:i=2:z=7:o=7:p=7:t=0:r=7:5004 cw=1:u=2:l=3:i=4:z=5:o=6:p=7:t=0:r=4  t:t:o: *o;t;0,8;" BLACK CRYSTAL " IMARK=0:FR=0:X=8:Y=30:CU=0:WS=0 8,0;"Are you:"  9 ;"Male or Female?" =""5030 SE= %SE=77MSE=70F5037  5030 SE=77MSE=1 SE=70FSE=2 %10 ,9 ;"1- A Warrior? "  9 ;"2- An Elf?"  %SE=19 ;"3- A Wizard?" (SE=29 ;"3- A Sorceress?" =""5070 TY= %TY<491TY>5135070  TY=TY 1:1:  9740 & -9920&:d=0:e=0:m=0 a=1640 m>05094 c,b,m c;b;d,e;X$(a) e=e+1:m=m-1 e=32 d=d+1 e=32 e=0 a pTY16003s q PT=9 r ST=3 sTY26006v t PT=6 u ST=6 vTY36009y w PT=3 x ST=9 yMARK=16220L z PU=9 {PH=PT |SP=ST L60:o:TY=10,13 ;"WARRIOR." Q&TY=20,15;"ELF." V3SE=1TY=30,14;"WIZARD" [7SE=2TY=30,12 ;"SORCERESS." `"o:0:18,9 ;PU e17,29;PH j18,29;SP tTR=06500d y 500 d!N$(1)=1X=8 i"N$(1)=1Y=30 n!N$(1)=2X=8 s"N$(1)=2Y=20 x"N$(1)=4X=14 }"N$(1)=4Y=13 ~"N$(1)=5X=12 !N$(1)=5Y=3 !N$(1)=6X=3 !N$(1)=6Y=7 A=((X*32 )+Y+1): C=(*400)+1 B=CC+64@ RA=0X$(B)=""RA=B RA=06544 !RB=0X$(B)=""BRARB=B RB06545 B FR1RA=0 FR2RB=0 TR=5RD=420  H=(x,Y) u;7;X,Y;"*" XA$= Z M=X:N=Y ]MX=(*100d)+1 bMX10 7536p gA$=""7000X l)A$="5"A$="6"A$="7"A$="8"7500L qA$="S"9300T$ v 7000X LC=A$ VC=5N=N-1 [C=6M=M+1 `C=7M=M-1 eC=8N=N+1 j"M=0M=167000X k"N=0N=317000X lA=(M*32 )+N+1 m=A=105iA=356dA=245A=4309100# nA=74JA=75KA=106jA=107kA=212A=213A=214A=244A=246A=324DA=325EA=326FA=357eA=358f7000X oPH Q=5 @200+ATT A F"It moves forward to attack." H Q=6 J502+ATT K P$"Its talons tear into your flesh." R Q=7 T502+ATT U Z"It lifts you into the air." \ Q=8 ^502+ATT _ d$"Your sword pierces its chest and" e!"it falls to the ground, dead." f Q=9 h 800  i n "It drops you and then swoops" o!"down to feed on your remains." p Q=10 r 800  s x#"Its jaws tear into your throat." y"You have been slain!" z Q=10 | 800  } !"Your sword pierces its skull." "The ";M$;" drops dead."  Q=9  800   "The ";M$;" is brought" "to its knees."  Q=11 502+ATT  "The ";M$;"'s jaw opens and"  "it spits fire down apon you."  Q=12 502+ATT  !"You have been burnt to death!"  Q=10  800   "You have drowned!"  Q=10  800   "The ";M$;" grabs your ankle" "and drags you under."  Q=13 60<+ATT  "It jabs its sword forward."  Q=14 ATT  !"It raises its sword above its"  "head."  Q=15 ATT  "It brings its sword down" "towards you."  Q=16 ATT  ""It blocks your attack with its" "enchanted shield."  Q=5 ATT  !"Its sword pierces your chest."  Q=10 502+ATT  "The ";M$;" crushes your"  "skull."  Q=10  700  ,+"The blow was deflected by your shield." . Q=5 0502+ATT 1 6$"Swords clash against each other." 8 Q=5 :502+ATT ; @"Lightning bolt missed." B Q=5 DATT E J8"The lightning strikes its targetthe monster is dead." L Q=9 N 700 O T"The ";M$;" fires a" U"lightning bolt down at you." V Q=24 X502+ATT Y ^"The ";M$;" fires a" _"lightning bolt towards you."  Q=25 502+ATT  #"You have drained its power. The" M$;" fades away."  Q=9  600X  ."You have been killed by the lightning."  Q=10  600X  *"Five minor demons destroy your enemy." PU>0PU=PU-1 SP=SP-1:Q=9 RETU=1  500  "You see a ";M$  Q=27 300,+ATT  SP<18700! B20,0;"Power Drain.":0;19,0;" " 30:SP=SP-1 RETU=1 MO9 8700! "Q=5Q=278090 Q=258100  8030^ PH=08700! ?20,0;"Sword Up.":0;19,0;" "  30 RETU=1 !PH=PH-1 &,Q=1Q=8MX<77780d +Q=177302 ,MX<78238. .[MO=7MO=8MO=1MO=5MO=10 MO=11 Q=67780d 0Q=1679906 2 8700! :PH=08700! ;PH=PH-1 <RETU=1 ?D20,0;"Sword Forward.":0;19,0;" " @ 30 BMX<68264H C-MO=3MO=4Q=57880 D-MO=7MO=8Q=67820 F-MO=3MO=4Q=67910 H-MO=7MO=8Q=67910 J9MO=1MO=5MO=10 Q=67820 LQ=67780d N.MO=3MO=4Q=157780d S 8700! XPH08700! ]A20,0;"Sword down.":0;19,0;" " ^PH=PH-1 _ 30: `RETU=1 bQ=37810 dMX<78300l f.MO=7MO=8Q=11 7910 h-MO=3MO=4Q=67910 lQ=13 7810 qQ=11 7810 v-MO=3MO=4Q=67810 x 8700! =20,0;"Swerve.":0;19,0;" " PH58425 9MO=3MO=4MO=7MO=87910 >20,10 ;"missed.":0;19,0;" " 30:8700! 8010J !RETU=1 !/MO=2MO=6MO=12 8712" !#MO=3MO=48738"" "MO=9 8794Z" "#MO=7MO=88776H" " 87564" ""Q=0MX57700 " Q=07740< " "Q=1MX57760P "Q=17800x "Q=27700 ""Q=3MX57740< "Q=37710 "Q=47700 "Q=57750F ""Q=6MX57760P "Q=67800x "Q=77770Z " Q=87790n ""Q=08130 "$#Q=27MX<37750F "&#Q=27MX<67890 "(Q=277880 "*"Q=6MX<57890 ",Q=67880 ".Q=147920 "0Q=157900 "2Q=167930 "4Q=08130 "6MX>58764<" "8#Q=27MO=57830 ":$Q=27MO=13 7870 "<"Q=27Q=57750F ">MX>58771C" "@"Q=6MO=57830 "B#Q=6MO=13 7870 "C"Q=6MX>77800x "DQ=67930 "EQ=12 7840 "FQ=11 7750F "GQ=13 7860 "HQ=08130 "IQ=167930 "JMX>58782N" "L#Q=27MO=88020T "NQ=277750F "OMX>58785Q" "P"Q=5MO=88020T "QQ=57750F "RQ=67900 "S#Q=11 MX>37880 "T#Q=11 MO=88031_ "UQ=11 7740< "VW=147920 "WQ=157900 "XQ=248100 "ZQ=08130 "[Q=277750F "\Q=68030^ "]Q=258100 "^ 7750F "` Q=0 "aMX=(*10 )+1 "bRETU=0 "c#o;0;17,29;PH "d#o;0;18,29;SP "e.Q=10 ATT<1000ATT=ATT+100d "f,Q=9 ATT100dATT=ATT-100d "g 0:o "h 7650 "jw:o "l 7610 "nQ=9 7000X "oQ=10 9650% "p A$=:B=A$ "qA$=""8700! "rB=81Q8220 "tB=82R8250: "vB=85U8280X "xB=80P8320 "zB=65A8350 "~B=76L8370 "B=90Z8400 "SP08842" "#B=86VWS=28120 "B=66B8200 "RETU=08700! " 8801a" #(B=15 #-(.05|L,19:.05|L,17 #27;0;X,Y;"O" #7<.05|L,32 :.05|L,33!:.05|L,36$ #8<.05|L,32 :.05|L,33!:.05|L,36$ #AU;7;X,Y;"*" #D.5,21 #FB #PA=RAA=RBFR=FR+1 #UA=RDSR=1 #ZA=RARA=0 #_A=RBRB=0 #dA=RDRD=0 #fTR=TR+1 #i 500 #n 7000X #FR<27000X #/A=430ưN$(10 )07000X # 1:O: #8A=105i20,0;"The Tower of Beroth."; #:A=24520,0;"The Castle of Shadows."; #=A=356d20,0;"Temple of the Fire Demon."; #>A=43020,0;"Entrance to the Labyrinth."; #"To" #"enter use key 0." #""9158# #A$= #A$=""9160# #A$="0"9190# # 7610 # 7020l #0:0:O: #N$(1)="1" #N$(2)=SE #N$(3)=TY #N$(4)=PH #N$(5)=SP #N$(6)=PU #N$(7)=WS #N$(8)=FR $N$(9 )=CU $N$(10 )=(TR-(FR+CU)) $28,0;"Your map reference number is:" $ 7N$;". Write down this number, you will need it."; $A=105iB=6 $A=356dB=5 $A=245B=2 $A=430B=3 $:" To continue your adventure find andLOAD map ";B;"." $ $T"map 1"9360$ $ "SCREEN" $ 7000X $ "SCREEN" $ 1 $23658j\,8 $ 9740 & $ 7000X $PH=PT $SP=ST $#o;0;17,29;PH $#o;0;18,29;SP $ 7000X % MO=1M$="Forest Dragon" %(0.1}L,5:0.2~L,0.1}L %! MO=2M$="Flying Lizard" %&MO=3M$="Troll" %+MO=4M$="Centaur" %0MO=5M$="Fire Dragon" %2(0.1}L,5:0.2~L,0.1}L %5MO=6M$="Harpy" %:MO=7M$="Cyclops" %?MO=8M$="Balrog" %DMO=9 M$="Wraith" %E(0.1}L,5:0.2~L,0.1}L %I MO=10 M$="Swamp Dragon" %N!MO=11 M$="Giant Serpent" %SMO=12 M$="Giant Bat" %T(0.1}L,5:0.2~L,0.1}L %UMO=13 M$="Kelpie" %b 8800`" % A$=X$(A) %"X=8Y=307000X %B=MO %!A$=""MO=(*4)+1 %;H=546H=524H=63?MO=(*7)+3 %0H=60<H=58:MO=(*5)+8 %A$=""MO=13 %MO=13 9500% %B=MO7000X % 9500% %PU=09690% %j;k;X,Y;X$(A) %,0;o;19,18;"Sanctuary" %B=16:.05|L,-5:.05|L,-7:.05|L,8:.05|L,9 :.05|L,12 :.05|L,-3:B % A=287 %B=110 %#7;u;8,30;"*" %.05|L,14 %7u;7;8,30;"*":.05|L,14 %B %PH=PT:SP=ST %#o;0;17,29;PH %#o;0;18,29;SP % X=8 % Y=30 %H=480:7000X % 0:0:o: %V20,0;"Your soul is lost to the dark lands. Press key 1 for new game." %"1"9692% % ="1" % %a=07 % b:"A"+a,b % b:"B"+a,b % b:"C"+a,b % b:"D"+a,b % b:"E"+a,b % b:"F"+a,b % b:"G"+a,b % b:"H"+a,b % b:"I"+a,b % b:"J"+a,b % b:"K"+a,b % b:"L"+a,b % b:"M"+a,b % b:"N"+a,b % b:"O"+a,b % b:"P"+a,b % b:"Q"+a,b % b:"U"+a,b % b:"T"+a,b %a & & 9900& & a=07 & b:"F"+a,b & b:"A"+a,b & b:"S"+a,b & b:"P"+a,b & b:"U"+a,b & b:"D"+a,b & b:"G"+a,b & b:"I"+a,b & b:"O"+a,b & b:"H"+a,b & b:"J"+a,b & b:"K"+a,b & b:"L"+a,b & b:"M"+a,b & b:"N"+a,b & b:"B"+a,b & b:"C"+a,b & b:"E"+a,b & b:"R"+a,b &! b:"T"+a,b &"a &*(A$="*********************************" &+X$(132 )=A$ &,X$(512544 )=A$ &-a=151232 &. X$(a)=A$ &/X$(a+31)=A$ &0a &2 a=545!64032 &35X$(aa+31)=" " &4a &5 9910& &6a=18 &7b,c &8X$(bc)="" &9a &:a=17 &;b,c &<X$(bc)="" &=b,c &>X$(bc)="" &?a &@a=121 &Ab,c &BX$(bc)="" &Ca &Da=17 &Eb,c,d &F'X$(b)="":X$(c)="":X$(d)="" &Ga &H>X$(324D326F)="":X$(356d358f)="" &IDX$(212214)="":X$(244246)="" &J;X$(74J75K)="":X$(105i107k)="" &KX$(287)="+" &LPX$(5644615g)="PHYSICAL: PURITY: SPIRITUAL: RINGS:" &N &z0,00011000,0,00011111,11111000,00001111,11111111,11110000,0,0,001110008,00011100,001110008,00011100,0,0,0,0,00001000 &{#0,00111100<,0,00111111?,11111100,00000111,11111111,11100000,11000000,00000011,10011001,10011001,00011000,00011000,00000011,11000000,00010010,00100000 ,00000100 &|#0,01111110~,0,01111111,11111110,00000011,11111111,11000000,10000000,00000001,11011011,11011011,00011000,00011000,00000111,11100000,00010010,00010001,00000010 &}0,11111111,0,11111111,11111111,00000001,11111111,10000000,0,0,11111111,11111111,01111110~,01111110~,00001110,01110000p,00010010,00001001 ,00001010 &~00000001,11111111,10000000,11111111,11111111,0,11111111,0,0,0,11111111,11111111,01111110~,01111110~,00011100,001110008,01011010Z,00000101,10001010 &00000011,11111111,11000000,11111111,11111111,0,01111110~,0,0,0,11011011,11011011,01011010Z,01011010Z,001110008,00011100,01011010Z,10010101,01001011K &00000111,11111111,11100000,00111111?,11111100,0,00111100<,0,0,0,10001001,10010001,01001010J,01010010R,01110000p,00001110,01011011[,10100101,00101011+ &00001111,11111111,11110000,00011111,11111000,0,00011000,0,0,0,00000110,01100000`,01000111G,11100010,11100000,00000111,11111111,11111111,10111111 &0,0,00001000,10101001,00010000,0,0,01010101U,10101010,0,11111111,0,0,11111111,0,0,0,00001111,11110000,0 &,00010000,01010101U,01000001A,10111110,11000010,00010000,00001000,01111111,11111110,0,10011001,10101000,00010101,11111111,0,00000001,10000000,00011111,11111000,0 &,00111100<,00101010*,00000111,11101110,10001000,00010000,00001000,01111111,11111110,0,11111111,10101000,00010101,11100111,0,00000011,11000000,00111111?,11111100,0 &%01111100|,0,00011101,10101010,01001010J,001110008,00011100,01111111,11111110,0,11111111,11111000,00011111,11000011,0,00000111,11100000,01111111,11111110,0 &%00111110>,0,01110110v,00101000(,00001000,001110008,00011100,01111111,11111110,0,00101010*,11011000,00011011,10000001,0,00001111,11110000,11111111,11111111,0 &:00010000,01010101U,00011000,00101000(,00101010*,01111100|,00111110>,01111111,11111110,00111100<,10101011,11011000,00011011,10000001,0,00001111,11110000,11111111,11111111,00000001 &A00010000,00101010*,01000000@,10001011,01111111,01111100|,00111110>,01101111o,11111110,01111110~,11111111,11111010,01011111_,10000001,10101010,00001111,11110000,11111111,11111111,00001111 &30,0,00001000,00001000,11000100,01010100T,00101010*,01101111o,11111110,11111111,11111111,11111111,11111111,10000001,11111111,00001111,11110000,11111111,11111111,00001111 &34",491,66B,81Q,98b,113q,130,145,162,176,199,201,205,206,232,232 &194,198,202,204,207,208,226,231,233,234,235,240,258,271,290",301-,322B,335O,354b,367o,386,395,418,427,450,457,482,487 &513,63?,83S,95_,115s,127,147,159,183,191,216,223,248,255,272,273,280,286,303/,3051,3117,319?,336P,351_,368p,374v,378z,383,404,406,410,415,436,438,442,447,468,470,475,479,506,511 &502,82R,114r,146,182,209,241,302.,375w,377y,396,407,409,428,435,439,441,458,471,474,488 &t,o,33!,p,w,16,o,r,1,r,t,13 ,t,o,2,p,w,8,p,t,2,p,w,6,o,r,1,r,t,13 ,t,o,2,p,w,7,p,t,3,p,w,6,o,r,1,r,t,13 ,t,o,2,p,w,16,o,r,1,r,t,13 ,t,o,2,p,w,15,o,o,5,o,r,1,r,t,9 ,t,o,2,p,i,5,p,w,3,p,i,3,p,w,2,p,i,2,o,r,1,o,o,2,o,t,3,o,o,1,r,t,8,t,o,2 &<p,i,6,p,w,1,p,i,8,o,r,1,o,o,2,o,t,3,o,o,1,r,t,8,t,o,2,p,i,14,r,t,2,o,o,6,r,t,7,o,t,1,t,o,2,p,i,12 ,o,r,1,r,t,3,o,o,5,r,t,9 ,t,o,2,p,i,2,p,t,3,p,i,9 ,r,t,16,t,o,2 &kp,i,2,p,t,1,o,t,1,p,t,1,p,i,9 ,r,t,7,o,r,1,o,o,1,o,r,1,r,t,6,t,o,2,p,i,10 ,o,r,1,o,o,7,r,t,3,o,r,1,o,o,1,o,r,1,r,t,6,t,o,2,p,i,10 ,o,r,1,o,o,6,o,r,1,r,t,3,o,r,1,o,o,1,o,r,1,r,t,6,t,o,2 &p,i,8,o,r,1,o,o,9 ,r,t,3,o,r,1,o,o,2,o,r,1,r,t,5,t,o,2,p,i,6,o,r,1,o,o,17,r,t,6,t,o,61=,o,o,3,t,o,9 ,o,o,3,t,o,17,o,o,3,t,o,33! tX%baruo  0000000000؃ AMAP 2 LXpU_NX "map 2" /BLACK CRYSTAL COPYRIGHT CARNELL SOFTWARE 1982 :MO=0:ET=0 23658j\,8 N$(10 ) FLOOR=1:NSAVE=0  2000 5:0:5 ATT=300,  .8;0;6;" BLACK CRYSTAL " P10 ,0;"Are you using a black and white television? Answer Y or N." A$= A$="Y"A$="N"33! 30 !A$="Y"COL=0 "A$="N"COL=1 # 1000 $V10 ,0;"Please enter your map reference number: ----------. " &="Y"Ŧ="N"38& (A$ -A$10 350^ 211 ,8;A$ 4A=1̱A$ 5,A$(A)<480ůA$(A)>579350^ 6A 7N$=A$ 8!N$(1)1350^ 96N$(2)<1ŰN$(2)>2350^ :6N$(3)<1ŰN$(3)>3350^ ;!N$(7)>2350^ 2350^ >"N$(10 )>3350^ FSE=N$(2) KTY=N$(3) PPH=N$(4) USP=N$(5) ZPU=N$(6) \WS=N$(7) _ FR=2 `CU=N$(9 ) d,TR=N$(8)+N$(9 )+N$(10 ) 1:J:0: 6220L ^613 ,0;" YOU HAVE MADE A MISTAKE. " c$" TRY AGAIN. " hA$ mB=13 14 r/B,0;" " wB | 45- "map 2"1  RING DISPLAY C=1TR %0;J;19,7+C;"O" C   B=(*25)+2 D=(*3)+4 D;0;9 ,B;"" D;0;10 ,B;"" K.5,-8:.5,-5:.5,-1:.5,4 O=110 D;0;10 ,B;"" .07}\(,0 D;0;10 ,B;"" O P.25~,-1:.25~,-3:.25~,-5:.25~,-6 0;9 ,B;" " 0;10 ,B;" "  C=0  COL=11050 ,W=0:T=0:G=0:H=0 ,R=7:K=7:L=7:J=7  ,W=0:T=1:G=2:H=3 $,R=7:K=4:L=5:J=6 .  A=07  B:"A"+a,B  B:"B"+a,B  B:"C"+a,B  B:"D"+a,B  B:"E"+a,B  B:"F"+a,B  B:"G"+a,B  B:"H"+a,B  B:"I"+a,B  B:"J"+a,B A NSAVE=1 X$(640)  x$(513640) A A=148132  2160p %X$(AA+31) *A ,<X$(481512)="" / 400111110>,00011100,00010000,00001000,001100000,00111111?,00011000,00011000,01010101U,11111100 >00101010*,00111110>,001110019,10011100,01111000x,00011111,00011000,00011000,10101010,11111000 C00010100,00100010",01111101},10111110,11111100,00001111,11111111,00011000,01010101U,11110000 H00001000,00100010",11111111,11111111,10110100,00000111,10111101,00011000,10101010,11100000 M00011100,00100010",11111111,11111111,11111100,00000011,10111101,00011000,01010101U,11000000 R 00101010*,00100010",11111111,11111111,11001100,00000001,10111101,00011000,10101010,10000000 W01001001I,00100010",10010011,11001001,11001100,00000010,10111101,00111100<,01010101U,01000000@ \00001000,01100011c,00000011,11000000,01111110~,00000100,10111101,00000000,10101010,00100000 f" PHYSICAL PURITY SPIRITUAL RINGS " p% " "  C=0 B=231  X$(B+C)=" " B C=4485010 C=C+32  5002 'A$="" FLOOR15045 X$(132 )=A$ X$(225256)=A$ B=1423832  X$(B)=A$ X$(B+4)=A$ B X$(239241)=" " X$(462466)=A$ X$(431433)=A$ X$(400)=A$ X$(368p)="+" SAN=368p X$(68D)="" FLOOR26002r X$(193224)=A$ X$(225256)=A$ X$(257288 )=A$ B=10 45832  X$(B)=A$ X$(B+10 )=A$ B &M$=" " X$(98b127)=M$ X$(130159)=M$ X$(354b383)=M$ SAN=100d X$(386415)=M$ X$(100d)="+" pX$(132 )=A$ rFLOOR36020 tX$(19 )=A$ uX$(2532 )=A$ vB=9 297)32 x X$(B)=A$ yX$(B+16)=A$ zB {X$(153159)=A$ |CU=0X$(59;)="O" }CU<2X$(62>)="O" ~X$(297)3139)=A$ X$(292$)="+" H$(640) H$=x$ SAN=292$ 0,0;X$  L 5000 QTY16240` V PT=9 [ ST=3 `TY26260t e PT=6 j ST=6 tTY36275 y PT=3 ~ ST=9 PH>PTPH=PT SP>STSP=ST d*TY=117,1;"Warrior." i&TY=217,1;"Elf." n4SE=1TY=317,1;"Wizard." s7SE=2TY=317,1;"Sorceress." x"0;j;18,9 ;PU }#0;j;17,29;PH #0;j;18,29;SP  500  10;J;19,18;" FLOOR ";FLOOR FLOOR16550 B=(*160)+1 X$(B)" "6539  X$(B)="U" X=11 :Y=15 B=(*9 )+226  X$(B)=" " B=(*8)+247  X$(B)=" "  A=368p FLOOR26620 X$(73I)="D"  A=73I B=(*20)+197  X$(B-32 )" "6565  X$(B)=" " -X$(B+32 -2B+37%)=" " C=(*7)+B+62>  X$(C+32 )" "6580  X$(C)=" " B=(*93])+386 X$(B)" "6595  X$(B)="U"  X=2  Y=8 FLOOR36820 B=33!479 X$(B)=" "X$(B)="" B X$(66B)="D"  X$(67C72H)=" " B=98b26032  X$(B)=" " B  B=(*3)+69E C=BB+22432 X$(C)=""X$(C)=" " C  C=100d42032 "X$(C)=""X$(C)=" " 'C ,C=60<380|32 1 X$(C)=" " 4"C<348\X$(C+162)=" " 6C 8&X$(370r380|)=" " ;X$(61=)=" " @X$(294&296()=" " JX$(328H329I)=" " L A=329I N AA=0 OB=(*3)+1 TB2C=1 YB=3C=32 ^B=4C=-32 cAB=A+C hX$(AB)=""6735O jA=A+C m X$(A)=" " rB2AA=AA+1 wAA216735O zA=(*9 )+10 | B=328H45632  X$(B)=" "  X$(B+A)=" " B A=13 B=(*9 )+434  X$(B)=" " A  X=2  Y=1  A=66B B=12 K.5,-8:.5,-5:.5,-1:.5,4 C=110 .07}\(,0 C P.25~,-1:.25~,-3:.25~,-5:.25~,-6 B _1;20,0;"Press ENTER to continue your adventure. "  C=0 A$=  C=C+1 A$""6835 %C=80PFLOOR=1960  6830 J;0;X,Y;"*"  7610 XA$= YET=ET+1 ZX$(A)"+"7004\ [&ET=502FLOOR=1960 \ET=502ET=0 ]MX=(*100d)+1 ^CU=2MX=502 bMX59500% gA$=""7000X l0A$="C"A$="5"A$="6"A$="7"A$="8"7500L qA$="S"9300T$ v 7000X LM=X NN=Y QA$="C"9700% TC=A$ VC=5N=N-1 [C=6M=M+1 `C=7M=M-1 eC=8N=N+1 jA=(M*32 )+N+1 kX$(A)=""7000X lX$(A)=""9750& mPH W=4 @ATT A F7j;1;"It sinks its fangs into your throat." H W=10 JATT K P,j;1;"The zombie breaks your neck." R W=10 TATT U d6j;1;"It engulfs you and chokes you todeath." f W=10 h 1000 i n.j;1;"The weapon pierces your chest." p W=10 rATT s x/j;1;"You have been crushed to death." z W=10 | 1000 } %j;1;"The fog is dispersed."  W=5  1000  'j;1;"The fog reforms itself."  W=6  1000  <j;1;"A spiked chandelier falls towards you."  W=7 !B=15:200:B  ,j;1;"A spear hurtles towards you."  W=8 !B=15:200:B  7j;1;"It blocks your attack with its shield."  W=20 ATT  &j;1;"Swords clash together."  W=20 ATT  ,j;1;"Your sword cuts into the ";M$ "j;1;"but has no effect." !B=120:20:B  7610  8700! ,j;1;"The ";M$;" fires a lightning" !j;1;"bolt towards you."  W=14 ATT  +j;1;"It brings its sword forward"  W=15 ATT  $j;1;"It raises its sword."  W=16 ATT  )J;1;"It swings its sword down."  W=17 ATT  Lj;1;"A fog forms in front of you. It takes on a near human shape."  W=18 !B=15:200:B  /j;1;"You have drained its power. The" j;1;M$;" fades away."  W=9 ATT   (j;1;"The ";M$;" is destroyed."  W=9 ATT  +j;1;"The skeleton falls to bits."  W=9 ATT  "7j;1;"The blow was deflected by your shield." $ W=20 %MO=7W=9 &ATT ' ,:j;1;"You have been killed by the lightning." . W=10 0ATT 1 66j;1;"Five minor demons destroy your enemy." 7PU>0PU=PU-1 8 W=9 :ATT ; @+j;1;"The ";M$;" moves forward to" Aj;1;"attack." B W=20 DATT E Jj;1;"You see a ";M$ L W=21 N B=15:502:B O T,j;1;"The sword splits your skull." V W=10 XATT Y ^j;1;"It missed." _ W=20 `MO>5W=9 bATT c SP08700! MO>58700! 6J;1;"Five minor demons destroy your enemy." PU>0PU=PU-1 "0;J;18,9 ;PU  W=9 RETU=1 ATT SP08700! LJ;1;20,0;"Power Drain";0;19,0;"" SP=SP-1 RETU=1 502 #MO>5MO<48700! MX<58700! MO47940 .W=14W=15W=178700!  7950 PH=08700! JJ;1;20,0;"Sword up.";0;19,0;"" RETU=1 !PH=PH-1 # 502 &W=1679906 + 8700! :PH=08700! <RETU=1 >PH=PH-1 ?OJ;1;20,0;"Sword forward.";0;19,0;"" @ 502 BMX68262F C9MO=1W=16MO=1W=207700 DeMO=2W=20MO=2W=16MO=3W=20MO=3W=167860 F9MO=1W=16MO=1W=207860 H7MO=2W<5MO=3W<57880 J 8700! XPH08700! ]KJ;1;20,0;"Sword down";0;19,0;"" ^PH=PH-1 `RETU=1 a 502 bMO>38700! c.W=15W=17W=148700! d#MX>4MO>18296h fW=207860 h#MX>8MO>18300l jW=207700 l#W=20MO=17960 nMO=18700! p!W=1W=37880 rMX>67880 v 7860 GJ;1;20,0;"Swerve";0;19,0;"" RETU=1 502 PH68700! 8W=1W=14W=15W=17W=20 8700! PH08700! KJ;1;20,0;"Shield up.";0;19,0;"" RETU=1 502 W=177970" 8700! PH08700! PJ;1;20,0;"Shield Forward.";0;19,0;"" RETU=1 PH=PH-1 502 -W=8W=14W=157970" 8700! SP08700! RETU=1 JJ;1;20,0;"Lightning";0;19,0;"" 502 SP=SP-1 MO=57810 MO>38700! .W=14W=15W=178700! MX>67950 IJ;1;20,10 ;"Missed.";0;19,0;"" 8700! !RETU=1 !"W=0MO=57930 !"W=0MO=67830 ""W=0MO=77840 "W=08010J "W=187720( " W=27780d " !W=4W=77800x ""W=8W=157790n "W=167920 "W=178020T "W=17750F "W=147980, "9W=20MO=4W=21MO=47890 "MX>48736 " "W=218000@ "#W=20MO=27710 "#W=20MO=377302 "W=207890 " #MX<4MX>88744(" ""W=217900 "$#W=20MO=37740< "&W=207910 "(W=207900 "*W=217910 "` W=0 "aMX=(*12 )+1 "bRETU=1 "c#0;J;17,29;PH "d#0;J;18,29;SP "eB=15:B "f 7610 "gW=10 9650% "hW=9 9960& "i 19,0;0;"" "jA$= "oB=A$ "pA$=""8700! "rB=81Q8220 "tB=82R8250: "vB=85U8280X "xB=80P8320 "zB=65A8350 "~B=76L8370 "B=90Z8400 "#B=86VWS=28120 "B=66B8200 "RETU=0U " 8801a" #(B=16 #-0;2;X,Y;"O" #0(.05|L,19:.05|L,17 #2<.05|L,32 :.05|L,33!:.05|L,36$ #<J;0;X,Y;"O" #?.05|L,21 #AB #FJ;0;X,Y;"*" #KCU=CU+1 #P X$((X*32 )+Y+1)=" " #RTR=TR+1 #S 500 #U 7000X #SJ;1;20,0;"The gate is open. If you wish toleave press key 0" #=""9125# #A$= #A$="0"9200# # 7610 # 7555 #0:0:6: #N$(1)="2" #N$(2)=SE #N$(3)=TY #N$(4)=PH #N$(5)=SP #N$(6)=PU #N$(7)=WS #N$(8)=FR $N$(9 )=CU $N$(10 )=(TR-(FR+CU)) $38,0;"Your map referance number is: " $ 6N$;". Write down this number, you will need it." $3"To continue your adventure find and load map 1." $ $"map 2"9360$ $ "SCREEN" $ 7000X $ "SCREEN" $NSAVE=1 $ 1:0:J $!23658j\,8:2000 $NSAVE=0 $ 7000X $PH=PT $SP=ST $#0;J;17,29;PH $#0;J;18,29;SP $ 7000X %X$(A)="+"7000X %!B=MO %&MO=(*7)+1 %0MO=1M$="Skeleton" %5MO=2M$="Vampire" %8(0.1}L,5:0.2~L,0.1}L %:MO=3M$="Zombie" %?MO=4M$="Wraith" %B(0.1}L,5:0.2~L,0.1}L %DMO=5M$="Fog" %IB=MO9510&% %J9MO=10;7;X,Y;"";X-1,Y;"" %K#MO=20;L;X,Y;"" %L3MO=30;K;X,Y;"";X-1,Y;"" %M3MO=40;L;X,Y;"";X-1,Y;"" %N 8800`" %PU09690% %FLOOR=39654% %yA=(X*32 )+Y+1:X,Y;X$(AA+1):X-1,Y;X$(A-32 ):J;0;19,18;"Sanctuary" % 9655% %yA=(x*32 )+Y+1:X,Y;H$(AA+1):X-1,Y;H$(A-32 ):J;0;19,18;"Sanctuary" %FLOOR19658% %X=11 :Y=15 %FLOOR29664% % X=3 % Y=3 %FLOOR39668% % X=9 % Y=3 %A=SAN %B=16 %0;J;X,Y;"*" %.05|L,-3 %J;0;X,Y;"*" %B %PH=PT %SP=ST %#0;J;17,29;PH %#0;J;18,29;SP %!ATT<300,ATT=ATT+502 % 7000X %QJ;1;20,0;"YOUR SOUL WILL WANDER THE CASTLE FOREVER." % %#WS0SP07000X %2J;1;20,0;"Visability spell" % 0;19,0;"" %C=((X*32 )+Y+1) %<X$(C-33!)""K;X-1,Y-1;X$(C-33!) %4X$(C-32 )""K;X-1,Y;X$(C-32 ) %DX$(C-31)""K;X-1,Y+1;X$(C-31) %4X$(C-1)""K;X,Y-1;X$(C-1) %4X$(C+1)""K;X,Y+1;X$(C+1) %>X$(C+31)""K;X+1,Y-1;X$(C+31) %6X$(C+32 )""K;X+1,Y;X$(C+32 ) %>X$(C+33!)""K;X+1,Y+1;X$(C+33!) %SP=SP-1 &PU>0PU=PU-1 &"0;J;18,9 ;PU &#0;J;18,29;SP & 7610 & 7000X &C=16 &K;0;M,N;"*" &K;0;M,N;"" &%0;K;M,N;"*" &*0;M,N;" " &/C &2 7610 &4 7000X &>B=1200 &CB &D 7610 &E &H;J;1;20,0;"You see a giant monolith." &R 9790>& &\Kj;1;"On its surface you see inscribed an ancient spell." &a 9790>& &f<j;1;"To use this visibility spell press key C." &k 9790>& &pWS2WS=1 &z 7000X &4J;1;20,0;"Stairway leading "; & M$=X$(A) &M$="U"J;1;"up." &M$="D"J;1;"down." &-J;1;"Press key zero to use stairs." &=""9920& &A$= & 7610 &A$"0"7000X &M$="U"FLOOR=FLOOR+1 &M$="D"FLOOR=FLOOR-1 &1:J:0: & 6220L &J;0;X,Y;"*" &FLOOR=39964& &3X-1,Y;X$(((X-1)*32 )+Y+1) &)X,Y+1;X$((X*32 )+Y+2) &BFLOOR=3X-1,Y;H$(((X-1)*32 )+Y+1) &BFLOOR=3X,Y+1;H$(((X-1)*32 )+Y+2) & ATT502ATT=ATT-502 & 7000X  loosav b ؃ PHYSICAL PURITY SPIRITUAL RINGS t,AMAP 3 X#VX "map 3" /BLACK CRYSTAL COPYRIGHT CARNELL SOFTWARE 1982 : 23658j\,8 +B$(32 ):N$(10 ):X$(192) 'BOT=0:AGA=0:TRY=0 :Z$(300,):D$(11 ,4):E$(7,5) 5:0:5  X$ Z$ A=111 :D$(A):A A=17:E$(A):A .8;0;6;" BLACK CRYSTAL " P10 ,0;"Are you using a black and white television? Answer Y or N." A$= A$="Y"A$="N"33! 30 !A$="Y"COL=0 "A$="N"COL=1 #V10 ,0;"Please enter your map reference number: ----------. " & 10 (A$ -A$10 350^ 22;11 ,8;A$ 4A=1̱A$ 5,A$(A)<480ůA$(A)>579350^ 6A 7N$=A$ 8!N$(1)1350^ 96N$(2)<1ŰN$(2)>2350^ :6N$(3)<1ŰN$(3)>3350^ ;!N$(7)>2350^ 2350^ >"N$(10 )0350^ FSE=N$(2) KTY=N$(3) PPH=N$(4) USP=N$(5) ZPU=N$(6) \WS=N$(7) _FR=N$(8) `CU=N$(9 ) d,TR=N$(8)+N$(9 )+N$(10 ) nCOL=0125} sBR=1:P=2:U=3:O=4:I=5:Q=6 x 1000 }BR=0:P=0:U=0:O=7:I=7:Q=7 1000 ^613 ,0;" YOU HAVE MADE A MISTAKE. " c$" TRY AGAIN. " hA$ mB=13 14 r/B,0;" " wB | 45- C=1TR R;Q;4,C+8;"O" C   BOT=0 TRY=3710 TRY=4720 TRY=5730 B=(*4)+1 !B=4SE=2700 B=3705  725 UO;0;"ZENOBI";0;O;": Hey gorgeous! Call my name when you need me."  WO;0;"ZENOBI";0;O;": Hey bone head! Need my help? Just call my name."  UO;0;"ZENOBI";0;O;": Isnt this pathetic? You must be a right moron."  m0;O;"ZENOBI";0;O;": Not in a hundred years have I met anyone as empty headed as you."  6O;0;"ZENOBI";O;0;": Help you I can."  ڃO;0;"ZENOBI";0;O;": I dont know why I run about with you. I always did have a soft spot for the under- dog."  B=621 /B,0;" " B 6,0;" "  "map 3"1  "map 3"960  "SCREEN" K  "SCREEN" 0:0:Q 23658j\,8 K  0:0:Q: TY=1PT=9 TY=1ST=3 TY=2PT=6 TY=2ST=6 TY=3PT=3 TY=3ST=9  PH>PTPH=PT SP>STSP=ST  R;Q;X$ /TY=1R;Q;2,2;"Warrior." $+TY=2R;Q;2,2;"Elf." )9TY=3SE=1R;Q;2,2;"Wizard." .<TY=3SE=2R;Q;2,2;"Sorceress." 3TR>0500 8"0;Q;3,10 ;PU ="0;Q;2,28;PH B"0;Q;3,28;SP GY$(300,) LA=(*30)+1 QZ$(A)" "1100L V Y$(A)="A" [SAN=A jY$(286)="E" oB=(*7)+197 tZ$(B)" "1135o vKING=B y Y$(B)="K" ~Y$(137)="P"  M=0 B=14 C=(*299+)+1 Z$(C)" "1160 Y$(C)" "1160 M=0Y$(C)="T" M>0Y$(C)="G" B  M=M+1 M51155  M=0 C=(*299+)+1 Z$(C)" "1200 Y$(C)" "1200 M3Y$(C)="C" M=4Y$(C)="C" M=5Y$(C)="S" M=6Y$(C)="J" M=7Y$(C)="H" M=8Y$(C)="M"  M=M+1 M81200 6,0;" " A=SAN 0;O;"GORA";0;O;": I have brought you here tothis place of Sanctuary where you can see imbedded in solid rock, the Orb of Cassandra. It will reveal to you, for a momentonly, the layout of the labryrinth.";1;Q;" Press ENTER." K=2520 A$ A$=D$(5)950 C=1 DA=30 B=110 7B+6,0;" " #P;I;B+6,1;Z$(CDA) C=30*B DA=DA+30 B  ?" The red (dark) areas are Shaggoth strongholds." B=1500 B 900 O;0;"GORA";0;O;": I give to you five gold coins. Use them wisely. Now it is time for the quest to continue."  FR=7  11 ;R;Q;"What now?" *Q;0;4,28;FR-2 K=3010 A$ A$=D$(5)950 900 A$="ZENOBI"5000 B$=A$ -B$(14)=D$(1)3030 TRY=TRY+1 B=(*2)+1 *"That will do you no good. Try again."  B=2650 3010 /B$(610 )=E$(5)M=-30 .B$(610 )=E$(6)M=30 ,B$(69 )=D$(7)M=1 -B$(69 )=D$(8)M=-1 'A+M1A+M300,3045 3074 A=A+M Z$(A)=""4550 C=0 A-30<13054 !Z$(A-30)=""C=C+1 "A+30>300,3058 !Z$(A+30)=""C=C+1 A-1<13059 Z$(A-1)=""C=C+1 !A+1>300,3062 Z$(A+1)=""C=C+1 S$="Hide" C=1S$="Hides" .C>0C;" of the surrounding caves ";S$ !C>0"Shaggoth guards." ,C=0"There are no Shaggoths about." 'A+M<1A+M>300,3074 AZ$(A+M)="""You see a Shaggoth in the cave in front of you." 3076 ("A solid wall lies in front of you."  TRY=0 Y$(A)="A"44000 Y$(A)="G"4000 Y$(A)="T"4100 Y$(A)="P"4450b Y$(A)="E"6000p Y$(A)="K"4480 ?Y$(A)="C"Y$(A)="S"Y$(A)="J"Y$(A)="H"Y$(A)="M"4800 !BOT=04490 3008 FR9 3000 N"You see a gold coin lying in the cave. you now have ";FR-2+1 FR=FR+1 "FR-2=1"gold coin." #FR-21"gold coins."  Y$(A)=" " C=(*299+)+1 Z$(C)" "4018 Y$(C)" "4018  Y$(C)="G" R;Q;"What now?"  3008 FR23000  TRY=0 X"A giant Treasure Serpent has youtrapped. How are you going to get out of this one?" K=4120 A$ A$=D$(5)950  900 A$="ZENOBI"5000 TRY=TRY+1 B$=A$ "OB$(710 )=D$(6)B$(710 )=D$(9 )4140, ' 4110 ,-B$(15)=E$(1)4180T 1-B$(14)=D$(4)4160@ 2"That will do you no good." 3B=(*2)+1 4 5B=2650 6 4115 @X"The giant serpent is attracted to the coin. It slithers towardsyou and crushes you." EFR=FR-1 J 44000 T"The Treasure Serpent is" Y7"Attracted to the coin giving youa chance to escape." ^FR=FR-1 h 3000 @"You are in the Shaggoths dungeon";11 ;R;Q;"What now?"  TRY=0 K=4255  A=137 A$ A$=D$(5)950  900 B$=A$ TRY=TRY+1 A$="ZENOBI"5000 A$="OPEN DOOR"4285 $"No good you are still in prison."  B=(*2)+1 B=2650 K  TRY=0 ,"The door swings open. ";R;Q;"What now?" A$ K=4290 A$=D$(5)950  900 B$=A$ TRY=TRY+1 A$="ZENOBI"5000 NB$(15)=E$(3)B$(710 )=D$(6)4330 NB$(15)=E$(1)B$(710 )=D$(6)4350 -B$(14)=D$(1)4365  "That will do you no good."  B=(*2)+1 B=2650 K c"The Shaggoths take all your goldbut do not set you free. You starve to death in the dungeon."  FR=2  44000 I"The Shaggoth guards hurry after the gold leaving you free to move."  FR=2  3000  ="Shaggoth guards capture you and throw you back in prison."  4255 0PU>04412< 5S"Death has claimed you. Your unpure soul is lost forever in the dark lands." : < ?*Q;0;"You are back at Sanctuary." DA=SAN F TRY=0 I 3000 b`"You are near the Shaggoths dungeon. If you are quiet you might be able to sneak past." g 3000 H"You are in the kings throne room. A hasty retreat is called for."  3000 @"You see a small clay bottle. ";11 ;R;Q;"What now?" A$ K=4495 A$=D$(5)950  900 B$=A$ 'B$(13)"GET"4525 "Get it yourself." K k"The bottle begins to shake and glow. It shatters and out pops astrange little creature. It speaks:" O;0;"ZENOBI";0;O;": Thank you for releasing me. King Shaggoth has held me prisoner for one hundred years. Whats more he charged me rent onthe bottle.I am up to my pointedears in debt. I am the oracle Zenobi. Help you I can. Just usemy name when you need my help."  BOT=1  3000 B=(*2)+1 ."You have been grabbed by the Shaggoths." "FR>2B=14250  "They take you to their king."  A=KING SE=1S$="him" SE=2S$="her" SE=1M$="He" SE=2M$="She" TY=1T$="human" TY=2T$="elf" $TY=3SE=1T$="wizard" #TY=3SE=2T$="witch" AGA=04685M AGA14595 =0;O;"KING";0;O;": Not that ";T$;" again. I" )O;"thought I told you to kill ";S$;"?"  O;"Do it properly this time." AGA24605 C0;O;"KING";0;O;": What ";S$;" again? ";M$;" cant" [O;"be alive. Boil ";S$;" in oil, then chop ";S$;" up and feed ";S$;" to my pet dragon." AGA34615 ;O;0;"KING";0;O;": Still alive? Bring the" !O;T$;" here. I will deal with" O;S$;" myself." AGA44625  <O;0;"KING";0;O;": The ";T$;" again? But I" ]O;"killed ";S$;" myself. I dont want to see ";S$;". Take ";S$;" outside andwaste ";S$;"." AGA<54640  lO;0;"KING";0;O;": I dont want to know. Take ";S$;" out and make meat pies out of ";S$;"."  FR=2 "AGA=AGA+1 % * 44000 M=O;0;"GUARD";0;O;": We have a prisoner. ";M$ N'O;"wishes to exchange gold for life" P RCO;0;"KING";0;O;": how much does ";M$;" offer me?" S<Q;R;21,0;" Type in number of gold coins. " TK=4692T:A$ UA$=""4692T VB$=A$ WA$="SAVE"950 X 900 YA$>14685M Z'A$<480ůA$>5794685M ]$FR2ưA$>04770 ^A$04750 _A$>FR-24720p `FR-2>A$4750 aUO;0;"KING";0;O;": Very generous. Now go I want to count my gold." f FR=2 k 3008 p@O;0;"GUARD";0;O;": Sire ";M$; " does not own " rO;"that amount." t u>O;0;"KING";0;O;": Then take what ";M$;" has" xSE=1S$="his" z"O;"and off with ";S$;" head!"  FR=2  AGA=1  44000 SE=1S$="his" :O;0;"KING";0;O;": Off with ";S$;" head!"  FR=2  AGA=1  44000 EO;0;"GUARD";0;O;": Sire he has nothing to offer."   4750  ,"You have found a giant treasure chest. "; @Y$(A)="J""You hear moans and groanscoming from the chest. "; R;Q;"What now?" K=4808 A$ A$="SAVE"950  900 gA$="ZENOBI"BOT0O;0;"ZENOBI";0;O;": Why not open the treasure chest?" B$=A$ KA$="MOVE NORTH"A$="MOVE SOUTH"A$="MOVE WEST"A$="MOVE EAST"3030 A$="LIFT CHEST"A$="LIFT TREASURE CHEST"A$="MOVE TREASURE CHEST"A$="MOVE CHEST""The chest is heavy you cannot move it." CA$="OPEN CHEST"A$="OPEN IT"A$="OPEN TREASURE CHEST"4860  4800 !Y$(A)="C"FR>7Y$(A)="M" Y$(A)="C"4900$ Y$(A)="S"4930B Y$(A)="J"49120  Y$(A)="H"49208 Y$(A)="M"4908, $T"In the treasure chest you find two gold coins. You now have ";FR;" gold coins." & Y$(A)="M" (FR=FR+2 * 3000 , "The treasure chest is empty." . 3000 0b"In the chest you find a skeletonand a plaque with the following message inscribed on it:"::: 1*5;R;Q;" Here lie the bones " 2*5;R;Q;" of Samuel Jones " 3*5;R;Q;" purveyor to the trade " 4*5;R;Q;" of moans and groans " 6 3008 8"A disembodied head leers up at you. Its flesh on contact with the air turns green and peels away from the skull. The skull crumbles into a white powder which reacts with the air to form a cloud of foul smelling gas............" : <&6;Q;R;" HORRIBLE ISNT IT? " > Y$(A)="M" @ 3000 B^"The chest is bottomless and you see steps leading down to a room. ";R;Q;" What now? " DK=4932D FA$ HA$="SAVE"950 J 900 LA$="ZENOBI"5000 NKA$="MOVE NORTH"A$="MOVE SOUTH"A$="MOVE WEST"A$="MOVE EAST"3030 PSA$="CLIMB DOWN"A$="MOVE DOWN"A$="DESCEND STAIRS"A$="DESCEND STEPS"4948T R 4930B TM"You are in a bare room. On the Wall in front of you is a sign. It reads:" V:I;7;"This is the bottom";8;"That was the top";8;"This is the point";2;"where the steps always stop." X':11 ;Q;0;" WHAT NOW? " ZK=4954Z \A$ ^A$="SAVE"950 ` 900 bA$="ZENOBI"5000 dfA$="MOVE UP" A$="GO UP"A$="CLIMB UP"A$="CLIMB STAIRS"A$="CLIMB STEPS"A$="CLIMB OUT"4974n fKA$="MOVE NORTH"A$="MOVE SOUTH"A$="MOVE EAST"A$="MOVE WEST"4970j h 4948T j "You have bumped into a wall." lK nE"You have climbed out of the chest. ";Q;0;" WHAT NOW? " p 4932D  BOT=0K (O;0;"ZENOBI";0;O;": "; 0K=3010 K=4932DO;"You must move." CK=4120O;"The Treasure Serpents are attracted to gold." 4K=4255O;"The prison door is not locked." 4K=4290O;"You must distract the guards." SK=4954ZO;"There is nothing in herefor you. I suggest you climb outagain." FK=6030O;"You must move the stone to carry on your journey." <K=6145O;"You must move closer to the drawbridge." 7K=6315O;"You must give a coin or turn back." ;K=6395O;"You will have to climb down the rope." 8K=6555O;"You must swing across tothe tunnel." PU>0PU=PU-1 "Q;0;3,10 ;PU K p u:"Against the wall lies a stone slab. Inscribed on it:" x z.4;0;I;" YE TREASURE ROOM. " .4;0;I;" TRADESMANS ENTRANCE "  9 ;R;Q;"What Now?"  TRY=0 K=6030 A$ A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ TRY=TRY+1 -B$(14)=D$(1)6080  6090 MB$(69 )=D$(7)B$(69 )=D$(8)3030 .B$(610 )=E$(5)3030 *B$(610 )"STONE"6100 oB$(14)=D$(1)B$(14)=D$(10 )B$(14)=D$(11 )6130 "That will do no good." B=(*2)+1 B=2700 K "You find yourself in a large cavern. To the south lies a drawbridge. It is held up by well oiled chains. You will need" "it to help you cross the fast flowing river. At your feet stands a lever draped in cobwebs. ";R;Q;"What Now?"  TRY=0 K=6145 A$  A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ -B$(14)D$(1)6190. $.B$(610 )=E$(5)62008 ).B$(610 )=E$(6)6300 * 6130 .OB$(14)=D$(10 )B$(14)=D$(11 )6250j 3 6130 8D"You are back in the labryrinth. The stone door closes behind you" B 6026 j.B$(610 )=E$(4)6260t o 6130 tD"A trap door opens up and you areimpaled on a row of metal spikes" y 44000 <"You see a notice on the draw- bridge. By order of King" \"Shaggoth: all who pass must pay one gold coin. A skeletons hand reaches out for payment."  TRY=0 K=6315 A$ A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ A$="MOVE NORTH"6130 'B$(13)="PAY"6367 (B$(14)="GIVE"6365 TRY>06355 IO;0;"ZENOBI"; 0;O;": Stop dithering and pay the guy." B=(*2)+1 "B=2TRY1650 TRY=TRY+1 K MB$(69 )=D$(6)B$(69 )=D$(9 )6367  6346 FR>26371 dO;0;"ZENOBI";0;O;": I suggest we go back andfind some gold. You have none left." K FR=FR-1 *Q;0;4,28;FR-2 l7,0;"The drawbridge is lowered. When you reach the other side the keeper raises it again."  rO;0;"ZENOBI";0;O;": That king is really meanonly keeping a skeleton staff onsuch a busy bridge."  {"There is no obvious escape route from this cave. A rope hangs from the roof down into a pit. ";R;Q;"What Now?"  TRY=0 K=6395 A$ A$=D$(5)950  900 A$="ZENOBI"5000  B$=A$ -B$(15)=E$(7)64502 +B$(17)="DESCEND"6470F cTRY1O;0;"ZENOBI";0;O;": That was useless. If youneed my help I am here." TRY=1O;0;"ZENOBI";0;O;": Your wandering around like a duck suffering from a hernia. Cant you see I want to help you." (TRY=TRY+1 -K 2)B$(710 )="DOWN"6550 7]B$(710 )="ROPE"B$(78)="UP"B$(710 )=" "6500d < 6425 F_B$(9 12 )="ROPE"B$(9 11 )="PIT"B$(9 11 )=" "6550 K 6425 dTO;0;"ZENOBI";0;O;": What are you doing at the top of that rope?" iK "You have come to the end of yourrope. Everything is in darkness except for a tunnel to the south. It is bathed in a phosph-orescent glow. ";Q;R;"What Now?" K=6555 A$ A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ IB$(15)=E$(7)B$(710 )"DOWN"6385 -B$(14)=D$(1)6600 -B$(15)=E$(2)6650 "Try again." K J"Arrrggh**** You let go the rope and fell a thousand feet to yourdeath."  44000 .B$(711 )=E$(6)6700, pB$(711 )=E$(5)B$(710 )=D$(7)B$(710 )=D$(8)6680  6592 "**OUCH** You hit the wall." "K ,b"Well done. You managed to swing into the tunnel. There is no wayback. Your destiny lies ahead." 6 #N$(1)="3" #N$(2)=SE #N$(3)=TY #N$(4)=PH #N$(5)=SP #N$(6)=PU #N$(7)=WS #N$(8)=FR $N$(9 )=CU $!N$(10 )=(TR-(2+CU)) $""Your map referance number is: " $ 6N$;". Write down this number, you will need it." $3"To continue your adventure find and load map 4." $ %"********* BLACK CRYSTAL ********* ** PHYSICAL ** PURITY SPIRITUAL ** RINGS: GOLD *********************************" %0" " &N"MOVE","LIFT","TAKE","DROP","SAVE","GOLD","EAST","WEST","COIN","PUSH","PULL" & 9"THROW","SWING","OFFER","LEVER","NORTH","SOUTH","CLIMB" #  ********* BLACK CRYSTAL ********* ** PHYSICAL ** PURITY SPIRITUAL ** RINGS: GOLD *********************************ogr/, 1 MOVELIFTTAKEDROPSAVEGOLDEASTWESTCOINPUSHPULL(THROWSWINGOFFERLEVERNORTHSOUTHCLIMBAMAP 4 ؜ڜ "map 4" /BLACK CRYSTAL COPYRIGHT CARNELL SOFTWARE 1982 I:N$(10 ):B$(15):D$(12 ,4):E$(7,5) $23658j\,8:NSAVE=0  9700% ]MOV=6:DIAM=0:XS=6:YS=3:PATH=0:BRIBE=0:MUM=0 >LIF=0:SAVE=0.1}L:ZENOBI=0.3:GOLD=0: 5:0:5  O$(4):F(2) O$="2396" bKEY=0:LAMP=0:AXE=0:ABACUS=0:TRAP=0:DOOR=0:KING=0 bDOLO=0:TREE=0:WATER=0:UP=0:ACORN=0:CRACK=0:MAK=0  AR=1 .8;0;6;" BLACK CRYSTAL " P10 ,0;"Are you using a black and white television? Answer Y or N." A$= A$="Y"A$="N"33! 30 !A$="Y"COL=0 "A$="N"COL=1 #V10 ,0;"Please enter your map reference number: ----------. " &""38& (A$ -A$10 350^ 211 ,8;A$ 4A=1̱A$ 5,A$(A)<480ůA$(A)>579350^ 6A 7N$=A$ 8!N$(1)3350^ 96N$(2)<1ŰN$(2)>2350^ :6N$(3)<1ŰN$(3)>3350^ ;!N$(7)>2350^ 2350^ >"N$(10 )>0350^ FSE=N$(2) KTY=N$(3) PPH=N$(4) USP=N$(5) ZPU=N$(6) \WS=N$(7) _FR=N$(8) `CU=N$(9 ) bFR>2GOLD=FR-2 dTR=2+CU+N$(10 ) fCOL=0105i gBR=1:W=2:Z=3:O=4:I=5:J=6 h 1000 iBR=0:W=0:Z=0:O=7:I=7:J=7 n 1000 ^613 ,0;" YOU HAVE MADE A MISTAKE. " c$" TRY AGAIN. " hA$ mB=13 14 r/B,0;" " wB | 45- C=1TR R;J;4,C+8;"O" C   B=(*3)+1 B=3670 TRY=2710 TRY=3720 TRY=4725 TRY=5730 B=(*4)+1 !B=1SE=2700 B=1725 B=2705 B=3708 B=4710 dO;0;"ZENOBI";0;O;": Oh love of my life. If you need my help just call my name."  wO;0;"ZENOBI";0;O;": Come on. If you cant manage it yourself then let me help. Just call my name."  JO;0;"ZENOBI";0;O;": Thats useless. I know what to do."  SO;0;"ZENOBI";0;O;": Will you never learn? I am here to help you."  lO;0;"ZENOBI";0;O;": How embarrassing. Remember, if anybody passes I'm not with you."  6O;0;"ZENOBI";0;O;": Help you I can."  lO;0;"ZENOBI";0;O;": Gora must be desperate sending such a dumbo to search for the ring."  B=621 /B,0;" " B 6,0;" "  "map 4"1  "map 4"960  "SCREEN" K  "SCREEN" NSAVE=1 *0:0:J:23658j\,8  9700% NSAVE=0 K  K$(416) B=33!353a32 5K$(BB+31)=" " B K$(1)=" " K$(32 )=" " K$(385)=" " K$(416)=" " 0:0:J: 'R,J;0,0;X$(192) /TY=1R;J;2,2;"Warrior." $+TY=2R;J;2,2;"Elf." )9TY=3SE=1R;J;2,2;"Wizard." .<TY=3SE=2R;J;2,2;"Sorceress." 3TR>0500 8"J;0;3,10 ;PU =*J;0;2,28;FR-2 >6,0;" " Bq"You are in a tunnel leading south. You cannot move north dueto a bottomless pit. ";j;0;"WHAT NOW?" L TRY=0 QK=1105Q VA$ [A$=D$(5)950 ` 900 eA$="ZENOBI"5000 jB$=A$ o/B$(110 )="MOVE SOUTH"1150~ qTRY=TRY+1 t 650 v y 1090B ~q"You are at Sanctuary. You can see a tunnel to the south and a tunnel to the north. ";0;J;"What now?"  LIF=0  MUM=0  TRY=0 K=1160 J;A$ A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ -B$(14)=D$(1)1210 TRY=TRY+1  650 K .B$(610 )=E$(2)1090B .B$(610 )=E$(3)1230  1195  900 w"To the South you see a tunnel surrounded by a swamp. To the West you see a tunnel with a notice on the wall:" *I;0;" BEWARE OF SAND SHARKS "  O;0;"A Dwarf speaks to you";0;O;": I am the keeper of the secret path. Give me Diamonds and I will lead you across the swamp. If you have noDiamonds then seek them in the Sea of Sand." $J;0;"What now?" K=1255 J;A$ A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ A$="MOVE WEST"7000X  A$="MOVE SOUTH"7360 DB$(14)="GIVE"B$(15)="OFFER"1320(  1230 (KB$(612 )="DIAMOND"B$(713 )="DIAMOND"1340< -HO;0;"DWARF";0;O;": I want diamonds! I need diamonds!" 2K 5791340< ZA [A=A$ \A21390n _xO;0;"DWARF";0;O;": No! I need more diamonds to pay the rates King Shaggoth charges me for this cave." dK nADIAM1400x sRO;0;"DWARF";0;O;": You do not own that amount of diamonds." vK xwO;0;"DWARF";0;O;": Thank you. When you reachthe swamp to the South a path will be revealed to you." } DIAM=DIAM-A $J;0;3,28;DIAM BRIBE=1 K  900 R"You are in a cave filled with mummiefied bodies. A tunnel leads South. "; ;LIF=0"A mummy comes to life and confronts you."  MUM=1 LIF=LIF+1 K=1460 J;A$ A$=D$(5)950  900 A$="ZENOBI"5000 B$=A$ )A$="MOVE SOUTH"LIF=11530 A$="MOVE SOUTH"1600@ A$="MOVE NORTH"7360 LIF=11530 Y0;O;"ZENOBI";O;0;": Do something before thatmummy kills both of us.":K  900 @"The mummy tries to follow you but it sinks into the swamp."  LIF=LIF+1  MUM=0  7365  900 $"The Mummy strangles you to death"   9650% J;A$ A$=D$(5)950  900 A$="ZENOBI"5000 A$="NO"1640h A$="WHY"1645m A$="MOVE NORTH"1425 A$="MOVE SOUTH"1700  K+15 @ 900 B("You see a Demon. It speaks to you:" E JO;"Welcome visitor. You are just intime to help me. I need gold from my gold mine. I need it to pay rent to that miserly King ofthe Shaggoths. Will you help me?" OK=1615O Y 1550 ^A$="YES"7700 c 1600@ hCO;0;"DEMON";0;O;": You must help, I command you." iK=8060|8032` j 1550 mPO;0;"DEMON";0;O;": No not that accursed wordARRRRGGGGHHHHHHH." p rlO;0;"ZENOBI";0;O;": Well done you have sent the Demon of Pointless Tasks back to Hell." w |"The cave begins to collapse" ~*"leaving you only one exit to theSouth." K=1665 J;A$ A$=D$(5)950  900 A$"MOVE SOUTH"1660|  3000 }"Well done you have found enough inner strength to resist the Demon of pointless tasks but youare still in trouble....."  3000 ]"You fall down a pit and land with a jolt in a large cavern. The only exit lies north." 3010 >"You are in a large cavern. The only exit is to the north." #J;0;"WHAT NOW?" K=3015 A$ A$="SAVE"950 900 A$="ZENOBI"5000 B$=A$ (B$(14)="MOVE"3050 3008 *B$(610 )="NORTH"3070 hO;0;"ZENOBI";0;O;": What do you think you are doing blockhead? The way outis north." K }"To the north you see a bridge over a river of molten rock. To the east you see a tunnel leading to another cave."; NAR=2" In front of you is the cavern at the bottom of the pit." AR=1 K=3075 A$ A$="SAVE"950  900 A$="ZENOBI"5000 A$="CROSS BRIDGE"31299 !B$=A$ &(B$(14)="MOVE"31200 + 3070 0*B$(610 )="NORTH"3130: 2*B$(610 )="SOUTH"3008 4(B$(69 )="EAST"3300 5XB$(69 )="WEST"O;0;"ZENOBI";0;O;": Watch that wall twit." 6 7 3070 :"A giant block of crystal appearsand cuts you off from the bridgeWithin the crystal you see the dark shape of a demon. The demonspeaks:" < =COUNT=0 ?PO;0;"I am the guardian of Kannandrah,the bridge over the lake of fire" DB=(*4)+1 FCOUNT=COUNT+1 I A=O$(B) N80;O;"I give you the number ";0;O;A;"." SD0;O;"To pass you must give me the number of the beast"; T$COUNT>50;O;" 666"; U"." XK=3160X ]A$ `A$=""3165] bA$="SAVE"950 dA$=""3165] g 900 lA$="ZENOBI"5000 qB$=A$ v(B$(14)="MOVE"3290 {B=A$ C=1B -B$(C)<480ůB$(C)>5793150N C C=A$ A=A*C A<6663230 A=6663240 A>6663235 60;O;"DEMON";0;O;": That gives me ";A 0;O;"I give you ";A 60;O;"Now give me the number of the beast"; $COUNT>50;O;" 666" 3165] dO;0;"DEMON";0;O;": That is more than the number of the beast. You cannot pass." 3075 i0;O;"DEMON";O;0;": 666: You have given me the number of the beast, you may cross." K=3245 A$ A$="SAVE"950 900 A$="ZENOBI"5000 A$"CROSS BRIDGE"3275 AR=13340 AR=23070 A$="MOVE NORTH"3340 (A$="MOVE SOUTH"AR=23070 (A$="MOVE SOUTH"AR=13008 'A$="MOVE EAST"AR=13300 3240 'A$="MOVE EAST"AR=13300 (A$="MOVE NORTH"AR=23340 (A$="MOVE SOUTH"AR=13008 3150N U"You are in a cavern with only one exit. On the wall you see a notice. It reads:"  N1;J;" ";J;0;" CAVE TO LET ";1;J;" " 01;J;" Spacious damp proof cave with " 01;J;"underfloor lava central heating." 01;J;" Only 5 gold bits per week. " 01;J;" Applications to " P1;J;"His magnificent, wise, generous,courageous, modest, merciful " 01;J;" Royal Highness " 0J;1;" King Shaggoth. " -1;" " 0J;0;"Bill stickers will be prosecuted" K=3320 A$ A$="SAVE"950 900 A$="ZENOBI"5000 A$="MOVE WEST"3070  3300 "You are in a large cavern. The only exit leads south to the bridge. The cavern is empty except for a large mirror fixed into the north wall."  AR=2 K=3345 A$ A$="SAVE"950 900 "A$="ZENOBI"5000 %A$="MOVE SOUTH"3130: *(A$="SHIELD FORWARD"A$="L"33804 ,1A$="BREAK MIRROR"A$="SMASH MIRROR"33760 / 3340 1O;0;"ZENOBI";0;O;":Thats an enchanted mirroryou cannot smash it. You could destroy the earth and the mirrorwould remain unharmed." 2 3350 4"You are slowly drawn into the mirror. You find yourself movingthrough infinity, a black time- less void. Suddenly you come to rest on a stone floor within thedimly lit treasure chamber." 9 A=68D >K=3390> CA$ F C=0 GRANDO=(*4)+1 HA$="SAVE"950 M 900 RA$="ZENOBI"5000 T(A$="RUB LAMP"LAMP>03645= WA$="MOVE NORTH"C=-9 \A$="MOVE SOUTH"C=9 aA$="MOVE WEST"C=-1 fA$="MOVE EAST"C=1 hR$(A+C)"20"3440p jcO;0;"ZENOBI";0;O;": Watch out for that wall or you will knock your brains out." lK pA=A+C r,1;J;" ROOM ";0;J;" ";R$(A) v "Exits: "; x R$(A-9 )"20""**NORTH"; z R$(A+9 )"20""**SOUTH"; |R$(A+1)"20""**EAST"; ~R$(A-1)"20""**WEST"; "**"  A=59;3665Q $A=535KEY=03550 A=32 3950n A=4803800 A=70F3600 *RANDO=3ABACUS>03705y 3395C A$="SAVE"950 900 A$="ZENOBI"5000 KA$="MOVE NORTH"A$="MOVE SOUTH"A$="MOVE EAST"A$="MOVE WEST"3415W K+15 +"You see a key. ";1;J;"WHAT NOW?" K=3555 A$ 3505 A$="TAKE KEY"3585 EA$="GET KEY"O;0;"ZENOBI";0;O;": Get it yourself." A$="GET KEY"3560 3550 ."You have the key. ";1;J;"WHAT NOW?"  KEY=1  3390> LAMP>03390> "You see a genies lamp." K=3610 A$ $ 3505 )A$="TAKE LAMP"36353 . 3605 3B"You are now owner of a genies lamp. ";1;J;"WHAT NOW?" 5LAMP=1 8 3390> =;O;0;"LAMP";0;O;": Get off! That tickles." @ B'ABACUS>0O;0;"ABACUS"; D'ABACUS=0O;0;"ZENOBI"; GE0;O;": Its no use rubbing him. His genie vacated long ago." L 3390> QABACUS>03390> V1"You see a golden abacus standingon the floor." [K=3675[ `A$ e 3505 jA$="TAKE ABACUS"3700t o 3670V t"The abacus screams:" v y C=0 zABACUS=0O;0;"ABACUS";0;O;": Oh dear me. You startledme. I was having a sleep. I am the kings abacus. I help the king with his accounts. Can I add something for you? Come on, come on, give me a number." {)ABACUS>0"The abacus stops you." | }gABACUS>0O;0;"ABACUS";0;O;": Give me a number. Go on give me a number to add." ~K=3710~ A$ A$="SAVE"950  900 A$="ZENOBI"5000 B$=A$ (B$(14)"MOVE"3745 "The abacus pulls at you."  HO;0;"ABACUS";0;O;": Dont go. Please give me a number." K D=1̱A$ *A$(D)<480ůA$>5793750 D A$>53755  3760 ;O;0;"ABACUS";0;O;": Only numbers please." K O;0;"ABACUS";0;O;": Oh dear, I dont want to create a fuss but I cant cope with such large numbers. I am getting on a bit and I have lostsome of my beads." K  C=C+1  F(C)=A$ C=23770 ZO;0;"ABACUS";0;O;": Now give me another number to add to the first." K aO;0;"ABACUS";0;O;": The answer is ";F(1)+F(2)+(*10 )+1 q0;O;"No that cant be right I will tryagain. The answer is ";F(1)+F(2)-(*10 )+1 @0;O;"No sorry its ";F(1)+F(2)+(*3) MABACUS=0O;"I will come with you and solve more problems for you." ABACUS=1  C=0  3390> ?"You see stairs leading up and infront of you a locked door." K=3805 A$ A$="SAVE"950  900 A$="ZENOBI"5000 :A$="OPEN DOOR"A$="UNLOCK DOOR"A$="USE KEY"3860 EA$="CLIMB STAIRS"A$="MOVE UP"A$="GO UP"A$="CLIMB UP"3880( A$="MOVE NORTH"3415W  3800 KEY=13865 MO;0;"ZENOBI";0;O;": You will need a key to open the door." K "The door opens and you walk intothe treasure room. In the room you see a fountain, an oak tree with golden acorns and wedged ina crack in the wall you find the Ring of Time."  4010 (\"You come to the top of the stairs. You can hear voices. Above you is a trapdoor." *K=3882* ,A$ .A$="SAVE"950 0 900 2A$="ZENOBI"5000 4=A$="GO DOWN"A$="MOVE DOWN"A$="DESCEND STAIRS"3800 7/A$="OPEN DOOR"A$="OPEN TRAPDOOR"38979 8 3880( 9KING>0"Its no use. The door is locked. King Shaggoth is still trying torecover from his fall and he is making sure it does not happen again." :KING>0K <"You manage to get your hand" = "through a gap in the door to" >"free the latch. The door opens with a crash. The king of the Shaggoths falls through the doorand tumbles down the stairs." @ABAcUS>0"The abacus falls over the edge of the stairs. You can hear the abacus screaming:";O;" My beads! my beads! I've lost more of my beads." Ac"The last cry you hear is the king of the Shaggoths shouting ";O;" **OFF WITH HIS HEAD!**" CKING=1 F&J;0;"PRESS ENTER" KK=3915K PA$ UA$="SAVE"950 Z 900 _O;0;"GORA";0;O;": You did not die. I spirited you away from the Shaggoths. In this room in the Treasure Chamber I have set up Sanctuary. The stairway is King Shaggoths secret route to the Treasure Room." ` afABACUS>0O;0;"ABACUS";0;O;": He saved me as well. He even put my beads back." d 33859 nAXE>03390> p"You see an axe" rABACUS=03965} s v1O;0;"ABACUS";O;0;": Hello axe." x zlO;0;"AXE";0;O;": Oh hello Ab. Do you like mynew head? Just had it sharpend this morning." }K=3965} A$  3505 A$="TAKE AXE"3990  3952p "You have the axe."  AXE=1  3390> K=4010 A$ B$=A$ A$="SAVE"950  900 A$="ZENOBI"5000 UP>04082 A$="MOVE NORTH"4100 xA$="CHOP TREE"A$="FELL TREE"A$="CUT TREE"B$(19 )="CHOP DOWN"B$(18)="CUT DOWN"4130" ʅLAMP>0A$="RUB LAMP"0;O;"LAMP";O;0;": Get off! You wont get any-thing out of me. My Genie left years ago." A$="TAKE WATER"4230 "B$="PLEASE MAY I HA"4240 *A$="CLIMB TREE"A$="UP TREE"4265 wA$="TAKE RING"A$="PULL RING"A$="FREE RING""The ring is wedged tightly in the crack. Pulling will do no good." :A$="OPEN DOOR"A$="UNLOCK DOOR"A$="USE KEY"4100 -A$="USE ACORN"A$="PLANT ACORN"4355 ;A$="WATER ACORN"A$="WET ACORN"CRACK>04490 /B$(110 )="TAKE ACORN"4310 bA$="DOWN TREE"A$="DESCEND TREE"A$="JUMP DOWN"A$="CLIMB DOWN"A$="CLIMB DOWN TREE"4340 *UP>0"You are still up the tree."  1O;0;"ZENOBI";O;0;": Try again."  4010 DOLO=04115  K0;O;"ZENOBI";0;O;": The door is bolted from the outside." K l"The door slams shut and you can hear the king of the Shaggoths on the other side chuckling to himself." DOLO=1 K "AXE>041451 'WABACUS>00;O;"ABACUS";0;O;": You should have brought the axe." ) ,IO;0;"ZENOBI";0;O;": Only the axe can fell a great Oak." .K 1TREE=04160@ 6("Another tree falls and more growup." ;K > 900 @YO;0;"FOUNTAIN";0;O;": Oh no! he's chopping down the kings golden Oak." E OP"The great tree falls and its acorns grow into a forest of golden Oaks." T Y~O;0;"FOUNTAIN";0;O;": How nice. I've always wanted to be set in an enchantedforest just like my great great" ^ A=0 cB=15 hO;"great "; mB o r A=A+1 tA<24195c w5O;"grandfather the Fountain of Eternal Youth." |TREE=1 K O;0;"FOUNTAIN";0;O;": Just what do you thinkyou are up to? If you want watersay **PLEASE MAY I HAVE WATER?**It costs nothing to be polite." K WATER=04250 CO;0;"FOUNTAIN";0;O;": Want more? You are greedy." K !"The Fountain gives you water." WATER=1 K UP=04275 K NO;0;"FOUNTAIN";O;0;": Gasp.... he's climbingthe kings tree."  dABACUS>0O;0;"ABACUS";0;O;": The king will murder us all if he finds out."  #"You are at the top of the tree."  UP=1 K UP>04325 "You cant reach." K "You have a golden acorn." ACORN=1 K "You are down the tree."  UP=0 K ACORN>04370 "You do not have an acorn."  K *"Where do you wish to plant the acorn?" K=4375 A$ A$="SAVE"950 ! 900 &A$="ZENOBI"5000 +A$"FOUNTAIN"4410: 0B"A tree grows in the fountain and the fountain is not pleased." 2acorn=0 5 4010 :$A$="GROUND"A$="FLOOR"4450b D+A$="CRACK"A$="WALL"A$="GAP"4470v N 4370 b"A large Oak springs up." gACORN=0 l 4010 v."You have wedged the acorn into the crack." x MAK=1 {CRACK=1 ACORN=0  4010 WATER>04500 *"You must collect some water first."  4010 l"The acorn begins to grow. The wall cracks and then explodes. You are now master of the Ring of Time." TR=TR+1  "Gora speaks to you:" O;"Do not resist my power. Call my name and I will spirit you from this place. I have sealed the exits so the king cannot pursue you." K=4520 A$ A$="SAVE"950 &A$="GORA"A$="CALL GORA"4550  900  4510 0:J: "You see tears running down"  "Zenobi's impish little face."  v0;O;"ZENOBI";0;O;": I cannot follow you to the outside world. Goodbye friend I will miss you."  5"The cave fades away and you findyourself outside."   9201#  O;0;"ZENOBI"; EK=1105QK=11600;O;": You can only move South." UK=1255DIAM20;O;": Pay the Dwarf if you value your life." [K=1255DIAM<20;O;": I suggest we move West in search of diamonds." AK=1345A0;O;": Offer him at least two diamonds." K=1460LIF=10;O;": The Mummy is almost indestructable. I suggest we retreat back across the swamp." _K=1460LIF10;O;": The object of your questwill be found to the South." UK=1615OK=3160X 0;O;": I cannot help you against a Demon." /K=3015 O;": You can only move north." ڕK=3075 K=3805K=3882*K=3555 K=3610K=3675[K=3245 K=3320 K=3390> O;": I can see no problems." K=3345 O;": The Mirror of Infinity will transport you to the Treasure Chamber. To use the mirror you must create a reflec-tion within a reflection by holding your shield forward." UK=3710~O;": Give him a number and then we might get on with the quest." <K=4010O;": Tall Oaks from little acorns grow "; ;K=4010MAK=1O;"but not without water." PU>0PU=PU-1 "J;0;3,10 ;PU K X 900 ]6"You stand before the Sea of SandUse keyS 18move." ^ _713 ;"1 7 2",13 ;"5 + 8",13 ;"3 6 4" ` b8"To enter the sea press Key 5. Togo back press key 8." c MOV=6 dK=7012d g=""7015g lA$= qA$="8"1225 vA$="5"7050 {A$="S"950  7015g X$(688)="" -J;0;6,0;X$(193) $W;7;20,15;"*" A=656:U(3) B=13 U(B)=(*400)+196 X$(U(B))""7060 B &X=20:Y=15:K=7070 A$= M=X N=Y #A$="5"A$="1"A$="3"N=N-1 #A$="6"A$="3"A$="4"M=M+1 #A$="7"A$="1"A$="2"M=M-1 #A$="8"A$="2"A$="4"N=N+1 A$="S"950 A$=""7070 A=6567122 "M<6M>207160 "N<1N>307160  X,Y;X$(A) W;7;M,N;"*" X=M Y=N A=(X*32 )+Y+1 B=13 A=U(B)7300 B A=6887000X MOV67180  XS=(*14)+6 YS=(*28)+2 XS=XYS=Y7165  MOV=0  -J;0;6,0;X$(193)  W;7;X,Y;"*"  XM=0  YM=0 B=12 XS>XXM=XM-1 XSYYM=YM-1 %YSJ;W;XS+XM,YS+YM;"" CXS+XM=XYS+YM=Y9500% HB \ XS=XS+XM a YS=YS+YM dMOV=MOV+1 f 7070 DIAM=9 7160 DIAM=DIAM+1 C=110 (.05|L,-5:.05|L,-7 I;R;X,Y;"" :.05|L,8:.05|L,9 :.05|L,12 W;7;X,Y;"*" .05|L,-3 C $J;0;3,28;DIAM U(B)=0  7160  900 ?"You are facing the swamp. Use Keys 1 to 8 to move across."  713 ;"1 7 2",13 ;"5 + 8",13 ;"3 6 4"  5"Press Key 5 to continue. Press Key 8 to go back." K=7384 =""7385 A$= A$="5"7399  A$="8"LIF=11530  A$="8"MUM=11425 A$="8"1225 A$="S"950  7385 B=717 A1;7;B,0;" " B G1;7;6,0;" " H1;7;18,0;" " PATH=17440 B=(*30)+32  K$(B)="" C=110 AA=(*3)+31 K$(B+AA)=" "7415 B=B+AA  K$(B)=""  C  PATH=1 6BRIBE=11;7;6,0;K$ BRIBE=0 MUM=17470.  X=18  Y=16 " A=400 $ 74808 . X=6 0 Y=16 2 A=16 8W;7;X,Y;"*" <K=7482: ==""7485= BA$= GM=X LN=Y Q#A$="5"A$="1"A$="3"N=N-1 V#A$="6"A$="3"A$="4"M=M+1 [#A$="7"A$="1"A$="2"M=M-1 `#A$="8"A$="2"A$="4"N=N+1 eA$="S"950 jM=5MUM=1 k#M=5LIF11425 l#M=5LIF=11530 mM=5MUM=0 n$M=19LIF17360 p$M=19LIF=11510 t"N<1N>307485= v"M<5M>197485= y1;7;X,Y;K$(A) ~W;7;M,N;"*" $A=((M-6)*32 )+N+1 X=M Y=N K$(A)=""7600  7485= B=110 7;0;X,Y;"" (.05|L,-5:.05|L,-7 :.05|L,8:.05|L,9 :.05|L,12 37;0;X,Y;"":.05|L,-3:B J1;7;X,Y;"":20,0;"You sank into the swamp." C=1200:C  9650%  900 "You are now facing the gold mineUse the arrow Keys 5 to 8 to digfor gold. Press Key 1 to begin but beware of the terrible flesheating Rock Snakes and the foolsgold." K=7708 A$=  A$="S"950 #A$"1"7710 - X=20 . Y=15 0 MOV=1 1 S(2) 2 P(2) 3 T(2) 4)P(1)=7:P(2)=10 6)T(1)=15:T(2)=3 8+S(1)=480:S(2)=132 AGO1=(*400)+1 FM$(GO1)=""7745A KGO2=(*400)+1 P!M$(GO2)=""GO2=GO17755K UM$(GO1)" "M$(GO1)="" ZM$(GO2)" "M$(GO2)="" _!0;J;6,0;M$ dW;7;X,Y;"*" i A=464 nK=7790n sA$= xA$="S"950 }M=X N=Y A$="5"N=N-1 A$="6"M=M+1 A$="7"M=M-1 A$="8"N=N+1 %MA=((M-6)*32 )+N+1 M$(MA)=""7878  M$(A)="" 0;J;X,Y;"" X=M Y=N W;7;X,Y;"*" A=MA A=GO1A=GO27980, A=S(MOV)7950  XM=0  YM=0 P(MOV)>XXM=-1 XM=-1I$="" P(MOV)YYM=-1 T(MOV)579350^ 6A 7N$=A$ 8!N$(1)1350^ 96N$(2)<1ŰN$(2)>2350^ :6N$(3)<1ŰN$(3)>3350^ ;!N$(7)>2350^ 2350^ >"N$(10 )>3350^ FSE=N$(2) KTY=N$(3) PPH=N$(4) USP=N$(5) ZPU=N$(6) \WS=N$(7) _ FR=2 `CU=N$(9 ) d,TR=N$(8)+N$(9 )+N$(10 ) n 2000 ^?4;13 ,0;" YOU HAVE MADE A MISTAKE. " c-4;" TRY AGAIN. " hA$ mB=13 14 r/B,0;" " wB | 45- C=1TR J;T;4,8+C;"O" C  B=621 /B,0;" " B 0;6,0;" "  "map 5"1  "map 5"960  "SCREEN" K  "SCREEN" NSAVE=1 *0:PCOL:ICOL:23658j\,8  9700% NSAVE=0:ICOL=J K COL=0990 cR=7:W=0:T=1:G=2:H=3:O=4:L=5:J=6:Q=2  cR=7:W=0:T=0:G=0:H=0:O=7:L=7:J=7:Q=7  PH01250  RET=1 PH=PH-1 -:O;"You swing your sword up."::502 REND11013 6W=1W=5W=6W=144280 REND21015 JW=1W=5W=6W=7W=8W=144260 REND31018 ?W=1W=5W=6W=7W=84270 W=144280 REND41020 "W=1W=144270 W=24300 !W=1W74250  1250 PH01250 PH=PH-1  RET=1 3:O;"You thrust your sword forward."::502  %REND=4W=144280 !REND>21060$ "@W=1W=8W=11 W=5W=64330 $REND31063' &!W=1W74250 '9W=1W=5W=6W=7W=L4260 ) 1250 .PH01250 0PH=PH-1 3 RET=1 :/:O;"You swing your sword down."::502 = 1250 BPHPTPH=PT SP>STSP=ST "0;J;2,28;PH  "0;J;3,10 ;PU %"0;J;3,28;SP * 500 / J:0 4 2150f 9PU09300T$ :SP=ST:PH=PT <"0;J;3,28;SP ="0;J;2,28;PH > 900 @/7,0;"You are back at Sanctuary." H J MAR=1 M 2170z f0;6,0;" " kTR=6L;"GORA: Time is running out for you. Even as we speak the Lords of Chaos are riding towards Earth." p z"You face the bridge over the Abyss of Fear. Use key 0 to begin; key 1 to leave the templeUse keys 5 to 8 to move. Use key Q for sword. Key Z fires lightning bolt." {MAZE=0 |K=2172| =""2175 A$= A$="S"950 A$"1"2200 0:J:0:  9200# A$="0"2210  2172| 'MAR=1DO=(*30)+1 )MAR=2DO=(*29)+458 )MAR=1MA=(*10 )+458 'MAR=2MA=(*30)+1 !0:L:6,0;X$  DR=33!  DY=7  DX=0 MAR=1Y=20 MAR=2Y=6 MAZE=0 'X=MA-(((Y-6)*32 )+1) 0;L;Y,X;"*" "C$(1)="":C$(2)="" V=O:P=0 V;P;DY,DX;C$(1) ܇0;O;10 ,21;"BEWARE",11 ,19;"THE ABYSS",12 ,21;"SPAWNS",13 ,17;"MAGIC DRAGONS" ICOL=L K=2270 A$= M=X N=Y A$=""2385Q A$="S"950 'A$<535ůA$>5682385Q A$="5"M=M-1 A$="6"N=N+1 A$="7"N=N-1 A$="8"M=M+1 V;P;DY,DX;C$(2) "M>31M<02385Q "N<6N>202385Q $A=((N-6)*32 )+M+1 $X$(A)=" "2710 )A=DR2500 .MAR=1A=DO3000 3MAR=2A=DO2106: 8 Y,X;X$(MA) =0;L;N,M;"*" BY=N GX=M LMA=A QV;P;DY,DX;C$(2) R"C$(1)="":C$(2)="" SOY=DY:OX=DX TDM=DR VDY>YDY=DY-1 [DYXDX=DX-1 bDX>XC$(1)="" cDX>XC$(2)="" eDX0L=0 5X$(((DY+C-6)*32 )+DX+D+1)=""F=L C=02546 ?1,8;2;DY,DX;A$:F;2;DY+C,DX;A$ HB=110 :1;L;2;DY+C+C,DX;"";DY+C+C,DX;"" <0;L;2;DY+C+C,DX;"";:L;DY+C+C,DX;"":B !6,0;X$:2550 F;2;DY,DX+D;A$ `B=110 :L;2;DY,DX+D+D;"";DY,DX+D+D;"_";DY,DX+D+D;"";DY,DX+D+D;"":B 6,0;X$ COL=0L=7 COL=1L=5 MAZE=121059 M0;O;12 ,18;"YOU HAVE BEEN";14,21;"ROASTED" B=1200 B 900  21059  C=0  D=0 A$="Z"SP02385Q A$="Q"PH02385Q -MA-DR=-64@MA-DR=-32 C=-1 *MA-DR=64@MA-DR=32 C=1 "+MA-DR=-2MA-DR=-1D=-1 $(MA-DR=2MA-DR=1D=1 (C=026102 - 2620< 2D=02385Q 4A$="Z"C0C$="" 5A$="Z"D0C$="" 6A$="Q"C0C$="" 7A$="Q"D0C$="" 8 F=0 :-X$(((Y+C-6)*32 )+X+D+Y)=""F=L <;L;2;DY+C,DX+D;C$(1);DY+C,DX+D;C$(2) A1;2;DY,DX;"" B2DY61;2;DY-1,DX;"" C3DY211;2;DY+1,DX;"" D2DX01;2;DY,DX-1;"" E3DX311;2;DY,DX+1;"" F6,0;X$ KL;0;Y,X;"*" P DR=33! UDX=0:DY=7 dA$="Q"PH=PH-1 iA$="Z"SP=SP-1 n"J;0;2,28;PH s"J;0;3,28;SP 2385Q L;Y,X;" " 6,0;X$ 0;O;11 ,19;"YOU HAVE";12 ,20;"FALLEN";13 ,19;"INTO THE";14,21;"ABYSS" 2560 MAR=2 J:0 56,0;"" A=720 /A,0;" " A .12 ,0;" ";12 ,31;" " 621,0;"" MAR=2MA=194 MAR=3MA=223 Y=12 'X=MA-(((Y-6)*32 )+1) Y,X;"*" DR=0 E=0 MAZE=1 K=3070 A$=  E=E+1 E>502E=0 #E=502DR=03410R A$="S"950 A$="C"WS03370* 'A$<535ůA$>5683180l &M=Y +N=X 0A$="5"N=N-1 5A$="6"M=M+1 :A$="7"M=M-1 ?A$="8"N=N+1 @#M=12 N=314000 B"M=12 N=02210 D"M<7M>203180l J$A=((M-6)*32 )+N+1 NO$(A)=""3310 S Y,X;" " TA=DR21059 X M,N;"*" ]MA=A bY=M gX=N lDR=0K qDM=DY vDN=DX x C$="" {DMYDM=DM-1 DNXDN=DN-1 DN>XC$="" 'DA=((DM-6)*32 )+DN+1 O;DY,DX;C$(2) O$(DA)=""3265 DY,DX;" " O;DM,DN;C$(1) DY=DM DX=DN DR=DA DR=MA21059 A$= A$="Q"A$="Z"3450z 1MA-DR=-64@O$(MA+32 )=" "2530 0MA-DR=64@O$(MA-32 )=" "2530 /MA-DR=-2O$(MA+1)=" "2530 .MA-DR=2O$(MA-1)=" "2530 K AA=(*40()+1 AA<37%K B=16 1;Q;DM,DN;"" Q;DM,DN;"_" 1;Q;DM,DN;"" 1;Q;DM,DN;"" DM,DN;" " B O$(DA)=" " K B=16 L;M,N;"." L;M,N;"*"  L;M,N;""  L;M,N;"." L;M,N;"*"  M,N;" " B K *SP03180l /)L;Y-1,X-1;O$(MA-33!) 0!L;Y-1,X;O$(MA-32 ) 1)L;Y-1,X+1;O$(MA-31) 2 L;Y,X-1;O$(MA-1) 3 L;Y,X+1;O$(MA+1) 4)L;Y+1,X-1;O$(MA+31) 5!L;Y+1,X;O$(MA+32 ) 6)L;Y+1,X+1;O$(MA+33!) 9SP=SP-1 >PU>0PU=PU-1 C"J;0;3,10 ;PU H"J;0;3,28;SP M 3180l RDR=194 W DY=12 \ DX=1 aO;DY,DX;C$(1) f E=0 k 3080 z C=0 | D=0 A$="Z"SP03255 A$="Q"PH03255 A$="Z"SP=SP-1 A$="Q"PH=PH-1 ,MA-DR=-64@MA-DR=-32 C=1 +MA-DR=64@MA-DR=32 C=-1 *MA-DR=-2MA-DR=-1D=1 )MA-DR=2MA-DR=1D=-1 1O$(((Y-6+C)*32 )+X+D+1)=""K C=03495 3496 D=0K A$="" B=12 Q;DY,DX;"*";DY,DX;A$ (DY7Q;DY-1,DX;A$ )DY20Q;DY+1,DX;A$ (DX1Q;DY,DX-1;A$ )DX30Q;DY,DX+1;A$ A$=" " B Y,X;"*" "J;0;2,28;PH "J;0;3,28;SP DR=0 K  900 TR74050 fJ;"The great hall is in ruin. The way foward is blocked. To go back into the maze press key 0."  MAR=3 K=4030 =""4035 A$= A$="S"950 A$="0"3005 K TR=64100 װ"The Fire Demon confronts you. From a ring on its outsretched finger shoots a spear of flames.You have not the power to protect yourself. You have been incinerated."  "You are back at Sanctuary."  2160p  W=0  W=10 21059 W=9 5000 K=4115 REND=(*4)+1  RET=0 B=1502:A$= A$""4123 B  900 A$="S"950 PH04134& &SP04137) )A$="Q"1000 ,A$="R"1044 1A$="U"1070. 6A$="P"1090B ;A$="A"1130j @A$="L"1155 EA$="Z"1185 ORET=01250 P"J;0;2,28;PH Q"J;0;3,28;SP R 400 T 4105  hB"You see the dark shape of the fire demon coming towards you." j W=1 m r;"The Demon brings its burning sword down towards you." t W=2 w |9"The Demon tries to crush you with its cloven hoof." ~ W=3  $"The Demon spits fire down on you"  W=4  W"Black foul smelling blood pours from the wound. The Demon uttersblasphemous words."  W=5  "You wound the Demon."  W=6  ""The Demons shield protects it."  W=7  "The Demon avoids your blow."  W=8  Q"You have slain the Demons mortalbody. Its spirit retreats back to the abyss."  W=9  300,  *"You have been slain by the Fire Demon."  W=10  100d  "Swords clash together."  W=11  ""Your shield deflects its blow."  W=12  0"The Demon thrusts its sword towards you."  W=13  !"The Demon falls to its knees."  W=14   900 TR=TR+1  500 RING=0  O;0;"GORA";0;O;": I do not understand what is happening but I cannot stay in contact with you. Time is being distorted. You must use two word commands."  "Gora fades away. You hear a cry for help coming from an up- stairs room. Its a damsel in distress. ";0;j;"WHAT NOW?" K=5055 A$ A$="SAVE"950  900 EA$="MOVE UP"A$="GO UP"A$="CLIMB STAIRS"A$="CLIMB UP"5300 t"The Temple has partially collapsed and you seem to be trapped. The damsel continues toscream for help."  5055 "You have entered the room only to find that the damsel in distress was a Demon. The Demon fades away leaving you alone." WS15350 d"Inscribed on a wall you see an evil spell that summons five Demons to incinerate your enemy." !"To use the spell press key V."  WS=2 #10 ;j;0;"WHAT NOW?" K=5360 A$ A$="SAVE"950  900 RING=RING+1 "MA$="GO DOWN"A$="MOVE DOWN"A$="CLIMB DOWN"A$="DESCEND STAIRS"5500| '8A$="USE RING"A$="TIME RING"A$="USE TIME"5600 ,"You are still in the room." .3RING>10 "The Time Ring glows and vibrates" 1 5350 |g"The stairs have gone. The room is floating through time and space.";j; 0;"WHAT NOW?"  5360 ?"The room fades away and you findyourself back in the swamp."  #N$(1)="5" #N$(2)=SE #N$(3)=TY #N$(4)=PH #N$(5)=SP #N$(6)=PU #N$(7)=WS #N$(8)=FR $N$(9 )=CU $N$(10 )=(TR-(FR+CU)) $""Your map referance number is: " $ 6N$;". Write down this number, you will need it." $3"To continue your adventure find and load map 1." $ $T 0:0:6: $V $Y\10 ,0;"Your soul is lost to the dark lands. You have failed on your quest." $^ % %A=07 % B:"A"+A,B % B:"B"+A,B % B:"C"+A,B % B:"D"+A,B % B:"E"+A,B % B:"F"+A,B % B:"G"+A,B % B:"H"+A,B % B:"I"+A,B % B:"J"+A,B % B:"N"+A,B & B:"O"+A,B & B:"P"+A,B & B:"U"+A,B & B:"T"+A,B & B:"R"+A,B & B:"K"+A,B & B:"L"+A,B & B:"M"+A,B & B:"S"+A,B &A &NSAVE=1 &B$(192) &B$(192) &HO$(512) &\O$(512) &pX$(512) &uX$(512) & &A001110008,00011100,00100100$,001110008,00011100,00100100$,00011000,00001000,00001100 ,11000000,00000011,00011000,01000000@,00000000,00011000,00000000,00000000,00000000,00010000,00010000 &A10011001,10011001,10011001,00011000,00011000,00011000,01011000X,00010000,00010000,11100000,00000111,00011000,01000000@,00000010,00011000,00000000,00000000,00010000,00001000,00100000 &A11011011,11011011,11011011,00111100<,00111100<,00111100<,01011100\,00010001,00001001 ,01110000p,00001110,00011000,01000000@,00010010,00011000,00000000,01000011C,00101011+,00000100,01000000@ &A11111111,11111111,11111111,00111100<,00111100<,00111100<,00111010:,10010001,01001001I,001110008,00011100,00011000,00101000(,00100010",00011000,11111111,10101100,10101100,00011000,001100000 &A11111111,11111111,11111111,00111100<,00111100<,00111100<,00111010:,01010101U,10001001,00011100,001110008,00011000,00100100$,01001010J,00011000,11111111,00101000(,01000000@,00100000 ,00001000 &A11011011,11011011,11011011,00111100<,00111100<,00111100<,00101111/,00111110>,01001010J,00001110,01110000p,00011000,00010010,01010010R,00011000,00000000,00010000,00000000,00010000,00010000 &A10001001,10010001,10001001,00101100,,001101004,00101100,,01101111o,00111110>,01011110^,00000111,11100000,00011000,00010010,01010010R,00011000,00000000,00000000,00000000,00001000,00001000 &A00000110,01100000`,00001100 ,00000110,01100000`,00000110,11101111,01111111,11111111,00000011,11000000,00011000,11111111,11111111,00011000,00000000,00000000,00000000,00001000,00001000 &"********* BLACK CRYSTAL ********* ** PHYSICAL ** PURITY SPIRITUAL ** RINGS *********************************" &" " &" " savcocoa%orwtgholjq   azk yx vpm n kfd  ********* BLACK CRYSTAL ********* ** PHYSICAL ** PURITY SPIRITUAL ** RINGS *********************************  AMAP 6 MI"M "map 6" /BLACK CRYSTAL COPYRIGHT CARNELL SOFTWARE 1982 :NSAVE=0:9400$ 23658j\,8 (N$(10 ):D$(1):C$(1) #G=0:F=0:BOD=0 5:0:5 3FLOOR=0:CO=0:SI=0:SX=0  .8;0;6;" BLACK CRYSTAL " P10 ,0;"Are you using a black and white television? Answer Y or N." A$= A$="Y"A$="N"33! 30 !A$="Y"COL=0 "A$="N"COL=1 #V10 ,0;"Please enter your map reference number: ----------. " '="Y"Ŧ="N"39' (A$ -A$10 350^ 22;11 ,8;A$ 4A=1̱A$ 5,A$(A)<480ůA$(A)>579350^ 6A 7N$=A$ 8!N$(1)1350^ 96N$(2)<1ŰN$(2)>2350^ :6N$(3)<1ŰN$(3)>3350^ ;!N$(7)>2350^ 2350^ >"N$(10 )>3350^ FSE=N$(2) KTY=N$(3) PPH=N$(4) USP=N$(5) ZPU=N$(6) \WS=N$(7) _ FR=2 `CU=N$(9 ) d,TR=N$(8)+N$(9 )+N$(10 ) i 500 n 1000 ^613 ,0;" YOU HAVE MADE A MISTAKE. " c$" TRY AGAIN. " hA$ mB=13 14 r/B,0;" " wB | 45- COL0540 BR=0:W=0:Z=0:O=7:I=7:T=7  BR=1:W=2:Z=3:O=4:I=5:T=6 ! B=621 /B,0;" " B 6,0;" "  "map 6"1  "map 6"960  "SCREEN" K  "SCREEN" NSAVE=1 BOD:0:T !23658j\,8:9400$ NSAVE=0 K=4163CI K=4163C0 K 0:0:T:  TY=1PT=9 TY=1ST=3 TY=2PT=6 TY=2ST=6 TY=3PT=3 TY=3ST=9  R;T;B$ /TY=1R;T;2,2;"Warrior." +TY=2R;T;2,2;"Elf." 9TY=3SE=1R;T;2,2;"Wizard."  <TY=3SE=2R;T;2,2;"Sorceress." *C=1TR ,R;T;4,8+C;"O" /C 4 2110> 9PU09300T$ >PH=PT @SP=ST B"T;0;2,28;PH C"T;0;3,10 ;PU H"T;0;3,28;SP M 0:0:T:900 R%T;1;"You are at Sanctuary." VCO7CO=0 W a&FLOOR0TR72160p fO;0;"GORA";:O;": You are in the Dark Tower of Beroth. The Lords of Chaos await your coming. Your weapons are useless but I will help you if I can." k p"The room you are about to enter is protected by trapdoors that can open up and drop you into a growth of flesh eating fungi. Use Keys 1 to 8 for moving and beware of the Sirens who will draw you off course. ";:T;0;"PRESS 0" q9FLOOR0TR7"To leave Tower press Key G." rK=2162r:BOD=0 sA$= tA$="S"950 u4FLOOR0A$="G"TR7A$="9"9200# vA$"0"2162r x 900 yFLOOR=12220 zX$(640) B=1640 %B<161B>4482188 C=(*20)+1 C=202200  X$(B)=" " B  2220 X$(B-1)=""2188  X$(B)=""  2190 FLOOR=1  A=1  HO=20 C$=""  Y=21  X=16  UY=6 C=((Y-6)*32 )+X+HO &6,0;X$(HO511+HO)  Y,X;"*" UX=(*30)+1 K=2250 B=(*10 )+1 B=1SI=1 %SI=1SY=(*8)+8 &SI=1SX=(*30)+1 A$= D$=((*3)+5) B=A$ #B<491B>5682345) M=Y N=X /B=491B=557B=502M=M-1 /B=513B=546B=524M=M+1 /B=491B=535B=513N=N-1 /B=502B=568B=524N=N+1 FLOOR=34265 "M>21M52345) "N31N<02345) FLOOR=23271 C=((M-6)*32 )+N+HO  Y,X;" " X$(C)=""21059  M,N;"*"  SI04;SY,SX;C$ UY=YUX=X3000 Y=M $X=N )FLOOR=23192x *HO=20*A .&6,0;X$(HO511+HO) 3C=((Y-6)*32 )+X+HO 8X$(C)=""21059 = Y,X;"*" B SI04;SY,SX;C$ L A=A+1 QA>4A=1 VSI02500 `K A$= SI=SI+1 SI>6SI=0 A$=D$2265 M=Y N=X SYYY=Y+1 SXXX=X+1 C=((Y-6)*32 )+X+HO M,N;" " X$(C)=""21059 SY=YSX=X21059 Y,X;"*" 2;SY,SX;C$ UY=YUX=X3000  2345) TR<74900$ CO=73080 900 TR=70;O;"GORA";O;0;": You are now on the second level. In this room the Lords ofChaos await you. You cannot destroy them but you can banish them by laying down the Ring of Fire and leading them over it. Beware Death and do not look at his face."  `"Use Keys 1 to 8 to move. Key 0 drops fire ring. Key P Power Search. Press 7 to continue." CO=0 RING=1 K=3038 =""3040 A$= A$="S"950 900 A$"7"3025 L(7)  C(7) X$(448) B=138532 5X$(BB+31)=" " &B 0<X$(417448)="" 5CO=74000 : Y=18 < X=16 ?B=17 DL(B)=6 IC(B)=B*4 NB X6,0;X$ b Y,X;"*" c W$(7) gW$="" lE=17 mG=E nCOL=0G=7 oG;L(E),C(E);W$(E) qE vFLOOR=2 xK=3192x z621,0;" YOUR MOVE " |=""3196| ~A$= A$="S"950 A$="0"3600 A$="P"3900< V20,0;" " 2260 N=0M19K PHC(7)X-C(7)>N-C(7)3700t 4NL(7)Y-L(7)>M-L(7)3700t 4MYLM=LM-1 LN>XLN=LN-1 LNLM=L(E)LN=C(E)3425a CE HL(B),C(B);" " JG=B KCOL=0G=7 MG;LM,LN;W$(B) R L(B)=LM \ C(B)=LN aL(B)=YC(B)=X3500 c,D=((L(B)-6)*32 )+C(B)+1 dX$(D)="O"3800 fB kK V20,0;"THE LORDS OF CHAOS HAVE DEFEATEDYOU. " B=1500:B TR=7 "R;T;4,9 ;"OOOOOOO" E=120 E 21059 TR73196| "T;R;4,9 ;"OOOOOO " 621,0;"RING OF FIRE DROPPED. YOUR MOVE." $E=((Y-6)*32 )+X+1  X$(E)="O" RING=E RY=Y RX=X  TR=6 $ 3196| t<1;2;0;6,0;H$(496) 520,0;" YOU HAVE LOOKED APON THE FACE " #" OF DEATH " fB=130:0.1}L,20:0.1}L,5:0.1}L,25:0.2~L,10 :B  TR=7 "R;T;4,9 ;"OOOOOOO"  21059  X$(D)=" " RING=1 B;LM,LN;W$(B) E=112 `1;2;LM,LN;"";LM,LN;"";LM,LN;" ";LM,LN;"";LM,LN;" ";LM,LN;"";LM,LN;"" E  LM,LN;" "  621,0;" GOT HIM. WELL DONE. " G=1200:G "R;T;4,9 ;"OOOOOOO"  TR=7 L(B)=0 #C(B)=0 $CO=CO+1 %CO=74000 ( 3192x <TR=73300 @SP+PH=12 3920P A621,0;" YOU HAVE NOT ENOUGH POWER " D 800  F 3300 P SP=0 U PH=0 Z"T;0;2,28;PH _"T;0;3,28;SP d621,0;" POWER SEARCH FOR THE FIRE RING." X$(RING)=" "  RY,RX;" " RING=1  TR=7 "R;T;4,9 ;"OOOOOOO"  3300  900 O;0;"GORA";0;O;": You have defeated the Lords of Chaos now you must facethe evil energy that blights theland." BOD=O  c"To enter the Black Crystals roompress Key 1. To drop rings pressKey 0. To pick up rings press T" FLOOR=3 K=4060 =""4065 A$= A$="S"950 A$"1"4065  900 B=138532 5X$(BB+31)=" " B "X$(113q114r)="" $ X$(144147)="" &"X$(175180)="" '"X$(207212)="" ( X$(240244)="" *X$(273274)="" ,X$(18)="" .X$(76L)="" 0X$(88X)="" 2X$(201)="" 4X$(218)="" 6X$(332L)="" 8X$(343W)="" ; RO=0 <RING=0 ="E=0:F=0:A=0: > Y=18 ? X=19 @$D=((Y-6)*32 )+X+1 A*O:5:0:6,0;X$ B Y,X;"*" CK=4163C EA$= J E=E+1 OE=80P4600 TA$=""4165E V_0;20,0;" " YA$="S"950 ZA$="T"4500 ^A$"0"4250 cTR=04165E hX$(D)=""RING=RING+1 iX$(D)="O"4235 jTR=TR-1 m X$(D)="O" rH0;7;21,0;" RING DROPPED " s""4211s tR;4,9 ;" " wB=1TR |R;T;4,8+B;"O" B RING=75000  4163C H0;7;21,0;" THERE IS ALREADY A RING HERE "  4163C B=A$ #B<491B>5684163C  2275 "M>18M54163C "N31N<04163C $F=((M-6)*32 )+N+1 ?X$(F)=""X$(F)=""X$(F)=""X$(F)=""X$(F)=""4163C $D=((Y-6)*32 )+X+1  Y,X;X$(D)  M,N;"*" Y=M X=N D=F  4163C X$(D)"O"4550 H0;7;21,0;" RING PICKED UP " ""4506  X$(D)=" " ]D=18D=76LD=88XD=201D=218D=332LD=343WX$(D)="" TR=TR+1 R;T;4,8+TR;"O"  4163C H0;7;21,0;" THERE IS NO RING TO PICK UP "  4163C RO=RO+1  E=0 RO14620   A=18  C=6  G=17  RO24630  A=76L  C=8  G=11 RO34640   A=201  C=12  G=8  RO44650* " A=332L # C=16 $ G=11 *RO546604 , A=343W - C=16 . G=22 4RO64670> 6 A=218 7 C=12 8 G=25 >RO74680H ? RO=0 @ A=88X A C=8 B G=23 HB=14 IB2;0;11 ,15;"";T;2;C,G;"." JB2;0;11 ,15;"";T;2;C,G;"*" KB2;0;11 ,15;"____";T;2;C,G;"" LB2;0;11 ,15;"";T;2;C,G;"." MB RX$(A)="O"4800 \AF4710f ^ TR=7 _"R;T;4,9 ;"OOOOOOO" a 21059 f6,0;X$ k Y,X;"*" zK  X$(A)="" X$(A+2)="O" RING=RING-1  4710f $ 900 )["You must find more of the rings of creation before you can cont-inue through the Tower." . 3"Press Key 0 to leave Tower." 8"0"49208 B 9200# 6,0;1;0;5;X$:B=110 :0.1}L,-30:0.2~L,-20:0.1}L,-15:0.1}L,-20:B 0.1}L,502:0.1}L,45-:0.1}L,35#:0.1}L,30:0.1}L,25:0.1}L,20:0.1}L,40(:3,60< 02:0:5:6,0;x$ :5;11 ,16;" ";12 ,16;" " >5;10 ,15;" ";13 ,15;" " q5;11 ,14;" ";12 ,14;" ";14,16;" ";9 ,16;" "  C=16 B=1502 A=(*6)+8  0;A,C;"":0.1}L,B &0;A,C;"*":0.1}L,0 !0;A,C;" ":0.1}L,-B C=(*6)+13 B  502 0:0:T: pO;0;"GORA";0;O;": At last the Black Crystal is destroyed. The Kingdom of Beroth and all its riches belongto you. I see in the near futuremore adventures for you. Look into the Well of Truth and it will reveal visions of injustice" z 0T;0;" To look in well press Enter " =""6030 AI;0;8,0;"" 12 ,0;"You see the princess Edora held prisoner by the witch of the Black Mountains deep inside the Volcanic Dungeon." |T;R;19,0;"VOLCANIC DUNGEON AVAILABLE FROM CARNELL SOFTWARE OR YOUR NEARESTCOMPUTER SOFTWARE STOCKIST. " # #0:0:6: #N$(1)="6" #N$(2)=SE #N$(3)=TY #N$(4)=PH #N$(5)=SP #N$(6)=PU #N$(7)=WS #N$(8)=FR $N$(9 )=CU $N$(10 )=(TR-(FR+CU)) $38,0;"Your map referance number is: " $ 6N$;". Write down this number, you will need it." $3"To continue your adventure find and load map 1." $ $ 9700% $a=07 $ b:"A"+a,b $ b:"B"+a,b $ b:"C"+a,b $ b:"D"+a,b $ b:"E"+a,b $ b:"F"+a,b $ b:"G"+a,b $ b:"H"+a,b $ b:"I"+a,b $ b:"J"+a,b $ b:"K"+a,b $ b:"L"+a,b $ b:"O"+a,b $a $NSAVE=1 %B$(192) %!B$ %0H$(5600) %5H$ % %00000001,10000000,11111111,11111111,00011000,00010100,00011000,00010000,00011000,00000000,00000000,00000000,00000000 %00000011,11000000,01111111,11111110,00111100<,00001000,00111100<,00010000,00111100<,01000010B,00000000,01000000@,00100000 %00000111,11100000,00111111?,11111100,01111110~,00011100,01111110~,001110008,01100110f,01001010J,00000000,01001000H,00010000 %00001111,11110000,00011111,11111000,11111111,00101010*,01011010Z,01010100T,11011011,01001001I,00000010,01001000H,00001001 %00011111,11111000,00001111,11110000,11111111,01001001I,01111110~,10010010,11011011,01010001Q,00000100,01000100D,00001001 %00111111?,11111100,00000111,11100000,01111110~,00010100,00111100<,00101000(,11011011,01100010b,01001000H,01010010R,01000101E %01111111,11111110,00000011,11000000,00111100<,00010100,00011000,00101000(,01100110f,01001010J,01010010R,11010010,00100101% %11111111,11111111,00000001,10000000,00011000,00010100,00000000,00101000(,00011000,11111111,11111111,11111111,11111111 &"********* BLACK CRYSTAL ********* ** PHYSICAL ** PURITY SPIRITUAL ** RINGS: *********************************" & 6"         " sav$b********* BLACK CRYSTAL ********* ** PHYSICAL ** PURITY SPIRITUAL ** RINGS: *********************************30            gfolooA