+JJJJ  / X5 lӠˠӠϠӠϠԮԠҠˠčӠ٠ϠԮL EAMON.ROOMS,L64":DK$;"OPEN EAMON.ROOM NAMES,L64";Qhy100[ BY JIM JACOBSONa EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012  50DK$(4):DK$"VERIFY GAME.PTRS":310002216,0:1000( d///MAIN LOOPDO YOU WANT TO RESTART THIS GAME?":" Y OR N:";A$:A$"N"1000P,y(4);"BLOAD GAME.PTRS":(4);"BLOAD GAME.SVAR":(4);"BLOAD GAME.STR"P6yDK$;"DELETE GAME.PTRS":DK$;"DELETE GAME.SVAR":DK$;"DELETE GAME.STR"2QTyDK$;"OPEN EAMON.DESC,L256":DK$;"OPEN;",L";(109)(110)256(105)(106)2561OvuDK$"BSAVE GAME.STR,A";(111)(112)256;",L";(115)(116)256(111)(112)2561Ou:"THE GAME IS NOW SAVED. BOOT ON THIS":" DISKETTE TO RESTART THE GAME."OuOy /// RESTARTOy216,0?P"y:"":300Ne" GROWING!":3000N0u // SAVE GAMEeN:u:"DO YOU WANT TO SAVE THIS GAME? ":"(Y/N) :";NDuA$:A$"Y"A$"N"30020NNuA$:A$"N"100NXuDK$;"CLOSE":X(0)NbuDK$"BSAVE GAME.PTRS,A$69,L8"+OluDK$"BSAVE GAME.SVAR,A";(105)(106)256$(J)S$26020/Me:"I DON'T UNDERSTAND.":300XMeSN((1)5)2:J10CHCHSN:26026uMeMD%(0,J7)MD%(0,J7)SNMeSN0ĺ:"NOTHING HAPPENED.":300MeZ$"HARDINESSAGILITY CHARISMA "Me:"YOU FEEL YOUR ";(Z$,(J8)91,9);NeSN0ĺ" FADING.La:"WHAT BOTTLE?":300LaJ810:AD%(J,4)1AD%(J,4)ROOMĺAN$(J);" SAYS ";("HARDINESSAGILITY CHARISMA ",(J8)91,9)La::300Le//DRINK BOTTLESLeS$"POTION"Ą"POTION FROM WHICH BOTTLE?";S$Le(S$)6S$S$" BOTTLE" MeJ810:AN CRUMBLES TO DUST.":MD%(14,5)0:300GKU"CHIPS FLY FROM THE ROCK...";pKUMD%(14,13)322020,22025,22030:300KV"IS IN BAD SHAPE":K V"IS HURTING.":KV"IS IN GOOD SHAPE.":Ka //EXAMINE BOTTLES//LaJ810:AD%(J,4)1AD%(J,4)ROOM25015NK*J%NS$"POTION"(S$,6)"BOTTLE"26000FJRN:"DRINK WHAT?"::300WJR *SWIMMING*J R(1).75ĺ:"YOU DROWNED IN THE WATER...":DIE1::2000JRJU BLAST ROCK$KU:"DIRECT HIT!"::MD%(14,13)MD%(14,13)((1)61):MD%(14,13)1ĺ"THE MONSTER)0ĺ:"YOU FOUND A NECKLACE IN THE BAG.":AD%(20,4)ROOM:300eI,G:"THE LEATHER BAG IS EMPTY.":300tI8J ///ENTERI=JS$"BOAT"AD%(22,4)ROOMBT1::"OK.":300IBJS$"ROOM"ĺ"JUST WALK INTO THE ROOM."::300ILJ:"ENTER WHAT?"::300J N ///DRIOOMAD%(12,4)1181209HF:"I DON'T SEE A CHEST!":300HFAD%(13,4)0ĺ:"YOU SEE A BAG OF GOLD COINS IN THE CHEST."::AD%(13,4)ROOM:300HF:"THE CHEST IS EMPTY."::300HGAD%(19,4)ROOMAD%(19,4)118210HG:"WHAT BAG?":300=I"GAD%(20,4AAE)(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)zGFF:"READIED."::300GPF ///OPENGZFS$""İ4900GdFS$"CHEST"18100GnFS$"BAG"S$"LEATHER BAG"S$"SACK"18200GF OPEN CHESTHFAD%(12,4)R12000F>S$"POWER"130002F>S$"SPEED"14000QFB:"OKAY, '";S$;"'"::300iFhB///READY A WEAPON.sFrB4900F|BA1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING IT!"::100FBAD%(A,2)2ĺ:"THAT ISN'T A WEAPON!"::100aG///SAY COMMANDE>4900E>S$"BLAST"V$S$:S$"":11000F>S$"HEAL"RE."::300D513020*D6///SPEED SPELLCD6S3:11500:SUC300D6SPDMD%(0,10)MD%(0,10)2MD%(0,2):MD%(0,2)2MD%(0,2)D6SPDSPD(25(1)10)::"YOU CAN FEEL THE NEW AGILITY FLOWING":" THROUGH YOU!"::300D:///SMILE COMMANDE::M1ES WENT UP!!!"::A15:WA%(A)WA%(A)((1)51)::300C4"A FLASH OF LIGHT APPEARS IN THE DISTANCEBUT NOTHING HAPPENS.":300C 5(1).9ĺ"YOU JUST FORGOT ALL OF YOUR SPELLS!!!":A14:SA%(A)0:S2%(A)0:::300 D*5"A PUFF OF SMOKE RISES FROM NOWHEPPEARS FROM BENEATH YOU!"::AD%(22,4)0:BT0:300Bl4(1).8ROOM21ĺ"A LARGE WAVE RISES FROM THE WATER AND DROWNS YOU."::DIE1:2000Bv4"YOU FEEL A SMALL GUST OF WIND HIT YOUR FACE, BUT NOTHING ELSE."::3008C4(1).8ĺ"ALL YOUR WEAPON ABILITI).9ĺ"YOU HAVE BEEN HEALED!":MD%(0,13)0:300xA4(1).5ĺ"YOU HAVE BEEN TELEPORTED SOMEWHERE!":R2((1)841):3500A4"YOU ARE KNOCKED TO THE GROUND BY A STRONG GUST OF WIND.":S5:D1:DF0:A0:7635::300AX41Bb4(1).3BTĺ"THE BOAT DISA300@3A:A15:(1).5ĺ"YOUR ";("AXE BOW CLUB SPEARSWORD",(A1)51,5);" ABILITY WENT DOWN!":WA%(A)WA%(A)((1)55):300@3A::"A LARGE FLAME ERUPTS FROM NOWHERE, WHICH BURNS YOU BADLY."@3S6:D1:DF0:A0:7635::300@3.A3(1D%(M,5)ROOM:MD%(M,13)0:WTWTAD%(M2,3)=?13M:RAISE13020F?63300?3A1NA:AD%(A,4)1(1).8ĺ:AN$(A);" DISSAPPEARS!":AD%(A,4)0:300@3A:A14:WN$(A)"NONE"(1).5ĺ"YOUR ";WN$(A);" COMPLEXITY":"GOES DOWN!!!":WO%(A)WO%(A)((1)55):3)0MD%(0,13)0$>/DF0:7650:3009>2 ///POWER SPELLR>2S4:11500:SUC300^>2RAISE0>2X((1)71):X13100,13200,13300,13400,13500,13600,13700(?,3M1NM:M2NZNMM:AD%(M2,4)ROOMAD%(M2,4)1RAISE1:MN$(M);" COMES ALIVE! ":AD%(M2,4)0:MF 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.":>.MD%(0,13)MD%(0,13)(10(1)1):MD%(0,1:D1:DFM:A0:7635::300n<,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<-j=P-:"THE STRAIN OA0A01:A015ĺ:"(HIT ANY KEY TO CONTINUE)";:A$::A00D;$':300X;*///BLAST SPELLb;+4900;,M1NM:S$MN$(M)MD%(M,5)ROOMĂ::"YOU CAN'T BLAST ";S$;"!"::100;,S1:11500:SUC300;,S$"ROCK MONSTER"22000<,:"DIRECT HIT!"::S6T MUCH GOLD OF YOUR OWN!"::300n:&%GOLD(GOLD(S$)):MD%(M,14)0:MD%(M,3)MD%(M,3)(1(S$)100):9120:'///INVENTORY COMMAND9;':"YOU ARE CARRYING THE FOLLOWING--":A00:A1NA:AD%(A,4)1ĺ" ";AN$(A);(" (READY WEAPON)",120(AMD%(0,9))):9#AMD%(0,9)MD%(0,9)1c9#:"OKAY.":AD%(A,4)0:MD%(M,14)0:MD%(M,3)MD%(M,3)(1AD%(A,1)100)9#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)9#R3ROOM:3600:5050%:%(S$)GOLDĺ:"YOU AREN'T CARRYING THAOBODY HERE BY THAT NAME!"::10098Z#S$(S$,(MN$(M))1)[8d#(S$,1)" "S$(S$,2):9060m8i#(S$)095008n#A1NA:(S$,(AN$(A)))AN$(A)AD%(A,4)190958x#:A22A23::"WHAT TO GIVE? ";S$:90658#:"YOU AREN'T CARRYING A ";S$;"!"::100007*!8500:3500K74!DK$;"READ EAMON.ROOMS,R";ROOM:D16:DR%(D)::DK$k7>!R2DR%(6(1)1):R218510q7H!7(#///GIVE COMMAND72#A217<#M1NM:(S$,(MN$(M)))MN$(M)MD%(M,5)ROOM90507F#:A21A22::"WHO TO GIVE TO? ";S$:9020 8P#:"N13)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,4)26DF0DIE1:20006:6@///FLEE COMMAND7JNBTLĺ:"THERE'S NOTHING TO FLEE FROM!"::10,7665,7670,767575" IS STILL IN GOOD":" SHAPE.":M5" IS HURTING.":c5" IS IN PAIN.":5" IS VERY BADLY INJURED.":5" IS AT DEATH'S DOOR,":" KNOCKING LOUDLY.":6MN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)MD%(DF,1)MD%(DF,:763547700o4D20:D31D:D2D2(S(1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::4MD%(DF,13)MD%(DF,13)D2:MD%(DF,13)MD%(DF,1)77004AMD%(DF,14):FD%(A)FD%(A)D25:MN$(DF);:(MD%(DF,13)5MD%(DF,1)1)7655,766FOF:A0:7635M3INC((100(1)1)MD%(OF,10)):MD%(OF,10)MD%(OF,10)2INC3DMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":76353"A CRITICAL HIT!":R2(100(1)1):R251A0:76353R286S1.5S:76353R296D2D:76354R2100D3Dz#      ήӠ ήà Π͠KΠŠ ŠҠŠԠźήŠήӠ ή͠ӠήӠ      ŠҠōESSOR, AND BRING HIMBACK...ALIVE!"n Z:"YOU NOW PROCEED TO THE DOCK, WHERE YOU WILL START YOUR ADVENTURE." d(4);"RUN MAIN PGM"AOU WILL START YOUR ADVENTURE." d(4);"RUN MAIN PRG"DN OF PROFESSOR AXOM (WHO IS ALSO A FRIEND OF YOURS.)" <:"IT HAS BEEN RUMORED THAT THE INFAMOUS BLACK WARRIOR (WHO LIVES SOMEWHERE ALONG"; F"THE ZYPHUR RIVER) WAS RESPONSIBLE FOR THE KIDNAPPING. YOU MUST FOLLOW THE"" P"RIVER, FIND THE PROF# *START UP FOR RIVERVENTURE*+:t"YOUR NEXT TASK IS A LARGE ONE.":"A FAMOUS SCIENTIST (PROF. AXOM)"("WAS KIDNAPPED 3 MONTHS AGO. THE SOCIETY FOR THE PRESERVATION OF SCIENTISTS"7 2"(SFPOS) HAS OFFERED A REWARD FOR THE ":"SAFE RETUR  A$;" WAS":" DEVELOPED BY ";A2$ 2"NON-COMMERCIAL DISTRIBTION ENCOURAGED."::"TO USE THIS DISKETTE REQUIRES AN EAMON MASTER DISKETTE WHICH MUST BE BOOTED UP ON.": <2)));"**";38);"*****************************************": 12);"ADVENTURE #";NUM;" FOR"::7);"THE WONDERFUL WORLD OF EAMON"::"----------------------------------------"" ("THE EAMON FANTASY GAMING SYSTEM WAS DEVELOPED BY DONALD BROWN":;A$"THE ZYPHUR RIVERVENTURE":NUM4:A2$"JIM JACOBSON"C9wD$(4):D$"VERIFY GAME.PTRS":D$"RUN MAIN PGM" 216,0 ::< "*****************************************";38);"**";((38(A$))2));A$;((38(A$))2)((A$)2((A$)  ΠίӠҍΠίӠҍԠԭΠůנ٠ӍԠŠĠƠΠůנٍΠ̠ǠРƍΠŠȍΠίӠҍΠŠ͍͠ԠΠΠРƍΠ̠ōΠ̠ōΠ̠ōΠŠǍŠŠΠ̍ΠȠΠŠƍΠȠΠƍΠȠȍΠȠǠů׍ԠԭΠΠŠȍΠ̠ŮԠΠŠĠΠȍԠ̠ōΠŠ΍ΠȠȍΠȠҠŠҮΠŠȠŠƠŠ̮ΠǠҠŠ̍ΠȍΠŠ̍ԠΠĠ٠ЍԠǠ٠ŠҍԠΠĠŠΠŠȍΠŠ̍ΠŠҍԠŠ̠ōΠˠ̍ΠŠҍΠŠҍΠŠҍΠŠҍΠŠҍԠנԠƠŠҍԠ٠נԠƠŠҍԠ٧ΠΠŠҍΠŠҍԠǠƠŠҍΠŠҍԠĠΠŠҍԠŠˍΠŠҍԠĠΠŠҍ         ҠˠҍÍҠ͍΍ҍӍҍӍҍΠŠԠӍΠΠůנ̍ΠΠůנ̍ΠΠůנ̍ΠȠůנ̍Π̠ōԠŠĠƠίӠōΠŠԠӍΠŠȠ̍ΠŠ̠ˠ͍ΠŠȠ̍ԠԭΠůנ٠΍Π̠ҍΠŠ٠͍Π̠ŠԍΠ̠ŠԍΠŠ͍ΠٍΠŠ͍Π̠ҍΠԠůנōΠ̠Š͍ΠנٍԠŠĠƠԠٍԠ˭ԠԍΠΠ̍ԠԭΠίӠ٠׍Ԡ˭ԠԍΠΠůנٍΠΠůנٍԠĠΠŠٍΠΠ̍ĠҍĠӍԍĠҍ٠ō΍ˠӍҠǍ΍ˍҠЍčˠԍԠĠӍҠōӍŠōĠō̠Ġ΍ĭĠōҍčҍōŠč        ˠҍύĠҍǍӠՠŠŠĬՠŠϠŠԠ̠ǠŠŠƮŠӠΠŠӠϠŠԮϠŠԠӠŠԠȠŠҠՠϠĮԠ̠ȠŠϠŠԢŠҠנӠϠŠȮՠΠ̠ӠǠŠ͠ƠŠԬԠՠΧԠŠ٠ŮՠΠ٠ϠȮŠҠӠǮӠŠԠӠϠРՠǠҬՠŠĠΠŠҠĮŠƠŠԬՠΠ٠ϠԮՠŠנԠŠԠƠŠҮŠԠӠĠάԠՠԠϠˠԮϠŠȠĠΠŠˠՠŠӠՠΠĮŠҠӠĠԠԮϠŠȠĠȠŠӠȠՠԠӠȮϠŠԠŠҠӮՠŠΠ٠ǠҮŠҠӠǠϠŠԬĠŠԠӠՠ͠Ǡ٠ҭΠԠԮՠŠΠ٠ǠҮŠԠӠǬĠՠΠ٠ϠϠŠȮРӠԠՠ͠ǠϠŠԠҠԮՠŠǠΠŠˠƠŠҮϠŠԠӠԠԠӠĠϠŠˮϠŠԠŠĠӠˠϠŠΠ̮                              ĠˠҍĠύĠĠҍĠǍĠҠĠˠҍĠÍĠƮ͍Ġ΍ĠҍĠӍĠՠŠΠנȠȠŠӠԠӠԯԮϠŠԠՠҠҠǬĠΠҮϠŠԠӠĠԠӠϠŠȮՠŠΠ̠ȠҠŠҮՠŠĠՠȬРӠƠŠȠŠԠӠͮՠΠϠ٠ԠϠŠҠŠϠŠРӮՠŠԠ̠ǠԠȠƠ٠ǠҮՠΠŠ̠ȠԠӠȠϠŠŠӠĠծՠŠԠԠӠŠ٠ЮŠӠƠ̠ӠӠĠ̠ҮՠŠˠӠΠ̠ӠԠϠŠȠŠՠŠŠҮՠŠΠŠҮϠŠԠՠΠŠĠ̠ȠՠέԠĠԮϠŠȠĠȠŠ̠ǠӬҮϠŠԠӠˠ̮ՠŠΠ̠ȠˠΠӮŠӠϠԬԠĠŠ̠ӠϠΠϠҠƠŠԮՠŠԠŠŠϠŠ̠ȠӠԠĠԮϠŠԠӠӮϠŠԠՠŠԮՠŠΠŠҮŠԠӠԠΠԠŬϠՠΠϠҠԠҠԮϠŠȠĠȠŠ̠ӮϠŠԠӠŠϠ̮ȡՠŠΠҠ̠ĠŠΠġŠԠӠǠРŮĠŠҠ٠ӠƠŠŠƮ̡ՠΧԠĠԠҠԬĠŠԠӠϠǠҠՠϠϠˠȮՠŠΠŠҮϠŠԠՠŠ̠ǠĠȠǠȠŠŠӮϠԠӠĠ̮ϠŠȠŠҠӮŠԠӠ٠ǠǭҮϠŠȠŠҠӮŠӠŠȠԠĠԮŠԠӠĠРٮՠŠ٠ȠӠȠ̠ӠĠϠ͠ȠԠĠԮϠŠȠŠҠӠΠŠӮՠŠΠҠԠӠԠԠЮŠҠӠŬǠȠȠĠԮΠŠŠϠŠԠՠŠŠҠǠ̮ϠŠȠՠŠŠŠΠϠŠӮŠҠӠԠ٠ŮҠԠΠ٠ԮՠŠРӠȠԠĠԮՠΠϠˠϠŠȠӠŠԠӠ٠ˮŠҠӠǠϠ̠Ƞ٠ȠҠҠՠϠέŮȠԠĠԠŠŬРӠȠԠՠ͠ǮՠΠĠ٠ȮՠŠԠΠΠРŠƮϠŠȠŠȠӮϠŠԠĠԠՠŠӠԠϠϠŠŠƠŠƮϠŠȠŠȠӠΠٮՠŠΠίӠȠРȠƮϠŠԠҠŠƠՠΠŠҮϠŠȠՠŠΠҭΠΠŠȮՠŠΠŠƮȠӠȠĠȮϠŠԠҠŠŠƠŠƠՠŠҮϠŠȠŠȠӠ٠ήՠŠŠŠΠ̮ՠŠŠԠˡՠŠΠŠǮϠŠĠԠՠŠŠԮϠŠȠӠȠϠŠӮϠŠȠՠŠŠΠ̮ՠŠΠ̠ŠŮŠӠĠӠŠŬԠҠŠԠŠȠ̮Š٠ԠӠϠŠȮՠŠԠԭήϠŠȠŠӠҠĠՠŠΠΠĮϠŠȠӠ̠ŠΠŠӮϠŠԠŠӮՠŠΠΠůנȮՠŠԭӠΠŠĠԠӠҮŠǠӠƠΠ̠ŠŠŠȮՠŠΠȠȠԠӠȠĠԮϠŠԠŠȠӠϠΠԮϠŠȠŠȠӠ٠׮ՠŠΠȠȠΠŠӮŠȠŠȠӮϠŠԠՠŠҠȮՠŠΠŠήŠҠӠŠƠŬĠŠӠŠ٠ĠˠԠͮϠŠԠĠȠՠŠ̠ӮՠŠԠŠŠϠ̬ȠӠϠŠԮϠŠȠŠǠĠŠ̠ƠԠӠӠŠ͠ƠŠήՠŠԠĠΠŠȮŠȠӠĠӠ٠РϠŠȮϠŠԠŠȠӠ٠׮ՠΠҠҠǠϠŠԮՠŠΠȬԠԭήϠŠȠӠǮϠŠŠȠӮՠŠ٠ȠǠԮՠŠԠ̠ǠŠҠҠŠήӠŠΠՠŠҠǠŠϠŠȩŠ٠ҠԠӠϠŠȬϠήՠŠԠ̠ǠٮϠŠȠՠŠŠήϠŠȠՠŠ̠ŠϠέ̠ȠӠ˩ĠӠ֭Ԡՠ͠Ǡ٠ҠήՠŠԠԠӠŠ˭ԠҠҠӮ͠ŠՠΠŠҠӠӠӠĠӮŠՠŠРŠά٠ԠӠϠŠԮՠŠΠĠΠΠ̮ՠΠŠԠϠŠԬȠĠǠΠŠ̮ŠȠŠ̠ӢՠŠԠĠΠŠٮϠԠŠ٠ӠԠƠԮϠŠȠՠŠҠǠΠŠٮՠŠΠΠůנٮϠŠԠՠΠŠΠΠŠٮՠŠΠΠůנ٢ՠŠԠŠĠƠΠůנٮŠԠՠŠŠ٠ǠԠƠԮՠŠԠΠήϠŠԠŠůנҠӠٮϠŠȠՠŠҠȠĠӠΠŠӮϠŠԠՠŠǠҮՠŠΠίӠҮϠŠȠՠŠԭΠůשϠŠȠŠҠӠԠƠԮՠŠŠҠӠΠŠӮՠŠΠҠ̠ԠίӠҭҮŠӠŠŠΠҠӠΠͬȠĠӠƠĠĠҠĠΠͮՠŠΠ͠Ƞ̠ӠŠӠ̠ĮՠϠŠ̠֭ĠΠӮŠ٠ԠӠϠŠȮՠŠΠίӠҮϠŠԠՠŠŠŠ̠ŮϠŠȠӠ̠ͮՠŠΠŠȠԠӠϠŠȮϠŠȠŠȠӠԠƠԮϠŠԠՠŠŠŮϠŠԠՠǠРŠƮՠŠΠ̠ǠРԠӠ٠ŠĠԮΠŠҠϠŠԬĠŠҠנƠ̠ԠӠϠҠԠΠŠҮŠ٠ԠӠϠŠԮՠŠΠ̠ŮŠ٠ԠӠ͠ŠԠϠŠԮԠŠҠΠŮՠŠΠ̠ŠԠ٠٠έԠǠ͠ŠԮŠŭΠӠǠŮŠ٠ԠϠŠԮՠŠԠŠŠϠ̠έ̮Š̠Ӡ٠ˬԠ٠٠ŠԠԠӠΠ͠ŠŠϠŠԩϠŠԠՠΠŠŠ̠ǠϠŠԮՠŠΠΠ̮Š٠ԠӠϠŠȮՠŠΠ٠̠ͮŠҠӠĠȠŠӬĠŠҠӠ٠ŠŮŠ٠ԠϠŠȮՠŠΠ̠͠ȠנǮŠ٠ԠӠΠҠȠŠΠŠҮՠŠΠ͠ԠӠ٠ӠŠҠǠӮŠӠŠĠϠŠӮՠŠҠΠŠȠ̠ǠϠŠΠŠǮϠŠȠӠ̠Ԯ٠ӠϠŠԢՠŠΠ̠ůנҮϠŠԠӠԭήՠŠΠίӠҮŠӠŠˬ٠٠ԮՠŠΠ̠ŠͮŠ٠ԠӠϠŠȢՠŠΠԠӠϠŠ٠ٮĠӠӠԮĠӠŠŬԠƠ͠ƠϠŠϠծՠŠ̠͠ϠŠԠĠȮŠԠӠϠŠȮՠŠΠŠ͠ȠΠӠǠŠӮŠҠӠȠˠĠŠӠŠϠ٠̠ĮŠ٠ԠӠϠŠԮՠŠԠŠĠƠԠůנ̭ٮϠŠȠӠٮՠŠΠנůנٮϠȠӠ̠͠ȠǠΠҠǠΠŠҠΠƠԮՠŠΠ̠Š͠ƠƠŠΠҮՠŠ٠ΠǠӠԠŠΠĮŠ٠ԠӠϠŠȮՠŠΠנ٠ԠӠĠĠȠԮϠŠԠӠŠԠҠȠՠŠȮՠŠΠԠӠŠ˭ԠҠΠٮՠŠӠĠԭӠϠŠԮՠΠ٠ϠˠϠŠȮՠŠԠԭΠΠΠ̮ϠŠȠՠΠŠԡϠŠȠӠ̠ǠŠՠŠԠӠϠŠԮϠŠԠӠΠ̮ՠŠΠΠ̮ϠŠՠŠ̠ĠٮϠŠԠӠԭή̠ҠȠŠԠƠŠ͠٠ӠΠŠ͠ԮՠŠŠŮՠŠ٠̠ҠȠŠԠΠŠĮՠŠŠĠȠŠĠŧĠΠŠŮՠΠΠΠůנ̠ԠӠ٠ΠϠŠԮϠŠԠՠŠԮՠŠΠΠůנ̮Š̠Ӡ٠ΠϠŠԮՠŠԠǠ͠ŠԮՠŠΠΠůנ̠ԠӠРϠŠԬΠϠŠԮՠŠΠ͠Ƞ̠ΠӠǠРΠŠӮŠ٠ԠӠϠŠԮՠŠΠ͠Ƞ̠ӠƠ̠ӠǠРΠŠӮŠ٠ԠӠϠŠԢՠŠԠŠĠƠŠŮՠŠӠϠŠԠĠԠƠծՠŠΠίӠŮՠŠӠϠŠȮΠ̠ӠϠŠȢՠŠΠΠůנ̮ŠӠŠŠˮϠŠȠӠ̠ӭŠԠՠΧԠŠϮՠŠΠȠ̠Ǡů׮ϠŠȠӠҠ̮ՠŠΠ̬Π̮Š٠ԠӠϠŠȮՠŠΠ͠Ƞ̠ӠȠȠĠȮŠΠӠϠȠӠŠȠĠ٠ӠϮҠӠϠŠԮՠŠ̠٠ŠȠĠήՠŠΠĠҠǮՠŠŠƠˠӮՠŠ̠٠̠Ƞ®ՠŠŠ®ԧӠŠ̠˧Ƞ̠̠ƠՠȠԮՠŠŠΠԠΠŠĠӠήՠŠĠ٠Į̠ҠРӠΠŠĮӠĬԠԠŠȠŭǮՠŠŠ٠ƠԠӠԠҠΠΠҠĠƠөĠ٠Π͠ĠǠҮՠŠΠĠˠԮΠŠԠӠĠŠӠҠҠҠҠŮՠŠŠƠ٠ҧӠӮ٠ŠĠĠ٬ԠŠŠĠӠ̠ĠϠͮՠŠŠȠҠĠŮՠŠŠȠĠĠέŮՠŠŠȠŠĠŮՠŠΠŠ͠ΠĭĠŠԠӠŠŠŮΠԠĠŠŠȠՠŠ̠ԠӠŠΠŠӮՠŠ̠ĠΠȠŠӠΠŠɧĠΠŠŮՠŠРĠԠӠΠ٠٠ӮՠŠŠĠǮՠŠŠĠĠҮՠŠŠĠˠҢՠŠŠĠҮՠŠĠƮ͢ՠŠŠĠîՠŠҬנĮՠŠŠĠήՠŠŠĠ®ՠŠŠĠӢՠŠŠĠӮՠŠŠĠҢŠĠҠӠŮՠŠΠĠԮԠӠϠ٠ՠϠ٬ԠՠΠŠԠϠ̠ΠŠҮ z       ՠŠԠΠŠƠĠӮՠŠŠҠǠˠ̮ŠӠӠĠĠӠ٠ĭŠϠ̠ƠӠĠϠϠΡ̠ΠΠǠҧӠ͠ӠǠΠŠҮӠŠ٠ԠϠӠԬՠŠȠΠӠ͠ԠӠ٭ĠΠӠǠԠŠŮŠӠΠĠĠƠӠҠ͠͠ŠĠٮŠӠĠ٠ŠӠˠҮŠĠȠ٠РӠΠԠծԠӠìҠӠΠˮ̠ȠŠӠǠԠՠ͠ŠӮՠŠԠϠŠΠà͠ӠĠӮΠŠҠǠӠŠĠҧǠΠŠˠƠŠ̠ŠӠŠŠǠŬŠ̠ĠŠРӮӠΠ٠ӠĠȠĠŭŠӮԠӠӠĠĠΠӠΠӠŮǠΠŠנҠՠŠԠЬӠӠǠٮԠӠՠĠ٠ӠӠծǠԠՠΠŠҠՠŠԠӠϠŠΠȠĠ̠ĠŠĠƠĮŠՠӠŠǭŠŠȠӮԠӠĠӠԠլǠӠŬРȮՠŠ̠ΠΠǠǠˠӮŠӠǠӠӠϭҠĠ٠ǮŠӠՠĠ٠ŠӠӠӠŮՠŠΠǠҧӠ͠ǠŠծΠӠՠŠŠĮ     ڢӠՠȠҠŠ̬ŠˠӠŠĠӠաՠŠŠĠϢՠŠŠˠҬĠΠӮ,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):A2SA:DK$;"OPEN EAMON.MONSTERS,L128":MN$(NM),MD%(NM,15):A00:M2200:M2:490*|M2:DF0:7500:4903OFMyM21NM:MD%(M2,5)ROOMMD%(M2,14)1DFM2:7500:M2200:M2:490M2NBTL(FD%(1)TD%(1)):NBTLĂM100///INITIALIZE DATADK$;"OPEN EAMON.DESC":DK$;"READ EAMON.DESC":NR;" 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)DF0:7500:490rM21NM:MD%(M2,5)ROOMMD%(M2,14)3(1).25DFM2:750000,10000,11000,12000,13000,14000,15000,15000,16000,17000,30000,18000,19000,20000r,///COMMANDS RETURN TO HERE6NBTL500@M1NM:MD%(M,5)ROOM490JM2MD%(M,14)(MD%(M,14)2):MRFD%(M2)TD%(M2)100(41(1)20)oTMD%(M,4)MRĺ:MN$(M)C$(C)S$Ă::"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);20(C$(C)));::::210C$(C)S$S$V$:V$C$(C)R"C3000,3000,3000,3000,3000,3000,3000,3000,3000,3000,3000,3000,4000,4000,5000,5000,6000,6000,7000,8000,8000,8000,9000,1N$(A)" IS HERE."# 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$,A1):S$(A$,A1) (S$,1)" "S$(S$,2):260gC1NC:C$(C)V$DESC,R";M300:A$:DK$:A$:MD%(M,15)1:N M:BTĞ:"YOU ARE IN THE BOAT": A1NZ:AD%(A,4)ROOMAD%(A,9)ĺDK$"READ EAMON.DESC,R"A100:A$:DK$:A$:AD%(A,9)1::190 AD%(A,4)ROOMĺ"YOU SEE ";AN$(A): A:AANA:AD%(A,4)ROOMĺ"YOUR ";A" ";A$:O V%(ROOM)ĺDK$;"READ EAMON.DESC,R";ROOM:A$:DK$:A$::V%(ROOM)1h ROOM16DIE1:2000 MD%(4,5)20MD%(4,5)((1)192):3600 M1NM:MD%(M,5)ROOMMD%(M,15)ĺMN$(M);" IS HERE.":( MD%(M,5)ROOMMD%(M,15)ĺDK$;"READ EAMON.RE SWIMMING IN THE RIVER."::(1).9ĺ"GURGLE! YOU JUST DROWNED.":DIE1::2000i }ROOM46ROOM54130 ~AD%(21,4)ROOMAD%(21,4)1ĺ:"IT'S TOO DARK TO SEE ANYTHING."::210 V%(ROOM)ĺDK$;"READ EAMON.ROOM NAMES,R";ROOM:A$:DK$:"YOU ARE ":. FIRST GIVE ROOM DESC, THEN GET COMMANDX n:MD%(14,5)0ĭMD%(14,5)58MD%(14,5)58 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!": yROOM1125P zROOM21BTĺ:"YOU A ZYPHUR RIVERVENTURE <-B[ BY JIM JACOBSONa EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012  50DK$(4):DK$"VERIFY GAME.PTRS":310002216,0:1000( d///MAIN LOOP         !!! ! ! ! ! !!!!!!!!!""" " " " " """""""""          ՠŠΠΠΠĠӮՠŠ˭ŠŠȠӠԠՠȠ̠ĠˠӮӠŠӠĠˮͭĠǠӠԠՠ͠ŠӮŠҠӠ͠ŠӮӠŠҠӠŠƠĬӠ̠ĠΠӠԠĮ)("NSEWUD",D,1)ĂJ" DK$;"READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$Y" R203500o" ///SPECIAL MOVES" R299ĺ:"YOU SUCCESSFULLY RIDE OFF INTO THE":" SUNSET.":2000" R23490" :"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100# R3ROOMA):WO%(A):WD%(A):WS%(A):q! 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" D16:(V$,1DIEĺ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:A14:WN$(A):WT%("YOU RECEIVED ";:XT((1)500100):XT;" GOLD PIECES.":GOLDGOLDXT}8 GOLDGOLDTP::"(HIT ANY KEY TO CONTINUE) ";:A$: 2500 :5:"(INSERT EAMON MASTER DISKETTE, THEN":" HIT THE 'C' KEY) ";:16368,0 A$:A$"C"2520 A$G EXAMINES YOUR GOODS AND":"PAYS YOU ";K TP0:A1NA:AD%(A,4)12350t AD%(A,2)0AD%(A,1)AD%(A,1)CH10$ TPTPAD%(A,1). A:TP;" GOLD PIECES.":D3 MD%(9,5)ROOMĺ:"YOU ALSO RECEIVE A REWARD FOR THE SAFE RETURN OF THE PROFESSOR. ":(W5)WN$(W21):WP%(W5)WP%(W21):W2W21:W252060W14: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 WEAPONS":"TO KEEP THEM ALL--4 IS THE LEGAL 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)20803*AD%(WP%(W5),4)1:WN$DIE2500vW14:WN$(W)"NONE"::W21:A1NA:AD%(A,2)1AD%(A,4)1WN$(W2)AN$(A):WP%(W2)A:W2W21:AD%(A,4)0A:W262300L :5:"AS YOU START TO ENTER THE MAIN HALL,":"LORD WILLIAM MISSLEFIRE APPEARS AND":"TELLS YOU, 'YOU HAVE TOO MANYPUT,LOOK,EXAMINE,ATTACK,FLEE,RETREAT,ESCAPE,GIVE,INVENTORY,I,BLAST,HEAL,POWER,SPEED,SMILE,WAVE,SAY,READY,SAVE OPEN,ENTER,DRINK///DONE WITH GAME:"(HIT ANY KEY TO CONTINUE) ";:16368,0:A$:DK$;"CLOSE":SPDMD%(0,2)MD%(0,2)2  MAN SAYS 'THANK YE, AND MAY THE LORDS BLESS YOU."(1).02ĺ"AS THE OLD MAN LEAVES, YOU SEE THE BOAT SINK BEFORE YOUR EYES. YOU'LL HAVE TO":"BUY ANOTHER BOAT...":1150l100v 37m NORTH,N,SOUTH,S,EAST,E,WEST,W,UP,U,DOWN,D,GET,TAKE,DROP,Y?";:A$:A$"Y"A$"N"ĺ:"MAKE UP YOUR MIND!"::1165JA$"Y"1200:"OK, THEN YOU MUST GO BACK TO THE MAIN HALL.":2000GOLDGDĺ:"HE SAYS 'HEY, YOU TRYING TO CHEAT ME? YOU DON'T HAVE THAT MUCH."::11802GOLDGOLDGD::"THE OLDtS14:S2%(S)SA%(S)::V%(96):ROOM1.}~:"AS YOU APPROACH THE DOCK, AN OLD MAN":"STOPS YOU AND SAYS 'IF YE WANTS A BOAT, YE'LL HAVE TO PAY. I WANT ";GD((1)300200):GD;" GOLD":"PIECES FOR ME BOAT.":9:"DO YOU GIVE HIM THE MONE:EA5RVA2MD%(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:C$(C):()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)::W24}8WZW2:WTWWZBW21WZ:A1NAWZ:AN$(A)WN$(W2)AN$(A)AN$(A)"#":A00::1090LA,W2:EA0:MD%(0,8)0:A2(AC2):A22ACMD%(0,8)1W),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 EAMON.ROOMS,L64"k.W214:WN$(W2)"NONE"NANA1:AN$(NA)WN$(W2):AD%(NA,21NM: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,ACeNW15:WN$(NW),WT%(NW),WO%(N" 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ĺ:2y" BROKEN WEAPON HURTS USER!"2~FR10075602DMD%(OF,11):SMD%(OF,12):DFOF:A1:76353DMD%(OF,11)2:SMD%(OF,12):DL97ĺ"A MISS.":f1e"A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED."::1jFR76ĺ" 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::1oFR957550|2t9)A:MD%(OF,10)MD%(OF,10)AD%(A,5):MD%(OF,4)MD%(OF,4)2:X0LHIT0:MD%(OF,9)174000QMN$(OF);" ATTACKS ";MN$(DF):" --";:RL(100(1)1):HIT0:(RL5RL(MD%(OF,10)MD%(DF,7)))RL96HIT10S(HIT)DF14ĺ"A HIT -- ";:75400VHIT76001`RI/MD%(DF,3)MD%(DF,3)2:M1NM:MD%(M,5)ROOMMD%(M,14)1MD%(M,14)0c/M:R3ROOM:3600:300////MONSTER TRIES TO PICK UP WEAPON/MD%(OF,10)0ı/A1NA:AD%(A,4)ROOMAD%(A,2)2Ă:;0MN$(OF);" PICKS UP ";AN$(A)::AD%(A,4)0:MD%(OF,,9)1ĺ:"YOU HAVE NO WEAPON READY!"::100K.OF0:DFM:7500:HIT7360y.INCW2AD%(MD%(0,9),6):WA%(W2)WA%(W2)2.EAAE300.(100(1)1)MD%(0,10)7360.A2:EAAE1A1.AEAEA:MD%(0,10)MD%(0,10)A/MD%(DF,14)1DF0300K$;"READ EAMON.DESC,R";A300:A$:DK$::A$::LK1A-A:LK300-ROOM48ĺ::"YOU SEE A HIDDEN PASSAGE TO THE EAST!"::-V%(ROOM)0:300-X///ATTACK COMMAND-b4900-pM1NM:S$MN$(M)MD%(M,5)ROOMĂ::"ATTACK WHO?"::100,.zMD%(0D.":AD%(A,4)ROOM#,A:WT0:50608,p///LOOK COMMAND\,uS$"BOTTLE"S$"BOTTLES"25000,LK0:A1NZ:AN$(A)S$(AD%(A,4)ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$::A$::LK1,A:LK3002-A1NM:MN$(A)S$MD%(A,5)ROOMĺDAN$(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+300,A1NA:AD%(A,4)1ĺAN$(A);" DROPPE4205<*$///ROUTINE TO GET S$ IF NOT PREVIOUSLY SPECIFIED.c*)S$""ĺ:C$(C);" WHAT";:S$:4900i*.~*///DROP COMMAND*S$"ALL"5100*A1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING A ";S$::100+WTWTAD%(A,3):AD%(A,4)ROOM:A17)AD%(17,4)ROOMĺ"AS YOU TOUCH THE HERB, SOME OF YOUR ":"WOUNDS SEEM TO CLEAR UP.":MD%(0,13)MD%(0,13)((1)7)2:4500)mAN$(A)"ROCK MONSTER"S$"JEWEL":4015)r)MD%(0,13)0MD%(0,13)0*:"THE SHEMLOCK THEN VANISHES!":AD%(17,4)0:1300(6170001(@A1NA:AD%(A,4)ROOM4190r(J4200:WTAD%(A,3)10MD%(0,1)ĺAN$(A);" IS TOO HEAVY":4190(TAN$(A)" TAKEN.":AD%(A,4)1:WTWTAD%(A,3)(^::300(h///INSERT HERE SPECIAL EFFECTS OF PICKING SOMETHING UP)j(S$"SHEMLOCK"OINS"S$"GOLD"S$"ANCIENT GOLD COINS"r'A1NA:AN$(A)S$AD%(A,4)ROOMĂ::"I SEE NO ";S$;" HERE!"::100'"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)D%(I,3)10MD%(0,1)ĺ:"IT IS TOO HEAVY FOR YOU."::100n&AD%(I,4)1:WTWTAD%(I,3):AN$(I);" TAKEN.":300&S$"NECKLACE"S$"RUBY NECKLACE"&S$"BAG"S$"LEATHER BAG"&S$"ROCK"S$"ROCK MONSTER"S$"JEWEL":4000''S$"COINS"S$"GOLD CET COMMAND*%S$"LAMP"S$"SILVER LAMP"4%4900%S$"JEWEL"ROOM58ĺDK$"READ EAMON.DESC,R201":A$:DK$::A$:AD%(7,4)0:MD%(14,5)ROOM:3600:300%S$"ALL"4160%S$"BOTTLE"4050%S$"BOTTLE"āI810:AD%(I,4)ROOMĂ:41208&WTAMD%(M,5)ROOM3900)$8MD%(M,14)3670X$BFRMD%(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%(A)TD%(A)MD%(M,1)$<M:NBTL(TD%(1)0): %///G:ROOMR2:3600'# (BT)AD%(22,4)ROOM># (BT)ROOM20BT0G#100k#///CHECK REACTIONS ON MONSTERS#TD%(1)0:TD%(3)MD%(0,1):FD%(1)0:FD%(3)MD%(0,13)#$M1NM:MD%(M,5)R3ĭMD%(M,14)3(MD%(M,14)1200(1)MD%(M,4))MD%(M,5)ROOM:3670$.