+JJJJ  / X5 lӠˠӠϠӠϠԮԠҠˠčӠ٠ϠԮLؠҍҫÍӠԍ͍ӍȠ٠ ҩٍѠΠ ōРƍӠ׍Рà׍Íà ύҩ٠ ōנ٠ōŠȫΠ٠ҩٍ؍ٍҩ٪ ҍ ԍ ЮЮ̮Ů Ү ǷҠՠԠՠàՠİǠԠЍҍԫҫԠ٠ҩ٠ čŠȠ ±٠ ٍÍàҠ ҮԠӍ٠ Ӎٍ±ٍŠҍ٠ ȍٍٍҠ٠ ҍѠԠ ō±٠ ҮР ſàҠ ԍĠƠ Ūï ҍ ɍ ōغ ԠՠųՠŰՠű±ՠŲ²ՠųǠҠԠ Ӎ٠٠Ҡ͍٠ҩٍҠӍ΍Íàҍҍàӱàҫӱ٠ѠٴΠà͍͍РڍѠҠčҠ ҍà ٍàҍàڵàҫڵŠЍȠҩٍҫΠ ҿР΍ɠΠӬ ҍؠ٠Ѡٴٲٍ٠ΠĿѠȠӍٴҩ٠ύРҩٍѠٲ؍ɠ΍΍ÍàԫӲҠ͍ҠԠ Íҍ٠ҫÍРӠΠ ǍР٠ҩٍΠ ҍٍҩ٠ ҍҍٍԩ٠ ōҍٍԩٍҫҠ͍ҠԠ îҍÍàҍҫàҫ٠ҩٍڍàҍŠӲàڠՠŴΠՠŶҠՠŷҠՠŹҠՠȠРҧŠԍҠԍÍӠЍԠҠԍҠ͍ҠԠ î٠٠͍ԩٍ΍ٍθ Ӭ¤å ź č Ǎ ¤ ō å ٍ î ȍҠՠ͠ՠŰΠՠűҠՠŲ٠ٍ̩Р̫Ѡȍà̍Šà̫à̍Šڳà̫ڳàҍÍ͍àҍӠЍҍȠ٠ҍٍͩӍ ȍ ɍ̍٠̫Ҡ͍ҠԠ î å͍٠ͫ٠ԩٍҍҠ͍ҠԠ î٠ԩٍ͍Р٠ٍ̩Р̍Šٍ ا͠ՠŴî å̠ՠŶ ōҠՠŸ ԍҠԠ ō٠ԩٍٍٍ̬ԩٍٍ̬Ҡ͍ҠԠ î ō جة ٍ å ا î ȍ ¥ ٍ̠ՠŰî ō͠ՠŲ Í͠ՠōԠՠųԠՠƷĹǠҠԍРŠȍҠԍҠ͍ ȍ ɍ ĥج٩å¥ ź č ĥ ê Ӎ ɍ Ӻ Ӭ¤ä ȩ ȩ ͮ Ӻ ĥج٩å¥Ԡՠ±Ԡՠ·Ԡՠ     N A8E7:46 49 4C 45 44 55 4D D0 N 9D48:DE BC N A933:20 30 N D9C6G":130:144R } I1(HEX$):511I,((HEX$,I,1))128::72,0:ĠĠŢĠâĠԢĠĠȢĠΠԢĠԢĠˠԢĠΠԢԢ٠ŢŢӢӢˢǢŢĢĠӢŢŢӢ     ŢԢȢâԢΠԢΠԢˠԢΠůנ̢Πůנ̠ǠƠԢŠŧӠŢԭέΠĠůעΠůנ̢ŠРƠ٢Š͠Ơ٢Πůנ̠ȠԠâΠůנ̠ȠĠâŠŢŠ٢Ԡ̢ŠȠĠƠǠŢΠԠ̢ΠȯȠ̢ΠԠ̢Ԡ̢ŠŠƠǠŢΠԠ̢ŠҢŠԠŠҢԠ̢ŠȠĠƠǠŢŠŠŢˠȯȠ̢ŠԠŠҢ    ŠӠō ՠŠΠȠĠĠӠǠΠӠҮŠӠǠӠŠԠƠˠĠӠǠ٠٠ĠĮՠŠ̠̠ΠǠŠӮՠŠҠӠŠͧӠԭϭԠҮŠӠŠΠΠӠ ĠΠŠˠΠӠŠŮΠӠԠĠŠӠŮԭĠҠӠΠŠͬǠՠȠϠӠĠǠϠŠՠȠĠŮΠҠӠŠլȠĠĠǠĮΠӠĠӠҠȠӬɬɧ͠ȡŠӠŬ٬ǠĠΠŠ͠ȠաŠӠĠĠԠϠӠӠƠŠΧԠΠȠΠ٠өΠŠͮŠӠŠΠԠȠРȠšŠӠŠΠԠȠРŠȠšŠӠŠˠԠȠРŠȠš  Ӡՠ٠ŠħӠŬŠԠΠŠӠ͠ŠĮŠՠŠǠŠĠΠĠάՠˠŠΠŠ̠ŠĠǠҠӠƠοĠӠŮӠՠ٠ŠħӠŠũԠΠŠӠĠŠħӠŮӠŠŠӠĠӬŠΠӠĠϠӮӠŠŠӠĠԠՠΧԠŠԬԠΠŠҭӠŠŠƠӠĮӠՠȠŠԬԠ٠ӠŠĠϠӠŠƠŠӬǠՠԮҠŠӠ͠ŠРĠϠԠծŠ٠ƠŠŬӠŭǠנĠĠ٬ӠŮӠĠ٠ӠĠŠ̠Ԯz     ŠԧӠŠӠΠŠҬӠŠΠΠçӠҮŠĠàӠΠӠ ΠŠҮȧӠΠ٠ӠΠŠŮՠΠ̠ŠŠҠΠӠĠǬɬɧ͠ȡŠ٠ŠƠŠӠŮŠԧӠ٠ӠΠŠҮŠӠĠΠԠŮŠӠĠΠԠŮŠӠĠˠԠŮŠӠΠ٠ŠŮŠӠŠԠΠŠҠƠŠͮŠӠŠŠƠӠšŠӠ̠ĠŠȠŠǠΠŠԮΠΠŠŠӠŠŬŧŠӠΠĠˠŮԠӠΠŠӠĠӠ٠̭ĮŠŠ̠ŠӠŮŠӠȠ٠ӠŠŮŠӠΠĠĠǠŮŠŠĠӠšŠӠҠ٠ӠĠŮŠӠŠȠŠΠŠԠšŠӠĠӠŠŮŠӠŠƠӠšՠŠΠ̠ٮӠŠΠҠŻŠ٠ԠӠˠϠŠ̠ΠŠԮϠŠԠӠŠՠŠΠΠԯԠ̮ՠŠԠϠŠԬĠ̠̠ĠǠ͠ŮΠŠĠՠԠƠԮՠŠΠΠԯԠ̮͠ԠΠŠΠΠȠӮՠŠԠŠ͠ƠԠƠӮԠΠŠΠԠŠРĠ٠͠ԠΠŠΠΠŠ̠ϠŠԮՠŠԠŠРƠԠƠӮȠӠΠŠ̮Ԡ٠ˠΠŮ̠ӠԮՠŠΠˠԯԠ̮ՠΠŠԠȠӮՠŠΠԭή٭ǠȠӠĠϠŠȠ̮ˠӠĠȠĠԮϠŠԠӠŠŠŠĬԠԠӠΠΠ͠ӠӮՠŠΠԠӠŠ٠ٮԠƠŠӠŠΠĬȠŠӠǠΠŠĮҬΠ͠ӠӬϠӠΠŠҮŠԠӠϠŠԮՠŠΠŠŮӠƠӠҠŠӮŠŠϠӠŬŠĠȠĠĠŠҠĠȠĮŠ٠ԠӠϠŠԮՠŠΠΠԯԠŮՠ٠٠ҠӠàǠĠĠΠ̠Š͠ŠԮՠŠΠԠԯԠŮՠҠԠ٠Ǡ͠ŠԮՠŠΠ̠ǠȠĠȮŠӠƠŠ̠Š٠ΠĠȮՠŠԠϠŠȮՠŠΠ̬ˠ̠ȠҠΠŠԠŮՠŠԠŠȠĠƠŠǠ̮ϠҠԠˠϠӠŠΠŠԠĠԮŠ̠ӠȠ͠ŬĠΠ̠ӠȮՠŠΠ̬ˠ̠ȠҠΠŠԠŮՠŠΠ̬ˠ̠ȠҠΠŠԠŮէŠΠŠŠƠǠ̮ӠŠĠΠȠӠƠՠԠĠԩŠ̠ӠȠĠȮՠŠΠ̬ˠ̠ȠҠΠŠԠŮՠŠΠ̬ˠ̠ȠҠΠŠԠŠƠŠͮՠŠԠŠȠĠƠǠ̮̠ӠȬĠԠĠԠŠӠԠŠĠԠǠǠοΠŠ͠ԠՠŠԠŠ̠ӠȠԠՠԠŠԠ٠Ӯ٠ӮՠŠΠ̬ˠ̠ȠҠΠŠԠŠƠŠͮՠŠΠ̠ŠҠϠŠԠƠŠŠҮԠӠ٠ĠŬĠŠ٠ԠӠΠ٠͠ŠŠҮՠŠΠŠҬŠƠӠԠƠԮǠӠŠӠǠԠ٠ϠŮĠȠĠȬĠŠŠ̠ӠϠŠԠĠԮՠŠΠ̠ŠҠϠŠԠƠŠŠҮԠӠ٠ĠŬĠŠ٠ԠӠΠ٠͠ŠŠҮՠŠΠˠȯȠ̮ŠȠՠŠŠԠԠǠΠ͠ŠŮϠŠȠՠŠǠԬՠԠŠԠ٠ӮՠŠԠŠŠƠŮϠŠȬҠŠ̠ŬӠΠǠӠٮϠŠȠӠŠĠˠϠή                               EX$:GOLD:BANK:ACHDZA14:WN$(A):WT%(A):WO%(A):WD%(A):WS%(A):DZDK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":MN$(0):REC:DK$;"CLOSE"D[DK$;"RUN MAIN HALL"A WAIT A SHORT WHILE"::" (WAKING UP THE MONSTERS)" 2DK$(4):2 THEN":" HIT ANY KEY) ";:16368,0:A$:uCZDIEĺDK$;"OPEN THE ADVENTURER":DK$;"DELETE THE ADVENTURER":23300CZDK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:MN$(0):MD%(0,1):MD%(0,2):CH:A14:SA%(A):DZA15:WA%(A)::AE:SMD%(9,5)1ĺ"ADDITIONALLY, YOU RECEIVE ";10CH;" GOLD":"PIECES AS A REWARD FOR THE SAFE RETURN":"OF CYNTHIA.":TPTP10CHBZGOLDGOLDTPBZ::"(HIT ANY KEY TO CONTINUE) ";:A$:-CZDK$;"DELETE FRESH MEAT":::5:"(INSERT EAMON MASTER DISKETTE,"AS YOU DELIVER YOUR TREASURES TO SAM":"SLICKER, THE LOCAL BUYER FOR SUCH":"THINGS, HE EXAMINES YOUR GOODS AND":"PAYS YOU ";AZTP0:A1NA1:AD%(A,4)123210AZAD%(A,2)0AD%(A,1)AD%(A,1)CH10AZTPTPAD%(A,1)|BZA:TP;" GOLD PIECES."::N$(W21):WP%(W5)WP%(W21):W2W21:W2523090@dZW511:W5:W42W21:W51W41:WN$(W4)WN$(W5)WN$(W4)WN$(W4)"#":23140@nZW5,W4@xZW14: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)AZW::5:TOO MANY WEAPONS--4 IS THE LEGAL":"LIMIT.'"::"YOUR WEAPONS ARE--"? ZDIE232401>ZW24:WN$(W)"NONE"Ă>ZW2W:W31NA1:AD%(W3,2)1AD%(W3,4)1WN$(W2)AN$(W3):WP%(W2)W3:W2W21:AD%(W3,4)0>(ZW3:W2623160D?2Z:5:"AS YOU TRY TO LEAVE, THE KNIGHT":"MARSHALL REAPPEARS AND TELLS YOU, 'YOU":"HAVE W,SOUTH,S,POWER,HEAL,BLAST,SPEED,SMILE,WAVE,SAY,DRINK,READ,READY,ESCAPE,RETREAT,FLEE,INVENTORY,I,ENTER,TROLLSFIRE,OPEN|=V=Y///END GAME=Y:"(HIT ANY KEY TO RETURN TO THE MAIN HALL)";:A$:=YDK$;"CLOSE"=YAD%(10,8)10>ZSPDMD%(0,2)MD%(0A)AN$(A)AN$(A)AN$(A)"#":22235(NDK$;"READ EAMON.DESC,R206":A$:DK$::A$::TR0:AD%(10,8)6:MD%(0,9)10MD%(0,12)61HN300C2PDK$;"READ EAMON.DESC,R204":A$:DK$::A$::MD%(0,9)10ĺDK1950%0LJS$"WATER"S$"SEA"190400VJ:"SORRY, BUT I'M AFRAID TO GO INTO THE":" WATER WITHOUT MY LIFE PRESERVER!"::3000`JS$"CAVE"ROOM1V$"S":50000jJ:"I'M NOT SURE WHAT YOU MEAN BY THAT.":"TRY GIVING A DIRECTION TO MOVE."::1001 N CANNOT ";V$::300#/BM0:175004/BNBTL0:5100m/\DDK$;"READ EAMON.ROOMS,R";ROOM:D16:DR%(D)::DK$/fDR2DR%(6(1)1):R2117510/pD/PF:"YOU ARE CARRYING THE FOLLOWING--":A1NA:AD%(A,4)1ĺ" ";AN$(A)/ZF:300/8JNBTL20200BJ2):MD%(0,9)A:MD%(0,11)AD%(A,7):MD%(0,12)AD%(A,8)^.>S$"TROLLSFIRE"ĺ:"READIED."::300{.>TR0:MD%(0,12)10:20000.hB///FLEE COMMAND.rBNBTLĺ:"WHAT ARE YOU FLEEING FROM?"::100/|BMD%(7,5)ROOMĺ:"YOU ARE HELD FAST BY THE MIMIC AND":" TIMES THEN DIE.":$-:DIE1:23010;->///READY A WEAPONE->1950->A1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING IT!"::100->AD%(A,2)2ĺ:"THAT ISN'T A WEAPON!"::1003.>MD%(0,10)(EAAE)(EAAE)AD%(A,5)WA%(AD%(A,6))2MD%(0,,:"AS YOU READ THE BOOK, YOU FEEL A WEIRD":"SENSATION OVERTAKING YOU. YOU SUDDENLY":"REALIZE THAT YOU ARE TURNING INTO A":"SMALL FISH.":,:ROOM26ĺ"YOU FALL INTO THE SEA AND ARE PROMPTLY":"EATEN BY A BIG FISH.":-:ROOM26ĺ"YOU FLOP THREEABEL"S$"BOTTLE"ĭAD%(3,4)ROOMAD%(13,4)ROOMAD%(3,4)1AD%(13,4)1ĺ"THE BOTTLE SAYS, 'HEALING POTION'"::300+:S$"TROLLSFIRE"20000+:S$"BOOK"ĺ:"THERE ARE NO MARKINGS TO READ!"::300,:AD%(9,4)1AD%(9,4)ROOMĺ"WHAT BOOK?"::3000:AD%(13,4)1*27300w*8S$"WATER"(S$,3)"SEA"ĺ:"A JOB SIMILAR TO GETTING BLOOD FROM A":" TURNIP."::300*8:"THE WATER TASTED SALTY, BUT IT DOESN'T":"SEEM TO BE POISONOUS."::300*:///READ COMMAND*:1950*:NBTL2020t+:S$"L4090,14100,141100)7"YOU FEEL GREAT!"::14120Q) 7"YOU FEEL BETTER."::14120)7"THOUGH YOU FEEL BETTER, YOU ARE STILL":" VERY, VERY SICK!"::14120)7"THOUGH YOU FEEL BETTER, YOU ARE STILL":" AT DEATH'S DOOR, KNOCKING LOUDLY.":*(7AD%(3,4)S$,6)"POTION"(S$,6)"BOTTLE"14500N(6AD%(3,4)1AD%(3,4)ROOM14500(6:MD%(0,13)ĺ"SOME OF YOUR WOUNDS SEEM TO CLEAR UP.":(6MD%(0,13)MD%(0,13)(10(1)1):MD%(0,13)0MD%(0,13)0)6H2MD%(0,13)(11(1)5):H2(H210)1:H214080,1'."NOTHING HAPPENS."::3001'2///SAY COMMAND;'21950V'2S$"TROLLSFIRE"20000k'2S$"POWER"6000'2S$"HEAL"7000'2S$"BLAST"8000'3S$"SPEED"10000'3:"OKAY, '";S$;"'"::300'6///DRINK COMMAND'61950'6NBTL2020'(6(%(0,2)^&.'SPD(25(1)1)::"YOU CAN FEEL THE NEW AGILITY FLOWING":" THROUGH YOU!"::300&*:NBTLĺ"AS YOU SMILE, THE ENEMY ATTACKS YOU."::300&+"NOTHING HAPPENS."::300&.:NBTLĺ"AS YOU WAVE AT YOUR ENEMY, HE ATTACKS":" YOU."::300J1950T%TM1NM:S$MN$(M)MD%(M,5)ROOMĂ::"YOU CAN'T BLAST ";S$;"!"::300l%^S1:7500:SUC300%h:"DIRECT HIT!"::S5:D1:DFM:3650::300%'///SPEED SPELL%'S3:7500:SUC300&$'SPDMD%(0,10)MD%(0,10)2MD%(0,2):MD%(0,2)2MDELL$bS2:7500:SUC14050%$l300l$LSUC0:SA%(S)RL(100(1)1):SUC(((RLS2%(S))(RL5))(RL95))$VSUCĺ:"NOTHING HAPPENED.":$`RL(100(1)1):RLS2%(S)S2%(S)S2%(S)2:SA%(S)SA%(S)2$jS2%(S)S2%(S)2$t$@///BLAST SPELL%TELEPORTED SOMEWHERE IN THE":" DUNGEON"::R2(26(1)1):NBTL0:5100#RR86ĺ:"YOU HEAR A VERY LOUD SONIC BOOM":" THAT ECHOES THROUGH THE TUNNELS."::300#RR95ĺ:"ALL OF YOUR HITS ARE HEALED."::MD%(0,13)0:300#10020$X///HEAL SP0$"M:RAISENBTL0:R2ROOM:5100g"A1NA:AD%(A,4)ROOMRAISE1:AN$(A);" VANISHES!":AD%(A,4)0|"A:RAISEĺ:300"RR(100(1)1):RR11ĺ:"THE SECTION OF TUNNEL YOU ARE IN ":" COLLAPSES AND YOU DIE.":DIE1:23010H#RR31ĺ:"YOU ARE M:NBTL(TD%(0)0)!2100.!p///POWER SPELLF!zS4:7500:SUC300"RAISE0:M1NM:M213M:AD%(M2,4)ROOMAD%(M2,4)1RAISE1:MN$(M);" COMES ALIVE!":AD%(M2,4)0:MD%(M,5)ROOM:MD%(M,13)0:MD%(M,9)0AD%(MD%(M,9),4)0:MD%(M,9)MD%(0,9)MD%(0,9)M1NM:MD%(M,5)R3ĭMD%(M,14)200(1)MD%(M,4)MD%(M,5)ROOM:5150] MD%(M,5)ROOM5160 FRMD%(M,3):FRFR100FRFR((CH10)2) MD%(M,14)(FR100(1)):MD%(M,14)NBTL1 AMD%(M,14):FD%(A)FD%(A)MD%(M,13):TD%(A)TD%(A)MD%(M,1)!(READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$8R25100ROOM1D1ĺ:"YOU SUCCESSFULLY RIDE OFF INTO THE":"SUNSET.":23010:"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100R3ROOM:ROOMR2:TD%(0)0:TD%(1)MD%(0,1):FD%(0)0:FD%(1)MD%(0,13)D 00:A$:DK$::A$::LK1'A:LK300hDK$;"READ EAMON.DESC,R";ROOM:A$:DK$::A$::ROOM15300"YOU FOUND A HIDDEN TUNNEL GOING OFF TO":"THE EAST!"::300///MOVE COMMANDNBTL2020D16:(V$,1)("NSEWUD",D,1)Ă+DK$;""AS THE MIMIC DIES, IT ROLLS OVER AND":"YOU FIND A RING UNDERNEATH IT.":AD%(6,4)ROOM_:t///LOOK COMMANDNBTL2020S$"LABEL"S$"BOTTLE"15000LK0A1NA1:AN$(A)S$(AD%(A,4)ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DESC,R";A1MD%(DF,13)D2:MD%(DF,5)0:A2NA1NMDF:AD%(A2,4)ROOM:MD%(DF,9)0AD%(MD%(DF,9),4)ROOMu~FD%(0)TD%(0)NBTL0DF0DIE1:23010MN$(DF)"PIRATE"ĺDK$;"READ EAMON.DESC,R203":A$:DK$::A$::AD%(10,8)6:V%(ROOM)0:WMN$(DF)"MIMIC"ĺ:TILL IN GOOD SHAPE.":6[:MN$(DF);" IS HURTING.":V`:MN$(DF);" IS IN PAIN.":e:MN$(DF);" IS VERY BADLY INJURED.":j:MN$(DF);" IS AT DEATH'S DOOR,":" KNOCKING LOUDLY.":ZtMN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)MD%(DF,1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::wGMD%(DF,13)MD%(DF,13)D2:MD%(DF,13)MD%(DF,1)3700LAMD%(DF,14):FD%(A)FD%(A)D2Q(MD%(DF,13)5MD%(DF,1)1)3670,3675,3680,3685,3690V:MN$(DF);" TAKES DAMAGE BUT":" IS S:MD%(OF,10)MD%(OF,10)2INCTDMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":3650"A CRITICAL HIT!":R2(100(1)1):R251A0:3650R286S1.5S:3650$R296D2D:3650)R2100D3D:3650.3700>BD20:D31D:D2D2(S(1)53550K " WEAPON BROKEN!":AD%(MD%(OF,9),4)0:MD%(OF,9)1:(1).9ĺ:n " BROKEN WEAPON HURTS USER!" FR1003560 DMD%(OF,11):SMD%(OF,12):DFOF:A1:3650 DMD%(OF,11)2:SMD%(OF,12):DFOF:A0:3650INC((100(1)1)MD%(OF,10)) RL(100(1)1):HIT0:RL5RLMD%(OF,10)HIT1A HIT3600Y RL97ĺ"A MISS.": "A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED.":: FR76ĺ" WEAPON DROPPED!":AD%(MD%(OF,9),4)ROOM:MD%(OF,9)1:: FR9F0300D MD%(DF,3)MD%(DF,3)2:NBTLMD%(DF,14)0:TD%(0)TD%(0)MD%(DF,1):TD%(1)TD%(1)MD%(DF,1):FD%(0)FD%(0)MD%(DF,13):FD%(1)FD%(1)MD%(DF,13):300N R2ROOM:MD%(DF,14)0:5100 HIT0:MD%(OF,9)1ı MN$(OF);" ATTACKS ";MN$(DF):" --";3 MD%(0,9)1ĺ:"YOU HAVE NO WEAPON READY!"::100R OF0:DFM:3500:HIT3130 INCW2AD%(MD%(0,9),6):WA%(W2)WA%(W2)2 EAAE300 (100(1)1)MD%(0,10)3130& A2:EAAE1A10 AEAEA:MD%(0,10)MD%(0,10)A: (MD%(DF,14))DA1NA:AD%(A,4)12080OWTWTAD%(A,3):AD%(A,4)ROOM:AN$(A);" DROPPED."[ A:300r ///ATTACK COMMAND| 1950 S$"RAT"3050 M13:MD%(M,5)ROOMS$MN$(M) M M1NM:S$MN$(M)MD%(M,5)ROOMĂ::"ATTACK WHO?"::1003///DROP COMMAND1950eNBTLĺ:"YOU CAN'T DO THAT WITH UNFRIENDLIES ABOUT!"::100xS$"ALL"2060A1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING A ";S$::100WTWTAD%(A,3)::"DROPPED.":AD%(A,4)ROOM::300 TWTAD%(A,3)::AD%(A,2)2MD%(0,9)13007V16000X`A1NA:AD%(A,4)ROOM1150jWTAD%(A,3)10MD%(0,1)ĺAN$(A);" IS TOO HEAVY":1150tAN$(A);" TAKEN.":AD%(A,4)1:WTWTAD%(A,3)~::300S$""ĺ:C$(C);" WHAT";:S$:19501070*A1416:AD%(A,4)ROOMS$AN$(A)0$T.S$"GOLD"S$"COINS"S$AN$(5)8A1NA:AN$(A)S$AD%(A,4)ROOMĂ::"I SEE NO ";S$;" HERE!"::100BWTAD%(A,3)10MD%(0,1)ĺ:"IT IS TOO HEAVY FOR YOU."::100,L:"GOT IT.":AD%(A,4)1:WM2,14)DFM2:3500:M2200:M2:430/M2:4005WNBTL(FD%(0)TD%(0)):NBTLĂM]f100z///GET COMMAND1950S$"TORCH"ĺ:"ALL TORCHES ARE BOLTED TO THE WALL AND":"CANNOT BE REMOVED."::300S$"ALL"1120S$"RAT"(M,1):FD%(MD%(M,14))FD%(MD%(M,14))MD%(M,13):430E^MD%(M,14)390ohOFM:TD%(1)MD%(0,1)DF0:3500:430rM21NM:MD%(M2,5)ROOMMD%(M2,14)(1).25DFM2:3500:M2200:M2:430|M2:DF0:3500:430OFM"M21NM:MD%(M2,5)ROOMMD%(MANDS RETURN TO HERE#6NBTL440C@M1NM:MD%(M,5)ROOM430JMRFD%(MD%(M,14))TD%(MD%(M,14))FD%(MD%(M,14))TD%(MD%(M,14))5(41(1)20)2TMD%(M,4)MRĺ:MN$(M);" FLEES OUT AN EXIT."::17500:MD%(M,5)R2:TD%(MD%(M,14))TD%(MD%(M,14))MD%);::::160* C$(C)S$S$V$:V$C$(C) C1000,1000,2000,3000,4000,4000,5000,5000,5000,5000,5000,5000,5000,5000,5000,5000,5000,5000,6000,7000,8000,10000,11000,12000,13000,14000,15000,16000,17000,17000,17000,18000,18000,19000,20000,21000,///COM):165' A$""A$CZ$:(37):17:A$O CZ$A$:A2(A$):(A$,A,1)" "Ăm V$(A$,A1):S$(A$,A1) (S$,1)" "S$(S$,2):185 C1NC:C$(C)V$C$(C)S$Ă::"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);20(C$(C))NA1:AD%(A,4)ROOM(ANA)V%(ROOM)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$:A$ AD%(A,4)ROOM(ANA)V%(ROOM)ĺ"YOU SEE ";AN$(A) A::AD%(NA,4)ROOMĺ"YOUR ";AN$(A);" IS HERE." V%(ROOM)1 " YOUR COMMAND?";A$ (A$,1)" "A$(A$,2)ĺDK$;"READ EAMON.DESC,R";ROOM:A$:DK$:A$:g 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::M10ĺDK$;"READ EAMON.DESC,R202":A$:DK$::A$:Q M::A12000$ d///GIVE ROOM DESC IF NEVERC i///HERE, THEN GET COMMANDI n sSPDSPDSPD1:SPDMD%(0,2)MD%(0,2)2:MD%(0,10)MD%(0,10)2MD%(0,2) xV%(ROOM)ĺDK$;"READ EAMON.ROOM NAMES,R";ROOM:A$:DK$:"YOU ARE STANDING IN":" ";A$:. }V%(ROOM< EAMON ADVENTURE #1:-> THE BEGINNERS CAVE <-@Y BY DONALD BROWN_ EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012 (:10:"PLEASE WAIT A SHORT WHILE"::" (WAKING UP THE MONSTERS)" 2DK$(4):2                              S,R";REC:70:DK$;"CLOSE":"DVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$z GOLD,BANK:AC:W14:WNAME$(W),WTY:756:::AEAE2:GOLDGOLD(1000(CH20)):4900:"'YOU NEED MOVE FASTER! NOW GET UP!' ";:756:::GOLDGOLD(1000(CH20)):490:DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":DDK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERYE NOW!' ";:A$::570:580:DK$;"RUN PRACTICE.0"oA$"R"ė:"CLANK. PUFF. CLANK. 'YOU O.K.?' ";:A$::490RL(10(1)1):RL10ė:"'DAT WAS REAL GOOD!' ";:756:::AEAE5:GOLDGOLD(1000(CH20)):4900&RL5ė:"'GOOD! YOU GETTING IT!' ";AE;"%";25);"GOLD = ";GOLD:GOLD(1000(CH20))A$"S"::"'YOU NOT CARRYING GOLD ENOUGH!' ";:756::520"(H)IT A BLOW (R)EST (S)TOP":"SELECT H, R, S ";:A$:"":A$"H"A$"R"A$"S"5204901A$"S"ė:"'ME SORRY SEE YOU GO. B756:::570:580:DK$;"RUN PRACTICE.0""'THEN COME WITH ME!' HE TAKES YOU TO AN OPEN AREA IN THE SHOP AND SAYS, 'TRY TO MAKE ME MISS YOU.' ";:756:::"'OH, UH, IT'LL COST ";1000(CH20);" GP/STRIKE'. ";:756::j:"ARMOUR SKILL IS ";! GOOD CAST!' ";:756:::GOLDGOLD(1000(CH20)):SA%(SP)SA%(SP)2:370:"A GIANT STEPS FORWARD AND SAYS, 'ME GOODTEACHER. YOU NEED HELP ON ARMOUR SKILL?'(Y/N) ";:A$:""::A$"Y"A$"N"450)A$"N"ė:"OH WELL, ME HERE IF YOU NEED ME!' ";:BREATHE DEEPLY.' ";:A$::370RL(10(1)1):RL10ė:"'PERFECT CAST! INCREDIBLE!' ";:756:::GOLDGOLD(1000(CH20)):SA%(SP)SA%(SP)5:370RL5ė:"'NOTHING? CONCENTRATE HARDER!' ";:756:::GOLDGOLD(1000(CH20)):370J:"'SUCCESS (R)EST (S)TOP":"SELECT C, R, S ";:A$:"":A$"C"A$"R"A$"S"400Z370A$"S"ė:"'MY ANCIENT ANCESTORS THANK YOU FOR YOUR EXCELLENT PATRONAGE!' ";:756:::570:580:DK$;"RUN PRACTICE.0"A$"R"ė:"GASP. MUMBLE. GASP. 'I OFFER SUGGESTIONS FROM NEARBY. MY FEE IS":(1000(CH20));" GP/CAST.' ";:756::r:SP$;" ABILITY IS ";SA%(SP);"%";25);" GOLD = ";GOLD:GOLD(1000(CH20))A$"S"::"SO SORRY, MY FEE EXCEEDS YOUR ASSETS. ";:756::400Q|"(C)AST :::300T"'SO, YOU WANT TO LEARN HOW TO USE ":SP$("BLAST HEALSPEEDPOWER",(SP1)51,5):SP$;:" MORE EFFECTIVELY.";:756::^"THE MYSTIC TEACHES YOU TO CONCENTRATE WHILE CASTING SPELLS AND SAYS, ";:756::[h"'NOW CAST THE SPELL WHILE N)ONE' ";:A$:"":SP15:A$("PHBSN",SP,1)Ă:3006A$"N"ė:"'MAY YOUR MAGICS BE ALWAYS SUCCESSFUL!'":570:580::DK$;"RUN PRACTICE.0"@SP14:A$("BHSP",SP,1)QQSP J:SPQQ:SA%(SP)0ė:"YOU WILL HAVE TO BUY THAT SPELL FIRST! ";:756WELCOME TO MY HUMBLE SHOP, O MIGHTY ADVENTURER. MAY THE BLESSINGS OF THE GODS BE YOURS. ";:756::""AND WHAT MYSTICAL PROWESS DO YOU WISH THIS HUMBLE ONE TO IMPART TO ONE OF YOURMAGNIFICENCE? ";:756::5,:"(P)OWER (H)EAL (B)LAST (S)PEED (' ";:GOLDGOLD(1000CH20):756::200RL5RL10ė:"'A HIT! GOOD!":WA%(AA)WA%(AA)2:"NOW, CONTINUE.' ";:GOLDGOLD(1000CH20):756::200:"'A MISS. TRY HARDER!":"NOW, CONTINUE.' ";:GOLDGOLD(1000CH20):756::200f:"'AH, SO. A$"S"ė:"'GOODBYE AND GOOD LUCK, ";NA$;"!' ";:756::570:580:DK$;"RUN PRACTICE.0"RL(10(1)1):A$"R"ė:"PUFF PUFF PUFF. 'STAMINA'S IMPORTANT!' ";:756:::200(RL10ė:"'A CRITICAL HIT! VERY GOOD!":WA%(AA)WA%(AA)5:"NOW, CONTINUE. :AA$;" ABILITY IS ";WA%(AA);"%";25);"GOLD = ";GOLD:GOLD(1000CH20)A$"S"::"'SORRY, BUT YOU HAVE TOO LITTLE GOLD!' ";:756::230 "(A)TTACK (R)EST (S)TOP":"SELECT A, R, S ";:A$:"":A$"A"A$"R"A$"S"230 200W" GOLD PIECES PER TRY.":"YOUR CURRENT ABILITY WITH A":AA$;" IS ";WA%(AA);"%. ";:756:: "DON ASKS YOU TO ENTER HIS SHOP.":"'";NA$;", SEE THAT ";:AA2AA4TG$"TARGET" TG$"DUMMY":TG$;" THERE?":"IT'S ALL IN THE WRIST. ATTACK!' ";:756::W)ORD?";:A$:W14:A$("ABMS",W,1)Ă:90C dW110,120,130,140[ nAA$"AXE":AA1:170s xAA$"BOW":AA2:170 AA$"MACE":AA3:170 A$;:A$:A$"P"AA$"SPEAR":AA4:170 A$"W"140 AA$"SWORD":AA5[ :"'MY FEE IS ";1000(CH20);z#  Ԡź ŠӠŠ> ήàE ήŠ ήӠή͠Ӡ ήӠήӠ  ŮàŮŮŮ Ůà!Ů"Ů ӠנӠ Π̠ ήàήήή Ϡ Рˠήàή ٠ àRTS LOOKING THROUGH HIS BOOK,":"MUTTERING ABOUT ";C1$:C2$:DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:DK$ nR1NC:DK$;"READ CHARACTERS,R";R:A$:A$NAME$170:xR:DK$::34,21::"HE EVENTUALLY LOOKS AT YOU AND SAYS, 'YER NAME'SHE FLOOR!";:756:::"THEY BELONG TO A POOR LAD WHO CAME IN LAST WEEK AND WONNA GIVE ME HIS NAME.'";:70 Z(NAME$)20ĺ"HE SCOWLS AT YOU AND SAYS, 'YER NAME'S TOO LONG FER ME BOOK. I CANNA USE MORE THAN TWENTY LETTERS.";:70z d34,20::"HE STA<"YOU ARE GREETED THERE BY A BURLY IRISH- MAN WHO LOOKS AT YOU WITH A SCOWL. "; F756:::"'AND WHAT MIGHT YOUR NAME BE? ":"(TYPE IT IN NOW) ";NAME$:l PNAME$""ĺ"HE RAISES A SWORD AND BEGINS TO SHARPEN IT SAYING, 'BEWARE THE BLUD STAINS ON TGHTER.";:756::j ("OVER THE DESK IS A SIGN WHICH SAYS 'REGISTER HERE OR ELSE!'";:756:: 2"YOU CAN WALK OVER TO THE DESK OR JOIN THE HAPPY CROWD BY THE BAR":" (USE THE I,J,K,M KEYS TO MOVE)";:756:::F10:210:34,21:Q (4):DK$"OPEN SNAPPY,L64":DK$"READ SNAPPY,R0":NS:R((1)NS1):DK$"READ SNAPPY,R";R:CM$:C1$(CM$,23):C2$(CM$,24):DK$"CLOSE SNAPPY" "YOU ARE IN THE HALL OF FREE ADVENTURERS.MANY MEN AND WOMEN ARE GUZZLING BEER ANDTHERE IS LOUD SINGING AND LAUZ  38400::DK$(4):DK$;"BLOAD UNPACK,A$300"::16302,0:DK$;"BLOAD EAMON.PIC":768:X((78)(79)256):I11500:KE(49152):KE128Ă49168,0DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:DK$;"CLOSE":200::34,21: DK$      TO CONTINUE ";:A$:""::AGUILD":"7625 HAWKHAVEN DR.":"CLEMMONS, NC 27012"8:" THIS IS A 'GRAPHICS MAIN HALL' DISK BASED ON EAMON MASTER VERSION 4.0 WHICH INCLUDES 'THE BEGINNERS CAVE." 16:" (P)LAY EAMON OR SEE (I)NSTRUCTIONS? ";:A$:" PLEASE CORRECT BUGS AND MODIFY THE PROGRAMS AS YOU WISH THEN MAKE THEM A PART OF THE PUBLIC DOMAIN."::" RICK VOLBERDING":" RR1 BOX 334":" CASS LAKE, MN. 56633" 14:34,0::(4);"RUN SETUP"23:3:"PRESS A KEYWITH PENGUIN'S 'GRAPHICS MAGICIAN' AND THE HI-RES PIC- TURES WERE CREATED WITH BAUDVILLE'S 'BLAZZING PADDLES' DRAWING PROGRAM." 14:5 :" IF YOU RESET OUT OF A PROGRAM OR END UP IN TEXT PAGE 1 JUST 'CALL -3100' AND 'RUN' TO RESUME." OS' OR 'DIVERSI-DOS' IS RECOMMENDED." :" IF YOU WISH TO KEEP YOUR CHARACTERS FROM THE OLD EAMON MASTER JUST USE 'FID'TO REPLACE THE EMPTY 'CHARACTERS' FILE ON THIS DISK." :"'EAMON' WAS CREATED BY DONALD BROWN. THEANIMATION WAS PRODUCED ESOFT, AND UTILIZE ONLYHI-RES PAGE 1. BECAUSE OF MEMORY RES- TRICTIONS, MANY SMALL PROGRAMS WERE USEDRATHER THAN A FEW LARGE ONES.") 14:5:" BECAUSE OF THE LARGE AMOUNT OF DISK INTERACTION BETWEEN THESE PROGRAMS, A 'FAST-DOS', SUCH AS 'PRONTO-DINTRODUCTORY PROGRAMS AND 'MAIN HALL' HAVE BEEN ENHANCED WITH HIGH-RES GRAPHICS AND SHAPE TABLE-LIKE ANIMATION.THE BEGINNER'S CAVE AND ALL OTHER ADVEN-TURES WILL STILL BE COMPLETELY TEXT." :" THE ROUTINES WERE WRITTEN FOR ALL 48KAPPLES USING APPL:"":A$"I"ĺ(4);"RUN SETUP"] :::255:2:5:"GRAPHICS MAIN HALL INSTRUCTIONS":34,3 5:" THE PROGRAMS 'MAIN', 'VILLAGE', AND 'PRACTICE' AND THEIR ASSOCIATED PROGRAMSCONSTITUTE A 'GRAPHIC MAIN HALL' FOR THEGAME OF 'EAMON.'" :" THE Q::"EAMON ADVENTURER'S GUILD":"7625 HAWKHAVEN DR.":"CLEMMONS, NC 27012"8:" THIS IS A 'GRAPHICS MAIN HALL' DISK BASED ON EAMON MASTER VERSION 4.0 WHICH INCLUDES 'THE BEGINNERS CAVE." 16:" (P)LAY EAMON OR SEE (I)NSTRUCTIONS? ";:A$     "6""ǟȇФ!|g0 ?  Ɓ!   "" "" 8""8"8£5 8 "" 8"""@'"0 *>"*>"Ïئ!ۃ㟬 `0La * D@!D @D     @@ 0:ȡHe@ hhл`Ie@҈NEVER":"SEEN BEFORE! (AND NEVER WILL AGAIN.)":,0:DK$;"BLOAD EAMON.PIC":768:X((78)(79)256):I11500:KE(49152):KE128Ă49168,0! DK$"OPEN SNAPPY,L64":DK$"READ SNAPPY,R0":NS:R((1)NS1):DK$"READ SNAPPY,R";R:CM$:C1$(CM$,23) AND RUNS YOU THROUGH WITH A SPEED YOU HAVE NEVER SEENBEFORE! (AND NEVER WILL AGAIN.)":A((78)(79)256):I11500:KE(49152):KE128Ă49168,0DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:DK$;"CLOSE":200::34,21: DK$K SENSA 'UMOR! NOW GIMME YER NAME!! ";:CNT3ĺ"THE MAN CUTS ONE OF YOUR FINGERS OFF THEN EATS IT! THEN HE SAYS 'ARE YE READYT' TALK NOW? ";:CNT13ĺ"THE MAN CUTS OFF ANOTHER FINGER! HE EATSTHIS ONE TOO! ";:Y"THE MAN THEN SPINS AROUNDX07):1,X0((X07)7):2,Y0:3,N:36608:210G ///NO NAME ROUTINE`CNTCNT1:CNT1450"HE PULLS OUT A SWORD SAYING 'YE'D BEST BE GIVIN' ME YER NAME LADDIE, IF YE KNOWWOTS GOOD FER YE! ";(CNT2ĺ"I'VE 'BOUT HAD ME FILL O' YER SIC0Y05:310$A$"M"Y0Y05:310=A$"J"X0X05:310V"A$"K"X0X05:310_,21060,(X07):1,X0((X07)7):2,Y0:3,N:36608:(11)0210@36608:A$"I"Y0Y05JA$"M"Y0Y05TA$"J"X0X05^A$"K"X0X05.h0,(EEL A SWORD BEING THRUST THROUGH YOUR BACK AND SOMEONE SAYS 'YOU REALLY MUST LEARN TO FOLLOW DIRECTIONS!'";:A$:::CT5Y029CT0:KK(16384):KK12824016368,0:KKKK128:A$(KK):A$"I"A$"M"A$"J"A$"K"Č36608 A$"I"YK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE THE ADVENTURER":(4);"BLOAD EAMON.B":16302,0:(4);"BLOAD MAIN.PIC":768:16300,0:16301,0:X0133:Y014:N0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608:F10240xCTCT1:CT5ĺ"YOU FSE LOC"::DK$;"RUN NEW CHARACTERS"DK$::34,21::"HE LOOKS UP AND SAYS, 'AH, HERE YE BE! WELL, GO AND HAVE FUN IN THE HALL!'"190:DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":DK$;"RUN MAIN.0"ADK$;"OPEN THE ADVENTURER":D NA IN HERE. HAVE YE GIVEN ITTO ME ARIGHT?' (Y/N) ";:A$:OA$"N"İ400:70`A$"Y"130:34,21::"'YE MUST BE NEW HERE! WAIT AND I'LL BRING SOMEONE OUT TO TAKE CARE OF YE.'"#190:DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLO     $>*">$">""ā"DHO@̃>""<<<""<<" >>$>0 ""<"<<<<"<"<!D @DŁ"   >"*$>>"Á́ <"<$">$<$"$Ʊ "O "0 """" "*"" *""*"" !Ȣ%賐 `?LaLÃ*F@!8t8<   " $"">$ $ "$ D@ $"*<" $"<"Ї"DHA" """"""""*" ""$̣%號Ё|a0fLal6@!ύ"熇࿂""*$" "< $  "DGOqa>"2<><"""<"""*" "0 2""*><""*>"*>" "</#< 迌<<<  $$с D@ 0 ρÁ㣞*">"*" <   """*"< "/ȁ$ `0vMa<"@@1ȁ"$""<ؿ $ك D@ș  $"DĠ"*"*  "  """ <" " 5$ @Oa·#8޿ "Oȇಠ  ᗠ"F"*"&<" ""  > Ƈ&<< "<|? ǟ$" п><>""   ῠȁ6"$" " `"   Fف%Ȗ ऎ%񟈌"D@H!xD""  "< "<NOOО쁠"   5"<"؛ "ǠҠӠϠΠǠӧӮӮנǠέӠĠŠϠĠ͠٠ŠĮŠӠŠӠϠȠҠŠĠӮ   KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKTSPATHSJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK@JJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJ*9JJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKK((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?.` 456` !$'*-0369 @]6""c@> @6""c888 ~} @8 :8lDDFppp @|#zq"tpX ```@xGt+bD(h`0X0x@@@phWD#QP@`  0 `P/G" @ @@`@? _ D@@1`7`w``@6cc@c@o@o@/@/7:lFFG888_ _ __ntX  ppp>>>9>\h0 X0x```! |&|.|r|"8P`0 0 8@@@C@xMx]xexEp @ ``p8pp;pKp ` @@1@1`qEAD, AND YOUR PRIME ATTRIBUTES ARE-- ";:756::Q xHDA(8):AGA(8):CHA(8) " HARDINESS--";HD:" AGILITY --";AG:" CHARISMA --";CH;"'";:756:: 600 "(HIT 'R' TO READ INSTRUCTIONS, 'T' TO GIVE THEM BACK)"; A$:A$"T"R (F)EMALE ";$ FSEX$:SEX$"M"906 PSEX$"F"70B ZSEX$: d"THE IRISHMAN WALKS AWAY AND IN WALKS A TALL MAN OF POSSIBLY ELVISH DESCENT. HE STUDIES YOU FOR A MOMENT AND SAYS, ";:756:::"'HERE IS A BOOKLET OF INSTRUCTION FOR"2 n"YOU TO R DK$(4)%R(X)(X(1)1)BA(X)R(X)R(X)R(X)(DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:DK$;"CLOSE"234,21: <"THE IRISHMAN SAYS, 'FIRST I MUST KNOW WHETHER YE BE MALE OR FEMALE. WHICH ARE YE? (M)ALE O     ͍čōōōčōҍōҍҠč͍ōōōō͍ҍ΍͍ōōōōҠϠč͍Π΍͍ōōō ŠΠҠӮŠԠΠŠҠԠȠŠ٠ǮĠԠĠĠҠĠϠ̠Π֮ŠĠŠϠӠҠĠŠϠٍŠĠŠϠӠҠĠԠƮǠΠĠ٠ҠĠΠӠԍԠǠŠϠŠǠԠӠӮҠȮǠϠΠŠĠƠŠˠ٠ήΠϠϮ٠ϠɠӠԠӠȠŠΧǠӿΧРĠ̠٠Ġ̠ԠӠҠҠήǠϠŠӠǠˠӠŮǠΠ٠ӠŠԠҠǠŠӠ׭ԭ̠ӠƠŠנӠ̠Ϡ͠ήƠŠӠŠŠŧӠǠϠԠӠԠŮŠĠŠϠӠҠĠΠΠήĠҠΧǠӠŠΠԠΧǡŠΠӠŠΠҠŠԠŠ̮ŠĠŠϠӠҠĠŠϠٮD CHARACTERS,R0":NC:R1NC:DK$;"READ CHARACTERS,R";R:A$:A$""Ă:DK$;"WRITE CHARACTERS,R0":NC1:RNC1DK$;"WRITE CHARACTERS,R";R:NAME$HD:AG:CH:X14:"0":"5":"-10":"20":"10":"0":"0":SEX$:"200":"0":"0"W14:"NON460:"THE MAN BEHIND THE DESK TAKES BACK THE INSTRUCTIONS AND SAYS, 'IT IS NOW TIME TO START YOUR LIFE.' ";:756::"HE MAKES AN ODD SIGN WITH HIS HAND AND SAYS, 'LIVE LONG AND PROSPER.'"mDK$;"OPEN CHARACTERS,L150":DK$;"REA ARMOUR.":4"(HIT ANY KEY TO CONTINUE) ";:A$::"THE MAN BEHIND THE DESK TAKES BACK THE":"INSTRUCTIONS AND SAYS, 'IT IS NOW TIME":"FOR YOU TO START YOUR LIFE.' HE MAKES":"AN ODD SIGN WITH HIS HAND AND SAYS,":"'LIVE LONG AND PROSPER.'":SADVENTURES, AND ITEMS MAY HAVE SPECIAL":"PROPERTIES. HOWEVER, THESE WILL NOT":"WORK IN OTHER ADVENTURES THAN WHERE THEYWERE FOUND. THUS, IT IS BEST (AND YOU" "HAVE NO CHOICE BUT TO) SELL ALL ITEMS":"FOUND IN ADVENTURES, EXCEPT FOR WEAPONS":"AND:"BLAST--HURT YOUR ENEMIES FROM A DISTANCEHEAL --REMOVE DAMAGE FROM YOUR BODY.":"SPEED--DOUBLE YOUR DEXTERITY FOR A TIME"r"POWER--DOES SOMETHING WEIRD. THE EXACT":" EFFECT IS UNPREDICTABLE.":|:"OTHER TYPES OF MAGIC MAY WORK IN VARIOUR, IT IS A GOOD IDEA TO":"CARRY SOME GOLD WITH YOU FOR USE IN"^"BARGAINING AND RANSOM SITUATIONS."::"(HIT ANY KEY TO CONTINUE) ";:A$::|h"YOU MAY ALSO HIRE A WIZARD TO TEACH YOU":"SOME MAGIC SPELLS. THERE ARE FOUR":"SPELLS YOU MAY LEARN.":TO SPEND ON SUPPLIESFOR YOUR FIRST ADVENTURE. YOU WILL GET":"A LOWER PRICE FOR ITEMS IF YOUR CHARISMAIS HIGH.":?T"AFTER YOU BEGIN TO ACCUMULATE WEALTH,":"YOU MAY WANT TO PUT SOME OF YOUR MONEY":"INTO THE BANK, WHERE IT CANNOT BE":"STOLEN. HOWEVEYOUR CHARISMA (";CH;") AFFECTS HOW CITIZENS":"OF EAMON REACT TO YOU. YOU AFFECT A":"MONSTER'S FRIENDLINESS RATING BY YOUR":"CHARISMA LESS TEN, DIFFERENCE TIMES TWO":"(";(CH10)2;"%)":rJ"YOU START OFF WITH 200 GOLD PIECES,":"WHICH YOU WILL WANT BLOWS BEFORE YOU DIE.":,"HOWEVER, YOU WILL NOT BE TOLD HOW MANY":"BLOWS YOU HAVE TAKEN. YOU WILL BE":"MERELY TOLD THINGS SUCH AS"::" 'WOW! THAT ONE HURT!'":"OR 'YOU DON'T FEEL VERY WELL'":6"(HIT ANY KEY TO CONTINUE) ";:A$::@"CAN CARRY WEIGHTS UP TO TEN TIMES":"YOUR HARDINESS, OR ";HD10;" GRONDS.":"(A MEASURE OF WEIGHT, ONE GROND=10 DOS)":""ADDITIONALLY, YOUR HARDINESS TELLS HOW":"MANY POINTS OF DAMAGE YOU CAN SURVIVE.":"THEREFORE, YOU CAN BE HIT WITH ";HD:"1-POINT MOUR AND YOUR EXPERTISE IS":"LESS THAN THE ARMOUR YOU ARE WEARING.""NO MATTER HOW HIGH YOUR ARMOUR EXPERTISEIS, HOWEVER, THE NET EFFECT OF ARMOUR":"WILL NEVER INCREASE YOUR CHANCE TO HIT.":"(HIT ANY KEY TO CONTINUE) ";:A$::w:"YOU UST"::" NONE";18);"0";35);"- 0%":" LEATHER";18);1;35);"-10%":" CHAIN";18);2;35);"-20%"D" PLATE";18);5;35);"-60%":" SHIELD";18);1;35);"- 5%":::"YOU WILL DEVELOP AN ARMOUR EXPERTISE,":"WHICH WILL GO UP WHEN YOU HIT A BLOW":"WEARING AR AND YOU MAY":"ALSO CARRY A SHIELD IF YOU DO NOT USE":"A TWO-HANDED WEAPON. THESE PROTECTIONS":"WILL ABSORB HITS PLACED UPON YOU(ALMOST":"ALWAYS!) BUT THEY LOWER YOUR CHANCE TO"_"HIT. THE PROTECTIONS ARE--"::"ARMOR";15);"HITS PROTECT ODDS ADJ -10%": "EVERY TIME YOU SCORE A HIT IN BATTLE,":"YOUR ABILITY IN THE WEAPON CLASS MAY GO":"UP BY 2%, IF A RANDOM NUMBER FROM 1-100":"IS LESS THAN YOUR CHANCE TO MISS!": "(HIT ANY KEY TO CONTINUE)";:A$::"THERE ARE FOUR ARMOR TYPES,ILITY":"IN THAT CLASS, PLUS TWICE YOUR AGILITY.": "THE FIVE CLASSES OF WEAPONS (AND YOUR":"CURRENT ABILITIES WITH EACH) ARE--":" CLUB/MACE 20%":" SPEAR 10%":" AXE 5%":" SWORD 0%":" BOW 440 A$"R"150( 16303,0:34,0 ::"YOU READ THE INSTRUCTIONS AND THEY SAY--"::" INFORMATION ABOUT THE WORLD OF EAMON ":3 :"YOU WILL HAVE TO BUY A WEAPON. YOUR":"CHANCE TO HIT WITH IT WILL BE THE":"WEAPON COMPLEXITY, PLUS YOUR ABx|@AyOaxc?ՈТʕՈ f(@3Тx|/`sТ0 ʕ0 ?`!fL3fL3Тx|/| D`sТʕ N ?`]1 o 60Т/`sՈТxʕ@ ?Ո@` @a`QDՈ fL3fL3x|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈ`!f@3x|@p?pߢʕ% HՈ f@3hO@/ ?x @``s"DhO@/ N ?@ D`s`?c s30@/ ?3f @`+`s`{@/ ?X@hO@E&`@s 9"@//pc% d =@a`Ng|>_g@'r hO@00@00@ "~DhO@>@00@00@"X"A(@ x@hO@/@Ո f@3Тx|/`sՈТ<0pʕ ?Ո`!fL3fL3Тx|/@`sТʕ@@? ? fL3fL3Т/x`sТʕ@ ?Тp`/`sՈpyТx|ʕ @n' EՈТx|ʕՈТ/ԨѢŊԈ`!fL3fL3x|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ f $@3x|6 @a `l""ՈТ(=>O(eʕ      Y014I F(4);"OPEN LOC":(4);"WRITE LOC":X0:Y0:N:(4);"CLOSE LOC"u P0,(X07):1,X0((X07)7):2,Y0:3,N Z36608 d(4);"RUN MAIN.0" n::UN MAIN.0" n::  110384008(4);"VERIFY THE ADVENTURER"{(4);"OPEN LOC":(4);"READ LOC":X0:Y0:N:(4);"CLOSE LOC"((4);"BLOAD EAMON.B"-(4);"BLOAD UNPACK,A$300"2:16302,0:(4);"BLOAD MAIN.PIC":768:16300,0:16301,0 <X0133:  ICIDE. ENTER 'Y' TO SUICIDE,":"ELSE TYPE 'N' ";NlA$:A$"Y"A$"N"620`v::A$"N"ı"WE RESSURRECT YOU AGAIN AND YOUR PRIME"::"ATTRIBUTES ARE --"::::120AS, 'FIRST I MUST KNOW WHETHER YE BE MALE OR FEMALE. WHICH ARE YE? (M)ALE OE":"0":"0":"0,0":&DK$;"CLOSE"xDK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE"16304,0:16297,0&DK$;"RUN MAIN.0"X /// SUICIDE ROUTINE 1b:"IF YOU WISH, WE WILL ALLOW YOU TO COM-":"MIT SUĺ("BLASTHEAL SPEEDPOWER",(S1)51,5);" ";:SM1OS:SMĺ" NO SPELLS";::"YOUR WEAPON ABILITIES ARE--":" AXE BOW CLUB SPEAR SWORD":" ";:W15:1(WA%(W)0)((WA%(W))10)((WA%(WA))100));WA%(W);"% ";::I:A2(AC2):"ARMOUDK$;"WRITE FRESH MEAT":REC:120:DK$;"CLOSE":DK$;"RUN ";ADNAME$34,0::"YOU ARE THE ";("MIGHTY FAIR ",17(SEX$"F"),7);NAME$::"YOUR ATTRIBUTES ARE:":" HD=";HD;" AG=";AG;" CH=";CH:2"YOU KNOW THE FOLLOWING SPELLS--":SM0:S14:SA%(S)SK DRIVE IN SLOT SIX, DRIVE ONE THEN"::"HIT 'C'"::::" ";:16368,0a A$:A$"C"190 :DK$;"OPEN EAMON.NAME":DK$;"READ EAMON.NAME":ADNAME$:DK$;"CLOSE"::5:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$:::BDK$;"OPEN FRESH MEAT":"I"310 A$"R"ė:440$ 130: 34,0:16303,0:C 670 DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC::DK$;"CLOSE CHARACTERS"L :5:"INSERT DISKETTE WITH ADVENTURE (OR KEEP"::"THIS DISKETTE FOR BEGINNERS CAVE) IN"::"DI(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W: :"YOU MAY STAY AT THE (I)NN UNTIL YOUR NEXT ADVENTURE, GO ON AN (A)DVENTURE OR (R)EMAIN IN THE HALL ";:A$:"":A$"A"170 A$O YOU AND SAYS,":N190,100,100| Z"'PSST. THAT POTION THE BARMAN SERVES IS VERRA STRANGE. BE CAREFUL!' ";:756:::110 d"'YOU'LL BE WANTIN' YER STUFF. HERE YE GO.' AND HE HANDS IT TO YOU. ";:756:: n440t xNAME$:HD:AG:CH:X14:SA%TYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":P(X)(XRTIO.5) (DK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":Y029N0110 234,21::Y029110 <WN$(1)"NONE"N1 FAC((AC2))2N2 P"THE IRISHMAN BECKONS T_ DK$(4)::DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$K GOLD,BANK:AC:W14:WNAME$(W),W      ?Cc hO@`s@//r<`@hO@  9@/0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ f $@3x|6 @a `l""ՈТ(=>O(eʕ^O"Qh@bgqA @@hO@/ ?@<0x@@`s ~hO@/ ?@ `s @/| ?3f @ `s`X1?c vwp@/ъ`sŊ`x|ъ ?Ŋ/ъŊ` x|ъxD" Ŋ  E" 0p3$ d!<pGa`?Qgw}_w  hO@00@00@  `cg@hO@ 3 fD}'dъ " Ŋ f@@3x|/ъ`Ŋъ ?Ŋ f`@3x|/ъD`s ъp ? fL3vL3x/ъ~`spъ ?`X1 s 60`/ hO@E2`w)E"@0@H RLa`QDŊ fL3fL3x|ѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊ f $@3x|@Lxc?ъŁ@` `@hO@/ ?0 @p`s hO@/~ N ?@`s`Z? k|{70@/ ?Cc hO@ `s@/hТ@;/`Ոh Тx|ʕx|*ՈТ ZE"0@ x RO`_Dc hO@00@00@  `Cc@hO@@/@"  @@phO@/( A$:Q13:A$("GFP",Q,1)Ă:140 A$:PBPBP(Q1)BP2(Q3):PP(P):PGOLDė:"'YOU NEED MORE GOLD OR BUY SOMETHING YOU CAN AFFORD.'";:756:::80 W14:WN$(W)N$N$N$"#":160 W:W14:WN$(W)"NONE"ĂWN$(W)N$:WT%(W)TP756:::250 x"MARCOS SAYS, 'I GOTTA THE BEST! YOU WANTA AXE, BOW, MACE, SPEAR, OR SWORD?":640::"'I'VE GOT A GOOD ONE FOR ";P(2BP);" GP, A FAIR":"ONE FOR ";P(BP);" GP,"; "AND A POOR ONE FOR ";P(BP2):"WHICH DO YOU WANT?' (G, F, OR P) ";L)EAVE? ";:C2CH(11(1)5):C2C2(C20):RTIO10C2_ ZA$:TR14:A$("BSAL",TR,1)Ă:90} dA$::TR110,250,510,750 nWN$(4)"NONE"ĺ"MARCOS SAYS, 'THATSA GOOD, BUT FIRST YOUGOTTA SELL ME A WEAPON. NO MORE THAN FOUR WEAPONS PER PERSON!'";:(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W: F:"MARCOS CAVIELLI (THE OWNER) SAYS, 'WELL,AS I LIVE AND BREATHE IF IT ISN'T":" ";NAME$;"! ";:756::5 P"DO YOU WANT TO:":"(B)UY A WEAPON, (S)ELL A WEAPON, GET":"BETTER (A)RMOUR OR (ME$(W),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":DK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC" 2P(X)(XRTIO.5):34,21:705 <NAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$H DK$(4):800gDK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX${ (GOLD,BANK:AC:W14:WNA     LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:120:DK$;"CLOSE":"D CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$K GOLD,BANK:AC:W14:WNAME$(W),W099Y034)İ670:680:(4);"RUN MAIN.2"7lX068540GvY09ī130Y0124Ĺ16302,0:(4);"BLOAD VILLAGE.PIC":768:16300,0:16301,0:X0133:Y014:670:680:(4);"RUN VILLAGE.0"(X0173X093)(Y074Y079)ė:3304503DK$;"OPEN 1,X0((X07)7):2,Y0:3,N:36608:(11)0590J36608:A$"I"Y0Y05^&A$"M"Y0Y05r0A$"J"X0X05:A$"K"X0X05D0,(X07):1,X0((X07)7):2,Y0:3,N:36608NX0198İ670:680:(4);"RUN MAIN.1"XX0198540(bX068(YKK(16384):KK128450Z16368,0:KKKK128:A$(KK):A$"/"A$"?"Ĺ16303,0:220A$"I"A$"M"A$"J"A$"K"Č36608A$"I"Y0Y05:530A$"M"Y0Y05:530A$"J"X0X05:530A$"K"X0X05:530590/0,(X07):AA;QQ(3(1)1):QQ1QQ$"HARDINESS":HDHDBB:420aQQ2QQ$"AGILITY":AGAGBB:420}QQ$"CHARISMA":CHCHBB:"YOUR ";QQ$;" ";AA$;" BY ";AA;"! ";:756:::450:"NOTHING HAPPENED. YOU LEAVE GRUMBLING. ";:756:::450aT30CHGOLDė:"'SORRY, MIGHTY ADVENTURER, BUT YOU DON'T HAVE ENOUGH GOLD.' ";:756:::450r^A$"Y"330hGOLDGOLD(30CH):QQ(5(1)1):QQ370,370,370,430,430rQQ3AA$"INCREASED":AAQQ:BBAA:390|AA$"DECREASED":AA(2(1)1):BBOU'LL HAVE TO LEAVE YOUR ARMOUR AND WEAPONS WITH ME. Y'ALL COME BACK REAL SOON, YA HEAH?'"@680:DK$;"DELETE THE ADVENTURER":::J22:"THE BARMAN SAYS, 'YOU WANTA BUY A MAGIC POTION? ONLY ";30CH;" GOLD PIECES! (Y/N) ";:A$:"":A$"N"ė:450$(W);20(WO%(W)0)((WO%(W))10)((WO%(W))100));WO%(W);"% ";WD%(W);" D ";WS%(W),W:23:16368,0:"(HIT ANY KEY TO CONTINUE) ";:A$:::16304,0:16297,0::34,21::440]634,0:16303,0::"AS YOU LEAVE THE HALL, THE IRISHMAN SAYS, 'YR: ";("SKIN LEATHERCHAIN PLATE ",A271,7);:ACA22ĺ" AND SHIELD";30);"AE=";AE;"%"::"GOLD IN HAND=";GOLD;", BANK=";BANK""::"WEAPONS";19);"CMPLX DAM":W14:W1WN$(W)"NONE"300WN$(W)"NONE"ĺ:" NO WEAPONS":300V"WN  DK$(4):360lDK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE":50DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$] (GOLD,BANK:AC:W14     ;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":G 216,0:0ER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX${ (GOLD,BANK:AC:W14:WNAN$"SPEAR":740 A$"W"710I"WORD":BP50:N$"SWORD":TP5:SIDE8VDICE1:v760:770:DK$;"RUN MAIN.0"DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:60:DK$;"CLOSE":WN$(1)"NONE"N1 AC((AC2))2N2:DK$, A B M SP OR SW) ";>A$:W14:A$("ABMS",W,1)Ă:650UW670,680,690,700"AXE":BP25:N$"AXE":TP1:SIDE6:740"BOW":BP40:N$"BOW":TP2:SIDE6:740"MACE":BP20:N$"MACE":TP3:SIDE4:740A$;A$:A$"P"ĺ"PEAR":BP25:A$"Y"590|bA$::GOLDP(50)ĺ"'YOU DO NOT HAVE ENOUGH GOLD TO BUY THE SHIELD! I DON'T GIVE CREDIT!'";:756:::630lGOLDGOLDP(50):SH1::"MARCOS TAKES YOUR GOLD AND GIVES YOU A SHIELD. ";:756::vACA22SH:80"(HIT THE KEY(S)s0:"MARCOS TAKES YOUR OLD ARMOUR AND YOUR GOLD AND GIVES YOU YOUR NEW ARMOUR. ";:756:::GOLDGOLDP:A2A1:SH630D:"'NOW HOW ABOUT A SHIELD? I CAN LET YOU HAVE ONE FOR ONLY ";P(50);" GP!' (HIT Y OR N)";NA$:A$"N"ĺA$::630 XTI;" AND PLATE IS ";P(500)TI:"(HIT N FOR NOTHING OR L, C, OR P) ";nA$:A14:A$("NLCP",A,1)Ă:530A$::A1570&PP(100(A2)250(A3)500(A4))TI:PGOLDė:"'YOU DO NOT HAVE ENOUGH GOLD AND I DON'T GIVE CREDIT!'";:756:::80(AC2):SHACA22:B125(A21)60(A22)100(A23):TI(B1RTIO.5):"HE SHOWS YOU SUITS OF LEATHER ARMOUR, CHAIN ARMOUR, AND PLATE ";:TIB12TIB12E"AND SAYS, ";:756:::"'WITH TRADE, THE LEATHER IS ";P(100)TI;" GP,":"CHAIN IS ";P(250), TAKE IT OR LEAVE IT.' (T OR L) ";>A$:A$"L"ĺA$::240OA$"T"410^A$::330:W14:("ABMS",W,1)(W$,1)ĴW460,470,480,490WBP25:390BP40:390BP20:390(W$,2,1)"P"BP25:390BP50:390:A2(WN$(W),(N$))N$Ă::"'YOU NEVER BOUGHT ONE OF THOSE FROM ME, REMEMBER?'";:756:::80BPBPBP(WO%(T)5)BP2(WO%(T)5):P(BPRTIO.5):PBP4P(BP4.5)#:"WELL, YOU'VE BANGED IT UP A BIT, BUT I CAN GIVE YOU ";P;" GOLD PIECES FOR ITW21):WD%(W2)WD%(W21):WS%(W2)WS%(W21)::WN$(4)"NONE"T:"MARCOS ASKS YOU, 'HOW ABOUT BUYING A":"WEAPON?'":"(Y OR N) ";^A$:A$"Y"ĺA$::110hA$"N"350rA$::190\|:"'WELL, WHAT WEAPON DO YOU WANTA RETURN?":640:W2W:W14:E"(W$,3)"BOW"(W$,3)"AXE":Lĺ"MARCOS FROWNS AT YOU AND SAYS, 'THIS IS":"A WEAPON LIKE I SELL, REMEMBER!'":4409J"MARCOS GIVES YOU YOUR MONEY AND TAKES":"YOUR WEAPON.";:756::GOLDGOLDP:W2W4:WN$(W2)WN$(W21):WT%(W2)WT%(W21):WO%(W2)WO%(A$::240,A$"T"2906A$:"MARCOS SAYS, 'OKAY, WHAT'VE YOU GOT?"::"(ENTER THE WEAPON NAME) ";W$:W14:WN$(W)W$Ă::"MARCOS SAYS, 'YOU CAN'T SELL A WEAPON YOU DON'T OWN!' ";:756::240u@L(W$,5)"SWORD"(W$,5)"SPEAR"(W$,4)"MACA$:510:80Y:"'IS THIS WEAPON A STANDARD WEAPON LIKE I SELL? ('Y' OR 'N') ";mA$:A$"Y"380~A$"N"260A$::P(50RTIO.5):"'I CAN ONLY GIVE YOU":P;" GOLD PIECES FOR IT, TAKE IT OR LEAVE IT!' (HIT T OR L) "; "A$:A$"L":WO%(W)10(2Q):WD%(W)DICE:WS%(W)SIDES:GOLDGOLDP::"MARCOS HANDS YOU YOUR WEAPON AND TAKES":"THE PRICE FROM YOU.";:756::GOLDP(50)240"'NOW HOW ABOUT SOME ARMOUR?'":"(HIT Y OR N) ";A$:A$"N"ĺA$::240A$"Y"210 `shO@/@? ?c0 @p`s@/ ?@` `s@/@y ?hO@ `s@=~ @apa ъŊx|?p?pѢŊW&xhO@@$   hO @00@00@hO"@ pO? f0@a~`0~qCag!T"Aj)qr@@ѣĸhO@/ ?XQ @ТA) ʕ}.Ո`Тx|/`sՈТ(_'Trʕ@ ?Ո@Тx|/ `sТ<0xʕ ?Т/`sТʕ`|? ?Т/@,`sՈТx|ʕ@ ?ՈТ@P',ՈТx|ʕՈТf0~ @a f?~ ԨѢŊԈ x|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ@Ljx|6~ 0Xa f0@a`03C! L"Ո     ANKS YOU. ":350::DK$;"RUN MAIN.0"fTDK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":^DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:70:DK$;"CLOSE CHARACTERS"ch216,0:0(X)::AE:SEX$] (GOLD,BANK:AC:W14T IS THAT? TRY AGAIN! ";:756:::300@MNYGOLDė:"WHEN HE DISCOVERED THAT YOU DIDN'T HAVE THAT MUCH ON YOU HE DROVE YOU OUT OF HISBANK. ":350:DK$;"RUN MAIN.0"$JGOLDGOLDMNY:BANKBANKMNY::"SHYLOCK TAKES YOUR MONEY, PUTS IT IN HISBAG, AND TH":"IN MY CARE.' ";:756:"":350::DK$;"RUN MAIN.0",:"SHYLOCK GETS A WIDE GRIN ON HIS FACE. 'GOOD FOR YOU! HOW MUCH DO YOU WANT TO DEPOSIT?' ";:"";A$'6MNY(A$):MNY0MNY(MNY)(MNY)A$ė:"YOU'RE NOT MAKING SENSE. WHAT KIND OF AMOUNKė:"THE BANKER THROWS YOU A TERRIBLE GLANCE AND SAYS, 'THAT'S MORE THAN YOU'VE GOT! YOU KNOW I DON'T MAKE LOANS!'":350::(4);"RUN MAIN.0"6"GOLDGOLDMNY:BANKBANKMNY::"SHYLOC HANDS YOU YOUR GOLD AND SAYS, 'THAT LEAVES YOU WITH ";BANK;" PIECESA$"W"240]A$::"'YOU HAVE ";BANK;" GP STORED HERE.":"HOW MANY DO YOU WANT BACK?' ";"";A$:MNY(A$):MNY0MNY(MNY)(MNY)A$ė:"THE BANKER SCOWLS AND SAYS,'COME, COME, YOU'RE NOT MAKING SENSE! TRY AGAIN.'";:756:::260MNYBAN/N) ";:A$:"":A$"N"ė:220%90C350:(4);"RUN MAIN.0"::"WELL, ";:NAME$;", MY DEAR ";("GIRLBOY",(SEX$"M")41,4);",":"WHAT A PLEASURE TO SEE YOU! DO YOU WANT":"TO MAKE A (D)EPOSIT OR A (W)ITHDRAWL?'";A$:A$"D"ĺA$::300 Č756:::80 SA%(SP)ĺ"'I ALREADY TAUGHT YOU THAT SPELL!'":"SHAKING HIS HEAD SADLY, HE TURNS AWAY ";:756:::350:(4);"RUN MAIN.0"GOLDGOLDP:SA%(SP)(50(1)26):"HOKAS TEACHES YOU YOUR SPELL, TAKES HIS FEE, AND ASKS, 'ANYTHING ELSE? (Y170 "POWER":PP(100):170A "N"::"GOODBYE, ";NA$:220 :PGOLDĺ"HOKAS SEES THAT YOU DON'T HAVE ENOUGH TO PAY HIM AND TURNS HIS BACK ";:756:::"HE MUTTERS ABOUT YOUNGSTERS AND FROGS THEN TURNS AROUND AND SMILES "; PGOLD"SPEED - ";P(5000);" GP POWER - ";P(100);" GP"f d"WHAT'LL IT BE - B,H,S,P OR (N)OTHING? "; nA$:SP15:A$("BHSPN",SP,1)Ă:110 xSP130,140,150,160,165 "BLAST":PP(3000):170 "HEAL":PP(1000):170 "SPEED":PP(5000):(W):WSIDES%(W):W: P"HOKAS TOKAS, THE OLD MAGE, LOOKS AT YOU AND SAYS, 'SO YOU WANT OLD TOKEY TO TEACH YOU SOME MAGIC, HEH HEH? ";:756::7 ZC2CH(11(1)5):C2C2(C20):RTIO10C2:"BLAST - ";P(3000);" GP HEAL - ";P(1000);" GP"::WNAME$(W),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":P(X)(XRTIO.5):340t 234,21::Y03480} <230 FNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%310 dNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W: n34,0::"YOU ARE THE ";("MIGHTY FAIR ",17(SEX$"F"),7);NAME$::"YOUR ATTRIBUTES ARE:":" ME$(W),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":DK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":34,21: 2X0198X06890 <WN$(1)"NONE"N1 FAC((AC2))2N2 P0,(X07):1,X0((X07)7):2,Y0:3,N:36608 Z  DK$(4):560gDK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$ (GOLD,BANK:AC:W14:WNA     hO@0`s^h =^@/xhO@@/ x|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ@Ljx|6~ 0Xa f0@a`03C! L"Ո@3fNc{EAh r=@X!葢hO@/ ?Q(4 @`sĈhO@/ ?<0p@D#`s@/ ?@@x`s@/@y ?/ъ `sŊx|ъbG ?ŊQ$HEB/ъpŊx|ъŊOhG0p3$ d!<f0 @a fQgw}_w hO@00@00@ hO~@ 0Xac0@a0ԨѢŊ@x|@@ pO?pA~sG~~q<ъŊъ(aŊ`ɿx|/ъ`Ŋ=NGrъ ?Ŋ@Ljx|/ъ`s@<0xъBC ?x/ъ`sъp ??hO@D`sYg)EN@/phO@PA@0@H Rf?L@a|gQDŊ x|ѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŀ00@ xhO@`@/@!@ߜphO@/@`ĈhO@/ ?@@`shO@/N ? @``s@/| /D`sТ0 ʕ@ ?Т/`sՈТxʕX{ ?ՈТA(EB/p`ՈТx|ʕՈТN Ax0@ x R3f0l@ f_DchO@00@ѢŊԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈpx|@?p?pߢʕ}>.Ո@Ĝx| 0@a F0pG~`0sCՈТʕՈČТx|/`sТʕ(?Тx|0 @@`s@/ ?@`s^g =^@/| ?hO@`A A)@/@` {f0<@a fQDՈx|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨ00@00@ hO@>@00@00@hOc@ 0@1 f0@a0`0F1C.tyEAh `y<@ďhO@/ ?@ashO@/N ?$?Ŋx|/ъ_`sx ъ` ?/ъ@1`sъ@0 ?/ъ `sŊĀx|ъ  ?Ŋ^hw E/pc% d =OG@acNg|>_ghO@ԨѢŊ@1 x| ѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊъŊĈČx|" 0@|g0@a`?f0ъ!"d"ŊA,XъŊ@ďx|/ъ`sŊ=Q@zъT NOW GIVE ME ONE WEAPON IN EXCHANGE. REMEMBER YOU'RE ONLY ALLOWED FOUR WEAPONS.'";:756:: "1 - ";WN$(1);23);"2 - ";WN$(2):"3 - ";WN$(3);23);"4 - ";WN$(4):"WEAPON 1-4 OR FOR NO EXCHANGE "; A$:(A$)13210 (A$)1(A$)ςH x3:"SELECT 1-";WN;" OR FOR NONE ";:A$:"":(A$)13210b (A$)1(A$)WN120 GOLDPR%((A$))ė:3:"YOU DON'T HAVE THAT MUCH GOLD! ":I11000:I:110 AN$A$::"'GOOD CHOICE! A GREAT BARGAIN!' ";:756::b :"'YOU MUSYOU WOULD LIKE TO LOOK AT MY STOCK OF USED WEAPONS?' (Y/N) ";:AN$:"":AN$"N"240g FAN$"Y"60| PW(X)(X(1)) ZWNW(3):WN090 d590 n:I1WN:I;:4:NW$(I);:16:TP$(I);:24:OW%(I);"%";:30:DW%(I);:"D";:SW%(I);:35:PR%(I):PE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":540:50 (NAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W: 2MN$(0)NAME$:34,21:V <:"'MAYHAP #] DK$(4):DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$> GOLD,BANK:AC:W14:WNAME$(W),WTY     DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":&DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:100:DK$;"CLOSE":0216,0:0;REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$ (GOLD,BANK:AC:W14:WNA);"RUN VILLAGE.2" X068410[Y09X0133:Y0119:540:550:300:(4);"RUN MAIN.0"Y0124X0133:Y014:540:550:16302,0:DK$;"BLOAD PRACTICE.PIC":768:16300,0:16301,0:DK$;"RUN PRACTICE.0"Y079(X0103X0168)200320=36608:(11)0460-36608:A$"I"Y0Y05AA$"M"Y0Y05UA$"J"X0X05iA$"K"X0X050,(X07):1,X0((X07)7):2,Y0:3,N:36608X0198İ540:550:(4);"RUN VILLAGE.1"X0198410X068(Y099Y034)İ540:550:(4J16368,0:KKKK128:A$(KK):A$"/"A$"?"Ĺ16303,0:110eTA$"I"A$"M"A$"J"A$"K"Č36608~^A$"I"Y0Y05:400hA$"M"Y0Y05:400rA$"J"X0X05:400|A$"K"X0X05:4004600,(X07):1,X0((X07)7):2,Y0:3,N:Q)1:320m":"THE AIR AROUND THE FOUNTAIN BEGINS TO GLOW BUT THAT'S ALL THAT HAPPENS. ";:756:::320,16302,0:DK$;"BLOAD MAIN.PIC":768:16300,0:16301,0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608:6@KK(16384):KK128320=Q(5(1)1):QQ32901WNAME$(1)"NONE"290"'FOR YOUR GENEROSITY I WILL INCREASE THE POTENCY OF ONE OF YOUR WEAPONS!' ";:756:::SS1WNAME$(SS)"NONE"QRSS1:280SS4SSSS1:250QR4 QQ(QR(1)1):WSIDE%(QQ)WSIDES%(Q:34,21::310:"YOU HEAR A VOICE SAY, 'THROW A 20 GP COIN IN THE FOUNTAIN AND GOOD FORTUNE WILL BE YOURS.' WILL YOU DO IT? (Y/N) ";:A$:""::A$"Y"320GOLD200ė:"YOUR POUCH OF GOLD IS TOO LIGHT! ";:756:::320GOLDGOLD20:QDAM":W14:W1WN$(W)"NONE"190R WN$(W)"NONE"ĺ:" NO WEAPONS":190 WN$(W);20(WO%(W)0)((WO%(W))10)((WO%(W))100));WO%(W);"% ";WD%(W);" D ";WS%(W)W:23:16368,0:"(HIT ANY KEY TO CONTINUE) ";:A$::16304,0:16297,0::1(WA%(W)0)((WA%(W))10)((WA%(WA))100));WA%(W);"% ";:: :A2(AC2):"ARMOUR: ";("SKIN LEATHERCHAIN PLATE ",A271,7);:ACA22ĺ" AND SHIELD";" 30);"AE=";AE;"%"::"GOLD IN HAND=";GOLD;", BANK=";BANK""::"WEAPONS";19);"CMPLX HD=";HD;" AG=";AG;" CH=";CH: x"YOU KNOW THE FOLLOWING SPELLS--":SM0:S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)51,5);" ";:SM1 S:SMĺ" NO SPELLS";A ::"YOUR WEAPON ABILITIES ARE--":" AXE BOW CLUB SPEAR SWORD":" ";:W15PE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":390:34,21::Y034260V (60 2NAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W:n <"A LOVELY YOU ] DK$(4):DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$N GOLD,BANK:AC:W14:WNAME$(W),WTY       R" WT%(5)5TP$"SWORD""ER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$> GOLD,BANK:AC:W14:WNAME$(W),WTYDW%(I)W(3):DW%(I)0700>SW%(I)W(10):SW%(I)4710PR%(I)OW%(I)DW%(I)SW%(I)15(CH18):OW%(I)0PR%(I)10DW%(I)SW%(I)15(CH18)I:WT%(5)1TP$"AXE"WT%(5)2TP$"BOW"WT%(5)3TP$"MACE"WT%(5)4TP$"SPEART4RTRT1*vRT4RTRT3W(4):630vTP$(I)("AXE BOW MACE SPEARSWORD",RT51,5):TP$(I)"AXE "TW%(I)1TP$(I)"BOW "TW%(I)2TP$(I)"MACE "TW%(I)3TP$(I)"SPEAR"TW%(I)4TP$(I)"SWORD"TW%(I)5OW%(I)(W(6)5);REC:40:DK$;"CLOSE CHARACTERS":.NI1WNQXRWW(10):RW0RWWR(I1)600b(I3RWWR(1))(I4RWWR(2))(I4RWWR(1))600 lWR(I)RW:EWRW1:NW$(I)("SLAYMORELFKILLSTINGERSCRUNCHCENTURIFALCOORWIDOWERFLASHERSLASHERFREEDOM",EW71,7):RTRW:$;"RUN VILLAGE.0"SDK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":k&WN$(1)"NONE"N10AC((AC2))2N2:DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":"DDK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R"N 1-4 OR FOR NO EXCHANGE ";:A$:(A$)13530\(A$)1(A$)4Ģ24:39:500WN$((A$))WN$(5):WT%((A$))WT%(5):WO%((A$))WO%(5):WD%((A$))WD%(5):WS%((A$))WS%(5):"'GOODBYE, ";MN$(0);"! COME AGAIN.' ";:A$:"":550:580::DKS. FINALLY HE FINISHES. ";:756:::"'I THINK YOU WILL BE SATISFIED WITH THIS,' HE SAYS MODESTLY. 'NOW WHICH WEAPON WILL YOU GIVE ME IN RETURN?' ";:756::$:"1 - ";WN$(1);23);"2 - ";WN$(2):"3 - ";WN$(3);23);"4 - ";WN$(4):"WEAPOY"450GOLDPR%(5)ė:"'YOU DON'T HAVE ENOUGH GOLD TO PAY FOR":"YOUR ";WN$(5);"! OUT OF MY SHOP!' ";:A$:""::550:580:DK$;"RUN VILLAGE.0"%GOLDGOLDPR%(5)::"GRENDEL WORKS ON YOUR ";WN$(5);",":"OFTEN CALLING IN WIZARDS AND WEAPON":"EXPERT5)(WS$):PR%(5)WO%(5)WD%(5)WS%(5)25(CH25):PR%(5)5PR%(5)5:"NAME= ";WN$(5);:740:" TYPE= ";TP$:"COMPLEXITY= ";WO%(5);"%";:" DICE & SIDES= ";WD%(5);"D";WS%(5)"PRICE= ";PR%(5);" CORRECT? (Y/N) ";:A$:"":A$"N"210A$"SIDES":" 1% - 50% 1 - 2 1 - 8 ";:756::k|:"COMPLEXITY > ";WO$:(WO$)1(WO$)50380}WO%(5)(WO$):"WEAPON DICE > ";WD$:(WD$)1(WD$)2400WD%(5)(WD$):"WEAPON SIDES > ";WS$:(WS$)1(WS$)8420CWS%((5)3:3506A$;9@A$:A$"P"ĺ"PEAR":WT%(5)4:350JJA$"W"320_T"WORD":WT%(5)5e^h:"'AND WHAT NAME SHOULD I INSCRIBE ON IT?'":"> ";WN$(5):(WN$(5))03606r:"'I HAVE LIMITS OF CRAFTSMANSHIP:'":" COMPLEXITY W. DICE W. 530l:"'WHAT DO YOU WANT ME TO MAKE -":"(A)XE (B)OW (M)ACE (SP)EAR OR (SW)ORD?'":"> ";:250:360A$:(A$)13530W14:A$("ABMS",W,1)Ă:250W280,290,300,310"AXE":WT%(5)1:350""BOW":WT%(5)2:350 ,"MACE":WT%4Ģ24:39:180 GOLDGOLDPR%((AN$)):WN$((A$))NW$((AN$)):WT%((A$))TW%((AN$)):WO%((A$))OW%((AN$)):WD%((A$))DW%((AN$)):WS%((A$))SW%((AN$)) :"'DO YOU WANT ME TO MAKE YOU A WEAPON NOW?' (Y/N) ";:A$:"":A$"Y"240 A$"N"2103fL3fLhO@@$   ` NhO@%@00@ _NhO3l@/p?`@@ H`@3fL3fLhO@/ ?@`shO@/D? ?Тx|/`sՈТ@>ʕ ?ՈТx|/`sТʕD? ?Т/`sТʕ ?Т/`sՈТx|ʕ@Id ?ՈТ8wpna> fO |q@A?0@'{ՈТx|ʕՈТ/ԨѢŊԈ "x|ʕԨѢŊԨѢŊԨѢŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ@?x|/ՈТʕ H`Ո   !!! ! ! ! ! !!!!!50:DK$;"CLOSE CHARACTERS":"VENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$N GOLD,BANK:AC:W14:WNAME$(W),WTYOLDBT:310MDK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":eWN$(1)"NONE"N1}AC((AC2))2N2DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:ONEY!":I11000:I:GOLDGOLD(BT3):310|hRL80ė:"YOU JUST WON DOUBLE YOUR MONEY!":I11000:I:GOLDGOLD(BT2):310rRL55ė:"YOU WON ";BT;" GOLD PIECES!":I11000:I:GOLDGOLDBT:310 |:"SORRY, ";NAME$;", YOU LOST!":I11000:I:GOLDG@(BT$)0310XJ(BT$)10000ė:"THAT'S OVER THE HOUSE LIMIT!":I11000:I:310T(BT$)GOLDė:"YOU DON'T HAVE THAT MUCH!":"PLACE A SMALLER BET, ";NAME$;".";:756:::310)^BT(BT$):RL(100(1)1):RL95ė:"YOU JUST WON TRIPLE YOUR M YOU WANT IN, ";SX$;"? (Y/N) ";:A$:"":A$"N"ė:"'SO LONG!'":400:430::DK$;"RUN VILLAGE.0"q,A$"Y"2906:"'YOU HAVE ";GOLD;". YOUR BET, ";SX$;"?":"THE HOUSE LIMIT IS 10,000 (0 TO QUIT).'":"> ";BT$:BT$"0"ė:400:430:DK$;"RUN VILLAGE.0"S A COCKTAIL BEFORE YOU START!' ";:756:::"SOME TIME LATER YOU MAKE YOUR WAY TO THEFLOOR OF THE CASINO AND STOP AT THE ROULETTE WHEEL. ";:756:::SEX$"M"SX$"SIR":290SX$"FAIR ONE"`":"'PLACE YOUR BETS. PLACE YOUR BETS. DOAG(IP$)!PT3CHCH(IP$)GOLDGOLD((IP$)(5000(CH50)))::"THE WITCH BEGINS AN INCANTATION AND YOU ARE ENVELOPED IN A HAZY, WHITE CLOUD. 'IT IS DONE!' ";:756:::120,:"HERMANN, THE OWNER, SAYS,":" 'WELCOME, ";NAME$;"!":"PERHAP(IP$)32MX120iGOLD(((IP$))(5000(CH50)))ė:"YOU DON'T HAVE ENOUGH GOLD LEFT! ";:756::120RL(20(1)1):RLCHė:"THE SPELL DIDN'T WORK! SORRY!":I11000:I:GOLDGOLD((IP$)(2500(CH50))):120PT1HDHD(IP$) PT2AG400:430::DK$;"RUN VILLAGE.0"L A$"H"PT1:MXHD:AA$"HARDINESS":180v A$"A"PT2:MXAG:AA$"AGILITY":180 A$"C"PT3:MXCH:AA$"CHARISMA":180 120 23:"INCREASE ";AA$;" BY HOW MANY POINTS?";:" ";IP$:IP$"0"120(IP$)1 YOUR PERSONAL AURA OF POWER I MAY NOT ALWAYS BE SUCCESSFUL!' ";:756:: x:"YOU HAVE ";GOLD;" GOLD PIECES LEFT":"(H)D = ";HD;13);"(A)G = ";AG;26);"(C)H = ";CH "H, A, C OR FOR NONE ";:A$:"":(A$)13ė:"'GOOD FARING, ";NAME$;"!'": ";:A$:"":A$"N"ė:"'GOOD FARING, ";NAME$;"!'":400:430::DK$;"RUN VILLAGE.0"c ZA$"Y"70 d:"MY STANDARD PRICE IS 5000 GOLD PIECES PER INCREASED POINT BUT I WILL CHARGE YOU ONLY ";5000(CH50);" GP/POINT. ";:756::J n:"'BECAUSE OFNG WOMAN DRESSED IN BLACK SAYS, 'GOOD DAY, ";NAME$;"!":"AH, YOU'RE SURPRISED I KNOW YOUR NAME? ";:756:: F:"I ALSO KNOW THAT YOUR HARDINESS IS ";HD;",":"AGILITY IS ";AG", AND YOUR CHARISMA IS ";CH;"!"S P"MAGICALLY CHANGE AN ATTRIBUTE?' (Y/N) P340 ZNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W:" d34,0::"YOU ARE THE ";("MIGHTY FAIR ",17(SEX$"F"),7);NAME$::"YOUR ATTRIBUTES ARE:":PE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":DK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC" (34,21::X0198X06880 2X0133:Y014:WN$(1)"NONE"N1 <AC((AC2))2N2 F0,(X07):1,X0((X07)7):2,Y0:3,N:36608p] DK$(4):DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$q GOLD,BANK:AC:W14:WNAME$(W),WTY!!!""" " " " " """""`s3fL3fLhO@/ ?@`s@/ ?@`s@/ ?hO@@f`s8wpna]@/~3fL3fLhO@@@/``ՈŊx|ъ @Ŋ0p3$ d!<`O|g0|qQgw}_w  Q:"NhO@%@00@  NhO0@/@ `@3fL3fLhO@/ ?`@?@ HpA!Ŋxx|/ъ`Ŋ07`n@]ъ ?Ŋx|/ъ`sъ ?x/ъ`sъ ?/ъ`sŊx|ъs3 ?Ŋxpna/ъ3fLhO@@pC@0@H RpC `03QDŊ1 "x| ѢŊԨѢŊԨѢŊԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊx|0 /ъŊ NphO@/ 07`v@]@`3fL3fLhO@/ ?@`shO@/N ?@`s@/ ?hO@`sp?`@@/@?3fLxʕ ?ՈТ/`q`ՈТx|ʕ.ՈТ@>0@ x RC `?f3_Dc `zNhO@%@00@  NhO0@/@ HpAax|0?'?pߢʕPpAaՈ Nx|@s/ՈТ8paUʕ`ՈТx|/ `sТʕ ?Тx|/D`sТʕN ?Т/p{`sՈ@/`| ?3fL3fLhO@``@?@/@`  C `0pQDՈx|ʕԨѢŊԨѢŊԨѢŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈ%@00@ P  DNhO38@/8wpnaI@ P3fL3fLhO@/ ?@`shO@/N ?@(D`s@/ ?@p`sъN ?/ъ@1`sъ ?/ъ`w}`sŊx|ъs3 ?Ŋp8`q@]/pc% d = C `00Ng|>_g0@ NhO@%@00@  NhO`@ѢŊԨѢŊԨѢŊԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊъ`Ŋ Nx|3x/ъŊxpa]ъ P`@Ŋx|/ъ@`sŊъ ?Ŋx|/ъ(_`s@(_`s@/ ?@@1`s@/@= ?3fL3fLhO@@f`s07`n@m@> C @3 ъ``Ŋxx|?pѢŊԨѢŊx| 4:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):W: P:"THE MAN BEHIND THE COUNTER SAYS, 'I'M DON LEIF THOR ROBIN HERCULES DIEGO, AT YOUR SERVICE! I TEACH WEAPONS.'";:756::, Z:"IS YOUR INTEREST AN (A)XE (M)ACE (B)OW (SP)EAR OR (SPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":DK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":34,21: (X0198450 2X068Y09980 <280> FNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W1] DK$(4):DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE"DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$z GOLD,BANK:AC:W14:WNAME$(W),WTY"""     :X0:Y0:N:DK$;"CLOSE LOC":o&DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:90:DK$;"CLOSE":"TERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$q GOLD,BANK:AC:W14:WNAME$(W),WTYX0198(X068Y099)(X068Y034)İ540:550:DK$;"RUN PRACTICE.1"Y09X0133:Y0119:540:550:16302,0:(4);"BLOAD VILLAGE.PIC":768:16300,0:16301,0:(4);"RUN VILLAGE.0"Y099X0138190350DK$;"OPEN LOC":DK$;"WRITE LOC"$"J"X0X05:440+A$"K"X0X05:4404500t0,(X07):1,X0((X07)7):2,Y0:3,N:36608:(11)050036608:A$"I"Y0Y05A$"M"Y0Y05A$"J"X0X05A$"K"X0X050,(X07):1,X0((X07)7):2,Y0:3,N:36608F100:756:::QQQQ1:350 T=^KK(16384):KK128350}h16368,0:KKKK128:A$(KK):A$"L"X0CXY0CYFLAG1320rA$"/"A$"?"Ĺ16303,0:100|A$"I"A$"M"A$"J"A$"K"Č36608A$"I"Y0Y05:440A$"M"Y0Y05:440AOOK YOU MAY DISCOVER WEALTH.' ";:756:::FLAG1:350R@:FLAG0:XX(2(1)1)bBQQ5XX2EXX2ĺ"NOTHING HERE! OBVIOUSLY A BAD TIP. ";:756:::350J"UNDER A LOOSE PAVING BLOCK YOU FOUND A SACK OF GOLD COINS WORTH 100 GP! ";:GOLDGOLD(1)1):XX270,280,290,300V :"YOU DON'T ENOUGH GOLD FOR MY TIP! ";:756:::210x"NORTHWEST":CX83:CY19:310"SOUTHWEST":CX83:CY114:310""NORTHEAST":CX183:CY19:310,"SOUTHEAST":CX183:CY11466"CORNER OF THIS FIELD AND (L)E POPULAR. THE OWNER IS AN EXCELLENT INSTRUCTOR. ";:756:::"THE WESTERN SHOP BELONGS TO AN UNUSUAL MAN. BUT HE'S QUITE GOOD AT TEACHING ARMOUR SKILLS.' ";:756:::350GOLD(40CH)0GOLDGOLD(40CH)::"IF YOU GO TO THE ";:XX(4BE? (D)IRECTIONS OR":"(I)NFORMATION?' ";:A$:"":A$"I"A$"D"210VA$"I"260:"THE PROPRIETOR OF THE NORTHWEST SHOP COACHES SPELL CASTING. IT'S EXPENSIVE, THOUGH. ";:756::>:"THE WEAPONS PRACTICE SHOP TO THE SOUTH- WEST IS QUIT,0::34,21::340t:"THE MAN LEANS OVER THE COUNTER AND SAYS,'I GIVE GENERAL DIRECTIONS FOR FREE. ";:756::"AND FOR A SMALL CHARGE OF ";40CH;" GP, I GIVE":"INTERESTING AND USEFUL INFORMATION ";:756::XX(0)F:"SO, WHAT'LL IT DAM":W14:W1WN$(W)"NONE"180U WN$(W)"NONE"ĺ:" NO WEAPONS":180 WN$(W);20(WO%(W)0)((WO%(W))10)((WO%(W))100));WO%(W);"% ";WD%(W);" D ";WS%(W)W:23:16368,0:"(HIT ANY KEY TO CONTINUE) ";:A$::16304,0:1629715:1(WA%(W)0)((WA%(W))10)((WA%(WA))100));WA%(W);"% ";:: :A2(AC2):"ARMOUR: ";("SKIN LEATHERCHAIN PLATE ",A271,7);:ACA22ĺ" AND SHIELD";% 30);"AE=";AE;"%"::"GOLD IN HAND=";GOLD;", BANK=";BANK""::"WEAPONS";19);"CMPLX " HD=";HD;" AG=";AG;" CH=";CH: n"YOU KNOW THE FOLLOWING SPELLS--":SM0:S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)51,5);" ";:SM1 xS:SMĺ" NO SPELLS";D ::"YOUR WEAPON ABILITIES ARE--":" AXE BOW CLUB SPEAR SWORD":" ";:W