L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 CcˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( t Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`ZY AND YOU FIND YOURSELF BACK ON THE MAIN ROAD TO THE MAIN HALL.":2000WBG18200rBG /// RELEASE PRISONERB"GROOM60AD%(9,4)ROOMCRCR1:MD%(2,5)ROOM:AD%(21,4)0:3600:300C,GROOM59AD%(8,4)ROOMCSCS1:MD%(4,5)ROOM:AD%(22,4)0:3600:ΠΠōΠōŠōΠōƍՠŠԠˠġŠŠӠŠŠԠԠǠϠ̠ŠήՠŠҠŠŠƠ̮ԠӠǠĠՠŠٮՠŠ̠ˠԠ٠ϠӠՠĠŠͮՠנӠӠϠ٠ԬŠԠӠͭǠȠՠ٠ӠԠӮԠӠǠՠŬήՠŠҠΠ٠٠ĠŮŠӠŠƠŠ̠ӮՠŠҠΠ٠٠ĠŮŠӠŠƠŠ̠ӮՠŠΠΠ٠̠ӠҠΠҮӠՠҠŠĠӠנŠՠԠŠԠӡŠӠԠŠΠĠӠԠծՠŠĠĠԠǠΠŠҮΠՠĠάՠŠ͠ЮՠŠŠŠ٠ҮŠӠǠȠӠҠΠՠŠήՠŠŠŠ٠ҮŠӠǠȠӠҠΠՠŠήՠŠҠҠǠҠǠӮŠӠǠϠǮՠŠ٠٠ΠŠǠŠ̠ϠŠȮŠӠŠˠΠŠŠԠӠϠŮŠΠŠӠΠĠՠΠנϠԮŠԮҠӠ٠ŠˠΠŠŠԠӠϠŮՠŠ٠٠ΠŠǠŠ̠ϠŠԮҠӠ٠ŠˠΠŠŠԠӠϠŮՠŠŠŠȠŠΠΠԮՠŠǠƠԠӠǠ٠ŠŠήՠŠŠĠΠǠŠԠƠŠԮŠӠנԠէŠĠ͠ԧӠΧšˮŠӠŠӠΠĠƠՠΠԠ͠Šԧ̠ŠΧŮՠŠŠĠ٠ƠōՠŠŠĠ٠ƠōčԍԠҍˠč̠čӠԍӍ̠č٠ҍԍҍ٠ҍō΍ӍٍŠ΍ՠŠ٠̠̠ǠŠԠȠŠҠΠŠΠҠԠԠՠԠԠũŠӠҠŠӠŠĠŠӠĠ٠ŠŠήŠǠΠԠӠΠŠˠӠΠġӠΠӠŠӠŠՠҠ͠ŠΡĠŠǠΠӠϠӡŠӠԠҠϠŠǠЬҮĠ٠Š̠ŠήՠŠΠǠŠŠŠȠŠҠΠŠΠӠԮŠӠՠҠǠ͠ĠӠӠŠӠӮήŠήՠŠ٠٠ǠΠǠŠĠƠ̠ӮŠӠǠƠΠӠĬԠӠŠĮ      z                   ՠŠΠŠ٠ȠǠҮŠŠΠĠˠĠҠ٠ӠӮŠ٠ԠӠϠŠȮՠŠΠŠ٠ȠǠҮŠŠΠĠˠĠҠ٠ӠӮŠ٠ԠӠϠŠȮՠŠԠԧήՠ٠ϠԬȠҠȮϠŠȠȠŠŠӮՠŠΠΠԯԠ̮ŠԧΠϠȠŠԠĠԮՠŠԠԧήӠϠȬԠĠԮՠŠΠΠԯԠ̮ϠŠԠŠӠԧήՠŠԠĠΠŠ̮Š̠Ӡ͠ŠԠϠŠȮՠŠԠĠΠŠ̮Š̠Ӡ͠ȠϠԮՠŠΠΠԠҮŠԠӠϠŠԮŠҠӠԠŠΠŮՠŠΠήŠŠŠӠĠŠӠƠŠŠ٠ԠӠϠŠȮՠŠΠȯȠ̮ŠŠӠϠŠԠĠȮՠŠΠŠήŠŠĠӠĠҠ̠̠ӠΠŮŠŮŠ٠ԠӠϠŠԮՠŠΠήŠŠŠӠĠŠӠƠŠŠ٠ԠӠϠŠȮՠŠΠȯȠ̮ϠŠԠĠȠŠŠӮՠŠԠԧήŠӠϠŠȠĠȠˠҠӠƠȠҮՠŠΠΠԯԠ̮ϠŠԠՠŠԧήՠŠΠΠԯԠ̮ϠŠԠՠŠҭ٠ήՠŠΠȠҮՠŠΠȯȠ̮ՠŠΠȯȠ̮ՠŠΠȯȠ̮ŠŠӠȠԠĠԮϠŠȠŠ̠ӠĠĠՠΠϠҠϠԠٮՠŠΠ̠ԠҮŠ٠ԠӠϠŠԮՠŠΠ̠ȠҮŠӠΠԠϠŠȮՠŠΠΠԯԠ̮ŠҠϠŠԠĠҠϠȮՠŠԠҭ٠ήϠŠԠՠΠŠŠӮϠŠԠΠ٠ӮՠŠΠȯȠ̮ՠŠΠҠŠήŠŠӠĠӠŠͮŠ٠ԠӠϠŠԮՠŠԠĠΠŠ̮ŠӠҠϠŠԠĠŠ̠ӠȮՠŠΠԠҮŠ٠ӠϠŠԮՠŠΠ̠ԠҮŠ٠ԠӠϠŠԮՠŠΠȯȠ̮ŠӠҠϠŠԠĠҠϠŠԮՠŠԠĠΠŠ̮Š̠ӠԠĠȠ͠ŮՠŠΠΠԯԠ̮ϠŠԠՠŠҠ٠ήՠŠΠ̠ԠҮŠ٠ԠӠϠŠԮՠŠΠ̠ԠҮŠ٠ԠӠϠŠԮՠŠΠ̠ҠȠҠϠŠȮՠŠΠ̠ҠȠҠϠŠȮՠŠΠΠԯԠ̠ȠҠϠȠŠȠĠȮՠŠԠԧήŠȠ̠ӠԠĠŮՠŠΠȯȠ̮ŠӠҠϠŠԮՠŠΠŠȠҮŠǠӠ٠ȠŮŠ٠ӠϠŠȮՠŠԠĠΠŠ̮Š̠Ӡ͠ԠϠȮĠōĠōĠōĠōĠōĠōĠōĠōΠΠԯԠ̮ԠԧήίӯשΠŠŠҮΠŠŠҮԠĠΠŠ̮ůөԠĠΠŠ̮ůΩΠΠԯԠ̮ԠԧήίůשΠŠήͮΠȯȠ̮Π΍ΠΠԠҮҮΠȯȠ̮ΠȯȠ̮ΠȠҮΠΠԯԠ̮ΠΠԯԠ̮Π̠ȠҮΠ̠ԠҮΠȯȠ̮ԠĠΠŠ̮ӯשΠŠήΠȯȠ̮ԠҠ٠ήԠĠΠŠ̮ΠȯȠ̮Π̠ԠҮΠԠҮΠ̠ҮΠ̠ԠҮΠ̠ԠҮΠΠԯԠ̮ΠȯȠ̮ԠԧήίӯשΠΠԯԠ̮Π̠ҮԠҠ٠ήΠȠҮԠĠΠŠ̮ίשΠŠȠҮΠҧӠήΠȯȠ̮ԠҠ٠ήΠΠԯԠ̮ԠĠΠŠ̮ӯשΠ̠ŠͮΠ̠ԠҮΠ̠ԠҮΠȠҮΠȯȠ̮ԠԧΠίӯũΠΠԯԠ̮ՠŠΠΠҮŠ٠ԠӠϠŠȮՠŠԠҠ٠ήՠԠϠȬҠŠŠӠΠŭΠƠԠ̮ՠŠΠΠԯԠ̮ϠŠԠՠŠҠ٠ήՠŠԠҠ٠ήŠӠϠΠ̠ӮՠŠΠȯȠ̮ŠӠҠϠŠԮՠŠΠ̠ҠԠӠנǠĠҠΠ٠ҠĠӮՠŠΠ̠ԠҮŠԠӠϠŠԮՠŠΠ̠ҠȠΠԠϠŠԮŠҠӠԠŠΠŮՠŠΠŠͮŠŠ٠ӠĠӠĠҠӠƠ٠ŠŠŮŠ٠ԠӠϠŠԮՠŠԠĠΠŠ̮Š̠ӠԠĠȠ͠ŮՠŠΠΠԯԠ̮ŠӠҠϠŠȮՠŠΠȯȠ̮ŠӠҠ̠ǠԮՠŠΠȯȠ̮ŠӠҠϠŠԮՠŠΠȠҮՠŠΠΠԠҮŠԠӠϠŠԮՠŠΠ̠ȠҮŠ٠ԠՠΠŠӠϠŠȮ ōӠٍōōōōōōՠŠŠĠ٠ƠōՠŠŠĠ٠ƠōՠŠŠĠ٠ƠōՠŠŠĠ٠ƠōՠŠŠĠ٠ƠōՠŠŠĠ٠ƠōՠŠŠǠԠԠӠŠԠӠŠԠƠԠӠԠˠ٠ٮՠŠŠƠŠŠΧӠӠӮՠŠŠƠŠŠΧӠӠӮՠŠŠƠŠŠΧӠӠӮՠŠŠƠŠŠΧӠӠӮՠŠŠƠŠŠΧӠӠӮՠŠŠƠŠŠΧӠӠӮՠŠŠƠŠŠΧӠӠӮՠŠĠŠΠŠĠŠΠĠϠŠŮՠŠǠΠŠĠϠŠΠ̮ΠΠԯԠ̮ԠŠԠĠƠ̮Π̠ȠҮΠΠԠҮƍōōōōōč :"THE GATE WON'T BUDGE":100HAF:"I DON'T KNOW WHAT YOU MEAN.":300^AF /// HAS DEVICEAFROOM25AD%(5,4)ROOMAD%(25,4)ROOM:AD%(5,4)0:100AFROOM55AD%(3,4)ROOMAD%(3,4)0:AD%(4,4)ROOM:100LBFROOM70ROOM71ĺ:"THE ROOM GOES ALL FUZՠŠԠŠԠĠƠ̮ŠȬȠĠԠŠӮՠŠΠΠԯԠ̠ϠŠԠՠΠŠŠӮՠŠԠԧΠΠŠ̮ՠ٠ϠȬȠҠԮ DEVICESTAFF D STATUEEBONY STATUECONTROL CONSOLEOPEN IRON GATEBOUND BENJOHNNY IN A CAGEBOUND GIRLRICHARDSJEWELSGOLD COINSJEWELED DAGGERSWORD 17SWORDBUTTONBUTTONMAGIC ARMOURLIGHTSWORDDARKSWORDENERGY SCEPTREBUTTONBUTTONBOTTLEGOLD OREIRON GATEOPEN IRON GATEIRON GATESTRANGEARDDEAD GIANT SPIDERDEAD MAGENTA'S CATDEAD IMPERIAL GUARDDEAD IMPERIAL GUARDDEAD TYRANNUSDEAD HERMITDEAD BABY COUGARDEAD BABY COUGARDEAD COUGARDEAD BENDEAD SUEDEAD JOHNNYDEAD RICHARDSDEAD MOLE MANARTIFACT 33ARTIFACT 32ARTIFACT 31ARTIFACT 30ARTIFACT 29IVORYNUSHERMITBABY COUGARBABY COUGARCOUGARBENSUEJOHNNYRICHARDSMOLE MANDEAD NOTHINGSLAUGHTERED ARMYDEAD LAVA CREATUREDEAD SLAVEDEAD SLAVEDEAD SLAVEDEAD SLAVEDEAD SLAVEDEAD SLAVEDEAD SLAVEDEAD PROFESSORDEAD WILD BOARDEAD RAPPERDEAD SEARGENTDEAD GUARDDEAD ROCK LIZ YSAVESAVE MACEEBONYDRAGONFANGMAGIC STAFFMACEEBONYDRAGONFANGMAGIC STAFFMABERNONNOTHINGMINDLESS ARMYLAVA CREATURESLAVESLAVESLAVESLAVESLAVESLAVESLAVEPROFESSORWILD BOARRAPPERSEARGENTGUARDROCK LIZARDGIANT SPIDERMAGENTA'S CATIMPERIAL GUARDIMPERIAL GUARDTYRAN  EAAE)(EAAE)AD%(A,5)WA%(AD%(A,6))2MD%(0,2):MD%(0,9)A:MD%(0,11)AD%(A,7):MD%(0,12)AD%(A,8){@FF:"READIED."::300@PF /// PUSH COMMAND@ZF4900:S$"BUTTON"AD%(2,4)118100@dFS$"BUTTON"18200AnFS$"GATE"(AD%(5,4)ROOMAD%(3,4)ROOM)Ķ  #)49Ӳ Iրa'# '' Cv%  Z^XI #5W7 2 (#'ՠŠԠĠΠŠ̮Š̠Ӡ͠ŠԠϠŠȮՠŠΠΠԯԠ̮ŠĠΠŠ̠ϠŠԮՠŠΠŠȠŠ٠ԠϠŠȮŠŠŠǠӠΠŠ̠ŮՠŠΠŮŠŠŠĠӠĠŠӠƠŠŠ٠ԠӠϠŠȮՠŠΠΠԯԠ̮ŠŠӠϠŠȠĠȮՠŠΠ̠ŮŠ٠ԠӠϠŠȮՠŠΠΠԯԠ̮ŠҠϠŠȮՠŠԠȯȯԠԧҭήԠӠϠˠϠŠǠƠԠ٠ŠΠҠήՠŠΠȯȠ̮ՠŠԠŠ͠ƠŠԠՠŠҠήՠԠŠŠРƠŠԬϠԠӠ٠ˠŮŠӠ̠ϠŠȮz#?     ήӠ!ήà Π͠B ȠԠ Ӡ ŠҠ ŮҠΠŠԠΠŠŠΠήŠήӠή͠ӠήӠREyDK$(4):DK$;"DELETE A";(8);"-> EAMON ADVENTURE #";NUM;" <-":DK$;"SAVE A";(8);"-> EAMON ADVENTURE #";NUM;" <-"DK$;"RENAME EXEC,SAVE ALTERED BASE PROGRAM HERE"A.NAME":DK$;"WRITE EAMON.NAME":A$:ND:DK$;"CLOSE" R14:F$:DK$;"OPEN EAMON.";F$:DK$;"CLOSE"::DK$;"OPEN EAMON.DESC":DK$;"WRITE EAMON.DESC":"0,0,0,0":DK$;"CLOSE" ROOMS,ROOM NAMES,MONSTERS,ARTIFACTS DK$;"EXEC EXEC": RESTART HE:DK$;"INIT A";(8);"-> EAMON ADVENTURE #";NUM;" <-,V";NUM DK$;"OPEN EXEC":DK$;"WRITE EXEC":"0 A$=";(34);A$;(34);":NUM=";NUM;":A2$=";(34);A2$;(34):"DEL 100,199":"200 NUM=";NUM:"RUN 200" DK$;"OPEN A";(8):DK$;"CLOSE"3 DK$;"OPEN EAMON"ZZZZ"(A$)30110D x12:"ENTER AUTHOR NAME ";A2$:(A2$)25120 16:"ENTER DUNGEON NUMBER ";A3$:NUM(A3$):NUM(NUM)NUM3NUM254(NUM)A3$130 18:"SIX OR TEN DIRECTION MOVEMENT:";ND$:ND$"6"ND$"10"135 ND(ND$): DK$(4)MON MASTER DISKETTE WHICH MUST BE BOOTED UP ON.":9 < d::"REPLACE DUNGEON DESIGN DISKETTE WITH NEW DISKETTE NOW"::::"INITIALIZING NEW DUNGEON DISKETTE FOR"::18);"EAMON": n8:"ENTER THE NAME OF THE DUNGEON"::" ";A$:A$"A"A$ϢՠŠΠ٠ƠŠӠӮŠԠŠԠԠ٠ŠԠϠˠ٠ӮՠŠΠΠΠҠȠŠŠӠƠԠΠӠҮՠŠΠΠΠҠȠ٠ĠϠՠנԠŠŠĠƠĮՠŠҠȠӠΠŠŮՠŠĠȠŠҠĠΠԮՠŠĠĮՠŠΠĠϠŠ̮ՠŠΠĠϠŠ̮ՠŠǠԠƠҠԠӠΠΠŠ͠ƠخԠӠàҡՠŠǠĠȠŠŠħĠΠŠԮՠŠԠˠĠȠŠŠħĠΠԮخԠӠàҡՠŠΠŠƠҮԠŠĠ٠ŮՠŠΠĠΠŠ̮ՠŠΠĠϠŠ̮ՠŠΠĠΠŠĠȠŠĠƠĮՠŠŠǠŠԠΠŠנĮՠŠԠǠΠΠŠ ԠҠΠҩĠĠҮŠǠΠӠ ԠӠҠҧՠҠנǠŠĠΠϠĠĠˠҠǠΠӠǠϠˮՠŠԠӠϠŠΠĠƮŠӠǠŠҮՠŠӠĠ̠ҠŠŠͮҍōҍĠҍԠԠԠԠ٠ōԠ̠ō٠ōĠ΍ΠΠōĠ̍٠ΠōӍӍĠҍĠӍčĠ΍΍čàҍ٠ōč΍΍ĠōōԠΠŠŠ΍ՠŠԠՠŠԠՠŠԠՠŠԠՠŠԠՠŠ̠٠ŠƠԠŮՠŠ̠٠ŠƠԮՠŠŠŠԠӠϠŠ٠̠ŠƠӮŠΠŠӠΠĠՠΠנϠȮՠŠŠĠΠĠ٠٠ŠӮŠӠӠŠӠΠĠŠĠŠԠƠՠĠŠͮՠŠĠĠǠΠĠΠΠҭԠӠŮՠŠ̠Ġ̠Ġ٠٠ӮՠŠΧӠŠǠԠƠӠԠΠԠ̠̮ŠӠŠΠŠŠƠŠ̠ԠӠӧՠŠŠԠƠӮՠŠŠŠƠĠӮ          ĠٍĠǍĠĠҍĠҍĠԍĠҍĠˠčĠčĠӠԍĠԠҍĠ̠čĠ̠čĠԍĠӍĠ٠ҍĠ٠ҍĠ΍ĠҍĠٍĠōĠŠ΍ĠӍ"""          ՠŠŠĠ٠ƠˠčՠŠŠĠ٠ƠԠҍՠŠŠĠ٠ƠӠԍՠŠŠĠ٠Ơ̠čՠŠŠĠ٠Ơ̠čՠŠŠĠ٠ƠӍՠŠŠĠ٠ƠԍՠŠŠĠ٠Ơ٠ҍՠŠŠĠ٠Ơ٠ҍՠŠŠĠ٠ƠҍՠŠŠĠ٠Ơ΍ՠŠŠĠ٠ƠōՠŠŠĠ٠ƠٍՠŠŠĠ٠ƠӍՠŠŠĠ٠ƠŠ΍        (DBJ4900:S$"BOTTLE"S$"POTION"19100LDLJAD%(7,4)1S$"POTION":19100sDVJ:"DID YOU BRING SOMETHING?":100DJAD%(7,4)1ī19030DJDRDR1:DR0DR0::"THE BOTTLE IS EMPTY.":300DJMD%(0,13)MD%(0,13)5:MD%(0,13)0MD%(0,13)0 EJDF0:300NC6GROOM62AD%(14,4)ROOMCBCB1:MD%(5,5)ROOM:AD%(24,4)0:3600:300C@GROOM63AD%(15,4)ROOMCJCJ1:MD%(3,5)ROOM:AD%(23,4)0:3600:300ChGAD%(2,4)1ĺ:"NOTHING HAPPENED.":300CrG:"I DON'T KNOW WHAT YOU MEAN.":300C8J /// DRINKՠŠŠĠ٠ƠҍՠŠŠĠ٠ƠĠҍՠŠŠĠ٠ƠҍՠŠŠĠ٠ƠԍՠŠŠĠ٠Ơč              ՠŠŠĠ٠ƠǍՠŠǠƠԮ "WHEN YOU GOT TO THE FOREST YOU FOUND":"SOME TRACKS. YOU STARTED FOLLOWING THEM":"AND SOON FOUND YOURSELF LOST. JUST AS" "YOU WERE ABOUT TO GIVE UP HOPE, YOU FELT":"A HAND GRAB YOU AROUND THE ANKLE AND":"PULL YOU INTO A PIT. YOU ABOUT STRANGE RUMBLINGS IN":"THE MAREWOOD FOREST, A FEW MILES OUTSIDE" n"OF TOWN. BEING THE INQUISITIVE SORT":"AND FEELING SOMEWHAT ADVENTUROUS AFTER":"YOUR LAST EXCURSION, YOU DECIDE TO GO":"TO THE FOREST TO INVESTIGATE.": x8000                                         Ǎ WERE CAUGHT BY" "SURPRISE AND HAD NO CHANCE TO FIGHT BACK":"YOU LOST CONCIOUSNESS WHEN YOU GOT BELOW":"GROUND LEVEL. (PROBABLY NOT ENOUGH AIR!) 8000 :D$"RUN MAIN PGM" @::"PRESS ANY KEY TO CONTINUE";:A$: J:::DK$;"SAVE A";(8);"-> EAMON ADVENTURE #";NUM;" <-"i DK$;"RENAME EXEC,SAVE ALTERED BASE PROGRAM HERE"o AA$;" WAS":" DEVELOPED BY ";A2$ 2"NON-COMMERCIAL DISTRIBTION ENCOURAGED."::"TO USE THIS DISKETTE REQUIRES AN EAMON MASTER DISKETTE WHICH MUST BE BOOTED UP ON.": < NUM263 DK$(4):DK$;"DELETE A";(8);"-> EAMON ADVENTURE #";NUM;" <-":2)));"**";38);"*****************************************": 12);"ADVENTURE #";NUM;" FOR"::7);"THE WONDERFUL WORLD OF EAMON"::"----------------------------------------"" ("THE EAMON FANTASY GAMING SYSTEM WAS DEVELOPED BY DONALD BROWN":q;A$"ASSAULT ON THE MOLE MAN":NUM26:A2$"JOHN NELSON"C9wD$(4):D$"VERIFY GAME.PTRS":D$"RUN MAIN PGM" 216,0 ::< "*****************************************";38);"**";((38(A$))2));A$;((38(A$))2)((A$)2((A$)   W2:EA0:MD%(0,8)0:A2(AC2):A22ACMD%(0,8)1:EA5VA2MD%(0,8)MD%(0,8)A2:EAEAA210:A23MD%(0,8)MD%(0,8)2:EAEA30`NANZMD%(0,10)(EAAE)(EAAE)WO%(1)WA%(WT%(1))2MD%(0,2):MD%(0,7)0:MD%(0,9)NZ1:MD%(0,11)WD%(1):MD%(0,12)WS%:WN$(W2)"NONE"NANA1:AN$(NA)WN$(W2):AD%(NA,2)2:AD%(NA,3)2:AD%(NA,4)1:AD%(NA,5)WO%(W2):AD%(NA,6)WT%(W2):AD%(NA,7)WD%(W2):AD%(NA,8)WS%(W2)::W248WZW2:WTWWZBW21WZ:A1NAWZ:AN$(A)WN$(W2)AN$(A)AN$(A)"#":A00::10908LA,)::A15:WA%(A)::AE,SEX$,GOLD,BANK,ACNW15:WN$(NW),WT%(NW),WO%(NW),WD%(NW),WP%(NW):A14:WN$(A),WT%(A),WO%(A),WD%(A),WS%(A)::DK$;"CLOSE"$DK$;"OPEN EAMON.DESC,L256":DK$;"OPEN EAMON.ROOM NAMES,L64":DK$;"OPEN EAMON.ROOMS,L64".W214AD%(A,A2):A2A:DK$;"OPEN EAMON.MONSTERS,L128":MN$(NM),MD%(NM,15):A1NM:DK$;"READ EAMON.MONSTERS,R";A:MN$(A):A2112:MD%(A,A2):A2,A:DK$;"CLOSE"*DK$;"OPEN FRESH MEAT":DK$;"READ FRESH MEAT":REC:MN$(0),MD%(0,1),MD%(0,2),CH:A14:SA%(A///INITIALIZE DATAgDK$;"OPEN EAMON.DESC":DK$;"READ EAMON.DESC":NR,NZ,NE,NM:DK$;"CLOSE":NANZ DK$;"OPEN EAMON.ARTIFACTS,L128":AN$(NA4),AD%(NA4,9):A1NA:DK$;"READ EAMON.ARTIFACTS,R";A:AN$(A):A214:AD%(A,A2):A2:AD%(A,2)1āA258:F0:7500:490]rM21NM:MD%(M2,5)ROOMMD%(M2,14)3(1).25DFM2:7500:M2200:M2:490u|M2:DF0:7500:490~OFMM21NM:MD%(M2,5)ROOMMD%(M2,14)1DFM2:7500:M2200:M2:490M2NBTL(FD%(1)TD%(1)):NBTLĂM100)(MD%(M,14)2):MRFD%(M2)TD%(M2)(41(1)20)TMD%(M,4)MRĺ:MN$(M);" FLEES OUT AN EXIT."::8500:MD%(M,5)R2:M2MD%(M,14):TD%(M2)TD%(M2)MD%(M,1):FD%(M2)FD%(M2)MD%(M,13):490YMD%(M,14)2490^MD%(M,14)3390hOFM:TD%(3)MD%(0,1)D000,3000,3000,3000,4000,4000,5000,5000,6000,6000,7000,8000,8000,8000,9000,10000,10000,11000,12000,13000,14000,15000,15000,16000,17000,30000 'C3418000,19000 ,///COMMANDS RETURN TO HERE 6NBTL500 @M1NM:MD%(M,5)ROOM4900JM2MD%(M,14,A1):S$(A$,A1)3 (S$,1)" "S$(S$,2):260 C1NC:C$(C)V$C$(C)S$Ă::"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);20(C$(C)));::::210 C$(C)S$S$V$:V$C$(C) "C3000,3000,3000,3000,3000,3000,3000,3000,3R";A100:A$:DK$:A$:AD%(A,9)1:\ A:AANA:AD%(A,4)ROOMĺ"YOUR ";AN$(A)" IS HERE."n A:V%(ROOM)1 :" YOUR COMMAND?";A$ (A$,1)" "A$(A$,2):220 A$""A$CZ$:(37):17:A$ CZ$A$:A2(A$):(A$,A,1)" "Ă V$(A$: M1NM:MD%(M,5)ROOMMD%(M,15)ĺMN$(M);" IS HERE.": MD%(M,5)ROOMMD%(M,15)ĺDK$;"READ EAMON.DESC,R";M300:A$:DK$:A$:MD%(M,15)1: M:A1NZ:AD%(A,4)ROOMAD%(A,9)ĺ"YOU SEE ";AN$(A)" AD%(A,4)ROOMAD%(A,9)ĺDK$;"READ EAMON.DESC,SPDMD%(0,2)MD%(0,2)2:MD%(0,10)MD%(0,10)2MD%(0,2):(1).8ĺ"YOUR SPEED SPELL HAS JUST EXPIRED!": V%(ROOM)ĺDK$;"READ EAMON.ROOM NAMES,R";ROOM:A$:DK$:"YOU ARE ":" ";A$: V%(ROOM)ĺDK$;"READ EAMON.DESC,R";ROOM:A$:DK$:A$::V%(ROOM)1#@ EAMON ADVENTURE #26? -> ASSAULT ON MOLE MAN <-E_ BY JOHN NELSON en 50DK$(4):DK$"VERIFY GAME.PTRS":310002216,0:1000d///MAIN LOOP. FIRST GIVE ROOM DESC, THEN GET COMMANDng xSPDSPDSPD1:                     "       ADVENTURE NAME1 BY JOHN NELSON7> L D$(4):D$"OPEN FRESH MEAT":D$"READ FRESH MEAT":REC:NAME$:D$"CLOSE"ZK d"WHEN YOU WERE TALKING TO SOME PEOPLE IN":"THE MAIN HALL, YOU HEARD SOMEONE SAY ":"SOMETHING    "YOU AREN'T CARRYING A ";S$::100Y$WTWTAD%(A,3):AD%(A,4)ROOM:AN$(A);" DROPPED.":$WT10MD%(0,1)ĺ"YOU SUDDENLY FIND YOU CANNOT CARRY ALL OF THE ITEMS YOU ARE CARRYING, AND THEY ALL FALL TO THE GROUND."::5100%MD%(0,9)0ĭAD%(MD%(0,9),4OT PREVIOUSLY SPECIFIED.?#)S$""ĺ:C$(C);" WHAT";:S$:4900E#.Z#///DROP COMMANDm#S$"ALL"5100#(S$"ON "AN$(13))V$"PUT"PAMD%(0,8):MD%(0,8)8:EA0::"YOU'VE DONNED THE ARMOUR":AD%(13,4)1"$A1NA:AN$(A)S$AD%(A,4)1Ă::^::300F"h///INSERT HERE SPECIAL EFFECTS OF PICKING SOMETHING UP"rA8A9A14A15ĺ:"THE BUTTON WAS BOOBY TRAPPED!!"::"A THOUSAND VOLTS OF ELECTRICITY RUNS":"THROUGH YOUR BODY AND YOU DIE."::DIE1:2000"#$///ROUTINE TO GET S$ IF NAVY FOR YOU."::100_!,:"GOT IT.":AD%(A,4)1:WTWTAD%(A,3)::AD%(A,2)2MD%(0,9)1300j!617000!@A1NA:AD%(A,4)ROOM4190!J4200:WTAD%(A,3)10MD%(0,1)ĺAN$(A);" IS TOO HEAVY":4190!TAN$(A)" TAKEN.":AD%(A,4)1:WTWTAD%(A,3) "(A)TD%(A)MD%(M,1), <M:NBTL(TD%(1)0):@ ///GET COMMANDJ 4900] S$"ALL"4160 A1NA:(AN$(A)S$S$(AN$,(S$))S$(AN$,(S$)))AD%(A,4)ROOMĂ::"I SEE NO ";S$;" HERE!"::100!"4200:WTAD%(A,3)10MD%(0,1)ĺ:"IT IS TOO HEMD%(M,14)1200(1)MD%(M,4))MD%(M,5)ROOM:3670K.MD%(M,5)ROOM3900_8MD%(M,14)3670BFRMD%(M,3):FRFR100FRFR((CH10)2)LMD%(M,14)1:FR(100(1))MD%(M,14)2:FR(100(1))MD%(M,14)3 VAMD%(M,14):FD%(A)FD%(A)MD%(M,13):TD%INTO THE":" SUNSET.":2000* R23490Z :"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100t R3ROOM:ROOMR2:3600}100///CHECK REACTIONS ON MONSTERSTD%(1)0:TD%(3)MD%(0,1):FD%(1)0:FD%(3)MD%(0,13)2$M1NM:MD%(M,5)R3ĭMD%(M,14)3( D16:(V$,1)("NSEWUD",D,1)Ă[ DK$;"READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$ (AD%(3,4)ROOMD4)(AD%(5,4)ROOMD2)ĺ:"THE IRON GATE BLOCKS THE WAY!":100 R203500 ///SPECIAL MOVES R299ĺ:"YOU SUCCESSFULLY RIDE OFF 14:WN$(A):WT%(A):WO%(A):WD%(A):WS%(A): DK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":MN$(0):REC:DK$;"CLOSE"T DK$;"RUN MAIN HALL,S6,D1" ///MOVE COMMAND NBTLĺ:"YOU CAN'T DO THAT WITH UNFRIENDLIES ABOUT!"::100%520  A$X DIEĺDK$;"OPEN THE ADVENTURER,S6,D1":DK$;"DELETE THE ADVENTURER":2900 DK$;"OPEN CHARACTERS,L150,S6,D1":DK$;"WRITE CHARACTERS,R";REC:MN$(0):MD%(0,1):MD%(0,2):CH:A14:SA%(A):- A15:WA%(A)::AE:SEX$:GOLD:BANK:AC:A AD%(A,2)0AD%(A,1)AD%(A,1)CH108$ TPTPAD%(A,1)U. A:TP;" GOLD PIECES.":8 GOLDGOLDTP::"(HIT ANY KEY TO CONTINUE) ";:A$: 2500 :5:"(INSERT EAMON MASTER DISKETTE, THEN":" HIT THE 'C' KEY) ";:16368,0 A$:A$"C"2D%(WP%(W),6):WO%(W)AD%(WP%(W),5):WD%(W)AD%(WP%(W),7):WS%(W)AD%(WP%(W),8) W::5:"AS YOU DELIVER YOUR TREASURES TO SAM":"SLICKER, THE LOCAL BUYER FOR SUCH":"THINGS, HE EXAMINES YOUR GOODS AND":"PAYS YOU "; TP0:A1NA:AD%(A,4)12350%W1W21:4);W;"--";WN$(W):::"ENTER THE NUMBER OF THE WEAPON TO SELL (1-";W21;") " (37):23:A$:W5(A$):W51W5W21W5(W5)2080*AD%(WP%(W5),4)1:WN$(W5)WN$(W21):WP%(W5)WP%(W21):W2W21:W252060KW14:WP%(W)WT%(W)AW2)AN$(A):WP%(W2)A:W2W21:AD%(A,4)09A:W262300 :5:"AS YOU START TO ENTER THE MAIN HALL,":"LORD WILLIAM MISSLEFIRE APPEARS AND":"TELLS YOU, 'YOU HAVE TOO MANY WEAPONS":"TO KEEP THEM ALL--4 IS THE LEGAL LIMIT."::"YOUR WEAPONS ARE--"^AST,HEAL,POWER,SPEED,SMILE,WAVE,SAY,READY,SAVE? PUSH,DRINKV///DONE WITH GAME:"PRESS ANY KEY TO CONTINUE";:A$:DK$"CLOSE"SPDMD%(0,2)MD%(0,2)2DIE2500'W14:WN$(W)"NONE"::W21:A1NA:AD%(A,2)1AD%(A,4)1WN$((1):MD%(0,14)30jNC:C$(NC):C1NC:C$(C):ZtS14:S2%(Q)SA%(S)::V%(96):ROOM1o~DR8:AD%(13,4)0xl100v 36. NORTH,N,SOUTH,S,EAST,E,WEST,W,UP,U,DOWN,D,GET,TAKE,DROP,PUT,LOOK,EXAMINE,ATTACK,FLEE,RETREAT,ESCAPE,GIVE,INVENTORY,I,BL$(M))1)*4d#(S$,1)" "S$(S$,2):9060<4i#(S$)09500q4n#A1NA:(S$,(AN$(A)))AN$(A)AD%(A,4)190954x#:A22A23::"WHAT TO GIVE? ";S$:90654#:"YOU AREN'T CARRYING A ";S$;"!"::1004#AMD%(0,9)MD%(0,9)14#9200<5#:"OKAYVES REMAIN!!"::@3`"D2;" SLAVES HAVE HIT ";MN$(DF);"!!":7650U3(#///GIVE COMMAND^32#A213<#M1NM:(S$,(MN$(M)))MN$(M)MD%(M,5)ROOM90503F#:A21A22::"WHO TO GIVE TO? ";S$:90203P#:"NOBODY HERE BY THAT NAME!"::1004Z#S$(S$,(MNDK$;"READ EAMON.ROOMS,R";ROOM:D16:DR%(D):DR$DR$(DR%(D))::DK$i2>!ROOM25AD%(5,4)ROOMDR%(2)02H!ROOM55AD%(3,4)ROOMDR%(4)02z!R2DR%(6(1)1):R2185702!2! // FIGHTING ARMY3!DMDMD2:D2;" SLAVES FALL!!":MD%(DF,1)DM;" SLA%(DF,4)21DF0DIE1:2000[1(DF17AD%(2,4)ROOM::"SOMETHING FALLS TO THE FLOOR."c1:x1@///FLEE COMMAND1JNBTLĺ:"THERE'S NOTHING TO FLEE FROM!"::1001*!DR$"":8500:DR$"000000"ĺ:"THERE'S NO PLACE TO GO!!":1001/!3500E24! DEATH'S DOOR,":" KNOCKING LOUDLY.": 1MN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)MD%(DF,1)MD%(DF,13)D2:MD%(DF,5)0:A2DFNZNM:AD%(A2,4)ROOM:MD%(DF,9)0AD%(MD%(DF,9),4)ROOM:MD%(DF,10)MD%(DF,10)AD%(MD%(DF,9),5):MD%(DF,9)1:MD%(DF,4)MD%(DF,14):FD%(A)FD%(A)D2)/DF2986009/OF298800/:MN$(DF);:(MD%(DF,13)5MD%(DF,1)1)7655,7660,7665,7670,7675/" IS STILL IN GOOD":" SHAPE.":/" IS HURTING.":/" IS IN PAIN.":/" IS VERY BADLY INJURED.":'0" IS AT51A0:7635&.R286S1.5S:7635=.R296D2D:7635U.R2100D3D:7635_.7700.D20:D31D:D2D2(S(1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::.MD%(DF,13)MD%(DF,13)D2:MD%(DF,13)MD%(DF,1)7700/AMD--DMD%(OF,11):SMD%(OF,12):DFOF:A1:7635]-DMD%(OF,11)2:SMD%(OF,12):DFOF:A0:7635-INC((100(1)1)MD%(OF,10)):MD%(OF,10)MD%(OF,10)2INC-DMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":7635 ."A CRITICAL HIT!":R2(100(1)1):R2)AD%(MD%(OF,9),5):MD%(OF,9)1:MD%(OF,4)MD%(OF,4)2::I,oFR957550,t" WEAPON BROKEN!":AD%(MD%(OF,9),4)0:MD%(OF,10)MD%(OF,10)AD%(MD%(OF,9),5):MD%(OF,9)1:MD%(OF,4)MD%(OF,4)2:(1).5ĺ:,y" BROKEN WEAPON HURTS USER!",~FR1007560(1)1):HIT0:(RL5RLMD%(OF,10)MD%(DF,7))RL96HIT1H+VHIT7600`+`RL97ĺ"A MISS.":+e"A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED."::9,jFR76ĺ" WEAPON DROPPED!":AD%(MD%(OF,9),4)ROOM:MD%(OF,10)MD%(OF,10N*MD%(OF,10)0ı@*A1NA:AD%(A,4)ROOMAD%(A,2)2Ă:*MN$(OF);" PICKS UP ";AN$(A)::AD%(A,4)0:MD%(OF,9)A:MD%(OF,10)MD%(OF,10)AD%(A,5):MD%(OF,4)MD%(OF,4)2:*LHIT0:MD%(OF,9)17400:+QMN$(OF);" ATTACKS ";MN$(DF):" --";:RL(100#)(100(1)1)MD%(0,10)73609)A2:EAAE1A1[)AEAEA:MD%(0,10)MD%(0,10)Av)MD%(DF,14)1DF0300)MD%(DF,3)MD%(DF,3)2:M1NM:MD%(M,5)ROOMMD%(M,14)1MD%(M,14)0)M:R3ROOM:3600:300*///MONSTER TRIES TO PICK UP WEAPOk(pM1NM:(S$MN$(M)S$(MN$(M),(S$))S$(MN$(M),(S$)))MD%(M,5)ROOMĂ::"ATTACK WHO?"::100(zMD%(0,9)1ĺ:"YOU HAVE NO WEAPON READY!"::100(OF0:DFM:7500:HIT7360(INCW2AD%(MD%(0,9),6):WA%(W2)WA%(W2)2)EAAE300ON.DESC,R";A300:A$:DK$::A$::LK15'A:LK300P'ROOM59AD%(8,4)ROOMk'ROOM60AD%(9,4)ROOM'ROOM62AD%(14,4)ROOM'ROOM63AD%(15,4)ROOM'ROOM21AD%(13,4)0AD%(13,4)ROOM'V%(ROOM)0:300'X///ATTACK COMMAND(b4900%(A,4)ROOMAD%(A,4)1)ĺ:"THERE IS A LABEL ON THE DEVICE THAT SAYS 'MAGNETIC DEVICE ACTIVATOR'":LK1&A7S$AN$(A)ĺ:"THE BOTTLE'S LABEL READS:":"DR. SMTHE'S MAGIC ELIXER":LK1&A:LK300&'A1NM:MN$(A)S$MD%(A,5)ROOMĺDK$;"READ EAM)1MD%(0,9)1%300U%A1NA:AD%(A,4)1ĺAN$(A);" DROPPED.":AD%(A,4)ROOMg%A:WT0:5060|%p///LOOK COMMAND%LK0:A1NZ:AN$(A)S$(AD%(A,4)ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$::A$::LK1j&A2AN$(A)S$(AD(7):322806"~I2$""q6,~VZ6:958:"HIT KEY FOR WEAPON TYPE (1=AXE, 2=BOW, 3=CLUB, 4=SPEAR, 5=SWORD) ";66~A$:W2(A$):W21W25323106@~VZ6:1:958:("AXE BOW CLUB SPEARSWORD",(W21)51,5);" WEAPON":I2$""^7J~VZ7:"ENTER NUMBER OFT(WT)(WT)I$ĺ(7):I2$I$:3223015}I2$""5}VZ4:"ENTER ROOM STARTING IN:";:1500:ROOM(I$):ROOM(ROOM)(ROOM)I$ĺ(7):I2$I$:322505~TYPE2323605~I2$"" 6~VZ5:"ENTER WEAPON COMPLEXITY:";:1500:WC(I$):WC(WC)(WC)I$SET PRICE, 1=TREASURE, 2=STANDARD WEAPON, 3=ODD WEAPON)":VZ2:33d4}A$:A$"0"A$"3"322004}TYPE(A$):1:("SETTREASTREASUREWEAPON ODD WEAP",TYPE81,8);" ARTIFACT";:958:4}I2$""&5}VZ3:"ENTER WEIGHT IN GRONDS:";:1500:WT(I$):WER ARTIFACT DESCRIPTION:":1500:6:958:"ARTIFACT DESCRIPTION:"::I$::AD$I$:f3}VZ(37):I2$""3}VZ1:"ENTER THE VALUE IN GOLD PIECES:";:1500:VL(I$):(VL)I$(VL)VLĺ"":I$I2$:32180G4}"HIT KEY FOR TYPE OF ARTIFACT":" (0=TREASURE W/D:DR%(D)::DK$2x}10042} /// REPLACE ARTIFACT?2}200302}:"ENTERING ARTIFACT ";N2:I2$""::"ENTER ARTIFACT NAME :"2}" ";:1500:(I$)39Ģ3:20:"TOO LONG!":I2$I$:32150R3}3:958:"ARTIFACT NAME:":" ";::I$::AN$I$:6:I2$"":"ENTNUSUALTHINGS.":D1NDp1Z}16D:"MOVE ";("NSEWUD",D,1);"--";:I2$"":1500:DR(I$):DR(DR)(DR)I$320901d}DR%(D)DR:D2n}DK$;"WRITE EAMON.ROOM NAMES,R";N2:R1$:DK$;"WRITE EAMON.DESC,R";N2:(34);R2$;(34):DK$;"WRITE EAMON.ROOMS,R";N2:D1N:958:"ROOM NAME:":" ";::I$::R1$I$:6:I2$"":"ENTER ROOM DESCRIPTION:":1500:6:958:"ROOM DESCRIPTION:"::I$::R2$I$:1P}13:"FOR EACH DIRECTION,GIVE THE ROOM THAT THIS ROOM CONNECTS TO (USE ZERO FOR NO CONNETION, A NEGATIVE NUMBER FOR U΍͍àƍǍٍōSE0:M1NM:M2NZNMM:AD%(M2,4)ROOMAD%(M2,4)1RAISE1:MN$(M);" COMES ALIVE!":AD%(M2,4)0:MD%(M,5)ROOM:MD%(M,13)0:WTWTAD%(M2,3);2M:RAISER3ROOM:3600:300;2A1NA:AD%(A,4)ROOMRAISE1:AN$(A);" VANISHES!":AD%(A,4)0<2A:RAISEĺ:0:SUC300G:.:MD%(0,13)ĺ"SOME OF YOUR WOUNDS SEEM TO CLEAR UP."::.MD%(0,13)MD%(0,13)(10(1)1):MD%(0,13)0MD%(0,13)0:/DF0:7650:300:2///POWER SPELL--RE-WRITE THIS SECTION FOR YOUR OWN SPECIAL PLOTS:2S4:11500:SUC300;2RAIED.":F9-RL(100(1)1):RLS2%(S)S2%(S)S2%(S)2:SA%(S)SA%(S)2Z9 -S2%(S)S2%(S)2`9-9P-:"THE STRAIN OF ATTEMPTING TO CAST THIS SPELL OVERLOADS YOUR BRAIN AND YOU FORGET IT COMPLETELY."::SA%(S)0:9.///HEAL SPELL :.S2:1150:S$MN$(M)MD%(M,5)ROOMĂ::"YOU CAN'T BLAST ";S$;"!"::100Z8,S1:11500:SUC3008,:"DIRECT HIT!"::S6:D1:DFM:A0:7635::3008,SUC0:SA%(S)RL(100(1)1):SUC(((RLS2%(S))(RL5))(RL95)):RL100116009,SUCĺ:"NOTHING HAPPEN7'///INVENTORY COMMAND7':"YOU ARE CARRYING THE FOLLOWING--":A00:A1NA:AD%(A,4)1ĺ" ";AN$(A);(" (READY WEAPON)",120(AMD%(0,9))):A0A01:A015ĺ:"(HIT ANY KEY TO CONTINUE)";:A$::A007$':3007*///BLAST SPELL7+4900A8,M1NMBACK TO YOU.":DRDR1(DR0):9300(6J$[6T$MD%(M,13)MD%(M,13)5:MD%(M,13)0MD%(M,13)0f6^$:3006%(S$)GOLDĺ:"YOU AREN'T CARRYING THAT MUCH GOLD OF YOUR OWN!"::3007&%GOLD(GOLD(S$)):MD%(M,14)0:MD%(M,3)