+JJJJ  / X5 lӠˠӠϠӠϠԮԠҠˠčӠ٠ϠԮLo DK$(4)nDK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME"::0:0:DK$;"CLOSE"T     ΠŠ̠͍ΠŠƠƠŠōԠŠŠƠŠӍΠŠ͠ȠҠȍΠŠ͠ȠҠȍΠŠħӠͮΠ͠ȠӠȠĠԍΠ͠ȠӠԠĠȍΠ͠ȠĠԍΠ͠ȠӠȠĠԍԠҭ٠ΠȠӍΠȯȠҍԠŠԠĠƠҮԠŠԠĠƠҮΠΠԯԠҮΠ̠ҠȠԠԍԠŠŠϠŠŮΠȯȠҍΠ̠ҠȠԠȍΠ̠ҠȠԠȮΠԭӠРĠԍΠůנҍΠΠԯԠҭĠҍΠĠҠȠԠԍΠŠҠԍΠŠԠȠӠΠӍΠȯȠҮΠȯȠҍǠԠŠРƠ̍ΠŠԠȠΠԠԍΠҠǠԠĠԍΠȠҠȠΠԠԍΠΠԯԠҍΠԭλίӠĠԍΠ̠ҠȠΠԠԍΠȯȠ̮ԠԭλůנĠȍΠΠԯԠ̍ԠŠŠϠΠōΠȯȠҮΠԭλίӠĠԍΠΠԯԠ̍Π͠ȠҠȮΠΠԯԠٍΠ̍ΠŠҠҍԠŠŠōΠΠůנ٠ȠӠΠӍΠ͠ȠҠϠŠȮ   ŠԠĠƠō ΍čÍōȍ΍č̍ԍƍԍٍҲҳōұ͍҇Πč   ՠŠŬ̠ҠήՠŠĠӠƠͭŠӠŠġՠŠ٠̠έ̠٠ΠӬԠӮՠŠΠǠԠΠŮ̠ӠРҠŠӠՠŠӠӠŠƠŠĭšՠŠԠӠĠӠŠԠǠӠĠǠծէŠĠϠì٠աՠŠ̭ǠΠծŠΧԠŠծՠŠȬǠӠՠȠŠΠӭȭſՠŠΠà̬ǠΠҠŠծՠŠˠˠĬǠԠծՠŠǠƮz #    ήӠ  ήŠή͠Ӡ ήӠ נҠ ŠĮԠŠŠĮΠŠĮà"ŠĮŠ ήӠ ήàdήΠϠ ΠŠ ŠԠĠƠŠԠźŠĭΠ?ŠĭĠ ŠĮMEALS OR THEY WILL SLOWLY "r"DIE FROM STARVATION. EVERY MOVEMENT YOU TAKE LASTS ONE THIRD OF A DAY.":DK$;"OPEN APPLE ISLAND.DATA":DK$;"OPEN EAMON.MONSTERS,L128":DK$;"OPEN EAMON.ARTIFACTS,L128":DK$;"READ APPLE ISLAND.DATA":NA,NMv MONSTERS AND EVIL MEN THAT LIVE ON THE ISLAND, BUT KNOW THAT THERE"u"ARE ALSO MENU GOOD AND TRUE HERE.":990:"A FINAL WORD OF WARNING--BE SURE THAT YOU ARE KEPT WELL SUPPLIED WITH FOOD. EVERY DAY, YOU AND YOUR FRIENDS MUST EAT THREE E 'THREERDS' (WHATEVER THEY ARE). THERE ALSO MAY BE OTHER CAVES, CAVERNS, AND BUILDINGS TO EXPLORE ON THEISLAND."G:"AS YOU EXPLORE THE ISLAND, YOU WILL NOTICE THE LARGE HARBOR TO THE EAST, AND THE MOUNTAINS TO THE NORTH-WEST. BEWARE OF IS A MAGIC SPELL THAT HAS SEALED THE CASTLE. AN INSCRIPTION INFORMS ALL WHO WANT TO KNOW THAT 'ALL WHO WISH TO ENTER THIS CASTLE MUST HAVE THREERDS.'"::"THERE IS ALSO AN OLD TEMPLE DECIATED TO"v"THE GOD PASHIA, THAT MAY HAVE A WAY OUT,OR MAY HAV "YOU ARE NOW TRAPPED ON AN ISLAND. THERE IS A WIZARD HERE WHO CAN TELEPORT YOU HOME, BUT YOUR GOLD AND WEAPONS CANNOT GO WITH YOU. THERE IS A CASTLE TO THE NORTH THAT SUPPOSEDLY HAS A PASSAGE" "HOME, BUT THERE IS A PROBLEM.":990 "THEREO A HUGE DRAGON. YOU SAW NO CHANCE OF ESCAPING. SEEING NO OTHER WAYS TO SURVIVE, YOU USED YOUR" "POWER SPELL. YOU SAW THE SCENE SHIFT BEFORE YOUR EYES, AND WHEN EVERYTHING STOPPED MOVING, YOU FOUND YOURSELF IN A VERY CRUDE MAIN HALL.":N MASTER DISKETTE'.": dDK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"READ APPLE ISLAND.LAST NAME":A$:DK$;"CLOSE"::14::"APPLE ISLAND":::: nA$N$ĺ"WELCOME BACK TO THE ISLAND!":1000f x"YOU WERE IN THE INFAMOUS DARK CAVERNS WHEN YOU RAN INT%(4),WA%(1),WA%(2),WA%(3),WA%(4),WA%(5),AE,SEX$,GOLD,BANK,AC:W14:WNAME$(W),WT%(W),WO%(W),WD%(W),WS%(W)::DK$;"CLOSE" (100 2(222)5ĺDK$;"CLOSE" <:5:"I'M SORRY, BUT YOU MUST ONLY ENTER THIS PROGRAM FROM THE MAIN HALL OF THE":" 'EAMOM A NEW EAMON ADVENTURE=-> APPLE ISLAND <-C\ BY DONALD BROWNb} START-UP PROGRAM 50A(12)DK$(4):DK$;"OPEN FRESH MEAT":DK$;"READ FRESH MEAT":REC,N$y HD,AG,CH,SA%(1),SA%(2),SA%(3),SA      AN EAMON MASTER DISKETTE WHICH MUST BE BOOTED UP ON.":A);"ADVENTURE #29 FOR"::7);"THE WONDERFUL WORLD OF EAMON"::"----------------------------------------" ("THE EAMON FANTASY GAMING SYSTEM WAS DEVELOPED BY DONALD BROWN":A$;" WAS":" DEVELOPED BY ";A2$9 2:"TO USE THIS DISKETTE REQUIRES;=A$"THE LOST ISLAND OF APPLE":NUM29:A2$"DONALD BROWN"G ::"*****************************************";38);"**";((38(A$))2));A$;((38(A$))2)((A$)2((A$)2)));"**";38);"*****************************************":k 12   '% (4);"RUN EAMON ADVENTURE #29"9"READ EAMON.DESC,R";ROOM:A$:DK$:A$::V%(ROOM)1n ROOM47F1ĺ:"YOU SEE A SECRET DOOR TO THE NORTH.": 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: 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 ARE ":" ";A$:2 V%(ROOM)ĺDK$;= A NEW EAMON ADVENTURE=-> APPLE ISLAND <-C\ BY DONALD BROWNb|LAST UPDATE: 3/27/91 EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012  2DK$(4):1000 d///MAIN LOOP. FIRST GIVE ROOM                    (A14:"NONE":0:0:0:0:DK$;"CLOSE"L2DK$;"RUN APPLE ISLAND-ISLAND"D|DK$;"OPEN EAMON.MONSTERS,L128":DK$;"WRITE EAMON.MONSTERS,R0":N$:HD:AG:100:100:1:0:0:HS:WN:OD:DI:SI:DK$DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT":REC:N$:HD:AG:CH:A14:SA%(A)::A15:WA%(A)::AE:SEX$:0:BANK:AC)24,1225,1226,1227,1228*EA0:HS0:1230?EA5:HS1:1230UEA10:HS1:1230kEA15:HS2:1230EA20:HS2:1230EA25:HS3:1230EA60:HS5:1230EA65:HS6:1230EAEAAE:EA0EA0ODEA2AGCOMPWA%(WT)WNAROOM:TYPE1ROOM1ĺ" ";A$:F11[A:DK$:F10ĺ" -> NO WEAPONS <-"::WN1:1300"ENTER WEAPON NAME TO READY ";W$A1NA:DK$;"READ EAMON.ARTIFACTS,R";A:A$:A$W$Ă:1160A1,TYPE,A1,ROOM,COMP,WT,DI,SIAC11221,1222,1223,12OLD:FOOD:DK$;"CLOSE"t~DK$;"OPEN APPLE ISLAND.LOCATION":DK$;"WRITE APPLE ISLAND.LOCATION":79:84:DK$;"CLOSE"DK$;"OPEN EAMON.ARTIFACTS,L128":F10:3:958:"YOUR WEAPONS ARE--"::F10$A1NA:DK$;"READ EAMON.ARTIFACTS,R";A:A$,A1,TYPE,A1,2 GOLD PIECES EACH. HOW MANY DO YOU WANT TO BUY":V(37)`V1:" (0-";(GOLD2);:") ";A$:A(A$):A0AGOLD2(A)A$A(A)1120jGOLDGOLD2A:FOODFOODAtDK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME":N$:GS,R";A:A$,A1,A1,A1,ROOM:DK$:ROOM1ĺ" ";A$F.A:DK$;"CLOSE"8" ";GOLD;" GOLD PIECES":" ";FOOD;" FOOD PACKS":::990LGOLD21140<V"YOU HAVE ";FOOD;" FOOD PACKS":" AND ";GOLD;" GOLD PIECES":::"YOU CAN BUY FOOD PACKS AT RS,L128":M1NM:DK$;"READ EAMON.MONSTERS,R";M:M$,A,A,A,A,ROOM:DK$dROOM1ĺ" ";M$:F11M:DK$;"CLOSE":F1ĺ" -> NO FRIENDS YET <-"9902$"YOU ARE CARRYING--"::DK$;"OPEN EAMON.ARTIFACTS,L128":A1NA:DK$;"READ EAMON.ARTIFACTDK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"READ APPLE ISLAND.LAST NAME":A$,G2,FOOD:DK$;"CLOSE"GOLDGOLDG2:"YOU HAVE THE FOLLOWING FRIENDS--"::DK$;"OPEN EAMON.DESC":DK$;"READ EAMON.DESC":A,NA,A,NM:DK$;"CLOSE"F10EDK$;"OPEN EAMON.MONSTEDK$;"WRITE EAMON.ARTIFACTS,R";NA4A:WNAME$(A):0:2:3:(WNAME$(A)"NONE"):WO%(A):WT%(A):WD%(A):WS%(A)::DK$;"CLOSE"FOOD0A14:WNAME$(A)"NONE":110023::"PRESS ANY KEY TO CONTINUE";::16368,0:A$:2::958:^A11NA:DK$;"READ APPLE ISLAND.DATA":A$:A218:A(A2)::DK$;"WRITE EAMON.ARTIFACTS,R";A1:A$:A218:A(A2):A2,A1A11NM:DK$;"READ APPLE ISLAND.DATA":A$:A2112:A(A2)::DK$;"WRITE EAMON.MONSTERS,R";A1:A$:A2112:A(A2):A2,A1}A14:WO%(W)AD%(WP%(W),5):WD%(W)AD%(WP%(W),7):WS%(W)AD%(WP%(W),8) W::5:"AS YOU DELIVER YOUR TREASURES TO SAM":"SLICKER, THE LOCAL BUYER FOR SUCH":"THINGS, HE EXAMINES YOUR GOODS AND":"PAYS YOU "; TP0:A1NA:AD%(A,4)12350 AD%(A,2)04);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>W14:WP%(W)WT%(W)AD%(WP%(W),6):%(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 LEGAL LIMIT."::"YOUR WEAPONS ARE--"QW1W21:0)2MD%(0,2) ROOM482600DK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME"::0:0:DK$;"CLOSE":DK$;"DELETE FRESH MEAT"WN$(12),WP%(12)W14:WN$(W)"NONE"::W21:A1NA:AD%(A,2)1AD%(A,4)1WN$(W2)AN$(A):WP,SPEED,SMILE,WAVE,SAY,READY-OPEN,SWALLOWD///DONE WITH GAMEDK$;"CLOSE":DIEĺDK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME"::0:0:DK$;"CLOSE":DK$;"DELETE FRESH MEAT": SPDMD%(0,2)MD%(0,2)2:MD%(0,10)MD%(0,11dDK$;"OPEN EAMON.DESC,L256":DK$;"OPEN EAMON.ROOM NAMES,L64":DK$;"OPEN EAMON.ROOMS,L64"ml100uv35NORTH,N,SOUTH,S,EAST,E,WEST,W,UP,U,DOWN,D,GET,TAKE,DROP,PUT,LOOK,EXAMINE,ATTACK,FLEE,RETREAT,ESCAPE,GIVE,INVENTORY,I,BLAST,HEAL,POWER10:A23MD%(0,8)MD%(0,8)2:EAEA30FjNC:C$(NC):C1NC:C$(C):itS14:S2%(S)SA%(S)::V%(96)~DK$;"OPEN EAMON.DUNGEON":DK$;"READ EAMON.DUNGEON":ROOM:DK$;"CLOSE EAMON.DUNGEON"M0NM:MD%(M,5)1MD%(M,5)ROOM:MD%(M,14)3:MD%(M,15)%(A)::A15:WA%(A)::AE,SEX$,GOLD,BANK,ACDK$;"CLOSE":DK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"READ APPLE ISLAND.LAST NAME":A$,GOLD,FOOD:DK$;"CLOSE"LEA0:MD%(0,8)0:A2(AC2):A22ACMD%(0,8)1:EA5%VA2MD%(0,8)MD%(0,8)A2:EAEAA2ʭAD%(A,2)1āA258:AD%(A,A2):A2A:DK$;"OPEN EAMON.MONSTERS,L128":MN$(NM),MD%(NM,15):A0NM: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:A$,A,A,CH:A14:SAĂM 100*///INITIALIZE DATA|DK$;"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:M:TD%(3)MD%(0,1)DF0:7500:490rrM21NM: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:M2:490M2NBTL(FD%(1)TD%(1)):NBTL0EJM2MD%(M,14)(MD%(M,14)2):MRFD%(M2)TD%(M2)100(41(1)20)TMD%(M,4)MRĺ:MN$(M);" FLEES OUT AN EXIT."::8500:MD%(M,5)R2:M2MD%(M,14):TD%(M2)TD%(M2)MD%(M,1):FD%(M2)FD%(M2)MD%(M,13):490YMD%(M,14)2490^MD%(M,14)3390#hOF0,3000,3000,3000,3000,3000,3000,3000,3000,3000,3000,4000,4000,5000,5000,6000,6000,7000,8000,8000,8000,9000,10000,10000,11000,12000,13000,14000,15000,15000,16000,17000,18000,19000,///COMMANDS RETURN TO HERE6NBTL500@M1NM:MD%(M,5)ROOM49A$):(A$,A,1)" "Ă3 V$(A$,A1):S$(A$,A1)T (S$,1)" "S$(S$,2):260 C1NC:C$(C)V$C$(C)S$Ă::"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);20(C$(C)));::::210 C$(C)S$S$V$:V$C$(C)"C3000,300%(0,1) ROOM22ROOM34NTNT1:NT4ĺ:"YOU ARE HAVING GREAT TROUBLE HOLDING YOUR BREATH!"::NT0ĺ"YOU JUST DROWNED.":DIE1:2000 :" YOUR COMMAND?";A$ (A$,1)" "A$(A$,2):220 A$""A$CZ$:(37):17:A$ CZ$A$:A2(; M:A1NZ: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 ROOM22NT2MD%(0,1)NT2MDAD%(MD%(0,9),6):WA%(W2)WA%(W2)22*EAAE300U*(100(1)1)MD%(0,10)7360k*A2:EAAE1A1*AEAEA:MD%(0,10)MD%(0,10)A*MD%(DF,14)1DF0300*MD%(DF,3)MD%(DF,3)2:M1NM:MD%(M,5)ROOMMD%(M,14)1MD%(M,14)0 +M:R3ROOM49001)lS$"WORSHIPPER"S$"WORSHIPER"7280U)vM35:MD%(M,5)ROOMS$MN$(M)\)M)pM1NM:S$MN$(M)MD%(M,5)ROOMĂ::"ATTACK WHO?"::100)zMD%(0,9)1ĺ:"YOU HAVE NO WEAPON READY!"::100)OF0:DFM:7500:HIT7360!*INCW2ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$::A$::LK1V(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:ROOM47F11(300(X///ATTACK COMMAND)bMS YOU ARE CARRYING, AND THEY ALL FALL TO THE GROUND."::5100o'MD%(0,9)0ĭAD%(MD%(0,9),4)1MD%(0,9)1x'300'A1NA:AD%(A,4)1ĺAN$(A);" DROPPED.":AD%(A,4)ROOM'A:WT0:5060'p///LOOK COMMANDG(LK0:A1NZ:AN$(A)S$(AD%(A,4)4900 &. &///DROP COMMAND3&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:AN$(A);" DROPPED.":>'WT10MD%(0,1)ĺ"YOU SUDDENLY FIND YOU CANNOT CARRY ALL OF THE ITEMD%(0,1)ĺAN$(A);" IS TOO HEAVY":4190X%TAN$(A)" TAKEN.":AD%(A,4)1:WTWTAD%(A,3)e%^::300%h///INSERT HERE SPECIAL EFFECTS OF PICKING SOMETHING UP%r%$///ROUTINE TO GET S$ IF NOT PREVIOUSLY SPECIFIED.&)S$""ĺ:C$(C);" WHAT";:S$:OOMĂ::"I SEE NO ";S$;" HERE!"::100o$"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)10(TD%(1)0): #///GET COMMAND*#4900=#S$"ALL"4160Z#S$"BONE"S$"OLD BONE"{#S$"BIRD"S$"CRYSTAL BIRD"#S$"BALL"S$"CRYSTAL BALL"#S$"MACE"4120#A24:AD%(A,4)ROOMS$AN$(A)#A'$A1NA:AN$(A)S$AD%(A,4)RD%(M,5)ROOM:3670+".MD%(M,5)ROOM3900?"8MD%(M,14)3670n"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(R2):3500:! :"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100T! R3ROOM:ROOMR2:3600]!100!///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))MNDLIES ABOUT!"::100C D16:(V$,1)("NSEWUD",D,1)Ăy DK$;"READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$ R203500 ///SPECIAL MOVES R299ĺ:"YOU SUCCESSFULLY RIDE OFF INTO THE":" SUNSET.":2000 R23490 ! F1R2NK:AC:A14:"NONE":0:0:0:0::DK$;"CLOSE"Z DK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME":MN$(0):GOLD:FOOD:DK$;"CLOSE"T DK$;"RUN APPLE ISLAND-ISLAND" ///MOVE COMMAND NBTLĺ:"YOU CAN'T DO THAT WITH UNFRIE"OPEN EAMON.MONSTERS,L128":A0NM:DK$;"WRITE EAMON.MONSTERS,R";A:MN$(A):A2112:MD%(A,A2):A2,A:DK$;"CLOSE"F DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT":REC:MN$(0):MD%(0,1):MD%(0,2):CH:A14:SA%(A):0P A15:WA%(A)::AE:SEX$:0:BAHE ADVENTURER":MN$(0):REC:DK$;"CLOSE"G DK$;"RUN MAIN HALL,S6,D1"x( M0NM:MD%(M,14)3MD%(M,5)0MD%(M,5)12 :DK$;"OPEN EAMON.ARTIFACTS,L128":A1NA:DK$;"WRITE EAMON.ARTIFACTS,R";A:AN$(A):A218:AD%(A,A2):A2,A:DK$;"CLOSE"q< DK$; 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):( DK$;"OPEN THE ADVENTURER":DK$;"WRITE TAD%(A,1)AD%(A,1)CH10+$ TPTPAD%(A,1)H. A:TP;" GOLD PIECES.":8 GOLDGOLDTP::"(HIT ANY KEY TO CONTINUE) ";:A$: 2500 :5:"(INSERT EAMON MASTER DISKETTE, THEN":" HIT THE 'C' KEY) ";:16368,0 A$:A$"C"2520 A$s YOUR GOLD BAG GROWING WITH ";A:" NEW GOLD PIECES!"::300M:3RR5013300X:312020i:3RR7013400t:314020:X4RR9113500;b4:"YOU SEE THE WORLD SHIFT AROUND YOU, AND YOU FIND YOURSELF IN THE MIDDLE OF THE OCEAN, WITH NO LAND AROUND YOU."13)09/DF0:7650:300_92///POWER SPELL--RE-WRITE THIS SECTION FOR YOUR OWN SPECIAL PLOTSx92S4:11500:SUC30092RR(100(1)1):RR151310092:"NOTHING HAPPENS THAT YOU CAN SEE."::3009,3RR3013200<:63A(6(1)1)100::"YOU FEELG TO CAST THIS SPELL OVERLOADS YOUR BRAIN AND YOU FORGET IT COMPLETELY."::SA%(S)0:r8.///HEAL SPELL8.S2:11500:SUC3008.:MD%(0,13)ĺ"SOME OF YOUR WOUNDS SEEM TO CLEAR UP.":9.MD%(0,13)MD%(0,13)(10(1)1):MD%(0,13)0MD%(0,0:7635::300c7,SUC0:SA%(S)RL(100(1)1):SUC(((RLS2%(S))(RL5))(RL95)):RL100116007,SUCĺ:"NOTHING HAPPENED.":7-RL(100(1)1):RLS2%(S)S2%(S)S2%(S)2:SA%(S)SA%(S)27 -S2%(S)S2%(S)27-_8P-:"THE STRAIN OF ATTEMPTIN20(AMD%(0,9))):A0A01:A015ĺ:"(HIT ANY KEY TO CONTINUE)";:A$::A00V6$':300j6*///BLAST SPELLt6+49006,M1NM:S$MN$(M)MD%(M,5)ROOMĂ::"YOU CAN'T BLAST ";S$;"!"::1006,S1:11500:SUC3007,:"DIRECT HIT!"::S6:D1:DFM:AREN'T CARRYING THAT MUCH GOLD OF YOUR OWN!"::3005&%GOLD(GOLD(S$)):MD%(M,14)0:MD%(M,3)MD%(M,3)(1(S$)100):91205'///INVENTORY COMMANDK6':"YOU ARE CARRYING THE FOLLOWING--":A00:A1NA:AD%(A,4)1ĺ" ";AN$(A);(" (READY WEAPON)",1 ";S$;"!"::100,4#AMD%(0,9)MD%(0,9)1u4#:"OKAY.":AD%(A,4)0:MD%(M,14)0:MD%(M,3)MD%(M,3)(1AD%(A,1)100)4#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)4#R3ROOM:3600:505075%(S$)GOLDĺ:"YOU AS$:902023P#:"NOBODY HERE BY THAT NAME!"::100K3Z#S$(S$,(MN$(M))1)m3d#(S$,1)" "S$(S$,2):90603i#(S$)095003n#A1NA:(S$,(AN$(A)))AN$(A)AD%(A,4)190953x#:A22A23::"WHAT TO GIVE? ";S$:90654#:"YOU AREN'T CARRYING AO FLEE FROM!"::100$2*!8500:3500]24!DK$;"READ EAMON.ROOMS,R";ROOM:D16:DR%(D)::DK$}2>!R2DR%(6(1)1):R2185102H!2(#///GIVE COMMAND22#A212<#M1NM:(S$,(MN$(M)))MN$(M)MD%(M,5)ROOM90503F#:A21A22::"WHO TO GIVE TO? ";" IS AT DEATH'S DOOR,":" KNOCKING LOUDLY.":1MN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)MD%(DF,1)MD%(DF,13)D2:MD%(DF,5)0:MD%(DF,9)0AD%(MD%(DF,9),4)ROOM1DF0DIE1:20001:1@///FLEE COMMAND2JNBTLĺ:"THERE'S NOTHING TD2:MD%(DF,13)MD%(DF,1)7700A0AMD%(DF,14):FD%(A)FD%(A)D20:MN$(DF);:(MD%(DF,13)5MD%(DF,1)1)7655,7660,7665,7670,76750" IS STILL IN GOOD":" SHAPE.":0" IS HURTING.":0" IS IN PAIN.":0" IS VERY BADLY INJURED.":/1"A CRITICAL HIT!":R2(100(1)1):R251A0:7635N/R286S1.5S:7635e/R296D2D:7635}/R2100D3D:7635/7700/D20:D31D:D2D2(S(1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::0MD%(DF,13)MD%(DF,13)EN WEAPON HURTS USER!"'.~FR1007560U.DMD%(OF,11):SMD%(OF,12):DFOF:A1:7635.DMD%(OF,11)2:SMD%(OF,12):DFOF:A0:7635.INC((100(1)1)MD%(OF,10)):MD%(OF,10)MD%(OF,10)2INC.DMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":76355/%(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::q-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" BROKb,QMN$(OF);" ATTACKS ";MN$(DF):" --";:RL(100(1)1):HIT0:(RL5RLMD%(OF,10))RL96HIT1p,VHIT7600,`RL97ĺ"A MISS.":,e"A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED."::a-jFR76ĺ" WEAPON DROPPED!":AD:3600:3003+///MONSTER TRIES TO PICK UP WEAPONG+MD%(OF,10)0ır+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)17400D%(17,2)1)q DK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"READ APPLE ISLAND.LAST NAME":A$,GOLD,FOOD:DK$;"CLOSE" 21:958:FOOD;" FOOD PACKS LEFT." "PRESS KEY FOR DIRECTION TO MOVE":" (N,S,E,W) "; A$:D14:A$("NSEW",D,1)Ă:1010 (NZ,4)OD:MD%(NZ,5)D:MD%(NZ,6)S R:DK$;"CLOSE":AN$(NA),AD%(NA,2):DK$;"OPEN EAMON.ARTIFACTS,L128":A1NA:DK$;"READ EAMON.ARTIFACTS,R";A:AN$(A),AD%(A,1),A1,A1,AD%(A,2):A:DK$;"CLOSE":M1NZ:MN$(M)"SIDNEY"Ă:CE0:250 CE(AD%(12,2)1)(AD EAMON.DESC":A,NA,A,NM:DK$:MN$(NM),MD%(NM,7):DK$;"OPEN EAMON.MONSTERS,L128":NZ1:R0NM! DK$;"READ EAMON.MONSTERS,R";R:M$,HD,AG,FR,CO,ROOM,WT,DO,AR,WE,OD,D,S:DK$:ROOM1NZNZ1:MN$(NZ)M$:MD%(NZ,0)R:MD%(NZ,1)HD:MD%(NZ,2)0:MD%(NZ,3)AR:MD% 17408:DK$(4):::DK$;"BLOAD APPLE ISLAND.PIC":DK$;"BLOAD APPLE ISLAND.SHAPE,A$4000":232,2:233,64:DK$;"OPEN APPLE ISLAND.LOCATION":DK$;"READ APPLE ISLAND.LOCATION":XO:YO:DK$;"CLOSE":1:0:K4:1XO,YO^ :DK$;"OPEN EAMON.DESC":DK$;"REA       0,1) EL300MON ADVENTURE=-> APPLE ISLAND <-C\ BY DONALD BROWNb|LAST UPDATE: 3/27/91 EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012  2DK$(4):1000 d///MAIN LOOP. FIRST GIVE ROOM.":>DJLWA%(1)5:WA%(2)10:WA%(3)20:WA%(4)10:WA%(5)0:AE0TDTLAMD%(0,9):17980DL(S$"AIR"S$"BOWL")AD%(15,4)1ĺ:"IT IS TOO LARGE TO SWALLOW."::300EL"YOU GET A FULL BREATHE OF AIR."::AD%(15,4)0:AD%(16,4)1:NT2MD%(0,1)NT2MD%(ATER TASTES CLEAR."::300NC,LS$"AMNESIUM"S$"BOTTLE"S$"POTION"19600C6LAD%(22,4)1ĺ"YOU AREN'T CARRYING IT!"::100D@L:"YOU FORGET EVERYTHING YOU EVER LEARNED ABOUT WEAPONRY AND ARMOUR EXPERIENCE."::"YOU ALSO DROP YOUR READY WEAPON143B`J:AN$(A);" SWALLOWED."::NT100:AD%(A,4)0:iBjJROOM23ROOM33ĺ"YOU NOTICE NO EFFECTS."::300BtJ"YOU FIND YOU HAVE NO TROUBLE BREATHING WATER."::300BJS$"WATER"19500BJROOM22ROOM33ĺ"NO WATER TO SWALLOW."::300CJ"THE W300;ANH"THERE'S SOMETHING INSIDE!"::AD%(20,4)ROOM:300KA8J///SWALLOWUA=J4900ABJ(S$,4)"PILL"(S$,5)"PILSS"19100ALJAD%(14,4)1AD%(7,4)1ĺ:"YOU AREN'T CARRYING ANY PILLS."::100BVJA7:((S$,1)"W"AD%(14,4)1)AD%(7,4)1Aĺ:"IT WILL NOT OPEN.":300d@FAD%(18,4)ROOMAD%(19,4)ROOMĺ:"NO CHEST IN THIS ROOM!"::300~@FAD%(19,4)ROOM18500@F"YOU SHOULDN'T HAVE DONE THAT!":@FAD%(18,4)0:MD%(14,5)ROOM:R3ROOM:3600@F300ADHAD%(20,4)0ĺ"IT IS EMPTY!"::)2MD%(0,2):MD%(0,9)A:MD%(0,11)AD%(A,7):MD%(0,12)AD%(A,8)R?AFV$"READY"300k?FF:"READIED."::300x?PF///OPEN?ZF4900?dFS$"DOOR"ĺ"THE DOOR WILL OPEN AS YOU GO THROUGH IT.":100?nFS$"BOTTLE"ĺ"THE BOTTLE IS OPEN.":100@xFS$"CHEST""SPEED"14000->B:"OKAY, '";S$;"'"::300E>hB///READY A WEAPON.O>rB4900>|BA1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING IT!"::100>BAD%(A,2)2ĺ:"THAT ISN'T A WEAPON!"::100=?///SAY COMMAND=>4900=>S$"BLAST"V$S$:S$"":11000=>S$"HEAL"12000=>S$"POWER"13000>>S$D SPELL <6S3:11500:SUC300]<6SPDMD%(0,10)MD%(0,10)2MD%(0,2):MD%(0,2)2MD%(0,2)<6SPDSPD(25(1)10)::"YOU CAN FEEL THE NEW AGILITY FLOWING":" THROUGH YOU!"::300<:///SMILE COMMAND<::M1NM:MD%(M,5)ROOM15100=:MD%(M,+;l4:(1).1ĺ"YOU DROWN."::DIE1:2000y;v4"A SHIP FINDS YOU SWIMMING, AND RETURNS YOU TO YOUR OLD MAIN HALL.":;4"(PRESS ANY KEY TO CONTINUE) ";:16368,0:A$:;4ROOM48:2000;4:"ALL OF YOUR FOOD VANISHES!"::FOOD0:300<6///SPEEA1MD%(M,5):HPHP(MD%(M,6)(1)1):A:HP0āA1500::5500dd" ";N$;" DEAD!":7500:8000q|M:5050p(1).018000S4:7000:21:958:"YOU SEE SOME MERCHANTS. THEY WILL SELL FOOD PACKS FOR 10 GPS.":GOLD10ĺ"YOU CAN'T AFFORD ANYL128":DK$;"WRITE EAMON.MONSTERS,R";MD%(M,0):MN$(M):A112:0:A:M2MNZ:MN$(M2)MN$(M21):A06:MD%(M2,A)MD%(M21,A):A,M2:M08100PM0NZ:21:958:MN$(M);" SWINGS AT ";N$:(1)100MD%(M,4)ĺ" --A MISS!":A1500:A:5500@Z" --A HIT!":A$:A$"R"ĕSX,YO:8000\21:958:(1).5ĺ"THE ";N$;" MISSED!":A1500::5200M((NZ1)(1)):"THE ";N$;" HIT ";MN$(M):MD%(M,2)MD%(M,2)(4(1)1):MD%(M,2)MD%(M,1)āA1500::5200MN$(M);" IS DEAD!":DK$;"OPEN EAMON.MONSTERS,500:8000(1).046000S(3(1)5):HD2(S5)3(S7):HP0:A1HD:HPHP(8(1)1):A:N$("BEARWOLFDRAGON",(S5)41,42(S7)):M0NZ:MD%(M,2)0::700021:958:"YOU SEE A ";N$:" RUN OR FIGHT (R/F)? ";A$:A$"R"A$"F"5060OD08000oS3:7000:21:958:"YOU HAVE FOUND A HERMIT WHO NEEDS FOOD. WILL YOU GIVE HIM A PACK (Y/N)? ";A$:A$"Y"A$"N"4040A$:A$"N"ĕSX,YO:8000 FOODFOOD1:21:958:"THE HERMIT SAYS 'REMEMBER, ONE SPACE CAN MAKE TWO.'":7S AND YOU":" GET 1000 GP."::"PRESS ANY KEY TO CONTINUE";::16368,0:A$:& GOLDGOLD1000:DK$;"OPEN EAMON.MONSTERS,L128":M1NZ:DK$;"WRITE EAMON.MONSTERS,R";MD%(M,0):MN$(M):A112:0:A,M:DK$;"CLOSE":NZ0:7500:8000(1).035000 FO0:80004 NZ0ĺ"THE MEN HURRY AWAY.":7500:8000 "THE MEN ARE SLAVERS, AND THEY WISH TO BUY YOUR COMPANIONS. WILL YOU SELL THEM (Y/N)? "; A$:A$"Y"A$"N"3080 :A$"N"İ7500:8000M 21:958:"THE SLAVERS TAKE YOUR FRIEND(1).024000s S2:7000:21:958:"YOU ENCOUNTER THREE MEN IN ARMOUR.":" WILL YOU ATTACK, RUN, OR WATCH? "; A$:A$"A"A$"R"A$"W"3030 :21:958:A$"A"ĺ"THE MEN RUN AWAY.":7500:8000 A$"R"ĺ"YOU AND YOUR MEN GET AWAY":750"N"3000 ROOM22:21403 XO35YO603000v A$"A CAVE LEADING SOUTH INTO THE MOUNTAIN":2900:I$"N"3000 ROOM8:2140T 21:958:"YOU HAVE ARRIVED AT":A$:" DO YOU WANT TO ENTER (Y/N)? ";^ I$:I$"Y"I$"N"2910h I$: LOCATION":XO:YO:DK$;"CLOSE"kDK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME":MN$(0):GOLD:FOOD:DK$;"CLOSE"::DK$;"RUN APPLE ISLAND-DUNGEON":3000XO127YO802500  A$"A WATER-FILLED HOLE IN THE GROUND":2900:I$ROOM34:2140,4XO107YO1162300mHA$"THE ENTRANCE TO THE TEMPLE OF PASHIA":2900:I$"N"3000xRROOM1\DK$;"OPEN EAMON.DUNGEON":DK$;"WRITE EAMON.DUNGEON":ROOM:DK$;"CLOSE":DK$;"OPEN APPLE ISLAND.LOCATION":DK$;"WRITE APPLE ISLAND.:DK$;"RUN MAIN HALL,S6,D1"3XO79YO282100@CE204021:958:"YOU ARE AT THE ENTRANCE TO THE CASTLE, BUT YOU CANNOT ENTER."::"(PRESS ANY KEY TO CONTINUE) ";:16368,0:A$::1000A$"THE ENTRANCE TO THE CASTLE":2900:I$"N"3000;"OPEN CHARACTERS,L150,S6,D1":DK$;"WRITE CHARACTERS,R";REC:N$:HD:AG:CH:A14:SA%(A)::A15:WA%(A)::AE:SEX$:0:BANK:AC:A14:"NONE":0:0:0:0:A:DK$;"CLOSE"DK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":N$:REC:DK$;"CLOSE"A15:WA%(A)::AE,SEX$,A,BANK,AC:DK$;"CLOSE":DK$;"DELETE FRESH MEAT":DK$;"OPEN APPLE ISLAND.LAST NAME":N$:GOLD:FOOD:DK$;"CLOSE"1190::5:"INSERT EAMON MASTER DISKETTE, THEN PRESS THE 'C' KEY ";A$:A$"C"1210DK$)(43Y)(43Y)1000> `Y1254(X80)(Y120)(Y120)1000p j1XO,YO:1X,Y:XOX:YOY:XO79YO842000 A$"THE ENTRANCE TO THE MAIN HALL":2900:I$"N"3000DK$;"OPEN FRESH MEAT":DK$;"READ FRESH MEAT":REC,N$,HD,AG,CH:A14:SA%(A)::A$:D1030,1040,1050,10601 XXO:YYOK:1070G XXO:YYOK:1070] XXOK:YYO:1070m $XXOK:YYO .R((X80)2(Y80)2):R671000 8R((X170)2(Y80)2):R421000 B(X80)6Y40Y151130 LY130Y331000 VY384(X80          ͍Íō΍čٍԍƍč̍ȍ΍ōōčōұҲҳԍōˍō̠̍Ҡ΍ԍԠčōōĠō̠čĠٍŠ̠̍Ơҍ٠̍ҍԍԍӍűŲųˍҍŠ̍Ġҍōč  STERS,L128":DK$;"WRITE EAMON.MONSTERS,R";MD%(M,0):MN$(M):A112:0:A:NZNZ1:MNZM08055nM08200DK$;"DELETE FRESH MEAT":DK$;"OPEN APPLE ISLAND.LAST NAME":DK$;"WRITE APPLE ISLAND.LAST NAME"::0:0:DK$;"CLOSE":: M:1000 h1000rM0MZ>wMD%(M,7)MD%(M,7)1:MD%(M,7)08200|21:958:MN$(M);" JUST DIED FROM STARVATION.":24::"PRESS ANY KEY TO CONTINUE";::16368,0:A$::`M2MNZ:MN$(M2)MN$(M21):A06:MD%(M2,A)MD%(M21,A):A,M:DK$;"OPEN EAMON.MONA10:FOODFOODA:SX,YO:8000%X>bXXO25:X5XXO17LlSX,YO:RLV24::"PRESS ANY KEY TO CONTINUE";::16368,0:A$:::SX,YO:@FOOD08050TFOODFOODNZ1:FOOD0FOOD0^FOOD0āM0NZ:MD%(M,7)MD%(M,1)(3(1)1):.":7500:8000."WANT TO BUY ANY (Y/N)? ";LA$:A$"Y"A$"N"6050jA$:A$"N"ĕSX,YO:800021:958:"ENTER THE NUMBER OF FOOD PACKAGES TO BUY (0-";(GOLD10);:") ";A$:A(A$):A0AGOLD100A(A)(A)A$6070GOLDGOLDU*@1T*Uj}*U*U*U*U*U*U*U*U*T*Uj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*l6(U*U*[*U*U*U*U*U*U*U*U*U(U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U *U*U*U*(((U*U*U *U*UV*)U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U* 3 U*U*U*(U*U*U*U*Uj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*  ( (U@a`P/_RUj:+%+]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U*(U8`@*Uj:+[jJ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*T T PPT U fg`@*U*j*[JZ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UIU*U*U*U*U*@@UL8P*URU[-%+}+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*A1c@9P*Uj*U*U*U*U*U*U*U*U*|?T*U*u*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*8g (U*U*[*U*U*U*U*U*U*U*U*U U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**U*U*U*U*U*U *U*TU*%U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UL3@1U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*UA`P_RU***%+]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U*U`@*UJ)[Jj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*ԊԊЂЂԊU l0c@@*U*++[RJ*U*U*U*U*U*U*U*U*U*U*U*UP*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UIU*U*U*U*U*U XP*URT2[$-+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*E9s[1FP*Uj*U*U*U*U*U*U*U*U*|?T*U*u*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*0CL U*U*[*U*U*U*U*U*U*U*U*U U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U* P@*U*U*U*U*U*U *Uj6U*5*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UXaFq9U*U*U*(((U*U*U* U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*U@`PU*U*U*]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U* (U@@*UJV-[Zi*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U 8`A @*U**-[Tn*U*U*U*U*U*U*U*U*P*U*U*P*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*@T TP@UpP*UZT&[6-*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*6N9fP*Ujw*U*U*U*U*U*U*U*U*pP*Uj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*`AX U*U*[*U*U*U*U*U*U*U*U*U U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**P*@*U*U*U*U*U*U c*U**U*U$*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Up@C9 U*U*U*U*U*U* U*U*[*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*Ucc`P{U*U*U*}*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U*U0 P*UZV$[)*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U* U*U*U*U*U*U*U*U*U*U*U*U `*U*.U*U$*U*U*U*U*U*U*U*U**U*U*@*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*ԊԂЂU0P*UZV,[)*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*`p U*U*U*U*U*U*U*U*U*U*U*UU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U @*Uj4U*5*U*U*U*U*U*U*U*U* U*U@*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U0@ U*U*U*U*U*U* U*U*[*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*lT*Ujw*((U*U*U*`P*Uj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*(U0 0P*UZT6[6-*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*P*P*U*  (( U s@*U*+-[Tn*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*@@Uc @*UJV)[Zi*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*@T T PP@UFss@P+U*U*U*]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*@0U*U*U*U*U*U*U*U*U*U*U*UU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U `*U*UU*%U*U*U*U*U*U*U*U*U*T**U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U  U*U*U*U*U*U*(U*U*[*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U* 8T*Uju*U*U*U*@P*UjU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*U0`P*URT[$-+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*UP*U*U F7@*U*++[RJ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Us@*UJ+[Jj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U*ԊԊЂЂUcf66GP+]RU***%+]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U* U*Uju*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U `F*U*UV*)U*U*U*U*U*U*U*U*U P**U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U(U*U*U* U*U*U*(U*U*[*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*T*U*U*U*U*U*T*UjU*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U* U@1`6L`P*URUZ[-%+}+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U*U f@*U*j*[JZ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*@@U60@*Uj:*[jJ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*IP*U*U*U*U*@@UslnP+]RUj:+%+]*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*T*Uj}*U*U*U*U*U*U*U*U*T*Uj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U @ f0 (U*U*[*U*U*U*U*U*U*U*U*U (U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U (U*U*U*U*U*U (U*U*[*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*T*U*U*U*U*U*T*Uj*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*>P*U*U*U*U*U@9@3N`P/]RUJ)%+}+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*P*U*U*U*U*U l 0@*U***[jJ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U F`@*U*j*[jJ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*UIU*U*U*U*U*U68  |P+]RUJ)%+}+U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*ōˍԍԍ٠̍ҍŠ̠̍Ơҍ̠čĠٍčĠōĠҍōҍŠ̍ųˍűŲӍ     ---%???? !9',5'$666.,*---%???,--%???,--%??? ----??')-- ? $$'%'%+-66%$$??,-%??,-%??,-- %!#??'$$?6?76;.>61----??? --