ZXTape! 0Created with Ramsoft MakeTZXIKON <'<+ > *38999W:0:1:1: *"m";1;"IKON " 23570\,16 (%*"m";1;"workcode"39000X 2*"m";1;"IKON" <8:"m";1;"loader":*"m";1;"loader"10 F PP"IKON"9999':*"m";1;"IKON ":*"m";1;"workcode"39000X ZI"IKON ":23736\,181:"IKON "39000X,"a"-39000X d*"m";1;"IKON" '38999W:0:1:1::"":21,0;2;6;" < R.D.Foord Software 1986> ":23570\,16:"":"" ,IKON @Q`?~c?`c6cs``cccko`cfgc???????<?~c|c???????<????????<????????<?<<<<<<<<<<<<<<<<<<<???<<<<<<<<<<<<<<<<<<<???<<<<<<<<<<<<<<<<<<<??<<<<<<<<<<<<<<<<<<<?????????<?<?<??<???<????????<?<?<??<???<?????????<?<?<??<???<?????????<?<?<??<???<????        666222222262262222226226666 22222222222222222222222262222 22226222622222226222222262222 666222222262222222226226666 666666666666666666666666666 88888888888888888888888888888888 IKON gXCg>!"%!+oM >!}ͭoM >!}ͭo!}͛"ck o!"͸!6\!xs!7\!s*!ѧRZo! !>!}>!}-################################  sCo! !>!}>!}*{\ ~o&!ѧR®oâYou have reached the tomb of theTsars.|&sC*{\ ~o&!ѧRoYou enter the chapel of the Tzars.Й&sC*{\ ~o&!ѧRYoMYou have come to the hall of Whispers.$)sC*{\ ~o&!ѧR°oäYou have come to the hall of Whispers.{)sC*{\ ~o&!ѧRoYou arrive at a drinking fountain.Қ)sC*{\ ~o&!ѧR]oQHere is evidence of an old armoury.)(sC*{\ ~o&!ѧRµoéHere is the silent tomb of St.Petrie.*sC*{\ ~o&!ѧRoYou wander into a vast Marble hall.כ%sC*{\ ~o&! ѧR2*{\ !s*{\ ~o&! ѧR\*{\ !s*{\ ~o&!ѧR†*{\ !s*{\ ~o&! ѧR؜o̜Dust-drapped archives lie beforeyou.$sC*{\ ~o&! ѧR&oYou stand before a sealed trunk. sC*{\ ~o&! ѧR|opYou pause at the alter of sorrows.H(sC*{\ ~o&!ѧRoܝThe crystal waters of a mineral spring bubble from the ground.>sC*{\ ~o&!ѧR;o/You arrive in a deserted scribesroom. %sC*{\ ~o&!ѧRe*{\ !s*{\ ~o&!ѧR½oñYou walk along the wall of devotions.*sC*{\ ~o&!ѧR*{\ !s*{\ ~o&!ѧR;o/The cardinal's catacomb twist ahead. &sC*{\ ~o&!ѧR‘oÅYou see steps down from the gallery.](sC*{\ ~o&!ѧRݟoџYou enter a tiny ante-chamber.sC*{\ ~o&!ѧRGo;You are at the entrance to the crypts of Zagorsk Monastery.<sC*{\ ~o&!ѧR™oÍA flooded passage lies before you.i$sC*{\ ~o&!ѧRoYou stumble into a gloomy chamber.(sC*{\ ~o&!ѧRWoKFrom this gallery you can see two fights of stone steps.:sC*{\ ~o&!ѧR­oáYou glimpse steps leading to a gallery.y(sC*{\ ~o&!ѧR o>!}You enter a disused bell foundry.ס(sC*{\ ~o&!ѧRXoLYou tread the quad of iniquity.-sC*{\ ~o&!ѧR°oäBell ropes were once made in this room.z*sC*{\ ~o&!ѧRoA bricked-up archway comes into view.Ң%sC*{\ ~o&! ѧRVoJThe ground is very slippery here.%%sC*{\ ~o&!!ѧR¤oØYou enter the chapel of Martyrs.x sC*{\ ~o&!"ѧRoThis place is just the candle store.ƣ&sC*{\ ~o&!#ѧRLo@This is the site of the old ropestore.&sC*{\ ~o&!$ѧR˜oÌYou enter the cell of penance.nsC*{\ ~o&!%ѧRoYou are at a secret entrance to a tunnel.)sC*{\ ~o&!&ѧR@o>!}4You are in long low tunnel.sC*{\ ~o&!'ѧR´oèYou are in a large under ground room with a large stone on the floor.bFsC*{\ ~o&!ѧRץ6͢!6\!s!7\!so!!>!}!%}Y!!!&}Y!!>!}!,}Y!4}Y!4}Y!4}Y!4}Y!-}Y!!>!}!4}Y!2}Y!2}Y!2}Y!2}Y!4}Y!!!4}Y!4}Y!4}Y!4}Y!4}Y!4}YCc!(!hKE"c!(!w$c!/!w$c!!pKE"c!!w$c! !w$c!O!pKE"c!!6w$c!!pKE"c!!6w$o!! >!}>!}!)}Y!)}Y!)}Y!!!)}Y!)}Y!)}Y!! !)}Y!)}Y!)}Y!!!)}Y!)}Y!)}YC!*!#S"!h"**KE"͙`i!ѧR§ü*!"Á*!iѧR"c*!hKE"c>!}!*w$*!ѧR!"*#"[ҧRx*{\ ~o&!ѧRUÞ.!6\!s!7\!s!,"!!#S"!!#S"*!ѧR۩۩o**>!}*}YC*!ѧRo**>!}*}YC*!ѧRCo**>!}*}YC*!"*#"[ҧR*#"[ҧR!6\!s!7\!sۦ*{\ ~o&!ѧRʽÃ.F!6\!s!7\!s!!#S"!!#S"o**>!}>!}>!}! }YC*#"[ҧR *#"[ҧR!!#S"!!#S"*!ѧRo**>!}>!}>!}ʫ'55ǫsC*!"*!ѧR@o**>!}>!}>!}%55'"sC*!"*!ѧRWk*#"[ҧR*#"[ҧRw*{\ ~o&!ѧRʢò͢ê*{\ ~o&!ѧRѬ!"Å*{\ ~o&!ѧR!"Å*{\ ~o&!ѧR-!}>!}*}YC*!"*#"[ҧR!*#"[ҧR!6\!Xs!7\!s! "!!#S"!! #S"o**>!}*}Y**! >!}*}YC*!"*#"[ҧR̮*#"[ҧRc!(!hKE"c!!w$c!!w$c!!w$c!?!xKE"c!!.w$c!!xKE"c!!.w$!)!#S"!i"**KE"͙`i!ѧRK`*!"%*!iѧR"c*!iKE"c>!}>!}!*w$*#"[ҧR*{\ ~o&! ѧRÕ.!6\!!pѧRs!7\!s! "!!#S"!!#S"o***}YC*!"*#"[ҧR?*#"[ҧR,*{\ ~o&! ѧRʴݲ͢!6\!s!7\!s!,"!!#S"!!#S"*!ѧR::o**>!}*}YC*!ѧRno**>!}*}YC*!ѧR¢o**>!}*}YC*!"*#"[ҧR*#"[ҧR*{\ ~o&!ѧRÌck o!6\!s!7\!s! "!!#S"!!#S"o**>!}>!}*}YC*!"*#"[ҧRQ*#"[ҧR>!"*"*"!!#S"!!#S"o***>!}*}YC*!"*#"[ҧR*#"[ҧR*!"*!ѧR}}ųc!!hKE"c!!w$c!!zKE"c!(!w$c!!w$c!!w$c! !w$c!%!!͔#c!!}KE"c!2!!!8͔#c!-!!!8͔#!!#S"!i"**KE"͙`i!ѧR*!"׵*!iѧR"c*!iKE"c>!}!*w$*!oѧRt!"*#"[ҧRε*{\ ~o&!ѧRʫ\͢M >!}ͭoM >!}ͭoc!(!hKE"c!<!w$c!!.w$c!!hKE"c!<! w$c!!w$c!d!KE"c!6!w$!)!#S"!h"!h"**KE"͙`i!ѧR*!"**ѧR"c**KE"c>!}!*w$*#"[ҧR*{\ ~o&!ѧR{Åë*{\ ~o&!ѧRʤó!"Å*{\ ~o&!ѧRҸÒ͢!!#S"!"!=>?6!o**>!}>!}>!}!!sC*!ѧRzz*!"*#"[ҧR*{\ ~o&!ѧRʱ͢c!F!hKE"c!1!'w$c!!w$c!!hKE"c!2!'w$c!!w$c!w!KE"c!!w$!ù     0!!6\!xs!7\!s!!#S"o*!>!}>!}!!sC*#"[ҧR!G!#S"!i"**KE"͙`i!ѧR~Ó*!"X*!iѧR"c*!hKE"c>!}!*w$*#"[ҧRO*{\ ~o&!ѧR!!"Å*{\ ~o&!ѧR@%.!6\!xs!7\!s!("!"!*!*#S"!*!*#S"o**>!}*}YC*!"*#"[ҧR*#"[ҧR*!"!("*!ѧR<!}>!}*}YC*!"*#"[ҧR*#"[ҧRn*!"!("*! ѧR!![*{\ ~o&!ѧRDS!"Å*{\ ~o&!ѧRr͢!@"!!#S"!!#S"o**>!}*}YC*!"*#"[ҧR*#"[ҧR*{\ ~o&!ѧR$.Ҹ*{\ ~o&!ѧRMWñ*{\ ~o&!ѧRvÅ!"Å*{\ ~o&!ѧRʤØ͢!6\!s!7\!s!("!"!!#S"!*!*#S"o**>!}*}YC*!"*#"[ҧR*#"[ҧR*!"!("*!ѧRʔֿ*{\ ~o&!ѧRʷï͢!6\!xs!7\!s! "!"!*ѧR!*ѧR#S"!*! *#S"o**>!}*}YC*!"*#"[ҧR-*#"[ҧR*!"! "*!ѧRʹ!7\!s!6\!s!("!"!!#S"! *!*#S"o**>!}>!}*}YC*!"*#"[ҧR*#"[ҧR*!"!("*!ѧRʫ*{\ ~o&!ѧRÿ.!6\!s!7\!s! "!!#S"!!#S"o**>!}>!}*}YC*!"*#"[ҧR*#"[ҧR !!#S"! ! #S"o**>!}>!}*}Y*!ѧR*!*}YC*!"*#"[ҧR*#"[ҧR!,"M >!}ͭoc!(!hKE"c!(!w$c!d!w$c!"!w$c!P!KE"c!!'w$c!!KE"c!!'w$!)!#S"!i"**KE"͙`i!ѧRJ_*!"$*!iѧR"c*!iKE"c>!}!*w$*#"[ҧR*{\ ~o&!ѧR!"Å*{\ ~o&!ѧR !"Å*{\ ~o&! ѧR:I!"Å*{\ ~o&!!ѧRhw!"Å*{\ ~o&!"ѧRʖå!"Å*{\ ~o&!#ѧR!"Å*{\ ~o&!$ѧR!"Å*{\ ~o&!%ѧR /!"Å*{\ ~o&!&ѧRNÞM >!}ͭoc!d!hKE"c!P!w$c!!hKE"c!P!!͔#c! ! w$c!<!!͔#c! !w$c!! w$c!(!!͔#c! !w$c!! w$c!!!͔#c! ! w$!e!#S"!i"**KE"͙`i!ѧR)>*!"*!iѧR"c*!iKE"c>!}!*w$*#"[ҧR*{\ ~o&!'ѧRʽÅ!!#S"o*!>!} sC*#"[ҧR!!#S"o*!>!}g OsC*#"[ҧR3c!(!KE"c>!}!!!!8͔#c!!KE"c>!}!!!!8͔#c!!hKE"c>!}!!w$c!!xKE"c>!}!!w$!(!#S"!"**KE"͙`i!ѧR*!ѧR"å!*ѧR"c*!KE"c>!}!*w$*!@ѧRH!"*#"[ҧR!!#S"!x"**KE"͙`i!ѧRžö*!ѧR"x!x*ѧR"c*!wKE"c>!}!*w$*!(ѧR!"*#"[ҧRoc!P!xKE"c>!}! !!͔#c!<!xKE"c>!}! !!͔#!=!O#S"!x"**KE"͙`i!ѧR*!"*!xѧR"c*!xKE"c>!}!*w$*#"[ҧRc!d!lKE"c>!}!!!!8͔#c>!}!!w$!e!#S"!m"**KE"͙`i!ѧR%*!"*!mѧR"c*!lKE"c>!}!*w$*#"[ҧRo!!>!}ck o!6\!s!7\!s!>?!!!#S"o>!}>!}!!s*#"[ҧR! "!!#S"!!#S"o**>!}>!}*}Y**!*}YC*!"*#"[ҧRd*#"[ҧRQ!!#S"o>!}>!}!!s*#"[ҧRck o!6\!s!7\!s! "!p<=>?l!!!#S"!!#S"o**>!}>!}*}Y**!*}YC*!"*#"[ҧR*#"[ҧR!!#S"o>!}>!}!!s*#"[ҧR2!!#S"o!*!ѧR!J>!}>!}>!}!!s*#"[ҧR~h  ?? ? @ '%@@߿>>>>>`|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~?  ՀUUU H0-  @0000H0 @@  mm{k ۥۥۥۥۥۥ'Oఘ`0q9{?DjD@DQ@@@@@@@@@@@7 ?׷|^nnwwwvwww7wv@@vwwח7wwwvwwwwwv@www@vw@@` 8?@aaaa19 _UUUUuTVVWаап;18<>@ааап@ UWаааժժUUUUUUUUUUUUааа~'~8}{}}{}@SSSSSSSSSSSSSSSSSӳ UU|}`~{$U~!Xba  <>~>~>~ 0x~ ^^n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~nVfv~~n~~~~~~~~~n^^~~~~~~~~~^:nnn~~~~~~~~~~~~~~~~~~~vjfn~~~~~^~>Z~t~~~~~~~~~~~~~~~~~~~~fvjvvvj~~~~~~vv~~n~~~~~~~~~~~~~~~vjfn~~v~~~~~~~~~~~~~~(C(C!Led@?<<~,(hDDh(,"U""?UUUUUåå ffAAAAA>(> >ff333f    >> > 6ccc6 < ?>cs 1F c>6`~cc>0~cc>F >cc>cc>>cc? 8 >>>cs `~>ccc~cc6kkk~wwccg{~0?kk~`_37;(B3ArAS2B2AySxSlOCnxZiufre5V4V3V2V1VvklPoRrOSyxba2F1Fl8P7P6PiTbFaF1Zz1ToStS2P1P1B1AfBsB1TSrA$Zxzdcba((*e\d "!ok o,>s> *\#6#ͫͪ> *("ͪ:G~ > YYYl s> Yzs*([\RPs> Ys*\P> YYY,>sK(5 ]P8ؖZ  ZX COMPILER V2.0  1983 THRELFALL and HODGSON Compiled OK Program Length = bytes To run enter RAND USR "[!!G!"#"%">2**"(*#>!t!%>"t !or2X<2*S\###"]\>2\͕$(̣i~V ̃̾̊M̯ʕ̪̫by̴ 80!M r!r!or*]\~:Y ͕*]\~:Y J͕*]\#~# ͕͕;}2*!Z++6>!*t.:gw!+r w# ! "(*e\d ""z(J{!90){ ͲKB#))yx0|g}o(yxyOxGxD||G||/g}/o#!r=| }l&@R0?jj\jgW< U>?YU*6!7͵!rK(y( *T]6 >Y>2'Y>"Y2͍[(*w (ZSS :j\2j\) :A\2A\) 8 0{(y8Yw#2͍>?͍ͦyS+~(-()6 >Y>Y> YY>YYY2͍S2'6 + 6 >?͍ͦS>"Y> YLq#px y*2>Y:A\ :j\_(>C >L¯>Gͦ˗2'y8ï6#y8ï>YYw#>Y:'Y2͍S>Y:'Y>"Y>YYUYUU>LY>YUw (. (e+(-( 0^:^ y nY* w* 6 !* ~ (+(-(0)))_*~-yʶ> Y>YY> Y>Y öU>?YU>YxY *(w#"([[Rѯɯ͂+( -( *(/2>~͕+(- #gx !DMw>!i`t/(*-!Jr-!f>~+(-!w!Rw->~>~) ͕!͕( ( J:00O *]\"]\>~}~|~V#^"l\"I\C@> YQG[(G[R"[\RK(:*(>*l\t!r!rTo*\*\>ׯ>U,s>ׯ>PU"\"\h!|+s#r#^#V#*!#LB*R#>͕;QLt>*]\#~: > ͕*]\#~ ("]\ (( 8:(Y:> !r>2+͕!r>DM >2\2\o:k\GD>2k\Do[v\c.zRR_PR0#"v\˼DM͂ (>*!x\t>"!v\t|( >-Y'͏0͏0d͏0 ͏0͕͕d͕ ͕͕R>0R8<Y͕R>!t>~>[!t!Gr͘!r)#*J8 T]۲\%R06S!Kww!) w>~!Lr!w͕R>*t!#"ww##>~>[t>!Rt>Lt͕R͕>#~!Sww>"##t[(G͏!sw,*6#6'#[(Gͪ>~!cr!k r!or!r| =͘!r*]\#~ (((PP"P#~$P !r>I !w>!Rt= >Y >Y>(< >e !(w>>e͕~*I\#QLw|z7|(7z7͚.K&Ew!"r!cr͕8 ͕͕ ͕͏m!srLL!or͕ +>2+͕ 1"ʘ'H,;(~3:+(@R(!r ">~!Gr>!t͕!r>"t*]\#~$ʾ !@rp!r(ͣ!sr]>~*(w*]\#~Y"(~"]\[(G>t>t͘!r>}|͏!r>{}͕, >>.&t;+'+!Cr!Cr>}~!Yr> Y!CrA˯[[*]\#~08:8 A8˯[0͕˯(2($  Ͳ&o))K G:$(( x>!Z[2 o :n +n+([!4~ w+[[Ro(w":͕ >!t!r:!FwLz[GG*(["T]*\%R͕R >~&͕=͘1| !w!Gr>"t !~ow!&w C͕"( !r͕˯A&o>t>*!{\t͕"> ~`i!>*t>~.8>~!r*SRgoo#!r !|w>!t]͕R͕>!t!Vr##L !jr||.&“>~>&h.t!&w !r "!%͕.K&Ewr!r.`&iw !"ç͕(0>!&jte͕͘>~͘>~͕-̕((0 A5B/͌͘!rR >*t;>!tN#F #:K\:L\o:\2\>M n(:\ > :\ <͎ 0_3>ͽ͏ͽ!r1!r͕/!r>.&8tÕ_|(ULGö*o>>&t͘.}&w͘>}~!"r>͏ͽ !w$r ͏ͽ!#r>.&t1>.&t!cr͕8͕ >͏ͽ͏ͽ!-#r*l\#QL>t*#| *("#*%[(G͕" ͣ>~-̕;w͕ ( ͏>~ί~*("%!w1͕;QL###>!t>"!%t͕R !Wr>~!Gr' ͕!tr>!t!r !Wr>"t͕ 1*%| L~# L"%!*%|  ~Lx(8*%  ~# L"%͏>~>!it!r>2+͕>!r͕͂(s!w!#r͕6!w!-r͕6>!t!r*]T6 *x.+͕((" ͣü !rü !rümüR͕͂( 4͕͘*]\~) !]Tw ͕!r>!t!r>!t!r!r͂)( ͕6͕͕"͍2 ɧRDML*"x*S*[RLx(*q#pH""*>w#!r6͕!>r6!Hr!r= >Y >Y> >e<( >Y!(w>Y*K <4#> Y͕͕R͕"(͕" > Y>:Y> Y(( $( "(  PMQ P MP<;\ MQSLv>IKON Q-Q-/S-"10" 23570\,6 59770z ڰ"0":ٰ"7":ܰ"1":"0": "23609","5" "23658","8" ! LZ="1840" " V="1200" # R="1620" $ DN=0 (o="1" 2Z=ç <T=ç d"10";"THE CRYPTS" e "14";"OF" f"6";"ZAGORSK MONASTERY" g\'"Your object is to retrieve the great IKON which is hidden some-where in the monastery." h?'"You are not alone so take care."'"Words you can use are :-" n'"N-NORTH;S-SOUTH;E-EAST;W-WEST I-INVENTORY;Q=QUIT;H=HELP GET;TAKE;DROP;LEAVE;INSERT;PULL MOVE;KNOCK;LIGHT;STRANGLE;EAT SWALLOW;LOOK." ,%#1;"0","7";"PRESS ANY KEY" . 92706$ 0A$=""302. ;p(14):s$(14,11 ):l$(14,32 ) N$(1,11 )  "1040" #X="1"̰"14":P(X),S$(X),L$(X):X *"2","ROSARY","A broken rosary is here." /"6","CAP","You find a British Officer's cap" 1"11","SCROLL","An illuminated scroll is here." 1"13","DAGGER","A Nazi dagger is at your feet." 7"17","PRAYER BOOK","You notice an open Prayer book." 3"255","COINS","A few coins are scattered around"  ."20","ELIXIR","A bottle of Elixir is here." !1"27","KEYS","You discover a bunch of old Keys" "2"29","TOOLS","Some old tools are within reach." #5"31","CIGAR LABEL","You spot a dutch cigar label." $4"34","CANDLES","A few unused candles remain here" %1"35","ROPE","You notice some lenghts of rope." .%"32","FOOD","A food pack is here." 8+"-1","LIGHTER","You see a gold lighter." ~8PW=:NZ=:CL=:FW=:DK=:FD=:MS=:LD= 59770z  CP="23" np=cp  "1300" CP=NP %59770z:"a",cp:39000X ("7000"+"10"*CP) @PRINT OBJECT TT=T+ YX="1"̰"14" ^"P(X)=CP"0";ٰ"7";ܰ"1";L$(X) hX )CHECK IF LOCATION MAKES A CHALLENGE CP="5"PW="8440" CP="8"NZ="8450" CP="12"CL="8460" CP="19"FW="8470" CP="25"FW="8470" CP="26"DK="8480" CP="23"CL=ç"9200" T>15FD="8500" DISPLAY POSSIBLE MOVES ' )7;1;" Your Exits are:- " Q5;7;("North "N>ç)+("South "S>ç)+("East "E>ç)+("West "W>ç) NEW INSTRUCTION 0"WHAT NOW ? "'I$ 11;I$+32 2Z>3"9100":"9000" 5 I$=""LZ 6I$="RODNEY""9990" :&I$="I"I$="R"I$="Q"I$="H""1900" D "2000" l@( VI$="R")+("2670"I$="I")+("2750"I$="H")+("9005"I$="Q") BLOCK MOVE I$>1"2400" jCP="5"PW=CP="8"NZ=CP="12"CL=CP="19"FW=CP="25"FW=CP="26"DK=Z=Z+:"2250" I$>1"2350" 4&I$="N"I$="S"I$="E"I$="W""2150" R "2320" fI$="N"N>çNP=CP-"6":V pI$="S"S>çNP=CP+"6":V zI$="E"E>çNP=CP+"1":V I$="W"W>çNP=CP-"1":V c"YOU CAN'T GO ";:ڰ"5";ç;("North"i$="N")+("South"I$="S")+("East"I$="E")+("West"I$="W"):LZ ESCAPE CHALLENGE &I$="N"I$="S"I$="E"I$="W""2270"  "2300" )"NOT YET YOU DON'T!!!":Z=Z+1:LZ SINGLE LETTER INPUTS A("2670"I$="I")+("2750"I$="H")+("9005"I$="Q")+(2340$ ) $"I DON'T UNDERSTAND ";I$:LZ _SPECIAL COMMANDS `&I$="SWALLOW ELIXIR"CP="5""5010" eI$="DROP DEAD"9000(# j%I$="STRANGLE NAZI"CP="8""5030" t%I$="INSERT COINS"CP="12""5050" ~&I$="SWIM"CP="19"CP="25""5070" &I$="LIGHT CANDLES"CP="26""5090" (I$="EAT FOOD"T>5FD="5110" BI$="MOVE STONE"CP=39'MS=P(6)=39':MS=ç:V AI$="KNOCK HOLE"CP=31P(9 )=-1DN=37%:V DCP = 9 CP = 10 CP = 15CP= 162446 2450 7I$="PULL LEVER"LD=0 NP=39 ':5130  1 LD=1 I$="LOOK DOWN" LD=ç:5140 TWO WORD COMMANDS "4900" S=1̱(I$) I$(S)=" ""2560" S "I don't understand ";I$:LZ V$=I$(S-1) N$(1)=I$(S+1) VERB COMMAND (V$="GET"V$="TAKE""2820" 2V$="DROP"V$="LEAVE""3020" <I$="Q""9005" FI$="H"I$="HELP""2750" PI$="I""2670" Z"SORRY,YOU CAN'T ";I$:LZ dINVENTORY n"YOUR INVENTORY COMPRISES-" xINV=ç:L=114 .P(L)=-1ڰ"2";ٰ"6";S$(L):INV=INV+ L INV=ç"NOTHING" LZ HELP &CP="5""NOUGHT ELSE TO DRINK?":LZ *CP="12""CHANGE IN THE SOLUTION?": LZ &CP="8""NOOSE FROM THE FRONT?":LZ *CP="19"CP="25""A BAD WORKMAN?": LZ (CP="26""SOME LIGHT MIGHT HELP.":LZ @CP="9"CP="10"CP="15"CP="16""THERE'S NO WAY OUT!!":LZ "SORRY - CAN'T HELP YOU.":LZ GETTING OBJECTS -o>4"You can't carry any more.": LZ G=114 N$(1)=S$(G)"2860" "G 'G=15"2650" ,7P(G)=-1"YOU HAVE ";S$(G);" ALREADY.":"1760" 6%P(G)CPS$(G);"NOT HERE.":"1760" @Eڰ"4";ٰ"0";"You have taken the ";S$(G):o=o+1:P(G)=-1 JLZ DROPPING OBJECTS L="1"̰"14" S$(L)=N$(1)"3050" L "DROP WHAT ?":LZ 2P(L)-1"YOU DON'T HAVE ";N$(1):LZ Aڰ"6";ٰ"2";"You have dropped the ";S$(L):o=o-1:P(L)=CP LZ $aCP="5"PW=CP="8"NZ=CP="12"CL=CP="19"FW=CP="25"FW=CP="26"DK=Z=Z+ .  "1760" CHALLENGE ROUTINES :P(7)=-1"THE ELIXIR WORKS.":PW=ç:"1760" K"YOU DON'T HAVE THE ELIXIR.":"100":("9005"CP="5")+("1840"CPɰ"5") @P(12 )=-1"HE SLUMPS UNCONSCIOUS.":NZ=ç:"1760" ;"YOU DON'T HAVE THE ROPE":("9005"CP="8")+(LZCPɰ"8") %P(6)=-1CL=ç:"8510" %"BUT YOU DON'T HAVE THE COINS.":LZ P(9 )=-1"5080" +"YOU HAVE SWUM TO SAFTY.":FW=ç:"1760" M"THE WEIGHT OF THE TOOLS DRAG YOUUNDER AND YOU DROWN!":92706$:"9005" P(11 )=-1P(14)=-1DK=:S$(11 )="LIT CANDLES":L$(11 )="A FEW LIT CANDLES SHINE LIGHT":"5200" NP(11 )-1P(14)=-1"BUT YOU DON'T HAVE THE CANDLES." MP(14)-1P(11 )=-1"BUT YOU DON'T HAVE THE LIGHTER" 4P(11 )-1P(14)-1"HOW ?" LZ (P(13 )=-1 FD=ç:" 5300" ,"YOU DON'T HAVE ANYTHING TO EAT.":" 100" '"YOU DYE OF HUNGER":"100":" 9005"  N "SUDCENLY THE FLOOR OPENS UP."''"YOU FALL THROUGH THE FLOOR":9100#:V 2"YOU LOOK DOWN AND NOTICE A LEVER":100d:V P)"YOU CAN NOW SEE AHEAD":DK=ç:"1760" -"YOU EAT THE FOOD":P(13 )=ç:"1760" p XLOCATIONS gN=ç:S="7":E="2":W=ç:R qN=ç:S="8":E="3":W=ç:R {!N=ç:S="9":E="4":W="2":R N=ç:S=ç:E="5":W="3":R  N=ç:S="11":E="6":W=ç:R N=ç:S=ç:E=ç:W="5":R  N="1":S="13":E=ç:W=ç:R "N="2":S="14":E=ç:W="7":R #LD=0"You notice a lever." N=ç:S="15":E=N:W=N:R #LD=0"You notice a lever." N=ç:S=N:E=N:W="9":R &N="5":S="17":E="11":W="10":R N=ç:S=ç:E=ç:W="11":R  N="7":S="19":E=ç:W=ç:R #N="8":S="20":E=ç:W="13":R #LD=0"You notice a lever." N=ç:S=N:E="16":W=N:R #LD=0"You notice a lever." N="10" :S=ç:E=S:W=S:R 'N="11":S="23":E="18":W="16":R  !N=ç:S="24":E=ç:W="17":R !N="13":S="25":E=ç:W=ç:R  'N="14":S="26":E="21":W="19":R *$N="15":S=ç:E="22":W="20":R 4$N=ç:S="28":E="23":W="21":R >'N="17":S="29":E="24":W="22":R H$N="18":S="30":E=ç:W="23":R R!N="19":S=ç:E="26":W=ç:R \$N="20":S="32":E=ç:W="25":R f!N="21":S="33":E=ç:W=ç:R p!N="22":S=ç:E=ç:W="27":R z!N="22":S=ç:E=ç:W="27":R !N=ç:S="36":E=ç:W="29":R >(" WITH A HOLE."DN=37%):N="25":S=DN :E=ç:W=ç:R !N=ç:S=ç:E="33":W="31":R ?"A BAD CHOICE...YOU'VE TRESPASSEDINTO THE CHAPEL OF MARTYRS." " 50" r"THE SCREAMING WRAITHS TEAR AT YOUR FLESH WITH RED-HOT SPIKES UPON WHICH THEY WERE IMPALED WHEN EXECUTED."  "9100"  "9005" !N="28":S=ç:E="35":W=ç:R $N="29":S=ç:E="36":W="34":R N=ç:S=ç:E=ç:W="35":R  NEW LOC 1N=31:S=0:W=0:E=38&:R +N=0:S=N:E=39':W=37%:R *N=0:S=N:E=0:W=38&:R CHALLENGE Kڰ"3";ٰ"0";"ALAS! - You drink some poisoned water!":"9100":LZ !Gڰ"3";ٰ"0";"Your murderous nazi adversary pounces!!!":"9100":LZ ! Aڰ"3";ٰ"0";"It is built of steel with a curious slot.":LZ !Bڰ"3";ٰ"0";"The water is to deep to pass on foot.":"9100":LZ ! ;ڰ"3";ٰ"0";"It is to dark to see anything.":"9100":LZ !4Cڰ"3";ٰ"5";۰"1";"You suddenly become very hungry.":"9100":LZ !>s:''"CONGRATULATINS!!!"'" YOU HAVE OPENED THE CHAMBER AND THE IKON'S PRICELESSBEAUTY GREETS YOUR GAZE" ! "9320" !G''"NOW TO FIND YOUR WAY BACK SAFELYTO THE CRYPT'S ENTRANCE!":"1760" #-U:'''''"YOU HAVE REACHED THE END OF THISATTEMPT TO FIND THE ST.PETERS- BURG IKON." #/ "9270" #2"'''"WOULD YOU LIKE ANOTHER TRY?" #<A$=:A$=""92706$ #FA$=""9020<# #ZA$="Y":"10" #n #GA=120:.025{L,10 +A:.025{L,30-A:A: # "9250" #)K=121:A,B:A/2,B:K $"u1,11 ,.5,11 ,.5,12 ,.5,12 ,.5,11 ,.75@,12 ,.25~,11 ,.75@,9 ,.25~,7,2,6,1,14,1,12 ,.25~,11 ,.25~,7,.25~,12 ,.25~,9 ,.5,14,.5,12 ,1,11 ,1,9 ,4,7 $, "9010" $6 "9300" $@N=035# $EA$= $JC,D:C/2.5 ,D:A$=""N $O $TW1,0,1,2,.5,3,.5,2,1,0,1,0,1,2,.5,3,.5,2,1,0,1,3,1,5,2,7,1,3,1,5,2,7,.75@,7,.25~,8,.5,7,.5,5,.5,3,.5,2,1,0,.75@,7,.25~,8,.5,7,.5,5,.5,3,.5,2,1,0,1,0,1,-5,2,0,1,0,1,-5,2,0 $^S.15~,7,.15~,7,.15~,7,.9ffff,0,.9ffff,7,.15~,5,.15~,4,.15~,2,.9ffff,12 ,.45ffff,7,.15~,5,.15~,4,.15~,2,.9ffff,12 ,.45ffff,7,.15~,5,.15~,4,.15~,5,1,2 $h*"9310":N=119:C,D:C,D:N $| 'M()=23730\+256*23731\-23653e\-256*23654f\:N()=23627K\+256*23628L\:O()=23641Y\+23642Z\*256 'W"SPARE MEM=";M()'"BASIC ENDS=";N()-1'"VARIBLES END=";O()'"LAST BASIC END=";N 'N=N()-1 '  ' :"IKON"5: ':"M";1;"IKON":*"M";1;"IKON"5::"M";1;"workcode":*"M";1;"workcode"39000X,"a"-39000X W music C 10 !"":61000H:"":10 P* "m";1;"graphics4""a":61000H:*"m";1;"pixel4"61440 "semi-quaver",146,32 ,144,32 ,"dotted semi-quaver",146,32 ,144,161,"quaver",147,32 ,144,32 ,"dotted quaver",147,32 ,144,161,"crotchet",148,32 ,144,32 ,"dotted crotchet",148,32 ,144,161,"minim",148,32 ,145,32 ,"dotted minim",148,32 ,145,161,"semi-breve",32 ,32 ,149,32 ,"triplet semi-quaver",152,153,156,157,"triplet quaver",152,153,150,151,"triplet crotchet",154,155,150,151 ,m$(12 ,20):y(12 ,4) <q=112 :m$(q):t=14:y(q,t):t:q dxx=0:tri=0:a$="":ci=85U:n$="C":oct=4:loct=oct:n=n$:le=5:lle=0:flat=0:sharp=0:lna=1:z$="":o=0 i nZ#1;0,0;"note:-";n$;1,0;"octave:-";oct;" R="," " $8900":7000X:5000 ,5000:300, :3,10 ;"MENU" ''" C - Erase tune x - Erase last note Q - Enter attack r - Rest d - Normal Pitch s - Sharp f - flat E - Edit p - Change note (Edit) ENTER - Store note z - PLAY TUNE Cursor left/right - Alter note Cursor up/down - Alter Pitch " X 0  105i   BLE=0:t$="":end=0:k$="":att=1:latt=0 A=1̱A$ N$="" A$(A)="O"OCT=A$(A+1)  B= A$(A) &B491B579LE=B-480  B=35#k$="#"  B=36$k$="$" EB65AB71Gb97ab103gN$=A$(A):END=1 7z=22528X22528X+latt+2:z,568:z .LATT=A 14z=att+2+22528Xlatt+2+22528X 3 z,7 6z B7END=1ˤ"O" +OCT+"N"+LE+(k$Ʊ k$ > 1)+N$ C&end=1T$=:T$=""1091C Dt$="p"1200 Et$="e"105i G4END=1END=0:k$=" ":ATT=LATT+1 H#4,15;" " KA L 110n x$="" "enter new code ";x$ 4a$=a$(1att-1)+x$+a$(latt+1̱a$)  900 f$=:f$=""5000 Of$="x"a$=a$(1lna):xx=xx-1:r=13:61521Q:r f$="Q"8000@ Jf$="r"n$=( "&"le=lle)+(le+"&"lelle):.1}L,20:6070 2f$="d"sharp=0:flat =0:5500| f$="C"10 1f$="s"sharp=1flat =0:5500| 0f$="f"flat=1sharp=0:5500| f$="E"900 f$="M"500 Bf$=11 ci=ci+2:7000X:n=n+1:5500| f$="S"""a$():105i Bf$=10 ci=ci-2:7000X:n=n-1:5500| )f$=13 xx=xx+1:6000p Af$=8le=le-1:le=0le=12 :7000X Af$=9 le=le+1:le=13 le=1:7000X %f$=8f$=9 7000X f$="4"ˣ:':  f$="z"ˤa$  5000 |n=72Hn=65A n=64@n=71G .n$=("#"sharp=1)+("$"flat=1)+n *n=67Cf$=11 oct=oct+1 *n=66Bf$=10 oct=oct-1 p#1;0,0;"note:-";n$+32 ;1,0;"octave:-";oct,;flat;" ";sharp;" ";tri  DTz$=z$+("$"+nflat=1)+("#"+nsharp=1)+(nflat=0sharp=0) N10 ,20;z$ Xtri=tri+1 ]n$="" ^.2~L,20 _loctocto=1 b&tri=3tri=0:5800 go=1z$=z$+"o" l o=0  5000 a=1̱z$ z$(a)="o"5900  a :a$=a$+("O"+oct+"N"+le +z$octloct)+(le +z$oct=loct) le=5:z$=""  105i   h$(8)  z=1 a =1̱z$  z$(a)="o"a % x=z$(a) *=h$(z)= (( x+32 )) +( "#"x=35#)+("$"x=36$) 4 z=z+1 >a Ch$="O"+(oct)+"N"+le+h$ H a$=a$+h$ f 105i o p3 le=10 le =11 le=12 5700D t7a$=0n$="O"+oct+"N"+le+n:loct=oct:lle=le uJoctloctle =llen$="O"+oct+("#"sharp=1)+("$"flat =1)+n zEoct=loctƱa$0 n$=("#"sharp=1)+("$"flat=1)+n Rlleleloctoct n$="O"+oct+"N"+le+ ("#"sharp=1)+("$"flat=1)+n Klleleloct=octn$=le+("#"sharp=1)+("$"flat=1)+n:lle=le lellelle=le octloctloct =oct  lna=a$  a$=a$+n$ <xx=10 r=18:3582 :r:xx=0 $r=13:61500<:r  9000(# flat=0:sharp=0  XLr=815: t=29 :r,t;" ":r:9500%::y$(4) by$(x)=y(le,x) gx lx#1;0,11 ;0;7; m$(le):18,8 ; y$(2);19,8; y$(3) v  @"enter the attack no.-";t J)"enter the lenght of sound effect.-";s T2a$(1)"U"a$="UX"+s+"W"+t+a$:110n ^/a$(1)="U"a=1̱a$ :a$(a)"O"a h a$=a$(a) r 8020T  " a=51393]4 "a=71Ga "3 1; 0,a:1, 255,0 "a " #( a=51393]4 #*a=71Ga #-+ 231,a:1, 24,0 #2 a #F % 9000(# %!g=14 %$ h=y(le,g) %&h=32 g %'$h=88X+((h-144)*8) %(,g=1g=361441,240 %),g=2g=461441,248 %*%g=1g=261442,ci %+-g=3g=461442,ci-8 %0h>061445,h %:61440 %Dg %Iflat=0 sharp=0 %Nsharp=1h=159 %Oflat=1h=158 %P$h=88X+((h-144)*8) %Q61441,232 %R61445,h %S61440 % %1,220,30,0,17,88X+3*8,255,217,6,8,217,197,205,170,34",26,119w,19,193,5,217,16,243,217,201 % 9600% %/a=6144061440+24:b:a,b:a %61440 % %33!,0,72H,85U,62>,128,6,31,35#,94^,43+,115s,35#,16,249,114r,35#,61=,32 ,242,201 %33!,255,87W,22,0,62>,128,6,31,43+,94^,35#,115s,43+,16,249,114r,43+,61=,32 ,242,201 %29700%:a=61500<61542f:b:a,b:a % ']:!"music"9995  ':!"graphics""a",8*21:!"pixel"61440,105i: ' S61400 :!"graphics""a",8*21:!"pixel"61440,105i: 'V:"music"2:"graphics""a",8*21:"pixel"61440,105i: ':"erasing music4":"m";1;"music4":"saving music4":*"m";1;"music4"5:"verifing music4":*"m";1;"music4":"erasing graphics4":"m";1;"graphics4":"saving graphics4":* "m";1;"graphics4""a",8*21:"verifing graphics4":*"m";1;"graphics4":" erasing pixel4": "m";1;"pixel4":"saving pixel4":*"m";1;"pixel4"61440,105i:1 graphics Xŀ\xpxp xxqaAAAAφAAAqaAAAφ (4$(0 ,6l4` 3?  00<@<B<BBBBB<pixel iŀ.kM`ͪ"w!HU>#^+s#r#= !W>+^#s+r+= p