+JJJJ  / X5 lӠˠӠϠӠϠԮԠҠˠčӠ٠ϠԮL,4)1:MD%(1,5)0:3600LV:"POLARIS THEN TURNS TO YOU AND SAYS:":(34);"YOU WIN, BUT YOU MUST REMEMBER:":"POWER IS THE KEY...";(34)::"HE THEN VANISHES!!":100MONS, NC 27012  50DK$(4):DK$"VERIFY GAME.PTRS":19000 2216,0:10000:KRAD%(13,4)1ĺ:"YOU AREN'T CARRYING ANY ";S$:100K&R:"THE PAPER IS SOME KIND OF INSTRUCTIONS":" FOR A DEVICE THAT SHOOTS FLAMES!":FT1:300KU >> POLARIS SURRLU:"POLARIS SCREAMS IN PAIN AND SURRENDERS!":"HE HANDS YOU THE ORB.":AD%(19UR ARMOUR"20100:JzN:"I DON'T KNOW WHAT YOU MEAN.":100jJNS$"FURS"AD%(9,4)1WF1::"OKAY.":300JNAD%(4,4)1WF1::"OKAY.":300JN:"YOU AREN'T CARRYING IT.":100JR ///READKR4900:S$"PAPER"ĺ:"I DON'T KNOW WHAT YOU MEAN.":10LOAD GAME.SVAR":(4);"BLOAD GAME.STR"qIjJDK$;"DELETE GAME.PTRS":DK$;"DELETE GAME.SVAR":DK$;"DELETE GAME.STR"ItJDK$;"OPEN EAMON.DESC,L256":DK$;"OPEN EAMON.ROOMS,L64":DK$;"OPEN EAMON.ROOM NAMES,L64"I~J100I N ///WEARJ*N4900:S$"FURS"S$"F)2561WHF:"THE GAME IS NOW SAVED. BOOT ON THIS":" DISKETTE TO RESTART THE GAME."]HFqH8J /// RESTARTHBJ:"DO YOU WANT TO RESTART THIS GAME?":" Y OR N:";HLJA$:A$"Y"A$"N"19020HVJA$:A$"N"Ā&I`J(4);"BLOAD GAME.PTRS":(4);"BN"18020GnFA$:A$"N"1004GxFDK$;"CLOSE":X(0)VGFDK$"BSAVE GAME.PTRS,A$69,L8"GFDK$"BSAVE GAME.SVAR,A";(105)(106)256;",L";(109)(110)256(105)(106)2561HFDK$"BSAVE GAME.STR,A";(111)(112)256;",L";(115)(116)256(111)(1120:D1:S6:7635:100F///SAY COMMAND4900_D>S$"BLAST"V$S$:S$"":11000tD>S$"HEAL"12000D>S$"POWER"13000D>S$"SPEED"14000D>S$SW$AD%(19,4)1ĺ:"THE ORB SHATTERS!!":AD%(19,4)0:AD%(20,4)1:300E>(S$,4)"RO)10)::"YOU CAN FEEL THE NEW AGILITY FLOWING":" THROUGH YOU!"::300_C:///SMILE COMMANDC::M1NM:MD%(M,5)ROOM15100C:MD%(M,14)15030,15040,15050C:MN$(M);" GROWLS AT YOU.":15100C:MN$(M);" IGNORES YOU.":15100D:MN$(M);" ";V$;R EYES!":MD%(2,5)ROOM:X1418:AD%(X,4)0::3600:MD%(2,13)0:500BL6:"A BOOMING VOICE SAYS: ";(34);"TRY AGAIN!";(34):100B6///SPEED SPELLB6S3:11500:SUC300B6SPDMD%(0,10)MD%(0,10)2MD%(0,2):MD%(0,2)2MD%(0,2)IC6SPDSPD(25(1z#     ήӠ ήà Π͠FΠŠ Š ƠӠԠźήŠήӠή͠ӠήӠ Š ƠӍIN PGM"A@::" PRESS ANY KEY TO CONTINUE ";:A$:KJ::P"THE ORB FROM HIM. HE MUST THUS SEND SOME":"BRAVE ADVENTURER IN HIS STEAD.":8000 (34);"FIND THE ORB AND RETURN IT TO ME, AND I":"WILL GIVE YOU THE GREATEST REWARD YOU'LL":"EVER IMAGINE.";(34): 8000:"GOOD LUCK, ";NAME$;".":D$"RUN MA:"FEW DAYS.)" 8000 :"THE ORB MUST NOT FALL INTO THE WRONG":"HANDS, OR IT COULD MEAN GREAT DISASTER.":"THE WARLOCK SAYS HE CANNOT GO AFTER THE":"ORB HIMSELF BECAUSE MYSTICAL DEFENSES OF"R "UNKNOWN NATURE HAVE BEEN SET UP TO GUARD": OBTAINING AN":"OBJECT THAT HAS BEEN STOLEN FROM HIM. HE":"CLAIMS IT IS AN ITEM OF GREAT POWER AND" "CONSEQUENCE."::"IT IS A MAGICAL ORB. IT WAS FOUND BY HIS":"GRANDFATHER AFTER BEING LOST FOR SEVENTY":"FIVE THOUSAND CENTURIES. (GIVE OR TAKE A"TED TO THE CHAMBER":"OF A MIGHTY WARLOCK!!":: "THE WARLOCK TELLS YOU HE CAST A SPELL TO":"HAVE THE MOST HIGHLY QUALIFIED PERSON IN":"THE LAND TELEPORTED TO HIS CHAMBER. THAT"f "MUST MEAN YOU'RE THE ONE!":8000::"HE NEEDS SOME ASSISTANCE INL1);ADV$;L2)::. d /// PRINT DESCRIPTION n:"AS YOU LEFT THE MAIN HALL, YOU FELT THAT":"STRANGE WRENCHING IN YOUR STOMACH AND IT":"SEEMED TO MAKE YOUR VISION GO BLURRY. AS"1 x"SOON AS YOUR VISION CLEARS AGAIN YOU SEE":"YOU HAVE BEEN TELEPORM ADVENTURE NAME1 BY JOHN NELSON7> L D$(4):D$"OPEN FRESH MEAT":D$"READ FRESH MEAT":REC:NAME$:D$"CLOSE":D$"OPEN EAMON.NAME":D$"READ EAMON.NAME":ADV$:D$"CLOSE"::L1((40(ADV$))2):L240(ADV$)L1 ( URE #";NUM: DK$;"RENAME EXEC,SAVE LEADIN PROGRAM HERE"@ N WAS":" DEVELOPED BY ";A2$ 2"NON-COMMERCIAL DISTRIBTION ENCOURAGED."::"TO USE THIS DISKETTE REQUIRES AN EAMON MASTER DISKETTE WHICH MUST BE BOOTED UP ON.": < NUM33 DK$(4):DK$;"DELETE EAMON ADVENTURE #";NUM:DK$;"SAVE EAMON ADVENT"**";38);"*****************************************": 12);"ADVENTURE #";NUM;" FOR"::7);"THE WONDERFUL WORLD OF EAMON"::"----------------------------------------" ("THE EAMON FANTASY GAMING SYSTEM WAS DEVELOPED BY DONALD BROWN":A$;"B6A$"THE ORB OF POLARIS":NUM33:A2$"JOHN NELSON">9rD$(4):D$"VERIFY GAME.PTRS":D$"RUN MAIN PGM"} 216,0 ::7 "*****************************************";38);"**";((38(A$))2));A$;((38(A$))2)((A$)2((A$)2)));             Ӎ     Π٠ҮΠŠŠͮΠΠ٠ȠͮΠΠ٠ȠҮΠ̠ĠͮΠ̠٠ͮΠ̠ŠҮΠŠԠĠͮΠԠԯԠ̮ΠΠ٠ԯԠ̮Π̠ŠΠŠŮԠĠΠŠ٠̮ӯũΠΠ٠ίӠ̮ӠůשΠĠԠҮΠΠ٠ȯȠ̮͠ũԠĠΠŠ٠̮ίשΠĠԯԠ̮Π͠ٮԠԩԠŠԠĠƠΠ٠̮ΠΠ٠ȠҮΠΠ٠ȠҮΠ̠ŠήԠשΠǠȯȠ̮ΠԠήίůשΠ̠ǠҮΠΠ٠ԯԠ̮͠ũΠŠŠήΠΠ٠ԧήӯůשΠȯȠ̮Π̠ĠҮΠĠȯȠ̮͠ũΠ̠ĠҮԠԧήίůשΠĠŠĠͮΠĠԠҮΠ̠٠ͮΠȯȠ̮͠ԩԠĠΠŠ̮ӯשΠȯȠ̮ΠȠ٠ҮԠΠΠŠ̮ίůשΠȯȠ̮͠ԩΠĠŠͮԠΠΠΠĠ̮ΠΠԯԠ̮͠ȩΠΠԯԠ̮͠ȩԠΠ٠ԧήůׯөΠΠԯԠ̮ҠȩԠĠΠŠ٠̠ׯөŠŮŠӠȮΠȯȠ٠̮ԠĠΠŠ٠̮ίũҍӍĠōŠҠҍˍҍΠҍҍ        ȍŠ΍Š̍ˍٍŠԍˍٍҠˍȍŠ̍ҍԠҍҍٍ΍ҠҍˍٍŠ͍ĠŠ̍ĠҍĠԠҍĠҍĠٍĠ΍ĠҠҍĠˍĠٍĠŠ͍̠ōĠӍΠЍ̠čٍ٠ӍōĠӍŠӍĠŠō΍̠ӍƍŠƠҍԍŠҍҍŠōčՠŠΠĠŠͮŠӠԠ̠ƠŠǠŠӠҠΠŮŠԠӠϠŠԮՠŠΠĠȯȠ̮ŠԠӠҮՠŠԠĠΠŠ̮Š̠ӠϠŠȠŮԠӠ̠٠ĠΠŮՠŠΠΠ٠ԯԠ̮ϠŠȠŠӠҮՠŠԠΠΠΠŠŠԯԠ̠ӠȠ̠ǠȮŠ̠ӠĮՠŠΠΠԯԠ̮ŠĠĠǠȠŠ̮ĠˠҠӠϠŠȮՠŠΠΠ٠̮Š̠ӠϠŠԠŬϠՠ٠ϠԠҠȮӠŠǠ͠ŠǮՠŠΠΠ٠ȯȠ̮Ӡ٠ĠΠŠĠŠӠǠΠ͠ŠȠŮՠŠŠΠŠŮԠӠԭӠԠŠĠՠŠ٠ĮŠŠϠŠŠӠϠȮ                     ĠȍĠ΍ĠŠ̍ĠˍĠٍĠŠԍĠˍĠٍĠҠˍĠȍՠŠΠŠŠήŠŠӠǠ͠ŠĠˠӠƠŠҠŠӠĠҮŠ٠ԠӠϠŠԮՠŠԠŠԠĠƠΠŠϠŠԠӠŠŠήՠŠԠĠˠήŠԬԬĠȠŠŠӮՠŠΠ̠ĠҮŠӠԠƠŠӠĠӠ̠ҠŠҠΠŮŠ٠ԠϠŠԮՠŠΠĠȯȠ̮ŠԠŠӠ̠ĠҮՠŠΠ̠ĠҮŠŠȠƠӠǠ͠ŠƠƠŠͮŠ٠ԠӠϠŠԮՠŠΠĠȯȠ̮͠ӠϠŠԮŠŠӠƠԠΠŠҠǠԠ٠٠ΠŮՠŠΠ̠٠͠ϠŠƠŠ٠̮ӠǠ͠ǠĠԠӠŠҮՠŠΠĠҠȠŠĠԠΠŠӠĠҮŠԠӠϠŠԮՠŠΠĠԠҮŠΠŠӠӠ٠ˮŠ٠ԠӠϠŠԮՠŠԠΠΠΠŠĠ̮ՠ٠ϠԬԠҠȮŠԠĠԠӠĠϠӮՠŠΠȠҠȠˠӠƠԠΠŠӬǠĠӮŠҠӠϠŠԮՠŠΠȯȠ̮ϠŠԠӠŠȠҮՠŠԠĠΠŠ̮Š̠ӠϠŠȠŮՠ٠ϠԠҠȮԠӠŠƠŠ̮ՠŠΠΠԯԠ̮ԠӠ̠٠ĠΠŮŠӠϠŠȮՠŠԠΠΠΠŠĠ٠̮ŠӠϠԬȠĠȮՠŠΠŠƠŠŮŠԠӠϠŠȮՠŠΠΠ٠ԯԠ̮ŠŠӠ٠ˠΠŮՠŠΠĠԯԠ̮ϠŠȠŠӠ٠ҮŠ٠ӠĠȠӮՠŠԠĠΠŠ٠̮̠ӠϠŠԠŠϠՠϠȠҠԮՠŠΠȯȠ̮ŠӠŠǠ̠ŠӮϠŠԠӠ٠ϠΠ٠ҮՠŠΠĠԠҮϠŠԠӠŠ٠ԮŠҠӠ٠٬ԠӠ٠ĮՠŠΠΠ٠ȠҮŠŠӠƠŠ̠ҠŠҠĠӠǠ͠ŠǮŠ٠ԠӠϠŠȮՠŠΠΠ٠ҠϠŠȠƠΠԯԠ̮ŠŠӠƠӠǠ͠ŠǠĠӠƠŠ̠ҠŠҮŠ٠ԠӠϠŠȮՠŠԠŠԠĠƠΠ٠ԠԠ̮ŠŠӠȬȬĠԮ̠ƠŠӠˠ٠ĮՠŠΠ٠ƠŠĮӠ͠ΠŠĠϠŠԠŠӠՠŠΠήŠ٠ԠӠϠŠԮՠŠΠ̠ҠĠӠǠҮŠ͠Ӡ̠Ԡ̠ĮϠŠԠӠŠҮՠŠΠΠήԠӠϠŠȠҠŮŠŠӠ̠ĠŠĠŠ̠Ӡ٠Ԯՠ٠ϠԬԠҠȮՠŠΠȯȠ̮ŠΠŠ̠ŠӠǮԠӠϠŠȠҠΠӠԠƠŠ̮ՠ̠͠Š͠ŠȮՠŠΠ̠ŠήӠǠ͠ŠǠĠŠӠҮŠ٠ԠӠϠŠԮՠŠΠĠȯȠ̮ŠԠӠ̠ŠŮՠŠԠΠ٠ήϠŠԬԠĠȠŠŠĠӮՠŠΠĠΠ̠ĠРΠĠӮŠӠԠΠӠŮՠŠ͠ӠˬΠĠ͠ŠΠ̮ՠŠҠĠҮԠӠԠĠРՠ٠͠ΠŠƠŠӠΠŠӮՠŠŠˠƠŠΠŠƠήԠӠΠҡՠŠǠҠȠӠӮՠŠԠĠԠӠŠԠӠŠƠŮȠՠנԠΧԩԠӠŠĠΠŠŠԠӠҧՠŠΠ٠ŠŮԠĠŠԠΠҠΠ̠Ơ٠ĠĠŠĮŠ٠ԠӠϠŠȮՠŠΠ̠ĠͮԠӠ٠ΠŠԠҠנӠƠŠΠŠҮŠԠӠԮՠŠΠΠ٠ȠҮǠ͠ŠǮŠ٠ԠӠϠŠȮՠŠΠΠŠĠ͠ϠŠȠƠŠ̮٠ӠĠŠӠΠŠҠĠՠנĠԠӠΠŮŠ٠ԠӠϠŠȮՠŠΠŠͮŠΠΠŠӠ٠Ů̠ӬŠӠĠӮŠ٠ԠӠϠŠԮՠŠΠԠԯԠ̮ŠԠŠӠŠŠȠŠӮՠŠΠŠͮŠӠŠĠȠԮŠӠҠŠҠĠŠԠ٠ΠŮՠŠΠ̠ŠҮӠǠ͠ŠǬԠŠϠȠϠȮŠ٠ԠӠϠŠԮՠŠΠ̠٠ͮŠӠŠŠǠΠŠ̠ΠŮŠ٠ԠӠϠŠԮՠŠΠΠ٠ȯȠ̮ŠԠĠԠŠ̠ӮȠƠӠŠǠ͠ŠӠƠŠӮϠŠȠӠҠҮՠŠΠĠ٠̮ŠӠϠŠȠŮՠ٠ϠҠȮՠŠŠŮՠŠŠĠӠƠŠƠӮՠŠŠǠ ƠӮԠӠϠҠȠԠĠҮՠŠ٧ӠΠŮՠŠŠԠĠƠԠӠǮՠŠŠ̠ӠƠٮՠŠ٠ǠˠԮԠӠΠ٠ٮՠŠŠŠƠҮԠӠ̠ԧӠԠƠҠ١ՠŠŠƠҮՠŠŠǠŠԠӠŠҧΠԮՠϠԠĠٮՠŠŠĮՠŠ٠ŠŮҠӠǠԮՠŠŠƠӮՠŠŠҠԠŠҠӠǮՠŠŠŠ®ՠŠΠĠŮՠŠŠĠ٠٠ƠٮՠŠŠĠ٠ƠˮӠԠĠӠŠΠĠϠӠĠӮՠŠŠĠ٠ƠҠҮՠŠŠĠ٠ƠŠ͍ՠŠŠƠ׬̬ĠŠƬԠĠΠŠƠٮՠŠŠĠ٠ƠӮӠŠӬŠӠנՠ̠ҠԠЬՠ̡ՠŠԠ̠šԠӠϠ̠ՠԠנԠԠ٠ŮՠŠ̠ Ơ̡ՠŠ̠ΠРǠԠŠԧӠԮՠŠ̠ĠٮŠ̠ӠǠԠӠՠŠήՠŠŠĠŠŠ̠ӠǠȠΠՠŠήŠӠԠԠΠϠŠծՠŠ̠ŠƠŠԠŠŠ͠ԠŠΠ͠٠ƠӠҠӮՠŠŠ٠ӠƠŠԠӠĠǠΠŠҮŠԠՠŠ̠ŠƠĠӮŠĠΠԠŠΠǮz                  ՠŠŠĠĠ٠ƠŠŠήՠŠŠĠ٠ƠŠȮՠŠŠĠ٠ƠˮՠŠŠĠ٠ƠŠ̍ՠŠŠĠ٠ƠŠŠŠԮՠŠ٠̠ϠŠҠĠŮՠŠŠĠ٠ƠٮՠŠŠĠ٠ƠˮՠŠŠĠ٠ƠŠȢՠŠŠĠ٠ƠҠˍՠŠŠĠ٠ƠŠҮՠŠŠĠ٠ƠΠŠ̮ՠŠŠĠ٠ƠŠҮՠŠŠĠ٠ƠԠǠΠРΠŠҮՠŠŠĠ٠ƠήՠŠ̠ΠȠ٠ĮŠӠΠŠŮŠӠӠŠӠٮՠŠ̠ΠȠ٠ĮŠӠΠŠŮŠӠӠŠӠٮՠŠΠȠŠĠǠɠĠŠΠŠٮӠՠҠŠӠծӠŠӠˮՠŠŠǠ̠ȠˠĠĠӠΠӠˮӠǠŠŠȧՠŠ٠ΠΠӠĠ٠ŠŮŠӠӠŠӠҠˮՠŠǠΠƠԠٮŠӠŠԠҠӠŬԠӠŠӠΠҮՠŠ٠Ǡ̠ȠҠĠŮŠӠΠŠ̡٠ŠġŠϠӠ٠ԮՠŠΠΠǠˠĠĠӮŠӠŠҡՠŠŠǠŠӠŠԠӠŠƠԮԧӠӠԠҡՠŠԠ٠ΠΠϠȠ٠ŠŮӡӠԠΡŠӠ٠ŮՠŠΠȠŠԠ٠ҠՠŠҠΡԠӠϠˠŠӠǠ٠ȠĠӠ̠ԠġӠĠԠӠӠŮŠӠӠŠӠٮՠŠΠŠ̠ĠԠΠӠˠӠҠͮԠӠϠˠŠĠŠԠҠҮՠŠŠŠҮŠӠԠҠϠŠ٠Ġ٠ŠĮŠϠӠԠҠϠŠٮՠŠŠĠŠŠԠӠŠŠӠŠ٠ƠŮԠӠΠŠ͡ՠŠΠȠ ŠĠΠŠĠϠӠŠԠƠ̮ŠӠǠƠĠ٠ˠԮՠŠΠĠȠԮՠԠԠӠΠΠԠԬԠŠΠӠǮŠӠϠ٠ŬԠԠԮŠӠԠĠӠӠŠӠӬĠƠȮ2:M2MD%(M,14):TD%(M2)TD%(M2)MD%(M,1):FD%(M2)FD%(M2)MD%(M,13):490[YMD%(M,14)2490p^MD%(M,14)3390hOFM:TD%(3)MD%(0,1)DF0:7500:490rM21NM:MD%(M2,5)ROOMMD%(M2,14)3(1).25DFM2:7500:M2200:M2:490|M2:DF0:7500:49000,15000,15000,16000,17000,18000,20000,21000M,///COMMANDS RETURN TO HERE\6NBTL500|@M1NM:MD%(M,5)ROOM490JM2MD%(M,14)(MD%(M,14)2):MRFD%(M2)TD%(M2)(41(1)20)FTMD%(M,4)MRĺ:MN$(M);" FLEES OUT AN EXIT."::8500:MD%(M,5)R1:CA:F1275:F290{:"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);20(C$(C)));::::210C$(C)S$S$V$:V$C$(C)-"C3000,3000,3000,3000,3000,3000,4000,4000,5000,6000,6000,7000,8000,9000,10000,11000,12000,13000,14):220'A$""A$CZ$:(37):17:A$6A$""275^CZ$A$:A2(A$):(A$,A,1)" "Ă|V$(A$,A1):S$(A$,A1)(S$,1)" "S$(S$,2):260C16:(C$(C),(V$))V$290:F0:A7NC:C$(A)V$CA:290(C$(A),(V$))V$FF4)ROOMAD%(A,9)ĺ"YOU SEE ";AN$(A);"."} AD%(A,4)ROOMAD%(A,9)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$:A$:AD%(A,9)1: A:AANA:AD%(A,4)ROOMĺ"YOUR ";AN$(A)" IS HERE." A:V%(ROOM)1 :" YOUR COMMAND?";A$(A$,1)" "A$(A$,2OOMROOM29ROOM32ĺMN$(2);" MELTS!!"::X1418:AD%(X,4)ROOM::MD%(2,5)0:SVMM:3600:MSVM 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,WF(ROOM32ROOM29)ĺ:"YOU ARE VERY COLD.":v V%(ROOM)ĺDK$;"READ EAMON.DESC,R";ROOM:A$:DK$:A$::V%(ROOM)1 (1).9(ROOM29ROOM32)ĺ:"SOME LARGE ICICLES HAVE FALLEN FROM THE":" CEILING!!":DF0:D2:S4:7635^ M1NM:MD%(2,5)RRE ":" ";A$:_ FZ.8MD%(0,1)WF(ROOM32ROOM29)ĺ:"YOU ARE FREEZING TO DEATH!"::140 FZMD%(0,1).7WF(ROOM32ROOM29)ĺ:"YOU ARE FREEZING!"::140 FZ.3MD%(0,1)WF(ROOM32ROOM29)ĺ:"YOU ARE EXTREMELY COLD!"::140/ FZ0: d///MAIN LOOP. FIRST GIVE ROOM DESC, THEN GET COMMAND@ n xSPDSPDSPD1: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 AD EAMON ADVENTURE #33: -> ORB OF POLARIS <-@Z BY JOHN NELSON `sREV 8/15/91  EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012  50DK$(4):DK$"VERIFY GAME.PTRS":19000 2216,0:1000            !!! ! ! ! ! !!!!!!!!!""" " " " " """""""""     ՠŠŠŠ٠ŠԠӠҠԠ̮ӠԠŠŠŠΡՠŠŠ٠ԮԠӠϠŠԠĠ̠ŠĠȡՠŠŠĠΠŠϠŠӠŠӠԮՠŠ̠ȠŠҠĠŠĮԠӠΠŠ̡ՠŠΠŠŠԡŠӠ٠ȮD PIECES.":,!8 GOLDGOLDTP:GOLD0GOLD0X!B :"(HIT ANY KEY TO CONTINUE) ";:A$:c! 2500! :5:"(INSERT EAMON MASTER DISKETTE, THEN":" HIT THE 'C' KEY) ";:16368,0! A$:A$"C"2520! A$"" DIEĺDK$;"OPEN THE ADVENTURER,S6,D1":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  AD%(A,2)0AD%(A,1)AD%(A,1)CH10 $ TPTPAD%(A,1) !. A:TP;" GOLDS! TO DIE PEACEFULLY!'"c"YOU DIE WITH GREAT PLEASURE AND A SMILE":"ON YOUR FACE.":DI1:2250:"(PRESS ANY KEY TO CONTINUE)";:16368,0:A$:: W14:WP%(W)WT%(W)AD%(WP%(W),6):WO%(W)AD%(WP%(W),5):WD%(W)AD%(WP%(W),7):WS%(W)AD%(WP%(W),E":"WARLOCK THAT SENT YOU HERE SAY 'YOU ":"HAVE DOUBLE CROSSED ME! YOU WILL PAY":"FOR THAT SOME DAY!'":2250:"YOU HEAR THE VOICE OF THE WARLOCK THAT":"SENT YOU HERE SAY 'YOU HAVE DONE WELL.":"I SHALL REWARD YOU WITH THE GREATEST OF":"ALL REWAR/23004AD%(19,4)12200>AD%(20,4)1ĺ:"YOU HEAR THE VOICE OF THE WARLOCK THAT":"SENT YOU HERE SAY 'YOU HAVE FAILED ME.":"YOU SHALL DIE!'"::"A BOLT OF ENERGY STRIKES AND KILLS YOU.":DI1:2250oH:"AS YOU LEAVE YOU HEAR THE VOICE OF TH:"YOUR WEAPONS ARE--"wW1W21: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:W252060%(A,2)1AD%(A,4)1WN$(W2)AN$(A):WP%(W2)A:W2W21:AD%(A,4)0RA: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.":AVE WEAR,READE 5,POKARIS,FREONIS,CHINARA,REQUESS,PLANORIS\///DONE WITH GAME:"(HIT ANY KEY TO CONTINUE) ";:16368,0:A$:DK$"CLOSE":SPDMD%(0,2)MD%(0,2)22100DIE2500@W14:WN$(W)"NONE"::W21:A1NA:ADC$(C):1tS14:S2%(S)SA%(S)::V%(96):ROOM1a~SW:X1SW:SW$(X)::SW$SW$(((1)SW1))jl100vv 26 NORTH,SOUTH,EAST,WEST,UP,DOWN,GET,TAKE,DROP,LOOK,EXAMINE,ATTACK,FLEE,GIVE,INVENTORY,BLAST,HEAL,POWER,SPEED,SMILE,WAVE,SAY,READY,SD%(0,8)1:EA5[VA2MD%(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%(1):MD%(0,14)3jNC:C$(NC):C1NC::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::1090LA,W2:EA0:MD%(0,8)0:A2(AC2):A22ACMWO%(NW),WD%(NW),WP%(NW):A14:WN$(A),WT%(A),WO%(A),WD%(A),WS%(A)::DK$;"CLOSE"nDK$;"DELETE FRESH MEAT"$DK$;"OPEN EAMON.DESC,L256":DK$;"OPEN EAMON.ROOM NAMES,L64":DK$;"OPEN EAMON.ROOMS,L64"t.W214:WN$(W2)"NONE"NANA1:AN$(NA)WN$(W2)5):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)::A15:WA%(A)::AE,SEX$,GOLD,BANK,ACQNW15:WN$(NW),WT%(NW),":NR,NZ,NE,NM:DK$;"CLOSE":NANZDK$;"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:AD%(A,A2):A2XA:DK$;"OPEN EAMON.MONSTERS,L128":MN$(NM),MD%(NM,133AD%(5,4)0:MD%(19,5)ROOM::MN$(19);" THAWS OUT!":THAW1AD%(3,4)1ROOM29ROOM33AD%(3,4)0:MD%(11,5)ROOM::MN$(11);" THAWS OUT!":THAW1THAWTHAW0:3600100///INITIALIZE DATA!DK$;"OPEN EAMON.DESC":DK$;"READ EAMON.DESC0 OFMPM21NM:MD%(M2,5)ROOMMD%(M2,14)1DFM2:7500:M2200:M2:490XM2zNBTL(FD%(1)TD%(1)):NBTLĂMWF(ROOM29ROOM32)NBTLFZFZ1:FZMD%(0,1)ĺ:"YOU HAVE FROZEN TO DEATH!!":DI1:2000<AD%(5,4)1ROOM29ROOM;" 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:1LHIT0:MD%(OF,9)174001QMN$(OF);" ATTACKS ";MN$(DF);"!":" --";:RL(100(1)1):HIT0:(RL5RLMD%(OF,10)MD%(DF,7))RL96HIT11VHIT76000)MD%(0,10)A)0MD%(DF,14)1DF0300r0MD%(DF,3)MD%(DF,3)2:M1NM:MD%(M,5)ROOMMD%(M,14)1MD%(M,14)00M:R3ROOM:3600:3000///MONSTER TRIES TO PICK UP WEAPON0MD%(OF,10)0ı0A1NA:AD%(A,4)ROOMAD%(A,2)2Ă:d1MN$(OF) PATCH OF ICE AND FELL":"DOWN!!":DF0:D1:S4:7635:100X/OF0:DFM:7500:HIT7360t/MD%(0,9)12DF122000/INCW2AD%(MD%(0,9),6):WA%(W2)WA%(W2)2/EAAE300/(100(1)1)MD%(0,10)7360/A2:EAAE1A10AEAEA:MD%(0,1M)0:300 .X///ATTACK COMMAND*.b4900.pM1NM:(S$MN$(M)(MN$(M),(S$))S$(MN$(M),(S$))S$)MD%(M,5)ROOMĂ::"ATTACK WHO?"::100.zMD%(0,9)1ĺ:"YOU HAVE NO WEAPON READY!"::1009/ROOM29ROOM32ĭ(1).82ĺ:"YOU SLIPPED ON A;"READ EAMON.DESC,R";A300:A$:DK$::A$::LK1?-A:LK300-RO40ĺ:"YOU FOUND A CREVICE IN THE NORTH WALL ":"THAT IS LARGE ENOUGH TO SQUEEZE INTO.":L11:300-RO44ĺ:"THE ICE CARVING IS A SECRET DOOR TO THE":" EAST!":L21:300 ..V%(ROO1NA:AD%(A,4)1ĺAN$(A);" DROPPED.":AD%(A,4)ROOME,A:WT0:5060Z,p///LOOK COMMAND,LK0:A1NZ:AN$(A)S$(AD%(A,4)ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$::A$::LK1,A:LK3000-A1NM:MN$(A)S$MD%(A,5)ROOMĺDK$7+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),4)1MD%(0,9)1+3003,AINE TO GET S$ IF NOT PREVIOUSLY SPECIFIED.Q*)S$""ĺ:C$(C);" WHAT";:S$:4900W*.l*///DROP COMMANDv*4900*S$"ALL"5100+A1NA:(AN$(A)S$(AN$(A),(S$))S$(AN$(A),(S$))S$)AD%(A,4)1Ă::"YOU AREN'T CARRYING A ";S$::100D%(A,3)10MD%(0,1)ĺAN$(A);" IS TOO HEAVY":4190b)TAN$(A)" TAKEN.":AD%(A,4)1:WTWTAD%(A,3)o)^::300)h///INSERT HERE SPECIAL EFFECTS OF PICKING SOMETHING UP)rA14AD%(21,4)1ĺ"YOU CAN'T PICK UP WATER!":G0:)|G1)**$///ROUT ";S$;" HERE!"::100(("4200:Gī100j('WTAD%(A,3)10MD%(0,1)ĺ:"IT IS TOO HEAVY FOR YOU."::100(,:"GOT IT.":AD%(A,4)1:WTWTAD%(A,3)::AD%(A,2)2MD%(0,9)1300(617000(@:A1NA:AD%(A,4)ROOM4190(J4200:G41901)OWTAM,14)3MD%(M,5)ROOM::3670#'7'///GET COMMAND'4900:S$"ICICLES"S$"ICICLE"RO29RO32ĺ:"THEY ARE TOO HIGH TO REACH!":500'S$"ALL"4160(A1NA:(AN$(A)S$(AN$(A),(S$))S$(AN$(A),(S$))S$)AD%(A,4)ROOMĂ::"I SEE NO100(1))MD%(M,14)2:FR(100(1))MD%(M,14)3o&VAMD%(M,14):FD%(A)FD%(A)MD%(M,13):TD%(A)TD%(A)MD%(M,1)&jM:NBTL(TD%(1)0):&tMD%(M,5)R3ı&~MD%(M,14)1200(1)MD%(M,4)MD%(M,5)ROOM::3670&(M11M19)(R329R333)ı'MD%(% R3ROOM:ROOMR2:3600!%500E%///CHECK REACTIONS ON MONSTERS|%TD%(1)0:TD%(3)MD%(0,1):FD%(1)0:FD%(3)MD%(0,13)%$M1NM:3700%.MD%(M,5)ROOM3690%8MD%(M,14)3670%BFRMD%(M,3):FRFR100FRFR((CH10)2)0&LMD%(M,14)1:FR(DK$;"READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$?$ R203500U$ ///SPECIAL MOVES$ R299ĺ:"YOU LEAVE THE ICE CAVERNS..":2000$ R23490$ R241L1R2R2:3500$ R247L2R2R2:3500$ :"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":MN$(0):REC:DK$;"CLOSE"k#T DK$;"RUN MAIN HALL,S6,D1"# ///MOVE COMMAND# NBTLS$"FLEE"ĺ:"YOU CAN'T DO THAT WITH UNFRIENDLIES ABOUT!"::100# D16:(V$,1)("NSEWUD",D,1)Ă0$ 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:A14:WN$(A):WT%(A):WO%(A):WD%(A):WS%(A):L# DK$BOOM OUT OF NOWHERE:"::(34);"DESTROY THE ORB OR KNOW THE EVERLASTING":"PEACE OF DEATH!";(34):500A3:"ALL OF YOUR HITS ARE HEALED."::MD%(0,13)0:300A"3A0:X1418:AD%(X,4)ROOMAA1CB,3:A5(ROOM29ROOM32)ĺ:"FROSTY REFORMS BEFORE YOU,13)MD%(0,13)(10(1)1):MD%(0,13)0MD%(0,13)0H@/DF0:7650:300]@2 ///POWER SPELLt@2PCPC1:PC5PC1@2PC13050,13070,13080,13090,13900@2:"THE WORD ";(34);SW$;(34);" JUST POPPED INTO":" YOUR HEAD!":500fA3:"YOU HEAR A VOICE S2%(S)2?-?P-:"THE STRAIN OF ATTEMPTING TO CAST THIS SPELL OVERLOADS YOUR BRAIN AND YOU FORGET IT COMPLETELY."::SA%(S)0:?.///HEAL SPELL?.S2:11500:SUC300?.:MD%(0,13)ĺ"SOME OF YOUR WOUNDS SEEM TO CLEAR UP.":4@.MD%(0SUC300>>,:"DIRECT HIT!"::S6:D1:DFM:A0:7635::300>,SUC0:SA%(S)RL(100(1)1):SUC(((RLS2%(S))(RL5))(RL95)):RL10011600>,SUCĺ:"NOTHING HAPPENED.":>-RL(100(1)1):RLS2%(S)S2%(S)S2%(S)2:SA%(S)SA%(S)2 ? -S2%(S):AD%(A,4)1ĺ" ";AN$(A);(" (READY WEAPON)",120(AMD%(0,9))):A0A01:A015ĺ:"(HIT ANY KEY TO CONTINUE)";:A$::A00=$':300=*///BLAST SPELL=+4900=,M1NM:S$MN$(M)MD%(M,5)ROOMĂ::"YOU CAN'T BLAST ";S$;"!"::100 >,S1:11500:#R3ROOM:3600:5050f<%(S$)GOLDĺ:"YOU AREN'T CARRYING THAT MUCH GOLD OF YOUR OWN!"::300<&%GOLD(GOLD(S$)):MD%(M,14)0:MD%(M,3)MD%(M,3)(1(S$)100):9120<'///INVENTORY COMMANDz=':"YOU ARE CARRYING THE FOLLOWING--":A00:A1NAVE? ";S$:9065<;#:"YOU AREN'T CARRYING A ";S$;"!"::100X;#AMD%(0,9)MD%(0,9)1;#:"OKAY.":AD%(A,4)M1:MD%(M,14)0:MD%(M,3)MD%(M,3)(1AD%(A,1)100);#MD%(M,10)0MD%(M,9)1MD%(M,9)A:MD%(M,10)MD%(M,9)AD%(A,5):MD%(M,4)2MD%(M,4)<90504:F#:A21A22::"WHO TO GIVE TO? ";S$:9020^:P#:"NOBODY HERE BY THAT NAME!"::100w:Z#S$(S$,(MN$(M))1):d#(S$,1)" "S$(S$,2):9060:i#(S$)09500:n#A1NA:(S$,(AN$(A)))AN$(A)AD%(A,4)19095;x#:A22A23::"WHAT TO GI00:DR$"000000"ĺ:"THERE'S NO PLACE TO GO!!":100>9/!350094!DK$;"READ EAMON.ROOMS,R";ROOM:D16:DR%(D):DR$DR$(DR%(D))::DK$9>!R2DR%(6(1)1):R2185109H!9(#///GIVE COMMAND92#A21:<#M1NM:(S$,(MN$(M)))MN$(M)MD%(M,5)ROOM(DF,9),4)ROOM:MD%(DF,10)MD%(DF,10)AD%(MD%(DF,9),5):MD%(DF,9)1:MD%(DF,4)MD%(DF,4)2n8<DF0DIE1:2000v8:8@///FLEE COMMAND8JNBTLĺ:"THERE'S NOTHING TO FLEE FROM!"::1008TD16:S$C$(D)V$S$:S$"FLEE":30008^49*!DR$"":85DLY INJURED.":C7" IS AT DEATH'S DOOR,":" KNOCKING LOUDLY.":7MN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)MD%(DF,1)MD%(DF,13)D2:MD%(DF,5)07A2DFNZNM:AD%(A2,4)ROOM:AJ1NA:AD%(AJ,4)DF1AD%(AJ,4)ROOMX8(:MD%(DF,9)0AD%(MD%MD%(DF,13)MD%(DF,1)7700<6AMD%(DF,14):FD%(A)FD%(A)D2U6DF1MD%(OF,9)12ı6:MN$(DF);:(MD%(DF,13)5MD%(DF,1)1)7655,7660,7665,7670,76756" IS STILL IN GOOD":" SHAPE.":6" IS HURTING.":6" IS IN PAIN.":7" IS VERY BACRITICAL HIT!":R2(100(1)1):R251A0:7635I5R286S1.5S:7635`5R296D2D:7635x5R2100D3D:7635577005D20:D31D:D2D2(S(1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::6MD%(DF,13)MD%(DF,13)D2:,12):DFOF:A0:7635S4INC((100(1)1)MD%(OF,10)):MD%(OF,10)MD%(OF,10)2INC4MD%(OF,9)12(DF3DF2DF8DF17DF21)D3MD%(OF,11):MD%(DF,4)MD%(DF,4)(15(MD%(DF,4)15)):76354DMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":763505"A 3t" 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ĺ:3y" BROKEN WEAPON HURTS USER!"3~FR10075603DMD%(OF,11):SMD%(OF,12):DFOF:A1:76354DMD%(OF,11)2:SMD%(OF2`RL97ĺ"A MISS.":l2e"A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED."::2jFR76ĺ" WEAPON DROPPED!":AD%(MD%(OF,9),4)ROOM:MD%(OF,10)MD%(OF,10)AD%(MD%(OF,9),5):MD%(OF,9)1:MD%(OF,4)MD%(OF,4)2::3oFR957550