+JJJJ  / X5 lӠˠӠϠӠϠԮԠҠˠčӠ٠ϠԮLz!#     ήӠ ήàeΠ͠JΠŠ ŠԠԠźήŠήӠ ή͠Ӡ ήӠ      Šԍ;7);:A$: J:: AFTER SEARCHING A" "WEEK YOU FINALLY STUMBLE UPON A PLACE IN":"THE HILLS THAT MATCHES THE DESCRIPTIONS."::"THE AIR SEEMS CHARGED WITH MAGIC HERE." 8000 :"GOOD LUCK, ";NAME$;".":D$"RUN MAIN PGM" @::7);"PRESS ANY KEY TO CONTINUE""AND TO SATISFY YOUR OWN CURIOSITY, YOU":"DECIDE TO TRY TO FIND THIS PLACE ON YOUR":"OWN.": "SINCE YOU HAVE NO IDEA WHERE TO START ON":"YOUR QUEST, YOU SEEK AN ORACLE IN A NEAR":"TOWN. YOU FIND THE ORACLE AND GET SOME":"SKETCHY INSTRUCTIONS.ORS THAT SOME KIND":"OF GOD LIVED THERE AS WELL AS OTHER VERY":"POWERFUL CREATURES."::"IT WAS SAID THAT SOMEONE HAD GONE IN AND" "RETURNED WITH TWICE HIS FORMER STRENGTH":"AND AGILITY." 8000` "DETERMINED TO INVESTIGATE THESE RUMORS ":L1);ADV$;L2)::/ d /// PRINT DESCRIPTION n"YOU WERE TALKING TO SOME MEN IN THE MAIN":"HALL AND YOU HEARD OF A NEW AND STRANGE":"PLACE THAT SOUNDED INTRIGUING. NOBODY IN":"THE GROUP HAD EVER ACTUALLY GONE THERE," x"BUT THEY HAD HEARD RUM THE GAUNTLET 2 BY JOHN NELSON8? M 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 ( > EAMON ADVENTURE #";NUM;" <-"T DK$;"RENAME EXEC,SAVE ALTERED BASE PROGRAM HERE"Z AOPED BY ";A2$ 2"NON-COMMERCIAL DISTRIBTION ENCOURAGED."::"TO USE THIS DISKETTE REQUIRES AN EAMON MASTER DISKETTE WHICH MUST BE BOOTED UP ON.": < NUM31 DK$(4):DK$;"DELETE A";(8);"-> EAMON ADVENTURE #";NUM;" <-":DK$;"SAVE A";(8);"-************************************": 12);"ADVENTURE #";NUM;" FOR"::7);"THE WONDERFUL WORLD OF EAMON"::"----------------------------------------" ("THE EAMON FANTASY GAMING SYSTEM WAS DEVELOPED BY DONALD BROWN":A$;" WAS":" DEVEL\0A$"THE GAUNTLET":NUM31:A2$"JOHN NELSON"910mD$(4):D$"VERIFY GAME.PTRS":D$"RUN MAIN PGM"w ::' "*****************************************";38);"**";((38(A$))2));A$;((38(A$))2)((A$)2((A$)2)));"**";38);"*****   ΠנԯԠ̮ΠŮΠŠРƠŮǠĠĠ٠ŠĮΠנԯԠ̮ΠŠԠͮΠנԯԠ̮Π٠ԠРĠͮΠˠԯԠŮΠˠԯԠ̮ΠΠԯԠ̮ΠŠҮŠŠŠŮΠ̠ŮΠ̠Ů      Šҍٍ٠ҍӍōčҍԳԴԱԲčҍҍΠŠĮԠŠ͠ƠŠԮΠРƠήԠŠȠĠƠŠԮΠԠ̮ԠŠȠĠƠŠԠ̮ԠŠȠĠƠŠԠ̮ΠǮΠԠҠƠӮΠԠƠŠĠŮԠŠȠĠƠŠԮΠŠӮΠŮΠŮΠŮΠ̠ǮΠ̠ԠĮԠĠΠŠĮůөΠŠĠήΠŠàҠͮΠ̠ȠҮΠ̠ȠҮΠŠǠͮΠħӠҮΠ̠ҮΠԠƠ̮ΠŠĠͮĠҍĠԱĠҍĠčԠԠԠԠҠԍĠōĠ΍͠ҍӍčč΍ōŠōōҍŠÍԠƠҍŠŠō̍         ؠƠ΍ՠŠΠנԯԠ̮ŠӠ٠ӠҠϠŠԠĠΠĠԠϠԮՠŠΠŠҠȠŠӠĠ̠ӮŠŠӠǠ͠ŠĠȠǠΠŠҮŠҠĠΠՠŠήՠŠΠΠԯԠ̮ŠŠΠҠϠŠԮŠӠΠŠĠΠŠ̠ŠŮՠŠΠˠԯԠ̮ŠȠ̠ӠŠΠĠΠĠŠӠȠǠΠŠԠϠԮՠŠΠˠԯԠŮŠҠϠŠԠĠΠՠŠȮŠӠҠΠĠ٠ϠŠȠ̮ՠŠΠ̠ŠŠŠŠŮŠŠŠӠǠŮՠŠΠ̠ŠҠήŠΠƠҠҠŠȠ̬ٮŠŠϠŠŠӠ̠٠ȮՠŠŠŠŠŮŠӠŠŠҠϠŠĠΠĠԠϠŠԠƠŠҮŠĠˠϠŠΠӠϠŠԮ                    ĠٍĠؠƠ΍ĠӍĠ ŠҍĠōĠ٠ҍĠҍĠĠԴĠčĠԲĠԳՠŠΠ̠ǮՠŠΠ̠ϠŠȮϠŠԠӠĮՠŠΠŠǠͮŠŠӠϠŠȠĠȮՠҠŠǠ͠ŠΠŠ̠٠Š٠ҠŠҧՠŠΠ̠ȠҮŠ٠ԠӠϠŠȮՠŠΠ̠ȠҮŠӠƠӠ͠ŠΠˠȠϠӠҠӮŠŠӠΠŠҮՠŠΠԠĠ̠̠ҠͮŠӠŠŠԠŠԠƠŠͮŠ٠ԠӠϠŠȮՠŠΠŠРĠȠŠҠϠŠԮŠΠǠȠŠƠҠԠƠԠ̠ΠŠҠƠŠ͢ՠŠΠԠƠԠ̮ŠӠ̠ŠҠŠԠԠӠǠԠҠ̠ŠŮŠӠǠŠԠՠΠ ЬҠՠΠ٠ ԠƠŠԮՠŠΠ̠ҮŠӠŠΠŠҠȠΠǠȠԮŠ٠ԠӠϠŠԨӠՠԠϠ ΠŠȠŠŮՠŠΠħӠҮŠŠԠƠŠӠΠŠԠՠϠԠĮŠ٠ӠŠŠԠĠԮӠՠϠҠΠŠŬŠĠӠՠĠӠՠƮԠӠϠŠĠӠȠǠӠԠՠԠΠȠԠϠˠԮԠӠԠǠϠԠլԠӠϠŠǠϠŠƠŮՠŠԠŠРƠŮנՠӠΠӠŮՠΠŠӠĠŠӮŠŠŠӠǠҠĠǠΠנҠŠӮΠՠĠϠŠͬԠӠŠǠϠҠĮŠӠŠ̠ĠՠĠՠ͠ŠԬӠՠΧԠΠĠŠՠŠήՠŠΠנԯԠ̮ŠӠ٠ˠҠϠŠԠĠΠĠԠϠԮՠŠΠ٠٠ΠĠȠӠΠŠӮŠ͠ӠӡԠӠ٬٠ٮҠҠĠΠՠŠήŠԠӠҠҮՠŠΠנԯԠ̮ŠӠ٠ҠҠϠŠĠΠĠԠϠԮՠŠΠŠ͠ԠӠΠĠΠԠ٠ӮŠҠĠӠŠ٠ήϠŠԠӠٮŠӠҠΠՠŠήՠŠΠŠĠǠȠĠȮϠŠȠӠŠΠ̡ՠŠԠŠȠĠƠŠԠ̮̠Ӡ̠ŠӮՠŠԠŠȠĠƠŠԠ̮̠Ӡ̠ŠӮՠŠΠԠ̮ŠӠϠŠԮŠӠΠӠ͠Š٠̮ՠŠԠŠȠĠƠŠԮŠӠŠǠϠРՠ͠ǠƠϠŠȠҠԮՠŠԠŠȠĠƠŠԮŠӠŠǠϠРՠ͠ǠƠϠŠȠҠԮՠŠΠԠƠŠĠŮŠŠӠϠŠԮŠӠȠĠȮՠŠΠŠԠ٠ƠǠȠӮՠŠΠǠԠŠĠƠŠĮϠŠԠՠΠŠŠԠƠӠРϠԠǮՠŠΠԠŮŠӠŠŠ̠ĠՠĠՠ͠ϠԮŠĠӠȠՠˮՠŠΠԠŮŠӠŠŠ̠ĠՠĠՠ͠ϠԮŠ̠ĠՠĠՠ͠ŠԬӠՠΧԠΠĠŠՠŠήՠŠΠԠŮŠӠŠŠ̠ĠՠĠՠ͠ϠԮȠήՠŠΠŠӮŠŠϠҠӠŠՠΠŮӠĠĠŠŬԠΧԠ̠ȠΠӠȮՠŠΠŠĠήŠĠԠĠԠŠĠŠŠӠϠŠȠĠȮՠŠԠĠΠŠĮŠĠӠϠŠԠŮŠŠӠϠŠȠĠԮՠŠΠ̠ԠĠǠȠĠȮŠĠӠ٠ԠȠŠΠȮŠŠӠϠŠԠĠԮՠŠȠƠĠӠŠĠΠĠĠ٠ȮՠŠΠĠΠŠԠӠŠŠҮŠĠӠŠԠƠҮՠŠŠŠŠŠƠ٠ҠΠàŠȠӠĠΠԠƠͮՠŠĠŮԱՠŠ٠ĠȠĠΠŠŮӠŠҧӠΠŠԮՠŠ̠ĠȠŠŮӠŠŧӠΠŠԮՠŠԠƠҠǠΠ͠ŮԠӠǠ٠٠ĮՠŠŠĠŠçӠ͠ϠĠΠĠŠΠΠԮՠŠŠĠЧӠ͠ϠĠΠĠŠΠΠԮՠŠŠĠŠӠ͠ϠĠΠĠŠΠΠԮՠŠ̠ Ơ̮ԠӠϠҠȠҮՠŠԠĠȠŠŠŧĠΠԮՠŠΠԠ٠ĠȠŠŞ̌ĠΠԮՠŠΠŠРƠή̠ՠΠŠĠՠϠŠȬԠĠȠŠӮŠӠŠƠŠԠϠŠԮՠŠԠŠ͠ƠŠԠƠ̮Š̠Ӡ٠ԠΠŠϠէĠҠԠ٠ϠǮՠŠŠĠ٠ƠԳՠŠŠĠ٠ƠԲՠŠŠĠ٠ƠԱՠŠŠĠ٠ƠҍՠŠŠĠ٠ƠčՠŠŠĠ٠ƠҍՠŠԠՠŠԠz     ՠŠԠՠŠԠՠŠŠΠŠȠӠΠŠŮՠŠ̠ŠҠԮՠŠ̠͠ҮՠŠ̠ĠήՠŠ٠Ƞ٠ĮՠŠĠǠԠԠӠԠŠȠĠǠԠծ٠ՠԠŠҠԡՠŠ٠ŠԠԠӠԠŠȠĠǠԠՠΠ٠ՠԠŠҠԡՠŠ٬ĠĠ̠ΠΠĠҠĠǠΠ٠̠ĮŠӠՠŠԠĠϠϠ٠ҬĠԠӠӠ٠ϠŠԠՠΧԮŠӠ٠̠ҠŠϠӠŠӠŠĠƠŠٮŠӠՠ̠ϠϠҬՠ̠ŠϠ٠ǮŠӠ٠٠ҠŮŠӠ٠ϠǠΠծ     ՠŠŠĠ٠ƠؠƠ΍ՠŠŠĠ٠ƠٍՠŠŠĠ٠Ơ ŠҍՠŠŠĠ٠ƠӍՠŠŠĠ٠Ơ٠ҍՠŠŠĠ٠ƠōՠŠŠĠ٠ƠՠŠŠĠ٠ƠҍՠŠŠĠ٠ƠčՠŠŠĠ٠ƠԴ1NZ:AD%(A,4)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 NC25:AD%(4,4)ROOMAD%(5,4)ROOMAD%(6,4G V%(ROOM)ĺDK$;"READ EAMON.DESC,R";ROOM:A$:DK$:A$::V%(ROOM)1b ROOM20GDGD1:520 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:ALOOP. FIRST GIVE ROOM DESC, THEN GET COMMAND2 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 ARE ":" ";A$:oH EAMON ADVENTURE #31? -> THE GAUNTLET <-E_ BY JOHN NELSON e EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012  50DK$(4):DK$"VERIFY GAME.PTRS":310002216,0:1000, d///MAIN                           !!! ! ! ՠŠàǠŠΠŠĠĠԠƠ٠ӠΠŠҮŠӠǠŠӠӠՠŠҮŠӠӠŠӠƠήՠŠΠΠǠҮŠӠŠ٠ҠŠĠƠԮՠ٠ŠŠȠӠٮՠŠǠΠΠŠˠĠǠӠӠˮŠӠӠŠӠ ŠҠ͠îՠŠנŠĠΠӬĠՠŠǠŠĠĠӠՠ٠ϠŠƮŠ٠ҠӠǠΠŠΠՠŠάԠŠ٠ŠĠנŠӠĠԠծՠŠȠҠΠҠҠĠǠŠĠˮŠӠǠŠ̠ԠӠΠՠ٠ĠΠŠ̮ՠŠ̠̠ϠӠŠӠĠҠŠӠŠĠ׬ӠϠՠŠӠŮՠŠҠΠǠȠŠӠȠӮŠӠԠҠԠĠӠӠŠӠҬǠƠŠŮŠӠŠӠĠϠŠ٠ԠԮԠՠ̠ŠŠŬŠŠӠϠ٠Ԯ̠ĠנӠŠծŠӠŠ̠ԠՠàӠƠՠ̠ΠŠ ƠàϠͮՠŠȠǠԠԠӠԠŠȠĠǠԠծ٠ՠԠŠҠԡՠŠĠŠԠԠӠԠŠȠĠǠԠծ٠ՠԠŠҠԡA1NA:AD%(A,2)1AD%(A,4)1WN$(W2)AN$(A):WP%(W2)A:W2W21:AD%(A,4)0]A: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 LEGAACK,FLEE,GIVE,INVENTORY,BLAST,HEAL,POWER,SPEED,SMILE,WAVE,SAY,READYZ SAVE,READ,PRESSq///DONE WITH GAME:"(HIT ANY KEY TO CONTINUE) ";:16368,0:A$:DK$"CLOSE":SPDMD%(0,2)MD%(0,2)2DIE2500KW14:WN$(W)"NONE"::W21:(0,11)WD%(1):MD%(0,12)WS%(1):MD%(0,14)3KjNC:C$(NC):C1NC:C$(C):utS14:S2%(S)SA%(S)::V%(96):ROOM1~MD%(8,14)2:MD%(9,14)2:MD%(11,14)2:MD%(3,14)2l100v 26C NORTH,SOUTH,EAST,WEST,UP,DOWN,GET,TAKE,DROP,LOOK,EXAMINE,ATT"#":A00::1090SLA,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%AMON.ROOMS,L64".W214: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)::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$"DELETE FRESH MEAT"$DK$;"OPEN EAMON.DESC,L256":DK$;"OPEN EAMON.ROOM NAMES,L64":DK$;"OPEN ED%(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 DATAfDK$;"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:A(34);"THEN I CAST YOU OUT OF MY GRACE.":MD%(0,1)MD%(0,1)2:MD%(0,2)MD%(0,2)2:CHCH2:::"A SIMPLE YES OR NO WILL DO."::"WELL, WILL YOU PLEDGE THIS?";A$:550X:"THEN YOU SHALL HAVE YOUR REWARD.":MD%(0,1)24:MD%(0,2)24:CH24:100"::(34);"DO YOU PLEDGE TO USE YOUR SWORD FOR THE":"GOOD OF MANKIND, AND GIVE UP ALL QUESTS""FOR THE SIMPLE PLEASURES OF COMBAT AND":"TREASURES FOR AS LONG AS YOU SHALL LIVE?":"";A$&(A$,3)"YES"A$"Y"(A$,3)"AYE"600[0(A$,1)"N"ĺ::490 M2/NBTL(FD%(1)TD%(1)):NBTLĂM5>100:"AS YOU ENTER THE ROOM YOU ARE GRIPPED ":"BY SOME TREMENDOUSLY POWERFUL FORCE AND":"HELD SEVERAL FEET OFF THE GROUND."_:"A VOICE SPEAKS TO YOU IN UNDERSTANDING":"TONES AND SAYS:MD%(M,14)2490%^MD%(M,14)3390OhOFM:TD%(3)MD%(0,1)DF0:7500:490rM21NM:MD%(M2,5)ROOMMD%(M2,14)3(1).25DFM2:7500:M2200:M2:490|M2:DF0:7500:490OFMM21NM:MD%(M2,5)ROOMMD%(M2,14)1DFM2:7500:M2200:M2006NBTL5001@M1NM:MD%(M,5)ROOM490qJM2MD%(M,14)(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):490Y,3000,3000,3000,3000,3000,4000,4000,5000,6000,6000,7000,8000,9000,10000,11000,12000,13000,14000,15000,15000,16000,17000,30000,18000,20000,19000,///COMMANDS RETURN TO HERE1ROOM15CNTCNT1:CNT3ĺ:"THE BIRD DROPS YOU INTO SOME BRUSH.":R229:3590' :F0:A7NC:C$(A)V$CA:290Q (C$(A),(V$))V$FF1:CA:F1275^ :F290w V$"PRAY"C26:290 :"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);20(C$(C)));::::210 C$(C)S$S$V$:V$C$(C)"C3000)ROOMNC26( :" YOUR COMMAND?";A$I (A$,1)" "A$(A$,2):220j A$""A$CZ$:(37):17:A$y A$""275 CZ$A$:A2(A$):(A$,A,1)" "Ă V$(A$,A1):S$(A$,A1) (S$,1)" "S$(S$,2):260 C16:(C$(C),(V$))V$2OMMAND+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!"::100+OF0:DFM:7500:HIT7360+INCW2AD%(MD%(0,9),6):WA%(W2)WA%(W2)2A1NZ:AN$(A)S$(AD%(A,4)ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$::A$::LK1r*A:LK300*A1NM:MN$(A)S$MD%(A,5)ROOMĺDK$;"READ EAMON.DESC,R";A300:A$:DK$::A$::LK1*A:LK300*V%(ROOM)0:300+X///ATTACK CD)Z(S$)0A$S$:5240w)d:"YOU HAVE ";GOLD;" GOLD PIECES.":"HOW MANY DO YOU WANT TO DROP?";A$:(A$)GOLD5220)n(A$)1ī300)xCC((A$)100))GOLDGOLD((A$)):GOLD0(A$)0CC6)(A$)GOLD20CC6)p///LOOK COMMANDc*LK0:LY 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(300(A1NA:AD%(A,4)1ĺAN$(A);" DROPPED.":AD%(A,4)ROOM(A:WT0:5060)P /// DROP GOL(S$)0(S$,4)"GOLD"52001'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$::100'WTWTAD%(A,3):AD%(A,4)ROOM:AN$(A);" DROPPED.":f(WT10MD%(0,1)ĺ"YOU SUDDENAN$(A)" TAKEN.":AD%(A,4)1:WTWTAD%(A,3)8&^::300t&h///INSERT HERE SPECIAL EFFECTS OF PICKING SOMETHING UPz&r&$///ROUTINE TO GET S$ IF NOT PREVIOUSLY SPECIFIED.&)S$""ĺ:C$(C);" WHAT";:S$:4900&.&///DROP COMMAND&4900'4200: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:WTAD%(A,3)10MD%(0,1)ĺAN$(A);" IS TOO HEAVY":4190+&TAMD%(M,14):FD%(A)FD%(A)MD%(M,13):TD%(A)TD%(A)MD%(M,1)T$<M:NBTL(TD%(1)0):h$///GET COMMANDr$4900$S$"ALL"4160$A1NA:(AN$(A)S$(AN$(A),(S$))S$(AN$(A),(S$))S$)AD%(A,4)ROOMĂ::"I SEE NO ";S$;" HERE!"::100B%"Z#$M1NM:MD%(M,5)R3ĭMD%(M,14)3(MD%(M,14)1200(1)MD%(M,4))MD%(M,5)ROOM:3670s#.MD%(M,5)ROOM3900#8MD%(M,14)3670#BFRMD%(M,3):FRFR100FRFR((CH10)2)#LMD%(M,14)1:FR(100(1))MD%(M,14)2:FR(100(1))MD%(M,14)3;$VT.":2000" R23490G" :"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100a" R3ROOM:ROOMR2:3600t" ROOM15CNT0" ROOM13V%(30)1:V%(31)1:V%(29)1"100"///CHECK REACTIONS ON MONSTERS#TD%(1)0:TD%(3)MD%(0,1):FD%(1)0:FD%(3)MD%(0,13)E"ĺ:"YOU CAN'T DO THAT WITH UNFRIENDLIES ABOUT!"::100g! D16:(V$,1)("NSEWUD",D,1)Ă! DK$;"READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$! R203500! ///SPECIAL MOVES " R299ĺ:"YOU SUCCESSFULLY RIDE OFF INTO THE":" SUNSEA):d A15:WA%(A)::AE:SEX$:GOLD:BANK:AC:A14: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@! NBTLS$"FLE:" HIT THE 'C' KEY) ";:16368,0: A$:A$"C"2520B A$ 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%( TP0:A1NA:AD%(A,4)12350I AD%(A,2)0AD%(A,1)AD%(A,1)CH10\$ TPTPAD%(A,1)y. A:TP;" GOLD PIECES.":8 GOLDGOLDTP:GOLD0GOLD0B :"(HIT ANY KEY TO CONTINUE) ";:A$: 2500$ :5:"(INSERT EAMON MASTER DISKETTE, THEN"252060oW14: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),8) W::5:"AS YOU DELIVER YOUR TREASURES TO SAM":"SLICKER, THE LOCAL BUYER FOR SUCH":"THINGS, HE EXAMINES YOUR GOODS AND":"PAYS YOU "; L LIMIT."::"YOUR WEAPONS ARE--"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:WS6:D1:DFM:A0:7635::300q;,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)S2%(S)2;-m!R2DR%(6(1)1):R2185105H!5(#///GIVE COMMAND52#A215<#M1NM:(S$,(MN$(M)))MN$(M)MD%(M,5)ROOM90506F#:A21A22::"WHO TO GIVE TO? ";(DF,9),5):MD%(DF,9)1:MD%(DF,4)MD%(DF,4)2B4<DF0DIE1:2000J4:_4@///FLEE COMMAND4JNBTLĺ:"THERE'S NOTHING TO FLEE FROM!"::1004TD16:S$C$(D)V$S$:S$"FLEE":30004^5*!DR$"":8500:DR$"000000"ĺ:"THERE'S NO PLACE TO GO!" KNOCKING LOUDLY.":q3MN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)MD%(DF,1)MD%(DF,13)D2:MD%(DF,5)03A2DFNZNM:AD%(A2,4)ROOM:AJ1NA:AD%(AJ,4)DF1AD%(AJ,4)ROOM,4(:MD%(DF,9)0AD%(MD%(DF,9),4)ROOM:MD%(DF,10)MD%(DF,10)AD%(MD%1)7700)2AMD%(DF,14):FD%(A)FD%(A)D2o2:MN$(DF);:(MD%(DF,13)5MD%(DF,1)1)7655,7660,7665,7670,76752" IS STILL IN GOOD":" SHAPE.":2" IS HURTING.":2" IS IN PAIN.":2" IS VERY BADLY INJURED.":3" IS AT DEATH'S DOOR,":(100(1)1):R251A0:763561R286S1.5S:7635M1R296D2D:7635e1R2100D3D:7635o177001D20:D31D:D2D2(S(1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::2MD%(DF,13)MD%(DF,13)D2:MD%(DF,13)MD%(DF,0~FR1007560=0DMD%(OF,11):SMD%(OF,12):DFOF:A1:7635m0DMD%(OF,11)2:SMD%(OF,12):DFOF:A0:76350INC((100(1)1)MD%(OF,10)):MD%(OF,10)MD%(OF,10)2INC0DMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":76351"A CRITICAL HIT!":R2OF,10)MD%(OF,10)AD%(MD%(OF,9),5):MD%(OF,9)1:MD%(OF,4)MD%(OF,4)2::Y/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!"" --";:RL(100(1)1):HIT0:(RL5RLMD%(OF,10)MD%(DF,7))RL96HIT1X.VHIT7600p.`RL97ĺ"A MISS.":.e"A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED."::I/jFR76ĺ" WEAPON DROPPED!":AD%(MD%(OF,9),4)ROOM:MD%(TO PICK UP WEAPON%-MD%(OF,10)0ıP-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)17400J.Q