ZXTape! 0Created with Ramsoft MakeTZXknight _KS_:1:1,0;:" DEMON KNIGHT "'"THIS PROGRAM ALLOWS YOU TO HAVE AN ADVENTURE WITHOUT LEAVING YOUR ROOM.YOU CAN TRAVEL ABOUT DISCOVER SECRET PASSAGES AND MANIPULATE OBJECTS YOU FIND ON YOUR TRAVELS.DON'T GIVE UP,EVEN IF YOU SEEM HOPELESSLY STUCK- THERE'S ALWAYS A PUZZLE WAITING TO BE SOLVED!!! "'"I KNOW:QUIT,HELP,INVENTORY." F1:'" SET CAPS LOCK ON TO BEGIN...":0:0 ]:S(X)=(P(X)=502P(X)=60<):T(X )=(P(X)=502P(X)=60<P(X)=N) A$(11 ,3):B$(11 ,1):L$(26,84T):E$(26,4):D$(26,8):O$(524,28):P(524):C(524):S(524) Q$="":N=1 :I=0 V$="OPESACGO ENTWEATAKDROCUTCLILAYPLADIGUSEFILBLOSWEINVHELLANBURREAGETPICUNLWATTOUFEECLEEATKICSTADRIJUMSEAPULWAVTHRTAPQUILEACROLOO" 2'A=126:L$(A),E$(A),D$(A) 7A <-A=1524:O$(A),P(A),C(A),S(A):A F$A=111 :A$(A),B$(A):A K/90168#:A=07:Y:"U"+A,Y:A E:1:0,0;"I Am":1,0;L$(N):0 Ɍ4,0;"":2:5,0;"VISIBLE OBJECTS ARE:":6,0;"":0 :Z=1524:P(Z)=NS(Z)=1O$(Z)(4) Z P2:19,0;"Obvious Exits Are:":z=1̱E$(N):0 W$=E$(N)(Z):W$="N""NORTH "; W$="E""EAST "; W$="S""SOUTH "; W$="W""WEST "; Z:W$="" 16,0;Q$:Q$="" .21,0;"TELL ME WHAT TO DO?":J$ J$<3234 J$=32 215 A=1̱J$ J$(A)=" "235 A 'J$(13)="INV"3500 'J$(13)="HEL"3700t 'J$(13)="QUI"7900 'Q$="REPLY USING TWO WORDS":200 0R$=J$((A-1)):(R$)<3R$=R$+" " Y$=R$(13) ,S$=J$(A+1):S$<3S$=S$+" " ;S$=32 Q$="USE ONE SPACE BETWEEN WORDS":200 Z$=S$(13) A=1̱V$3 ;Y$V$(AA+2)A:Q$="I CAN'T "+R$+" "+S$:200 !K=((A-1)/3)+1 WA=1524:Z$O$(A)(13)A:Q$="What a silly idea!!":200 L=A 100d+(K*200) ,T(L)=095200% .{L=18C(18)=-1C(18)=-2:E$(14)(2)="C":D$(14)(3)="15":9510&% 0{L=25C(25)=-2C(25)=-3:E$(23)(2)="G":D$(23)(3)="24":9510&% 6#Q$="I CAN'T OPEN THAT":200 T(L)=095200% <P(11 )502Q$="NOTHING TO KILL WITH":200 L=15N=12 C(15)=-1C(15)=-2:C(11 )=2:O$(15)(4)="A DEAD COW":O$(11 )(4)="A BLOODY KNIFE":9510&% #Q$="I CAN'T KILL THAT":200 Z=111 $Z$A$(Z)Z:Z=0:9500%  W$=B$(Z) Z=1̱E$(N) 'W$E$(N)(Z)Z:Z=0:9500% -N=(D$(N)((Z*2)-1(Z*2)))  9510&%  700 L0P(L)=60<Q$="YOU ALREADY ARE":200 PP(L)5029537A% TAL=2C(L)=1P(L)=60<:C(L)=2:9510&% XBL=28C(L)=1P(L)=60<:C(L)=2:9510&% ZBL=23C(L)=1P(L)=60<:C(L)=2:9510&% \BL=31C(L)=1P(L)=60<:C(L)=2:9510&% ]$Q$="I CAN'T WEAR THAT!":200 4S(L)=1Q$="I'VE ALREADY GOT IT":200 P(L)N95200% &L=22S(L)=1:1310 &L=24C(L)=1:1310 HL=23C(L)=-1P(2)=60<C(L)=1:1310 UL=23C(L)=-1P(2)60<Q$="IT'S TOO HOT TO TAKE!":200 %L=7C(L)=2:1310 5I>5Q$="YOU'RE CARRYING TOO MUCH":200 7C(L)<0Q$="THAT STAYS WHERE IT IS!":200  (P(L)=502:I=I+1:9510&% 4S(L)=0Q$="YOU HAVE NOT GOT IT":200 bL=7N=6C(L)=1:P(L)=N:I=I-1:Q$="IT'S IN ITS TORCH HOLDER":200 %L=2C(L)=1:1510 &L=23C(L)=1:1510 &L=28C(L)=1:1510 &L=31C(L)=1:1510 !P(L)=N:I=I-1:9510&% T(L)=095200% ;P(11 )502Q$="NOTHING TO CUT WITH":200 <L=15C(L)=-1Q$="WITHOUT A CAUSE?":200 =C(11 )2Q$="THE KNIFE WON'T CUT IT":200 UL=35#N=26C(L)=-1P(L)=N:C(L)=1:S(L)=1:9510&% =L=13 C(13 )=-1Q$="BE GENTLE!":200 DL=27C(27)=-1Q$="SHE LAUGHS AT YOU":200  6300 lP(L)N95200% v5L=33!Q$="IT CAN'T TAKE MY WEIGHT":200 $L=32 N=23:9510&% /L=12 Q$="IT'S TOO SLIPPERY":200 BL=45-N=19Q$="I'M NOT GOING DOWN THERE!":200 %Q$="I CAN'T CLIMB THAT!":200 4P(L)5029537A% >}L=24C(L)=1N=19P(L)=19:C(L)=2:I=I-1:Q$="THEY JUST SPAN ACROSS THE PIT":200 H 1500 P(L)5029537A% 8L=29N=25C(480)=-19530:% L=29N=25C(480)=-2C(480)=-3:I=I-1:P(33!)=N:P(L)=40(:L$(25)(41))="":9510&% >L=13 Q$="I'M AFRAID THEY WON'T GROW AGAIN":200 $'Q$="YOU CAN'T PLANT THAT!":200 P(L)N95200% AP(14)502Q$="I CAN'T DIG WITH MY HANDS":200 WL=46.C(11 )=-1P(11 )=9 :C(11 )=1:9510&% bL=480C(L)=-1C(L)=-2:L$(25)(41))="With A Small Hole":9510&% #Q$="I CAN'T DIG THERE":200 T(L)=095200% @Q$="I'M PROBABLY WRONG,BUT THIS SEEMS USELESS!":200 TP(L)5029537A% ^YL=9 C(L)=1N=16C(L)=2:Q$="THEY ARE FULL OF AKALI":200 h[L=1C(L)=1N=13 C(L)=2:Q$="IT'S FULL OF MAGIC WATER":200 rOL=9 N=13 Q$="I CAN'T,MAGIC WATER CORRODES METAL!!":200 |#Q$="I CAN'T FILL THAT":200 FP(9 )502Q$="I HAVEN'T ANYTHING TO BLOW WITH":200 &T(L)=095200% 0L=19C(19)=-1N=15C(9 )=2C(9 )=1:C(19)=-2:O$(L)(4)="PARTS OF A SKELETON":E$(15)(3)="D":D$(15)(5)="17":9510&% 5"L=9 N=159530:% :Q$="PUFF!":200 >P(10 )502Q$="NOTHING TO SWEEP WITH!":200 P(L)N95200% oL=3N=4O$(L)="PARAN OLD PARCHMENT":C(3)=1:Q$="I CAN NOW SEE SOMETHING":200 L=38&C(L)=-1C(L)=-2:L$(2)(491)="With A Tunnel":E$(2)(3)="A":D$(2)(5)="03":Q$="IT'S NOW SWEPT":200 +Q$="VERY HOUSE PROUD, ARE WE?":200 7I=0Q$="YOU HAVEN'T GOT ANYTHING!!":200 :" INVENTORY ":"YOU ARE CARRYING:":Z=1524:P(Z)=502O$(Z)(4) Z H"YOU ARE WEARING:":Z=1524:P(Z)=60<O$(Z)(4) Z::9535?% to:" HELP "::P(13 )=502"FLOWERS HAVE SOME AMAZING POWERS" ~LP(11 )=502C(11 )=2"A BLOODY KNIFE COMBATS STRIFE!" eN=26C(27)=-1"TO EXORCISE EVIL AND ITS POWERS STOP,WHY NOT TRY,BURNING A LOCK!" JN=6"THERE'S MORE TO THIS ROOM AND ITS CONTENTS THAN YOU THINK"  9535?% <L=30C(12 )=-1N=10 P(8)=502P(L)=502:I=I+1:C(12 )=-2:C(L)=1:S(L)=1:Q$="I'VE GOT IT":200 AP(L)N95200% F$Q$="I CAN'T LANCE THAT":200 @P(7)502Q$="I'VE NOTHING TO BURN WITH":200 S(L)=09537A% L=35#N=26C(27)=1:C(28)=1:O$(27)(4)="A DEAD WITCH":Q$="IT BURNS WITH A GREEN VAPOUR WHICH GASSES THE WITCH":P(L)=40(:I=I-1:200 ")Q$="ARSON IS NOT PERMITTED!":200 ̿L=36$N=14:"IT SAYS:GL UIVV GSV KIRMXVHH,GL YV Z HFXXVHH,BLF NFHG IVZW GSV KHZON,DVZI Z XOLZP,XILHH ZMW Z OFXPB XSZIN,ZMW HGZY GSV LMV DSLHV WLRMT GSV SZIN"::9535?% P(L)5029537A% L=22C(22)=1N=24C(22)=2:Q$="I HEAR A MASSIVE CRACK OF THUNDER,ECHO THROUGH THE ROOM":200 7L=22C(22)=1N249530:% L=4:"IT SAYS: WILL I, THE KING, LEAVE ALL MY LANDS, POSSESSIONS AND MY DAUGHTER'SHAND IN MARRIAGE TO THE PERSON WHO CAN FIND AND RECOVER HER SAFELY.GOOD LUCK"::9535?% gL=3Q$="IF A CODED MESSAGE YOU JUST CAN'T GET,WHY NOT REVERSE THE ALPHABET!!":200 #Q$="I CAN'T READ THAT":200  1300 \P(L)N95200% f[L=13 C(L)=-1N=11 C(L)=1:P(L)=502:I=I+1:9510&% p[L=34"C(L)=-1N=13 C(L)=1:P(L)=502:I=I+1:9510&% z#Q$="I CAN'T PICK THAT":200 $6P(30)502Q$="I HAVE NO KEY!":200 .P(L)N95200% 8@L=25C(L)=-1N=23C(L)=-2:9510&% B%Q$="I CAN'T UNLOCK THAT":200 P(L)N95200% L=480C(L)=-3P(1)=502C(1)=2C(L)=-4:P(32 )=25:P(33!)=40(:C(1)=1:Q$="WOW!":200 $Q$="I CAN'T WATER THAT":200 T(L)=095200% (Q$="I FEEL NOTHING SPECIAL":200 | 5300 D 3300  T(L)=095200% iQ$="IF I THOUGHT YOU WERE SO HUNGRY I WOULD HAVE BROUGHT ALONG THE RUBBISH FROM THE CASTLE":200 P(L)N95200% @L=15C(L)=-1Q$="COW BASHING,TUT!TUT!":200 )L=1Q$="GOOD PUN!!!!":200 ?Q$="YOU MUST TRY NOT TO BE SO AGGRESSIVE !!":200 T(L)=095200% <P(11 )502Q$="NOTHING TO STAB WITH":200 =L=15C(L)=-1Q$="FOR WHAT PURPOSE?":200 L=34"P(L)=502C(31)=2C(28)=2C(23)=2C(22)=2P(22)=502N=249990' 1L=34"P(L)=502N249530:% FL=19C(L)=-1Q$="IT GOES RIGHT THROUGH HIM!":200 ZL=21C(L)=-1Q$="I CAN'T GET CLOSE ENOUGH- IT SMELLS SO BAD.":200 hL=26Q$="THE WHOLE POINT OF ALL THIS WAS TO SAVE HER YOU SILLY LITTLE ADVENTURER":200  9539C% dP(L)N95200% igL=17L=20Q$="I'M NOT DRINKING THAT IT MIGHT HAVE SOME STRANGE EFFECT ON ME":200 n 9538B% ,P(L)N95200% 65L>36$Q$="BECOME BIONIC HAVE YOU?":200 ; 9538B% T(L)=095200% @L=5C(L)=1C(L)=2:P(6)=N:9510&% YL=21C(L)=-1Q$="I CAN'T GET CLOSE ENOUGH IT SMELLS SO BAD":200 YL=21C(L)=-2P(31)=N:C(31)=1:C(L)=-3:9510&% nL=16C(L)=1P(29)=N:C(L)=2:C(29)=1:Q$="I FOUND SOMETHING":200 PL=27C(L)=-1Q$="BUT SHE MIGHT TURN ME INTO A FROG":200  eL=27C(L)=1Q$="I'M NOT SEARCHING A DEAD BODY ...ESPECIALLY NOT A WITCH!":200 TL=32 Q$="I CAN ONLY FIND BITS OF OLD BIRD'S NESTS AND TWIGS":200 GQ$="I'M SORRY SHERLOCK BUT I DIDN'T FIND ANYTHING SPECIAL":200 T(L)=095200% ƽL=7C(L)=1C(40()=-1C(40()=-2:L$(6)(579)="+Room":E$(6)(2)="B":D$(6)(3)="07":Q$="LOOK WHAT I FOUND!":200 'Q$="I'M NOT A BELL RINGER":200 P(L)5029537A% L=13 C(21)=-1N=18C(21)=-2:Q$="I DIDN'T THINK THEY SMELT THAT BAD":O$(21)(4)="SWEET SMELLING MONSTER":200 +Q$="WAVING THAT HAD NO EFFECT":200 L 1500 P(L)N95200% L=44,C(L)=-1C(L)=-2:L$(21)(66B)="With A Small Door!":E$(21)(3)="F":D$(21)(5)="22":Q$="WHAT'S THIS!":200 (*Q$="NOTHING SPECIAL HAPPENED":200 5:"DO YOU WISH TO SAVE THIS GAME ONTAPE (Y/N)":W$ W$"N"W$"Y"7900 W$="Y""ADVENTURE"75K W$="Y"200 ):5,5;"START THE TAPE":""  1500 lP(L)N95200% v1L=24C(L)=2N=20:9510&% .L=47/Q$="I WOULDN'T DARE!":200 $Q$="I CAN'T CROSS THAT":200 !4T(L)=095200% !9SL=28N=26C(L)=-1Q$="IT'S LEVITATING IN MID-AIR!!":200 !>8L=18N=14Q$="I SEE A MESSAGE":200 !HDL=12 N=10 Q$="AT THE VERY TOP I SEE A KEY":200 !MKL=34"P(L)=502Q$="IT LOOKS LIKE THE DEVIL HIMSELF":200 !f+L>35#Q$=O$(L)(4):200 !p'Q$="I SEE NOTHING SPECIAL":200 #("In Front Of A Massive,Securely Shut Cast Iron Portcullis","E","02","On A Dusty Path,With Nothing Living In Sight","NW","040103","In A Damp,Roomy Subterranean Secret Tunnel","NW","0209","In A Large But Deserted,Dirty Courtyard In Front Of A Magnificent Palace","NS","0502","In A Collosal Reception Room Of This Splendidly Decorated Palace","WS","0604","In A Jewel Encrusted , Golden Throne Room. What Decor! ","E","0507","In A Large, Concealed Armoury Room. Once,This Room Must Have Been Full Of Weapons","WE","0608" #*"In Front Of A Massive, Red BrickFireplace, Which Looks Disused","W","07","On A Long,Straight Dirt Road.Far,Far In The Distance I See An Eerie Building","WE","1003","Now On A Dirt Track,With Roads Leading Off In All Directions","NESW","11091214","Now In An Overgrown, Wild Field With A Very Pleasant Aroma In The Air.","S","10","I'm On A Small,Primitive & DirtyMedieval Farm.Whew,What A Stink!","NE","1013","At A Small,Neat Brick-Built Well.I Believe That Water From TheseWells Is Magic!","W","12","Now In Front Of A Large, Rusty Cast Iron Gate","E","10","In Front Of A Dingy,Evil LookingCastle","WS","1614","In Front Of A Small Steaming Alkaline Pool,A Sign Says: It Burns!!" #,"E","15","In A Small, Musty Kitchen, WhichHas Obiously Been Used As A Potion Room","NSW","211518","In A Dirty,Dingy Cave.Obnoxious Smells Pervade The Air","ES","1719","In Front Of A Very Deep Pit.In Fact It Appears Bottomless!","N","18","In A Huge, Run Down, Medieval Library.In Fact,I'm Surrounded By Books!","E","19","Now In A Stone Corridor, With Stones Walls On Both Sides Of Me","NS","2517","Now In A Secret Chapel. It LooksLike This Place Was Forgotten Years Ago","W","21","Now At The Top Of This Giant Oak Tree","H","25","In The Presence Of The Dark Lord,Beelzebub,Himself.He Makes My Flesh Creep","W","23","Now In A Barren And Desolate Garden","ES","2621" #.G"In A Witches Sorcery Room. I CanFeel The Powers Of Evil !!","W","25" #0"BUCA WOODEN BUCKET",17,1,1,"GLOA PADDED GLOVE",3,1,1,"RUBPILES OF ROTTING RUBBISH",4,-1,1,"LETHANDWRITTEN LETTER",5,1,1,"KINDEAD KING",6,1,1,"ROPA LONG,TOUGH ROPE",40(,1,1,"TORA BURNING TORCH",6,1,1,"LANA JOUSTING LANCE",7,1,1,"BELSTRANGE STEEL BELLOWS",8,1,1,"BROA WOODEN BROOM",8,1,1,"KNIA JEWELED KNIFE",40(,-1,1,"POSA HIGH SIGN POST",10 ,-1,1,"FLOSWEET SMELLING FLOWER",11 ,-1,1,"SPAA STRONG SPADE",11 ,1,1,"COWA FARMYARD COW",12 ,-1,1,"DUNA PILE OF COW DUNG",12 ,1,1,"WATMAGIC WATER",13 ,-1,1,"GATA RUSTING IRON GATE",14,-1,1,"SKEAN ANIMATED SKELETON",15,-1,1,"ALKA SMALL ALKALINE POOL",16,-1,1,"MONAN EVIL SMELLING MONSTER",18,-1,1 #2"PSAA BOOK OF PSALMS",20,1,2,"CROA HOLY CROSS",22,-1,1,"LADA SHORT WOODEN LADDER",25,1,1,"WINA WINDOW WITH A KEYHOLE",23,-1,1,"PRIA BEAUTIFUL PRINCESS",24,-1,1,"WITAN EVIL WITCH",26,-1,1,"CLOA MAGIC CLOAK",26,-1,1,"ACOA SMALL ACORN",40(,-1,1,"KEYA RUSTY KEY",10 ,-1,2,"TALA MAGIC TALISMAN",40(,-1,1,"TREA LARGE OAK TREE",40(,-1,1,"SHOA SMALL PUNY SHOOT",40(,-1,1,"MANA MANDRAKE PLANT",13 ,-1,1,"HAIWITCHES HAIR",26,-1,2,"MESIT'S CODED",14,-1,2,"PORIT'S JAMMED SHUT",1,-1,2,"PATIT'S VERY DUSTY",2,-1,2,"TUNIT'S VERY MUSTY IN HERE",3,-1,2,"ROOI CAN'T SEE",6,-1,2,"BOOTHERE ARE SO MANY",20,-1,2,"CASIT SEEMS VERY EVIL",15,-1,2,"DOOIT LOOKS HOLY",21,-1,2 #4"WALIT LOOKS SOLID",21,-1,2,"DOWIT'S A LONG WAY",23,-1,2,"ROATHE GROUND IS UNSETTLED",9 ,-1,2,"POOIT ATTACKS ALL PHOSPHATES",16,-1,2,"GAREVERYTHING IS SHRIVELLED",25,-1,2,"WESTHE SUN SETS THERE",23,-1,2,"EASI CAN SEE THE PALACE",23,-1,2,"NORI CAN SEE FOR MILES",23,-1,2,"SOUBEYOND THE PIT IS ...",23,-1,2 #6o"NOR","N","EAS","E","SOU","S","WES","W","DOW","H","TUN","A","ROO","B","GAT","C","CAS","D","DOO","F","WIN","G" #8Q0,0,0,01100110f,10011001,0,0,0 #<Q$=K+" "+L:200 %,Q$="SORRY,BUT I CAN'T GO THERE":200 %& Q$="O.K. IT'S DONE":200 %0/Q$="I CAN'T SEE ONE OF THOSE HERE":200 %:%Q$="I CAN'T DO THAT YET":200 %?1"PRESS ANY KEY TO CONTINUE":0:200 %@'Q$="I SEE NOTHING SPECIAL":200 %A& Q$="I'M NOT CARRYING IT":200 %B%Q$="YOU MUST BE JOKING!":200 %C1Q$="YOU JUST AREN'T CAPABLE OF THAT":200 ']:"WELL DONE WELL DONE WELL DONE AS YOU STAB THE MANDRAKE ROOT THE WHOLE ROOM SHUDDERS.A THICK GREEN SMOKE THEN FILLS THE AIR AND WHEN IT CLEARS BEELZEBUB IS NO LONGER THERE.THE PRINCESS IS NOW FREED ,AND YOU CAN CLAIM YOUR WEALTH AND HAPPINESS . PRESS ANY KEY TO RESTART. WELL DONE WELL DONE WELL DONE ":0: '"knight"1 & NOREASSOUWESDOWTUNROOGATCASDOOWIN NESWHABCDFG̍TIn Front Of A Massive,Securely Shut Cast Iron Portcullis On A Dusty Path,With Nothing Living In Sight In A Damp,Roomy Subterranean Secret Tunnel In A Large But Deserted,Dirty Courtyard In Front Of A Magnificent Palace In A Collosal Reception Room Of This Splendidly Decorated Palace In A Jewel Encrusted , Golden Throne Room. What Decor! In A Large, Concealed Armoury Room. Once,This Room Must Have Been Full Of WeaponsIn Front Of A Massive, Red BrickFireplace, Which Looks Disused On A Long,Straight Dirt Road.Far,Far In The Distance I See An Eerie Building Now On A Dirt Track,With Roads Leading Off In All Directions Now In An Overgrown, Wild Field With A Very Pleasant Aroma In The Air. I'm On A Small,Primitive & DirtyMedieval Farm.Whew,What A Stink! At A Small,Neat Brick-Built Well.I Believe That Water From TheseWells Is Magic! Now In Front Of A Large, Rusty Cast Iron Gate In Front Of A Dingy,Evil LookingCastle In Front Of A Small Steaming Alkaline Pool,A Sign Says: It Burns!! In A Small, Musty Kitchen, WhichHas Obiously Been Used As A Potion Room In A Dirty,Dingy Cave.Obnoxious Smells Pervade The Air In Front Of A Very Deep Pit.In Fact It Appears Bottomless! In A Huge, Run Down, Medieval Library.In Fact,I'm Surrounded By Books! Now In A Stone Corridor, With Stones Walls On Both Sides Of Me Now In A Secret Chapel. It LooksLike This Place Was Forgotten Years Ago Now At The Top Of This Giant Oak Tree In The Presence Of The Dark Lord,Beelzebub,Himself.He Makes My Flesh Creep Now In A Barren And Desolate Garden In A Witches Sorcery Room. I CanFeel The Powers Of Evil !! mE NW NW NS WS E WE W WE NESWS NE W E WS E NSW ES N E NS W H W ES W 02 040103 0209 0502 0604 0507 0608 07 1003 1109121410 1013 12 10 1614 15 211518 1719 18 19 2517 21 25 23 2621 25 ϵ4BUCA WOODEN BUCKET GLOA PADDED GLOVE RUBPILES OF ROTTING RUBBISH LETHANDWRITTEN LETTER KINDEAD KING ROPA LONG,TOUGH ROPE TORA BURNING TORCH LANA JOUSTING LANCE BELSTRANGE STEEL BELLOWS BROA WOODEN BROOM KNIA JEWELED KNIFE POSA HIGH SIGN POST FLOSWEET SMELLING FLOWER SPAA STRONG SPADE COWA FARMYARD COW DUNA PILE OF COW DUNG WATMAGIC WATER GATA RUSTING IRON GATE SKEAN ANIMATED SKELETON ALKA SMALL ALKALINE POOL MONAN EVIL SMELLING MONSTER PSAA BOOK OF PSALMS CROA HOLY CROSS LADA SHORT WOODEN LADDER WINA WINDOW WITH A KEYHOLE PRIA BEAUTIFUL PRINCESS WITAN EVIL WITCH CLOA MAGIC CLOAK ACOA SMALL ACORN KEYA RUSTY KEY TALA MAGIC TALISMAN TREA LARGE OAK TREE SHOA SMALL PUNY SHOOT MANA MANDRAKE PLANT HAIWITCHES HAIR MESIT'S CODED PORIT'S JAMMED SHUT PATIT'S VERY DUSTY TUNIT'S VERY MUSTY IN HERE ROOI CAN'T SEE BOOTHERE ARE SO MANY CASIT SEEMS VERY EVIL DOOIT LOOKS HOLY WALIT LOOKS SOLID DOWIT'S A LONG WAY ROATHE GROUND IS UNSETTLED POOIT ATTACKS ALL PHOSPHATESGAREVERYTHING IS SHRIVELLED WESTHE SUN SETS THERE EASI CAN SEE THE PALACE NORI CAN SEE FOR MILES SOUBEYOND THE PIT IS ... 4(( ( (((  44niV~OPESACGO ENTWEATAKDROCUTCLILAYPLADIGUSEFILBLOSWEINVHELLANBURREAGETPICUNLWATTOUFEECLEEATKICSTADRIJUMSEAPULWAVTHRTAPQUILEACROLOOyQJQUITWNYellak 툠qq7:0:0::1;8,4;"ELLAK'S TOMB HAS LOADED";10 ,10 ;"STOP TAPE" U2,25:200:csp1=0:csp2=0:csp3=0:csp4=0 k:f$=" ":n$=" ":o$=n$:r$=n$:q$=n$:i$=" ":j$=i$:k$=i$:l$=i$ Yp$="":sword=0:wand=0:jewel=0:orb=0:key=0:room=0:plan=0:mzpoi=2:chardir=1:sp1=0:sp2=0:sp3=0:sp4=0:x$="":t$(4,3):t$(1)="WAR":t$(2)="WIZ":t$(3)="PRE":t$(4)="THI":t1=502:t2=30:t3=40(:t4=35# 0:6;" CHARACTER GENERATION";1:2;"______________________":.25~,14:4;5,1;"PLAYERS= 4" 7,1;"Here is an example of a player";9 ,1;"# NAME CLASS STATUS CASH";5;10 ,1;"1 ROTHGAR WAR 50 00 " j12 ,2;"The NAME is put in by you.";13 ,2;"You know about CLASS already." #14,2;"STATUS is a measure of your stamina.It will decrease with wounds and increase with more provisions,rest,etc." (z18,2;"CASH is a measure of the players gold pieces.";6;20,2;"Press any key." 2Y0:2::h$=" " 72,2;"CHARACTER GENERATION";1;2,2;"____________________":0:4,0;"PLAYERS= 4";5,10 ;"NAME CLASS STAT CA" <8f=69 :f,0;"PLAYER #";f-5;":" A-("Name #";f-5;" (9 letters max.)"),x$ F#x$<1űx$>9 65A Kf=6n$=x$ Pf=7o$=x$ Uf=8r$=x$ Zf=9 q$=x$ _bf,10 ;x$;18,0;"NOW CLASS.PRESS W FOR WARRIOR, Z FOR WIZARD,P PRIEST,T THIEF" d0:18,0;h$ i="w"Ŧ="W"130 n="z"Ŧ="Z"160 s="p"Ŧ="P"190 x="t"Ŧ="T"220 }N.25~,30:18,0;"Press W,Z,P or T, please!":100d f,21;t$(1) f=6i$=t$(1) f=7j$=t$(1) f=8k$=t$(1) f=9 l$=t$(1) 245 f,21;t$(2) (f=6i$=t$(2):sp1=6 (f=7j$=t$(2):sp2=6 (f=8k$=t$(2):sp3=6 (f=9 l$=t$(2):sp4=6 245 f,21;t$(3) )f=6i$=t$(3):csp1=4 )f=7j$=t$(3):csp2=4 )f=8k$=t$(3):csp3=4 )f=9 l$=t$(3):csp4=4 245 f,21;t$(4) f=6i$=t$(4) f=7j$=t$(4) f=8k$=t$(4) f=9 l$=t$(4) f=6270 f=7295' f=8320@ f=9 345Y  f:370r .t$(1)=i$6,27;t1:st1=t1 .t$(2)=i$6,27;t2:st1=t2 .t$(3)=i$6,27;t3:st1=t3 .t$(4)=i$6,27;t4:st1=t4 ".c1=00:6,31;c1:265  '.t$(1)=j$7,27;t1:st2=t1 ,.t$(2)=j$7,27;t2:st2=t2 1.t$(3)=j$7,27;t3:st2=t3 6.t$(4)=j$7,27;t4:st2=t4 ;.c2=00:7,31;c2:265  @.t$(1)=k$8,27;t1:st3=t1 E.t$(2)=k$8,27;t2:st3=t2 J.t$(3)=k$8,27;t3:st3=t3 O.t$(4)=k$8,27;t4:st3=t4 T.c3=00:8,31;c3:265  Y.t$(1)=l$9 ,27;t1:st4=t1 ^.t$(2)=l$9 ,27;t2:st4=t2 c.t$(3)=l$9 ,27;t3:st4=t3 h.t$(4)=l$9 ,27;t4:st4=t4 m.c4=00:9 ,31;c4:265  r:18,4;"PRESS ANY KEY...":0:x=0 w9.25~,10 ::10 ,10 ;"PLEASE WAIT." | 2370B  2340$ 4:10 ,7;"PREPARE TO ENTER!":300, 0:6:0::0,0:0,175:255,0:0,-175:-255,0:0,480:255,0:0,88X:255,0:87W,88X:0,87W:  11 ,1;"SPECIAL TREASURES RECORD AREA";16,1;"# NAME CLASS STATUS CASH";17,1;"1 ";n$;17,14;i$;17,21;st1;17,28;c1;18,1;"2 ";o$;18,14;j$;18,21;st2;18,28;c2 19,1;"3 ";r$;19,14;k$;19,21;st3;19,28;c3;20,1;"4 ";q$;20,14;l$;20,21;st4;20,28;c4 (63700,11 :dum=63701 1,1;"WELCOME..";1,12 ;"YOU ENTER THROUGH":2,12 ;"A HUGE,ROCK-CARVED":3,12 ;"ARCHWAY. YOU FEEL":4,12 ;"AS THOUGH YOU ARE":5,12 ;"BEING WATCHED..." Cf=110 :.1}L,f:.1}L,f+f:.1}L,0:f 80P:.18~8Q,-6:20:.18~8Q,-7:20:.18~8Q,-9 :20:.18~8Q,-7:20:.18~8Q,-6:20:.18~8Q,-4:20:1,-2: #150:2835 :2600( 42835 :63700,10 :dum=63701 46.,114r,1 (1,12 ;"YOU GO TO THE DOOR" 'f=(*10 ):f>3448 f2,12 ;"IT IS LOCKED.":st1>0i$="THI"3,12 ;n$;" OPENS IT":449 Cst2>0j$="THI"3,12 ;o$;" OPENS IT":449 Cst3>0k$="THI"3,12 ;r$;" OPENS IT":449 Cst4>0l$="THI"3,12 ;q$;" OPENS IT":449 X3,12 ;"YOU CAN'T OPEN IT!";4,12 ;"PRESS ANY KEY...":0: %2,12 ;"IT IS UNLOCKED." E5,12 ;"PRESS ANY KEY...";6,15;"TO ENTER!!" )0:2835 :.25~,30 .455:v=07:n:"a"+v,n:v K153,90Z,60<,24,24,60<,36$,102f  3000 s=1+(*10 ) s31531 v=1+(*15) m$(15,8) m$(1)="APE" m$(2)="BEAR" m$(3)="GOBLIN" m$(4)="KOBOLD" m$(5)="MINOTAUR" m$(6)="OGRE" m$(7)="ORC"  m$(8)="SKELETON" m$(9 )="ZOMBIE" m$(10 )="GIANT" m$(11 )="WRAITH" !m$(12 )="SPIDER" &m$(13 )="CYCLOPS" +m$(14)="VAMPIRE" 0m$(15)="SERPENT" :mt=0:C(15) ??C(1)=35#:C(2)=40(:C(3)=25 D?C(4)=25:C(5)=95_:C(6)=80P I?C(7)=20:C(8)=45-:C(9 )=60< NCC(10 )=120x:C(11 )=502:C(12 )=40( SBC(13 )=90Z:C(14)=80P:C(15)=45- Xf=115 ]v=fp$=m$(f):v=fmt=C(f) bf gv10 740 lv=11 645 qv=12 665 vv=13 685 {v=14705 v=15725 645:v=07 n:"a"+v,n:v L0,24,165,126~,60<,568,112p,192  740 665:v=07 n:"a"+v,n:v H0,0,0,24,60<,127,255,84T  740 685:v=07 n:"a"+v,n:v K568,40(,568,214,186,568,40(,40(  740 705:v=07 n:"a"+v,n:v H0,24,24,60<,60<,60<,60<,24  740 725:v=07 n:"a"+v,n:v K480,568,32 ,62>,1,126~,128,126~ Z7;5,8;"";1,12 ;"YOU ENCOUNTER ONE";2,12 ;p$ <f=115:.1}L,10 :.1}L,0:f #70F:i=(*20)+1 i>81035  Hmt01,-4:2,-6:mt01520 +1;0;5,1;" "  3000  2820 E30:3,12 ;"THE ";p$;4,12 ;"ATTACKS!!" :v=(*4)+1:v=1st1>08204 "v=2st2>0875k  "v=3st3>0930 "v=4st4>0985 =st10st20st30st402585 "v=1st10770  "v=2st20770 %"v=3st30770 *"v=4st40770 /Hmt01,-4:2,-6:mt01540 4mt>st1d=mt-st1:830> 9^mtst15,12 ;"BUT THE ";6,12 ;p$;" MISSES!!":200:1035  >b35#:7,12 ;n$;" IS HIT!":2,-4:2,-5:2,-6: CYst1=st1-d:17,21;st1:st1<10 st1>017,21;" ";st1 Hst1>0870f MI17,1;"";5,1;"" R.5,-4:.5,-4:.13~R,-4:.5,-4:.5,-1:.13~R,-2:.13~R,-2:.13~R,-4:.13~R,-4:.13~R,-5:.75@,-4:2820 Wwand1870f \1,12 ;"PRESS R TO USE";2,12 ;"THE WAND OF LIFE";3,12 ;"TO RESURRECT";4,12 ;n$;5,12 ;"OR ANY OTHER KEY";6,12 ;"TO CONTINUE":0 a="r"Ŧ="R"18455 c 3000 f 1035  kmt>st2d=mt-st2:885u p^mtst25,12 ;"BUT THE ";6,12 ;p$;" MISSES!!":200:1035  ub35#:7,12 ;o$;" IS HIT!":2,-4:2,-5:2,-6: zYst2=st2-d:18,21;st2:st2<10 st2018,21;" ";st2 st2>0925 I18,1;"";5,2;"" .5,-4:.5,-4:.13~R,-4:.5,-4:.5,-1:.13~R,-2:.13~R,-2:.13~R,-4:.13~R,-4:.13~R,-5:.75@,-4:2820 wand1925 1,12 ;"PRESS R TO USE";2,12 ;"THE WAND OF LIFE";3,12 ;"TO RESURRECT";4,12 ;o$;5,12 ;"OR ANY OTHER KEY";6,12 ;"TO CONTINUE":0 ="r"Ŧ="R"1855?  3000  1035  mt>st3d=mt-st3:940 ^mtst35,12 ;"BUT THE ";6,12 ;p$;" MISSES!!":200:1035  b35#:7,12 ;r$;" IS HIT!":2,-4:2,-5:2,-6: Yst3=st3-d:19,21;st3:st3<10 st3>019,21;" ";st3 st3>0980 I19,1;"";5,3;"" .5,-4:.5,-4:.13~R,-4:.5,-4:.5,-1:.13~R,-2:.13~R,-2:.13~R,-4:.13~R,-4:.13~R,-5:.75@,-4:2820 wand1980 1,12 ;"PRESS R TO USE";2,12 ;"THE WAND OF LIFE";3,12 ;"TO RESURRECT";4,12 ;r$;5,12 ;"OR ANY OTHER KEY";6,12 ;"TO CONTINUE":0 ="r"Ŧ="R"1865I  3000  1035  mt>st4d=mt-st4:995 ^mtst45,12 ;"BUT THE ";6,12 ;p$;" MISSES!!":200:1035  b35#:7,12 ;q$;" IS HIT!":2,-4:2,-5:2,-6: Yst4=st4-d:20,21;st4:st4<10 st4>020,21;" ";st4 st4>01035  I20,1;"";5,4;"" .5,-4:.5,-4:.13~R,-4:.5,-4:.5,-1:.13~R,-2:.13~R,-2:.13~R,-4:.13~R,-4:.13~R,-5:.75@,-4:2820 wand11035  1,12 ;"PRESS R TO USE";2,12 ;"THE WAND OF LIFE";3,12 ;"TO RESURRECT";4,12 ;q$;5,12 ;"OR ANY OTHER KEY";6,12 ;"TO CONTINUE":0 ="r"Ŧ="R"1875S  3000  .25~,0:2820 =st10st20st30st402585 S2,12 ;"WHO ATTACKS?":st1>03,12 ;"PRESS 1 FOR #1" 1st2>04,12 ;"PRESS 2 FOR #2" 1st3>05,12 ;"PRESS 3 FOR #3" 1st4>06,12 ;"PRESS 4 FOR #4"  0 ="1"10753 $="2"1110V )="3"1145y .="4"1180 3 .25~,10 :2820 8st1>01090B =Yst108,12 ;n$;" IS DEAD";9 ,12 ;"TRY AGAIN!":1040 Be1;1;5,1;" ";2,12 ;n$;" ATTACKS":st=st1:1505:0 G="7"1215 L="8"1375_ Q="9"orb=11515 V .25~,10 :2820 [st2>01125e `Yst208,12 ;o$;" IS DEAD";9 ,12 ;"TRY AGAIN!":1040 ee1;1;5,2;" ";2,12 ;o$;" ATTACKS":ad=st2:1505:0 j="7"1255 o="8"1405} t="9"orb=11515 y .25~,10 :2820 ~st3>01160 Yst308,12 ;r$;" IS DEAD";9 ,12 ;"TRY AGAIN!":1040 e1;1;5,3;" ";2,12 ;r$;" ATTACKS":aq=st3:1505:0 ="7"1295 ="8"1435 ="9"orb=11515  .25~,10 :2820 st4>01195 Yst408,12 ;q$;" IS DEAD";9 ,12 ;"TRY AGAIN!":1040 e1;1;5,4;" ";2,12 ;q$;" ATTACKS":ah=st4:1505:0 ="7"13357 ="8"1470 ="9"orb=11515 st01398v s\7,12 ;"NO SPELLS LEFT";8,12 ;"LOSE YOUR GO!":100d:755 vsp1=sp1-1 w@f=0:(5,1)=134f=1:1403{ x5(5,2)=134f=2:1403{ y5(5,3)=134f=3:1403{ z5(5,4)=134f=4:1403{ {0;0;0;5,f;" ";5,5;3;"":6;480,133:6;15,-4 |1;3;6;5,8;"":g=40(0-1:.01z# =,g:g:0;-15,4:5,5;" ";5,f;3;"":200:1532 }j$="WIZ"1420 |6,12 ;"IDIOT! ";o$;7,12 ;"ISN'T A WIZARD!";8,12 ;"LOSE YOUR GO!":100d:755 *sp2>0sp2=sp2-1:1399w  1395s k$="WIZ"1450 |6,12 ;"IDIOT! ";r$;7,12 ;"ISN'T A WIZARD!";8,12 ;"LOSE YOUR GO!":100d:755 *sp3>0sp3=sp3-1:1399w  1395s l$="WIZ"1485 |6,12 ;"IDIOT! ";q$;7,12 ;"ISN'T A WIZARD!";8,12 ;"LOSE YOUR GO!":100d:755 *sp4>0sp4=sp4-1:1399w  1395s 3,12 ;"PRESS 7 FOR SWORD";4,12 ;" 8 FOR SPELL":orb=15,12 ;" 9 FOR ORB"   orb=2  2820 71;0;5,1;" ":3000 6;5,8;"":1,12 ;"THE MONSTER LIES";2,12 ;"DEAD ON THE FLOOR":200:1532 k1,12 ;"THERE ARE NO";2,12 ;"MONSTERS IN THE ";3,12 ;"ROOM":150  2835 Acsp10csp20csp30csp401553 I1,12 ;"WANT TO USE A CURE";2,12 ;"SPELL? (y/n)" "0:="n"Ŧ="N"1553 .1}L,10 :2835 jcsp1>01,12 ;"WHO WILL ";n$;2,12 ;"CURE ?":csp1=csp1-1:1541 jcsp2>01,12 ;"WHO WILL ";o$;2,12 ;"CURE ?":csp2=csp2-1:1541 jcsp3>01,12 ;"WHO WILL ";r$;2,12 ;"CURE ?":csp3=csp3-1:1541 jcsp4>01,12 ;"WHO WILL ";q$;2,12 ;"CURE ?":csp4=csp4-1:1541 1st1>03,12 ;"PRESS 1 FOR #1" 1st2>04,12 ;"PRESS 2 FOR #2" 1st3>05,12 ;"PRESS 3 FOR #3" 1st4>06,12 ;"PRESS 4 FOR #4"  R0:="1"st1>0st1=st1+10 :17,21;st1:1550  I="2"st2>0st2=st2+10 :18,21;st2:1550  I="3"st3>0st3=st3+10 :19,21;st3:1550  I="4"st4>0st4=st4+10 :20,21;st4:1550  k7,12 ;"THAT CHARACTER";8,12 ;"IS ALREADY DEAD.";9 ,12 ;"SPELL WASTED!" )2,20:100d:2835  1533 uchardir=1v$="l"chardir=1v$="L"chardir=0v$="r"chardir=0v$="R"room=B(mzpoi+502) vchardir=1v$="r"chardir=1v$="R"chardir=0v$="l"chardir=0v$="L"room=B(mzpoi+100d) plan=room/8:1915{ x=(*4)+1 !x=1x=415851 "x=21690 'x=31705 ,5;5,6;"" 1>6;5,4;"":5;5,6;"" 6A1,12 ;"YOU HAVE FOUND";2,12 ;" AND " ;7tres=(*10 )+1:prov=(*5)+1 @1c1=c1+tres:c2=c2+tres:c3=c3+tres:c4=c4+tres: E?17,28;c1:c1<10 17,28;" ";c1 J?18,28;c2:c2<10 18,28;" ";c2 O?19,28;c3:c3<10 19,28;" ";c3 T?20,28;c4:c4<10 20,28;" ";c4 Yst1>0st1=st1+prov ^st2>0st2=st2+prov cst3>0st3=st3+prov hst4>0st4=st4+prov mB17,21;st1:st1<10 17,21;" ";st1 rB18,21;st2:st2<10 18,21;" ";st2 wB19,21;st3:st3<10 19,21;" ";st3 |B20,21;st4:st4<10 20,21;" ";st4 Ast1017,1;"" Ast2018,1;"" Ast3019,1;"" Ast4020,1;""  1715 45;5,4;"";5,6;"" A1,12 ;"YOU HAVE FOUND";2,12 ;" AND "  1715 45;5,4;"";5,6;"" A1,12 ;"YOU HAVE FOUND";2,12 ;" AND " U200:2835 :1,12 ;"YOU SEARCH THE";2,12 ;"ROOM." /v=(*4)+1:v=11735 &3,12 ;"YOU FIND NOTHING"  1835+ Bsword=1wand1jewel=1orb11805  v=(*4)+1 %v=1sword=11725 $v=2wand11725 %v=3jewel=11725 #v=4orb11725 &v=1sword=1:1785 %v=2wand=1:1790 &v=3jewel=1:1795 $v=4orb=1:1800 ]3,12 ;"YOU FIND THE";4,12 ;"SWORD OF ELLAK":1810 [3,12 ;"YOU FIND THE";4,12 ;"WAND OF LIFE":1810 ]3,12 ;"YOU FIND THE";4,12 ;"JEWEL OF ELLAK":1810 T3,12 ;"YOU FIND THE";4,12 ;"DEATH ORB":1810  `3,12 ;"YOU FIND THE";4,12 ;"TOMB KEY":key=1:1810 Esword=15;0;12 ,1;"SWORD OF ELLAK" Cwand=12;7;12 ,17;"WAND OF LIFE" Ejewel=17;1;13 ,1;"JEWEL OF ELLAK" !Borb=15;0;13 ,17;"DEATH ORB " &5key=11;14,11 ;"TOMB KEY" +N100d:5,12 ;"PRESS ANY KEY...";6,12 ;"TO LEAVE" 0 0: 5wand=2:st1=30:17,1;f$;17,1;"1 ";n$;17,14;i$;17,21;st1;17,28;c1:c1<10 17,28;" ";c1 : ?wand=2:st2=30:18,1;f$;18,1;"2 ";o$;18,14;j$;18,21;st2;18,28;c2:c2<10 18,28;" ";c2 D Iwand=2:st3=30:19,1;f$;19,1;"3 ";r$;19,14;k$;19,21;st3;19,28;c3:c3<10 19,28;" ";c3 N Swand=2:st4=30:20,1;f$;20,1;"4 ";q$;20,14;l$;20,21;st4;20,28;c4:c4<10 20,28;" ";c4 X ]'63700,0:dum=63701 b g'63700,1:dum=63701 l q'63700,2:dum=63701 v {plan=11930 plan=21950 plan=31970 '63700,3:dum=63701 1,12 ;"OPPOSITE IS A PLAN";2,12 ;"VIEW OF THE EDGES";3,12 ;"OF THE ROOM YOU";4,12 ;"ARE IN.";5,13 ;"SCALE: _ =5 ft.";7,12 ;"PRESS C - CONTINUE" )0:.25~,10 :2835  '63700,4:dum=63701 1,12 ;"OPPOSITE IS A PLAN";2,12 ;"VIEW OF THE EDGES";3,12 ;"OF THE ROOM YOU";4,12 ;"ARE IN.";5,13 ;"SCALE: _ =5 ft.";7,12 ;"PRESS C - CONTINUE" )0:.25~,10 :2835  '63700,5:dum=63701 1,12 ;"OPPOSITE IS A PLAN";2,12 ;"VIEW OF THE EDGES";3,12 ;"OF THE ROOM YOU";4,12 ;"ARE IN.";5,13 ;"SCALE: _ =5 ft.";7,12 ;"PRESS C - CONTINUE" )0:.25~,10 :2835  1,12 ;"YOU REACH A ";2,12 ;"JUNCTION.A PASSAGE";3,12 ;"JOINS TO THE LEFT.";4,12 ;"PRESS F - FORWARD";5,12 ;" B - BACK";6,12 ;" L - LEFT"  1885] "0:="f"Ŧ="F"2020 ?="b"Ŧ="B"mzpoi=mzpoi-1:chardir=0:2600( ="l"Ŧ="L"2025 !mzpoi=mzpoi+5:2600( mzpoi=mzpoi+1 2835 :x=A(mzpoi) #x=12675s :2055 Mx=2chardir=1x=3chardir=02710 :2055 Mx=3chardir=1x=2chardir=02735 :2055 x=42065 x=9 2655_  2030 1,12 ;"YOU REACH A ";2,12 ;"T-JUNCTION.";3,12 ;"PRESS L - LEFT";4,12 ;" R - RIGHT";5,12 ;" B - BACK"  1895g 30:="b"Ŧ="B"chardir=1:2025  ="l"Ŧ="L"2095/ %.="r"Ŧ="R"mzpoi=mzpoi-1:2600( * 2075 /2chardir=1:mzpoi=mzpoi+5:2600( 41,12 ;"YOU REACH A ";2,12 ;"JUNCTION.A PASSAGE";3,12 ;"JOINS TO THE RIGHT";4,12 ;"PRESS F - FORWARD";5,12 ;" B - BACK";6,12 ;" R - RIGHT" 9 1905q >"0:="f"Ŧ="F"2130R C="b"Ŧ="B"2135W H="r"Ŧ="R"2140\ M 2110> R!mzpoi=mzpoi-1:2600( W2mzpoi=mzpoi+5:chardir=1:2600( \2mzpoi=mzpoi+1:chardir=1:2030 a1,12 ;"YOU REACH A ";2,12 ;"JUNCTION.A PASSAGE";3,12 ;"JOINS TO THE LEFT.";4,12 ;"PRESS F - FORWARD";5,12 ;" B - BACK";6,12 ;" L - LEFT" f 1885] k 0 p?="b"Ŧ="B"mzpoi=mzpoi-1:chardir=0:2600( u.="l"Ŧ="L"mzpoi=mzpoi+5:2600( z="f"Ŧ="F"2180  2155k mzpoi=mzpoi+1 2835 :x=A(mzpoi) #x=12675s :2210 Mx=2chardir=1x=3chardir=02710 :2210 Mx=3chardir=1x=2chardir=02735 :2210 x=52220 x=9 2655_  2185 1,12 ;"YOU REACH A ";2,12 ;"JUNCTION.A PASSAGE";3,12 ;"JOINS TO THE RIGHT";4,12 ;"PRESS R - RIGHT";5,12 ;" B - BACK";6,12 ;" F - FORWARD"  1905q  0 ?="r"Ŧ="R"mzpoi=mzpoi+5:chardir=1:2600( *="b"Ŧ="B"chardir=1:2180 .="f"Ŧ="F"mzpoi=mzpoi-1:2600(  2230 ϸ1,12 ;"YOU REACH A ";2,12 ;"T-JUNCTION.";3,12 ;"PRESS B - BACK";4,12 ;" L - LEFT";5,12 ;" R - RIGHT"  1895g  0 ?="b"Ŧ="B"mzpoi=mzpoi+5:chardir=1:2600( *="l"Ŧ="L"chardir=1:2180 .="r"Ŧ="R"mzpoi=mzpoi-1:2600(  2265 key=12300 2660d :2600( 0:0:5::f=031:4;85U,f:4;85U,0:f:f=32 120x:85U,f:85U,0:f ;4,10 ;"ELLAK'S TOMB";5,14;"EXIT" Wg=14:a$="12345654567876789997479":f=1̱a$:.1}L,a$(f):f:g 40,1;"WELL DONE! THE CURSE IS LIFTED." Z1,1;"PRESS

TO PLAY AGAIN";2,1;"PRESS TO EXIT":0 ="p"Ŧ="P"10 ="x"Ŧ="X"  2320 $/f=1150:B(f)=823553 )f . 3g=(*3)+1 8B(f)=(8*g) =f BxENDS=0:CRSS=0:FIG=0:A(502):B(150):A(1)=6:A(502)=7:F=2 GF44,2510 LFIG=(*6) Q#FIG=0F=22380L VA(F-1)=FIG2380L [FIG=12500 `FIG=42440 eFIG=52545 jFIG=02475 o A(F)=FIG t%F=F+1:F44,2510 y 2380L ~ 1B(F+502)=8:B(F+100d)=8: $A(F)=4:A(F+4)=9 'F=F+1:A(F)=9 2470 FIG=(*3)+1 A(F-1)=FIG2450 FIG=12435 A(F)=FIG:2445 F=F+1:2375G iS=2(F-1):A(S)=0A(S)=6ENDS=ENDS+1:A(S)=4CRSS=CRSS+1:S "POSS=CRSS*2:NUM=POSS-ENDS NUM>2A(F)=0 NUM22380L 2420t ;B(F+502)=8:B(F+100d)=8:2415o C=F491 FIG=(*3)+1 A(C-1)=FIG2515 FIG=12435 A(C)=FIG C  A(F)=5 A(F+4)=9 'F=F+1:A(F)=9 2580 FIG=(*3)+1 A(F-1)=FIG2560 FIG=12435 A(F)=FIG:2555 F=F+1:2375G j0:7:0::10 ,11 ;"BAD LUCK!";11 ,4;"THE TOMB HAS BEATEN YOU." Pg=14:a$="5500661176545555":f=1̱a$:.1}L,a$(f):f:g # 2320 (x=0:2835 -?x=A(mzpoi):x=9 chardir=12660d :2600( 2<x=9 chardir=0mzpoi=mzpoi-4:2600( 7#x=12675s :2600(  !!X  6# Iog 6# j9z9Z1P  O O OPOP70707(7(O 7(/(/(/0/070/0@@/(@@@@HHPH P  O O OPOP?@?@??M ??? 88?88@@PP  O O OPOP?@?@??N ???777777?777''''''7' ''''' MPHHHH@@@@0000888 8 0 0 0000@0@0@H@H0H0H0P0PPP@@@@0000    ((((((((888(8(@(@(@@@@8@8@8H8H H H P PP P8888((((@@@0@080808@8@@@@@@P@PPP  O O OPOP3030#0#0P#0# #  # 3 3 O 3 30H((++?HHH(H(@+@+@?P  O O OPOP3838838333O P  O O OPP$8$8O8P$8$8O8$8$$O$ P  O O OPOP?@?@@@P@ ??O ??@4 - -$*$**$09-3-3+1(,,0"0"2"2"5%P*7P7*7**N,,3,3,3N3NNK K K @ @@@K; ; ; 0 000;#K.K.K.@.@#@#@#K#;.;.;.0.0#0#0#;P**  ##--4 4 7*7*7P7P/P/P/*/*-$-$) ) ##  $$**PPP{0xBWyK_{ox0zg}(0HDz0>2è>2XT!! o g;;;{_!~ٶw }2>2|8g?=0,!! >ق0 o g;;;{_!~ٶw|2[>2}8o?<0$!! >Çق0 o g ;;;{_!~ٶwɀ@ @ABCDEFG @ A B C D E F G@@@A@B@C@D@E@F@G`@`A`B`C`D`E`F`G@ABCDEFG@ABCDEFG@ABCDEFG@ABCDEFGHIJKLMNO H I J K L M N O@H@I@J@K@L@M@N@O`H`I`J`K`L`M`N`OHIJKLMNOHIJKLMNOHIJKLMNOHIJKLMNOPQRSTUVW P Q R S T U V W@P@Q@R@S@T@U@V@W`P`Q`R`S`T`U`V`WPQRSTUVWPQRSTUVWPQRSTUVWPQRSTUVWMR?R:YWq !v>Z<<$fZ$$<$$<~~TT|8