8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL L 100 :(4)"CLOSE"7FR(116):HM(48891)ZHM150FRHMĺ(4)"RUN SETUP"(:(7)(7)"*************** WARNING ***************"(7); 2"THE GRAPHICS MAIN HALL USES BOTH HI-RES SCREENS AND IT USES THE UPPER 8K OF FREEMEMORY FOR SOME MACH !y )VILLAGE.1 1!x )VILLAGE.2& !x ,PRACTICE.PIC !@,*PRACTICE.0 !x3*PRACTICE.1 i!x(MAIN.PICH n!@,&MAIN.0R !&MAIN.1[ Z!x&MAIN.2e !x&MAIN.3lh !+VILLAGE.PICt P!@,)VILLAGE.0} !@,'EAMON.B+ !,&SNAPPY3!,.NEW.CHARACTER17 N!yNEW.CHARACTER2A!y*CHARACTERSCMAIN.HALLF!y EAMON.GREATHALL' 'STARTUP !REV.23JUL90$0'READ.ME !y%SETUP !yUNPACK!,)EAMON.PIC ? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8RINE-CODE ROUTINES AND TABLES THAT ARE NOT RELOCATABLE." <:"THIS MAIN HALL MAY BE RUN ONLY IF THERE ARE NO BASIC OR PRODOS EXTENSIONS (SUCH AS DOGPAW) INSTALLED IN MEMORY." F:"IF YOU ARE SEEING THIS MESSAGE THEN YOU HAVE INSUFFICIENT FREE MEMORY # :10:"LAST UPDATE: 7/23/90"THE SUBDIRECTORY NAMES THAT APPEAR INTHE MENU WHEN YOU GO ON AN ADVENTURE.",:"AS FAR AS I CAN TELL, THIS TRASHING IS HARMLESS AND SELF-CORRECTING, BUT THIS IS WHY IT OCCURS."T:"HIT TO BEGIN: ";A$::10LICT."1:"MEMORY IS *EXTREMELY* TIGHT!!":"IF YOU EXPERIENCE TRASHING OF THE MAIN HALL GRAPHICS AFTER ABORTING BACK TO THEMAIN HALL, THIS IS THE CAUSE."M":"WHETHER YOU HAPPEN TO SEE THIS OR NOT WILL DEPEND ON THE TOTAL STRING LENGTH OF 195"-:"HIT TO CONTINUE: ";A$:"THE MAIN HALL IS CONFIGURED TO HANDLE UPTO 100 EAMON SUBDIRECTORIES IN THE SAME FOLDER. HOWEVER, THERE IS SOME CHANCE THAT A LARGE NUMBER OF SUBDIRECTORIES IN THE SAME FOLDER MIGHT CAUSE A MEMORY CONFE MAIN HALL TRIES TO BE WELL-BEHAVED, AND RELEASES THIS MEMORY WHEN IT ENDS ORWHEN AN ADVENTURE IS ENTERED.":"THE 'BEGINNERS CAVE' HAS BEEN DELETED FROM THIS DISK. VERY SIMPLE, BEGINNER- LEVEL ADVENTURES ARE AVAILABLE ON EAMONS #001, 140, 186, & ) REBOOT PRODOS.":"*NOTE* DO NOT USE 'CALL 48888' UNLESS YOU KNOW THAT THE ONLY THINGS IN MEMORY ARE PRODOS, BASIC.SYSTEM, & AN ORDINARY APPLESOFT PROGRAM. IF YOU USE THIS CALLWHEN OTHER THINGS OWN MEMORY, YOU *WILL*WIND UP REBOOTING."n:"TH MEMORY' ERROR WHENIT DETECTS THAT THIS MEMORY IS TIED UP.m16368,0::"HIT TO CONTINUE: ";A$:"YOU CAN RECOVER THIS MEMORY BY USING ONEOF THREE DIFFERENT METHODS:":" 1) TYPE 'CALL 48888'":" 2) RUN 'BASIC.SYSTEM' (-BASIC.SYSTEM)":" 3ON'T RUN IF THEY ARE NOT.":"IF THIS MAIN HALL CRASHES OR IS HALTED BY A , YOU WILL BE LEFT WITH THETOP 12K OF MEMORY UNAVAILABLE."<:"NOT ONLY WILL THIS MEMORY BE 'MISSING', BUT THE GRAPHICS MAIN HALL WILL ABORT WITH AN 'INSUFFICIENT THE MEMORYSPACE FROM $8800-9600." :"THIS MEANS THAT YOU CANNOT USE THIS MAINHALL IF YOU HAVE ANY BASIC OR PRODOS EXTENSIONS (SUCH AS DOGPAW) INSTALLED INMEMORY. THE PROGRAM CHECKS TO MAKE SURE THAT 'MEMSIZE' AND 'HIMEM' ARE $9600,""AND IT W: "; xA$:A$"C"120" d :"READ THE CONVERSION NOTES? Y/N (N) ";:A$:A$:A$"Y"10$ :"THIS CONVERSION OF THE EAMON 'GRAPHICS MAIN HALL' TO PRODOS REQUIRED EXTENSIVE MODIFICATION. THIS MAIN HALL MAKES USE OF BOTH HI-RES PAGES AND ALSO7):TURN OFF IIE 80-COL. + fD$"PR#0" g:"EAMON ADVENTURER'S GUILD":"7625 HAWKHAVEN DR.":"CLEMMONS, NC 27012":"(919)766-7490" n10:"THE EAMON GAMING SYSTEM REQUIRES UPPER- CASE INPUT. DEPRESS THE 'CAPS LOCK' KEYAND THEN PRESS 'C'TO CONTINUE." P:"TO CLEAR MEMORY FOR THIS PROGRAM, YOU MUST RUN BASIC.SYSTEM WITH THE 'DASH' COMMAND ('-BASIC.SYSTEM'). THEN RE-RUN THIS 'STARTUP' PROGRAM, AND THE GRAPHICSMAIN HALL SHOULD RUN." c d(26);"1":TURN OFF VIDEX VIDEOTERM  e(26);(1Q::"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$:D 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 LAUGHTER.";:756::! ("OVER THE DESK IS A SIGN WHICH SAYS 'REGIAMON.PIC":768:X((78)(79)256):I11500:KE(49152):KE128ĂS 49168,0 DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:DK$;"CLOSE":200::34,21:C DK$(4):DK$"OPEN SNAPPY,L64":DK$"READ SNAPPY,R0":NS:R((1)NS1):DK$"REA(4)"CLOSE"TFR(116):HM(48891):FR150FRHMĺ"INSUFFICIENT MEMORY":770,169:771,18:772,32:773,245:774,190:775,144:776,1:777,0:778,141:779,22:780,3:781,96:770F :DK$(4):DK$;"BLOAD UNPACK,A$300"::16302,0:DK$;"BLOAD EEY TO CONTINUE ";: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 STARTUP"23:3:"PRESS A KWITH 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 STARTUP"_ :::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 STER 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: <"YOU ARE GREETED THERE BY A BURLY IRISH- MAN WHO LOOKS AT YOU WITH A SCOWL. ";U F756:::"'AND WHAT MIGHT YOUR NAME BE? ":"(TYPE IT IN NOW) ";NAME$:# PNAME$""ĺ"HE RAISES A SWORD AND BEGINS TO SHARPEN IT SAYING, 'BEWARE THE BLUD STAINS ON THE FLOOR!";:756:::"THEY BELONG TO A POOR LAD WHO CAME IN LAST WEEK A'"0 *>"*>"Ïئ!ۃ㟬 `0La * D@!D @D@@ 0:ȡHe@ hhл`Ie@҈K$;"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),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE"4HE SAYS 'ARE YE READYT' TALK NOW? ";:qCNT13ĺ"THE MAN CUTS OFF ANOTHER FINGER! HE EATSTHIS ONE TOO! ";:"THE MAN THEN SPINS AROUND AND RUNS YOU THROUGH WITH A SPEED YOU HAVE NEVER SEENBEFORE! (AND NEVER WILL AGAIN.)":48891,HM:48888:u DUT A SWORD SAYING 'YE'D BEST BE GIVIN' ME YER NAME LADDIE, IF YE KNOWWOTS GOOD FER YE! ";bCNT2ĺ"I'VE 'BOUT HAD ME FILL O' YER SICK SENSA 'UMOR! NOW GIMME YER NAME!! ";:(CNT3ĺ"THE MAN CUTS ONE OF YOUR FINGERS OFF THEN EATS IT! THEN ,X0((X07)7):2,Y0:3,N:36608:(11)0210K@36608:A$"I"Y0Y05_JA$"M"Y0Y05sTA$"J"X0X05^A$"K"X0X05h0,(X07):1,X0((X07)7):2,Y0:3,N:36608:210 ///NO NAME ROUTINECNTCNT1:CNT1450\"HE PULLS O48888:!CT5Y029CT0:>KK(16384):KK12824016368,0:KKKK128:A$(KK):A$"I"A$"M"A$"J"A$"K"Č36608A$"I"Y0Y05:310A$"M"Y0Y05:310A$"J"X0X05:310"A$"K"X0X05:310,210060,(X07):116300,0:16301,0:X0133:Y014:N0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608:fF10240 CTCT1:CT5ĺ"YOU FEEL A SWORD BEING THRUST THROUGH YOUR BACK AND SOMEONE SAYS 'YOU REALLY MUST LEARN TO FOLLOW DIRECTIONS!'";:A$:::48891,HM:ND HAVE FUN IN THE HALL!'"-RER:R99:R=DK$"CLOSE"lDK$"FRE":800:190:DK$"CHAIN MAIN.0,@40"DK$;"OPEN THE.ADVENTURER":DK$;"WRITE THE.ADVENTURER":NAME$:RE:DK$;"CLOSE":W(4);"BLOAD EAMON.B":16302,0:(4);"BLOAD MAIN.PIC":768:A$"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.'"DK$"CLOSE":DK$"FRE":DK$"CHAIN NEW.CHARACTER1"DK$::34,21::"HE LOOKS UP AND SAYS, 'AH, HERE YE BE! WELL, GO A$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:DK$vnR1NC:DK$;"READ CHARACTERS,R";R:A$:A$NAME$170xR:DK$::34,21::"HE EVENTUALLY LOOKS AT YOU AND SAYS, 'YER NAME'S NA IN HERE. HAVE YE GIVEN ITTO ME ARIGHT?' (Y/N) ";:A$:ND 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.";:70=dDK$"CLOSE":34,20::"HE STARTS LOOKING THROUGH HIS BOOK,":"MUTTERING ABOUT ";C1$:C2$:DK!   "" "" 8""8"8£5 8 "" 8"""!"#$%&'()̣%號Ё|a0fLal6@!ύ"熇࿂""*$" "< $  "DGOqa>"2<><"""<"""*" "0 2""*><""*>"*>" "</#< 迌<<<  $$с D@ر0 ρÁ㣞*">"*" <   """*"< "/ȁ$ `0vMa<"@@1ȁ"$""<ؿ $ك D@ș  $"DĠ"*"*  "  """ <" " 5$ @Oa·#8޿ "Oȇಠ  ᗠ"F"*"&<" ""  > Ƈ&<< "< |? ǟ$" п><>""   那 ῠȁ6"$" " `"   Fف%Ȗ ऎ%񟈌"D@H!xD""  "< "<NOOО쁠"   5"<"؛ "D@!DxD$<:<" <"<< @ο <"< < " ̱"DH@b]">6""ǟȇФ!|g0 ?  Ɓ"<  " $"">$ $ "$ D@ $"*<" $"<"Ї"DHA" """"""""*" ""$"0 """" "*"" *""*"" !Ȣ%賐 `?LaLÃ*F@!8t8< .` 456` !$'*-0369 @]6""c@> @6""c888 ~} @8 :8lDDFppp @|#zq"tpX ```@xGt+bD(h`0X0x@@@phWD#QP@`  0 `P/G" @ @@`@? _ D@@1*,-./01`7`w``@6cc@c@o@o@/@/7:lFFG888_ _ __ntX  ppp>>>9>\h0X0x```! |&|.|r|"8P`0 0 8@@@C@xMx]xexEp @ ``p8pp;pKp ` @@1@1`q>*">$">""ā"DHO@̃>""<<<""<<" >>$>0 ""<"<<<<"<"<Ł"   >"*$>>"Á́ <"<$">$<$"$Ʊ "O $ $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP689:;<=>?@SHMAN 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" n"YOU TO READ, AND YOUR PRIME ATTRIBUTES ARE-- ";:756:: xHDA(8):AGA(8):CHA(8 DK$(4)%R(X)(X(1)1)BA(X)R(X)R(X)R(X)O234,21:<"THE IRISHMAN SAYS, 'FIRST I MUST KNOW WHETHER YE BE MALE OR FEMALE. WHICH ARE YE? (M)ALE OR (F)EMALE ";FSEX$:SEX$"M"90PSEX$"F"70ZSEX$: d"THE IRITHESE DAMN FLAIR PENS.. THE IDIOT ON THE OTHER SHIFT WITH THE LOUSY HANDWRITING. BAD LIGHT AND BAD BEER AND NO FOOTBALL ON TV... HE SHOULD HAVE LISTENEDTO HIS MOTHER AND GONE INTO OPTOMETRY HE SHOULD HAVE LISTENEDTO HIS MOTHER AND SHOT HIMSELF. WISHING A DRAGON WOULD FLY OVER AND BURN THIS JOINT NOT BEING ABLE TO SEE ANYTHING WITHOUT HIS GLASSES. BAR WENCH. HAVING TO CLEAN THE BLOOD OFF THE DESK PRETTY SOON. N TO DO. WHY DO I ALWAYS GET THEONES WITH THE FURRIN'-SOUNDING NAMES? LOOKIN' UP STUPID NAMESALL DAY AND ALL NIGHT IS FER LESSER MEN. HAVING TO COMPUTERIZE THIS DANG BOOK BUSINESS SOMETIME.. HAVING SEEN UGLY FACES BEFORE BUT NEVER ANYTHING LIKE THIS .. KNOW-IT-ALL ATTITUDES OF THE NEW ADVENTURERS WILL DO THEM IN. IF HE GETS THE CHANCE HE'S GOING TO GET OUTTA THIS RAT RACE. 245HE SHOULD HAVE LISTENEDTO HIS MOTHER AND BEEN A BRAIN SURGEON. GOOD FER NOTHIN' YOUNG ADVENTURERS OTTA BE TAKEN OUT AN' HUNG! STRANGE SAXON NAMES YE CAN NEVER PRONOUNCE LET ALONE SPELL.. HE SHOULD HAVE LISTENEDTO HIS MOTHER AND GONE INTO TAXIDERMY. 14 HAVING BETTER THINGS TODO THAN WIPING GREENHORNS' NOSES. ORNS. HOW YOUNG GREEN-HORNS NEED SOMEONE TO LEAD THEM BY THE HAND. THE THINGS HE HAS TO GOTHROUGH FOR SOME STUPID UPSTARTS. KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKTSPATHSJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK@JJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJ*9JJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK)U " HARDINESS--";HD:" AGILITY --";AG:" CHARISMA --";CH;"'";:756::^ 600 "(HIT 'R' TO READ INSTRUCTIONS, 'T' TO GIVE THEM BACK)"; A$:A$"T"440 A$"R"150 16303,0:34,0> ::"YOU READ THE INSTRUCTIONS ANDE 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.'":455"HE MAKES AN ODD SIGN WITH HIS HAND AND SAYS, 'LIVE L:"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 ARMOUR.":"(HIT ANY KEY TO CONTINUE) ";:A$::"THE MAN BEHIND TH":"SPEED--DOUBLE YOUR DEXTERITY FOR A TIME"r"POWER--DOES SOMETHING WEIRD. THE EXACT":" EFFECT IS UNPREDICTABLE.":T|:"OTHER TYPES OF MAGIC MAY WORK IN VARIOUSADVENTURES, AND ITEMS MAY HAVE SPECIAL":"PROPERTIES. HOWEVER, THESE WILL NOT" 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."::"BLAST--HURT YOUR ENEMIES FROM A DISTANCEHEAL --REMOVE DAMAGE FROM YOUR BODY. 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. HOWEVER, IT IS A GOOD IDEA TO":"CARRY SOME GOLD WITH YOU FOR USE IN"D^"BARGAININGT A":"MONSTER'S FRIENDLINESS RATING BY YOUR":"CHARISMA LESS TEN, DIFFERENCE TIMES TWO":"(";(CH10)2;"%)":$J"YOU START OFF WITH 200 GOLD PIECES,":"WHICH YOU WILL WANT TO SPEND ON SUPPLIESFOR YOUR FIRST ADVENTURE. YOU WILL GET":"A LOWER PRICE FOROU 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$::p@"YOUR CHARISMA (";CH;") AFFECTS HOW CITIZENS":"OF EAMON REACT TO YOU. YOU AFFECMEASURE 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 BLOWS BEFORE YOU DIE.":~,"HOWEVER, YOU WILL NOT BE TOLD HOW MANY":"BLOWS YTTER HOW HIGH YOUR ARMOUR EXPERTISEIS, HOWEVER, THE NET EFFECT OF ARMOUR":"WILL NEVER INCREASE YOUR CHANCE TO HIT.":"(HIT ANY KEY TO CONTINUE) ";:A$::):"YOU CAN CARRY WEIGHTS UP TO TEN TIMES":"YOUR HARDINESS, OR ";HD10;" GRONDS.":"(A );2;35);"-20%"" 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 ARMOUR AND YOUR EXPERTISE IS":"LESS THAN THE ARMOUR YOU ARE WEARING."x"NO MAHESE PROTECTIONS":"WILL ABSORB HITS PLACED UPON YOU(ALMOST":"ALWAYS!) BUT THEY LOWER YOUR CHANCE TO""HIT. THE PROTECTIONS ARE--"::"ARMOR";15);"HITS PROTECT ODDS ADJUST"::" NONE";18);"0";35);"- 0%":" LEATHER";18);1;35);"-10%":" CHAIN";18APON 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$::h"THERE ARE FOUR ARMOR TYPES, AND YOU MAY":"ALSO CARRY A SHIELD IF YOU DO NOT USE":"A TWO-HANDED WEAPON. TAPONS (AND YOUR":"CURRENT ABILITIES WITH EACH) ARE--":" CLUB/MACE 20%":" SPEAR 10%":" AXE 5%":" SWORD 0%":" BOW -10%":f "EVERY TIME YOU SCORE A HIT IN BATTLE,":"YOUR ABILITY IN THE WE THEY SAY--"::" INFORMATION ABOUT THE WORLD OF EAMON ": :"YOU WILL HAVE TO BUY A WEAPON. YOUR":"CHANCE TO HIT WITH IT WILL BE THE":"WEAPON COMPLEXITY, PLUS YOUR ABILITY":"IN THAT CLASS, PLUS TWICE YOUR AGILITY.": "THE FIVE CLASSES OF WEONG AND PROSPER.'"IDK$"CLOSE":DK$"FRE":DK$"CHAIN NEW.CHARACTER2"dX /// SUICIDE ROUTINE b:"IF YOU WISH, WE WILL ALLOW YOU TO COM-":"MIT SUICIDE. ENTER 'Y' TO SUICIDE,":"ELSE TYPE 'N' ";lA$:A$"Y"A$"N"620v::A$"N"ıM"WE RESSURRECT YOU AGAIN AND YOUR PRIME"::"ATTRIBUTES ARE --"::::120' EՈТx|ʕՈТ/ԨѢŊԈ`!fL3fL3x|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ f $@3x|6 @a `l""ՈТ(=>O(eʕՈK,A$300"` <(4);"BLOAD EAMON.B"::16302,0:(4);"BLOAD MAIN.PIC":768:16300,0:16301,0 FX0133:Y014:N0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608 d(4);"CHAIN MAIN.0" n216,0:::(4)"CLOSE"TFR(116):HM(48891):FR150FRHMĺ"INSUFFICIENT MEMORY":770,169:771,18:772,32:773,245:774,190:775,144:776,1:777,0:778,141:779,22:780,3:781,96:770 110(4);"VERIFY THE.ADVENTURER" ((4);"BLOAD UNPACSAD SACK 14 14 12 0 0 0 0 5 -10 20 10 0 0 M 200 0 0 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 0 0 5 -10 20 10 0 0 M 12 0 3 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 0 0 0 SAM 14 14 12 0 0 0 0 5 -10 20 10 0 0 M 200 0 0 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 0 N 4 0 1 5 SWORD 5 10 1 9 NONE 0 0 0 0 NONE 0 0 0 0 2 14 NONE 0 0 0 0 10 AZER 1 50 2 9 BOZO 14 14 12 0 0 0 0 5 -10 20 10 0 0 M 171 0 0 BOW 2 -10 1 6 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 NE 0 0 0 0 FRED 14 14 12 0 0 BDED 5 10 1 8 AXE 1 0 2 5 5 SIR POTATO HEAD 24 29 27 52 123 64 73 5 -10 38 10 0 16 M 4 65000 5 SWORD 5 10 1 12 MACE 3 10 1 6 TATERMASHER 3 45 2 14 NONE 0 0 0 0 FLUFFY 14 14 14 0 53 0 58 5 -10 20 10 13 2 M 7569 100 5 JAVELI6 20 21 18 31 74 29 28 7 -10 20 10 0 13 M 175 6850 3 AXE 1 10 1 6 MACE 3 10 1 6 TROLLSFIRE 5 25 1 10 STINGER 3 10 2 5 JOHN 21 24 12 0 0 0 68 5 -10 20 10 0 0 M 19700 0 0 MACE 3 10 1 5 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 OR":SEX$:"200":"0":"0"C W14:"NONE":"0":"0":"0":"0":T DK$;"CLOSE"] RERu 16304,0:16297,0{  &DK$"FRE":DK$;"CHAIN SETUP,@175"DK$;"OPEN CHARACTERS,L150":DK$;"READ 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 f@3Тx|/`sՈТ<0pʕ ?Ո`!fL3fL3Тx|/@`sТʕ@@? ? fL3fL3Т/x`sТʕ@ ?Тp`/`sՈpyТx|ʕ ?ՈGIJKLMNOP`sŊ`x|ъ ?Ŋ/ъŊ` x|ъxD" Ŋ  E" 0p3$ d!<pGa`?Qgw}_w  hO@00@00@  `cg@hO@ 3 fD^O}'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@/x|@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@3O@/ ?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@/@ ?"Qh@bgqA @@hO@/ ?@<0x@@`s ~hO@/ ?@ `s @/| ?3f @ `s`X1?c vwp@/ ?Cc hO@`s@//r<`@hO@  9@/AA:3904|AA$"DECREASED":AA(2(1)1):BBAAkQQ(3(1)1):QQ1QQ$"HARDINESS":HDHDBB:420QQ2QQ$"AGILITY":AGAGBB:420QQ$"CHARISMA":CHCHBB:"YOUR ";QQ$;" ";AA$;" BY ";AA;"! ";:756:::450(:"NOTHING HAPPENED. GOLD PIECES! (Y/N) ";:A$:"":A$"N"ė:450T30CHGOLDė:"'SORRY, MIGHTY ADVENTURER, BUT YOU DON'T HAVE ENOUGH GOLD.' ";:756:::450^A$"Y"330hGOLDGOLD(30CH):QQ(5(1)1):QQ370,370,370,430,430 rQQ3AA$"INCREASED":AAQQ:BBAND WEAPONS WITH ME. Y'ALL COME BACK REAL SOON, YA HEAH?'"@680:DK$"OPEN THE.ADVENTURER":DK$"CLOSE THE.ADVENTURER":DK$;"DELETE THE.ADVENTURER":::48891,HM:48888:DK$"BYE"/J22:"THE BARMAN SAYS, 'YOU WANTA BUY A MAGIC POTION? ONLY ";30CH;"0)((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, 'YOU'LL HAVE TO LEAVE YOUR ARMOUR TE ",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":3008"WN$(W);20(WO%(W)0)((WO%(W))151,5);" ";:SM11 S: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);"% ";::+:A2(AC2):"ARMOUR: ";("SKIN LEATHERCHAIN PLADK$"FRE":DK$"CHAIN MAIN.3,@1000" 34,0::"YOU ARE THE ";("MIGHTY FAIR ",17(SEX$"F"),7);NAME$::"YOUR ATTRIBUTES ARE:":" HD=";HD;" AG=";AG;" CH=";CH: "YOU KNOW THE FOLLOWING SPELLS--":SM0:S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)4: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$"I"310 A$"R"ė:440 130$ DK$"CLOSE":TION 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:: n440A xNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W1QSTUVWXYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE":P(X)(XRTIO.5)l (B$(100):WN$(1)"NONE"N1 2AC((AC2))2N2 <Y029N0110 F34,21::Y029110 P"THE IRISHMAN BECKONS TO YOU AND SAYS,":N190,100,100I Z"'PSST. THAT PO_ 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),WTYYOU LEAVE GRUMBLING. ";:756:::450.KKK(16384):KK12845016368,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):1,X0((X07)7):2,Y0:3,N:36608:(11)0590z36608:A$"I"Y0Y05&A$"M"Y0Y050A$"J"X0X05:A$"K"X0X05D0,(X07):1,X0((X07)7):2,Y0:3,N:36608NX0198ĺDK$"FRE":DT YOU AND SAYS, 'THIS IS":"A WEAPON LIKE I SELL, REMEMBER!'":440J"MARCOS GIVES YOU YOUR MONEY AND TAKES":"YOUR WEAPON.";:756::GOLDGOLDP:W2W4:WN$(W2)WN$(W21):WT%(W2)WT%(W21):WO%(W2)WO%(W21):WD%(W2)WD%(W21):WS%(W2)WS%(W21)::WN$(4)'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::240D@L(W$,5)"SWORD"(W$,5)"SPEAR"(W$,4)"MACE"(W$,3)"BOW"(W$,3)"AXE":Lĺ"MARCOS FROWNS AD WEAPON LIKE I SELL? ('Y' OR 'N') ";<A$:A$"Y"380MA$"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"ĺA$::240,A$"T"2906A$:"MARCOS SAYS, P::"MARCOS HANDS YOU YOUR WEAPON AND TAKES":"THE PRICE FROM YOU.";:756::g GOLDP(50)240 "'NOW HOW ABOUT SOME ARMOUR?'":"(HIT Y OR N) "; A$:A$"N"ĺA$::240 A$"Y"210 A$:510 :80(:"'IS THIS WEAPON A STANDARBPBP(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"ĂR WN$(W)N$:WT%(W)TP:WO%(W)10(2Q):WD%(W)DICE:WS%(W)SIDES:GOLDGOLD! 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) "; A$:Q13:A$("GFP",Q,1)Ă:140r A$:PC2. ZA$:TR14:A$("BSAL",TR,1)Ă:90L 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!'";:756:::250 x"MARCOS SAYS, 'I GOTTA THE BESTZ\]^_`abc:y F:"MARCOS CAVIELLI (THE OWNER) SAYS, 'WELL,AS I LIVE AND BREATHE IF IT ISN'T":" ";NAME$;"! ";:756:: P"DO YOU WANT TO:":"(B)UY A WEAPON, (S)ELL A WEAPON, GET":"BETTER (A)RMOUR OR (L)EAVE? ";:C2CH(11(1)5):C2C2(C20):RTIO10P(X)(XRTIO.5)e768:16300,0:16301,0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608m70 <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 CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:120:DK$;"CLOSE":] WN$(1)"NONE"N1u*AC((AC2))2N24768:16300,0:16301,0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608:440K$"CHAIN MAIN.1""XX0198540PbX068(Y099Y034)ĺ(4);"CHAIN MAIN.2"_lX068540ovY09ī130Y0124X0133:Y014:DK$"FRE":DK$"BLOAD VILLAGE.PIC":DK$"CHAIN VILLAGE.0"(X0173X093)(Y074Y079)ė:330450EDK$;"OPEN"NONE"PT:"MARCOS ASKS YOU, 'HOW ABOUT BUYING A":"WEAPON?'":"(Y OR N) ";k^A$:A$"Y"ĺA$::110|hA$"N"350rA$::190+|:"'WELL, WHAT WEAPON DO YOU WANTA RETURN?":640:W2W:W14:(WN$(W),(N$))N$Ă::"'YOU NEVER BOUGHT ONE OF THOSE FROM ME, REMEMBER?'";:756:::80yBPBPBP(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 IT, TAKE IT OR LEAVE IT.' (T OR L) "; A$:A$"L"PGOLDČ756:::80 SA%(SP)ĺ"'I ALREADY TAUGHT YOU THAT SPELL!'":"SHAKING HIS HEAD SADLY, HE TURNS AWAY ";:756:::DK$"FRE":(4);"CHAIN MAIN.0,@800"1 GOLDGOLDP:SA%(SP)(50(1)26):"HOKAS TEACHES YOU YOUR SPELL, TAKES HIS FEE, AND ASKS, 5000):170( "POWER":PP(100):170I "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 "; GP":"SPEED - ";P(5000);" GP POWER - ";P(100);" GP"n 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(dfghijWDICE%(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::? ZC2CH(11(1)5):C2C2(C20):RTIO10C2:"BLAST - ";P(3000);" GP HEAL - ";P(1000);"P(X)(XRTIO.5)e768:16300,0:16301,0:0,(X07):1,X0((X07)7):2,Y0:3,N:36608|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):N$"SWORD":TP5:SIDE8%DICE1:LDK$"FRE":DK$;"CHAIN MAIN.0,@800"Y 216,0:W,1)Ă:650$W670,680,690,700O"AXE":BP25:N$"AXE":TP1:SIDE6:740z"BOW":BP40:N$"BOW":TP2:SIDE6:740"MACE":BP20:N$"MACE":TP3:SIDE4:740A$;A$:A$"P"ĺ"PEAR":BP25:N$"SPEAR":740A$"W"710"WORD":BP50:AVE 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), A B M SP OR SW) "; A$:W14:A$("ABMS",D AND GIVES YOU YOUR NEW ARMOUR. ";:756:::GOLDGOLDP:A2A1N: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$::630XA$"Y"590KbA$::GOLDP(50)ĺ"'YOU DO NOT H OR L, C, OR P) ";=A$:A14:A$("NLCP",A,1)Ă:530PA$::A1570&PP(100(A2)250(A3)500(A4))TI:PGOLDė:"'YOU DO NOT HAVE ENOUGH GOLD AND I DON'T GIVE CREDIT!'";:756:::80B0:"MARCOS TAKES YOUR OLD ARMOUR AND YOUR GOL):TI(B1RTIO.5):"HE SHOWS YOU SUITS OF LEATHER ARMOUR, CHAIN ARMOUR, AND PLATE ";:TIB12TIB12"AND SAYS, ";:756:::"'WITH TRADE, THE LEATHER IS ";P(100)TI;" GP,":"CHAIN IS ";P(250)TI;" AND PLATE IS ";P(500)TI:"(HIT N FOR NOTHINGĺA$::240A$"T"410-A$::330d:W14:("ABMS",W,1)(W$,1)ĴW460,470,480,490kWzBP25:390BP40:390BP20:390(W$,2,1)"P"BP25:390BP50:390j:A2(AC2):SHACA22:B125(A21)60(A22)100(A23'ANYTHING ELSE? (Y/N) ";:A$:"":A$"N"ė:2209 90c DK$"FRE":(4);"CHAIN MAIN.0,@800"::"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,A$"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.'A13ĭDX$""CX$CX$B$(B):1210;|A13AX$DX$:1190v~A8ĭA12A1A11:A1:" ";:A1:DX$(DX$,A11):1134A8A11:A1:" ";:A1:DX$"":1134A46ĺ(7);:1138DX$DX$A$:A1A11:A$;:1138 22:" ";:1::B8,0:A$:A(A$):(A21A10)DX$""1134H s(A8A11)DX$""1133x tA21A10RV0:BB1:B1B11:BXB21:B1 uA8A11RV1:BB1:B1B11:B0B21:BX1 vA21A10Ĵ(A11)11135,1138 wA8A11Ĵ(A11)11133,1138 xA271030#z TO PREVIOUS MENU TYPE DIRECTORY NAME: ( <-- TO ERASE)"::Z kB$(X)"":X131160l lVT(37):B1B mVTXB16:B$(B11) nVTXB7::B$(B)::VT:A1 oVTXB18:1:B$(B11(B1)):B2B20:B1B:VTXB7 p:B$(B)::VT:A1+ r16368,3)"DIR"1110+ aB$(X)"/"(B$,2,16)_ b(B$(X),1)" "B$(X)(B$(X),(B$(X))1):1122v cB$(X):XX1:1110 eDK$"CLOSE"B j:DX$"":A11:B1::" STEP THROUGH DIRECTORIES KEY TO SELECT DIRECTORY KEY TO EXIT:" (TYPE '?' FOR LIST OF DIRECTORIES)":" (TYPE 'EXIT' TO RETURN TO MENU)"::"PREFIX: ";AX$v .AX$"EXIT"1800 8AX$"?"1200 L:"AVAILABLE DIRECTORIES:":X1 Q:DK$"OPEN"CX$",TDIR":DK$"READ"CX$:A$:A$:A$ VB$:B$""1125 `(B$,1kmnopqr0":DK$;"WRITE CHARACTERS,R";REC::DK$;"CLOSE"I CX$(PX$,(PX$)1) :"IF NECESSARY, INSERT ADVENTURE DISK NOW":"THEN HIT 'C' TO CONTINUE";:16368,0:A$::A$"C"ĺ(7):1030 :"CURRENT PREFIX: ";CX$"/"a $:"ENTER PREFIX FOR ADVENTURE:"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 GO ON ADVENTURE 16303,0:34,0DK$"PREFIX":PX$1 :DK$;"OPEN CHARACTERS,L15SE CHARACTERS"cKBANKMNY::"SHYLOCK TAKES YOUR MONEY, PUTS IT IN HISBAG, AND THANKS YOU. ":DK$"FRE"::DK$;"CHAIN MAIN.0,@800"TDK$;"OPEN LOC":DK$;"READ LOC":X0:Y0:N:DK$;"CLOSE LOC":^DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:70:DK$;"CLOA$ė:"YOU'RE NOT MAKING SENSE. WHAT KIND OF AMOUNT 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. ":DK$"FRE":DK$;"CHAIN MAIN.0,@800"tJGOLDGOLDMNY:BAN, 'THAT LEAVES YOU WITH ";BANK;" PIECES":"IN MY CARE.' ";:756:"":DK$"FRE"::DK$;"CHAIN MAIN.0,@800",:"SHYLOCK GETS A WIDE GRIN ON HIS FACE. 'GOOD FOR YOU! HOW MUCH DO YOU WANT TO DEPOSIT?' ";:"";A$_6MNY(A$):MNY0MNY(MNY)(MNY)";:756:::260MNYBANKė:"THE BANKER THROWS YOU A TERRIBLE GLANCE AND SAYS, 'THAT'S MORE THAN YOU'VE GOT! YOU KNOW I DON'T MAKE LOANS!'":DK$"FRE"::(4);"CHAIN MAIN.0,@800"n"GOLDGOLDMNY:BANKBANKMNY::"SHYLOC HANDS YOU YOUR GOLD AND SAYS$(B)::=16368,0:A$:A(A$):A21A10ĭDX$""BB1YA8A11ĭDX$""BB1hBXBX1uB0B1A21A10A8A11Ĵ(A11)11162,1164A271030A13ĭDX$""CX$CX$B$(B):1210A13AX$DX$:1190)A8ĭA12A1A11:A1:" ";:A1:DX$(DX$,A11):1164RA8A11:A1:" ";:A1:DX$"":1162iA46ĺ(7);:1164DX$""Ģ22:" ";:1DX$DX$A$:A1A11:A$;:1164(AX$,1)"/"AX$"/"AX$CX$CX$AX$::"PREFIX:":" ";CX$:12100@00@ hO@>@00@00@hOc@ 0@1 f0@a0`0F1C.tyEAh `y<@ďhO@/ ?@ashO@/N ?0 $?Ŋx|/ъ_`sx ъ` ?/ъ@1`sъ@0 ?/ъ `sŊĀx|ъ  ?Ŋ^hw E/pc% d =OG@acNg|>_ghO@0Ŋ@1 x| ѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊъŊĈČx|" 0@|g0@a`?f0ъ!"d"ŊA,XъŊ@ďx|/ъ`sŊ=Q@zъ`shO@/@? ?c0 @p`s@/ ?@` `s@/@y ?hO@ `s@=~ @apa ъŊx|?p?pѢŊԨ&xhO@@$   hO @00@00@hO"@ pO? f0@a~`0~qCag!T"Aj)qr@@ѣĸhO@/ ?XQ @ suvwxyz{ ʕ}.Ո`Тx|/`sՈТ(_'Trʕ@ ?Ո@Тx|/ `sТ<0xʕ ?Т/`sТʕ`|? ?Т/@,`sՈТx|ʕ@ ?ՈТW',ՈТx|ʕՈТf0~ @a f?~ ԨѢŊԈ x|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ@Ljx|6~ 0Xa f0@a`03C! L"ՈТA)$"C"ĺ(7):1805(DK$"PREFIX"PX$K16304,0:16297,0::34,21:g&DK$"CHAIN MAIN.0,@800""OPEN EAMON.PREFIX":DK$"WRITE EAMON.PREFIX":PX$:DK$"CLOSE"DK$;"OPEN FRESH.MEAT":DK$;"WRITE FRESH.MEAT":REC:200:DK$;"CLOSE":DK$;"RUN LEADIN"A1100:B$(A)""::DK$"FRE" :"PREFIX: "PX$::"INSERT MASTER DISK AND TYPE 'C'":A$:A$:A RECOGNIZED AS AN EAMON ADVENTURE SUBDIRECTORY - NO LEADIN PGM":A12000::1100_t48891,HM:48888DK$;"OPEN EAMON.NAME":DK$;"READ EAMON.NAME":ADNAME$:DK$;"CLOSE":5:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$:::?DK$AX$""AX$CX$:CX$?(AX$,1)"/"AX$(AX$,(AX$)1)fCX$AX$:(CX$,1)"/"CX$"/"CX$q1217DK$"PREFIX"CX$:1220(7):12::"PATHNAME ERROR"::10401250DK$"VERIFY LEADIN"216,0:1500Y216,0:(7):" NOT@@`s@/ ?@`s^g =^@/| ?hO@`A A)@/@` {f0<@a fQDՈx|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈpx|@?p?pߢʕ}>.Ո@Ĝx| 0@a F0pG~`0sCՈТʕՈČТx|/`sТʕ(?Тx|((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::310, :"YOU HEAR A VOICE SAY, 'THROW A 20 GP COIN IN THE FOUNTAIN AND GOOD FORTUNE WILL BE YOURS.' WILL ",A271,7);:ACA22ĺ" AND SHIELD"; 30);"AE=";AE;"%"::"GOLD IN HAND=";GOLD;", BANK=";BANK""::"WEAPONS";19);"CMPLX DAM":W14:W1WN$(W)"NONE"190 WN$(W)"NONE"ĺ:" NO WEAPONS":1905 WN$(W);20(WO%(W)0)((WO%(W))10)1,5);" ";:SM1. S: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);"% ";::( :A2(AC2):"ARMOUR: ";("SKIN LEATHERCHAIN PLATE |~(W):WDICE%(W):WSIDES%(W):W: n34,0::"YOU ARE THE ";("MIGHTY FAIR ",17(SEX$"F"),7);NAME$::"YOUR ATTRIBUTES ARE:":" HD=";HD;" AG=";AG;" CH=";CH: x"YOU KNOW THE FOLLOWING SPELLS--":SM0:S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)5 768:16300,0:16301,06(WN$(1)"NONE"N1N2AC((AC2))2N2<0,(X07):1,X0((X07)7):2,Y0:3,N:36608Z310! dNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%@0`s^h =^@/xhO@@/3fNc{EAh r=@X!葢hO@/ ?Q(4 @`sĈhO@/ ?<0p@D#`s@/ ?@@x`s@/@y ?hO/ъ `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ԨѢŊԨѢŊѢŊԀ0@ xhO@`@/@!@ߜphO@/@`ĈhO@/ ?@@`shO@/N ? @``s@/| ?/D`sТ0 ʕ@ ?Т/`sՈТxʕX{ ?ՈТA(EB/p`ՈТx|ʕՈТN Ax0@ x R3f0l@ f_DchO@00@0YOU DO IT? (Y/N) ";:A$:""::A$"Y"320r GOLD200ė:"YOUR POUCH OF GOLD IS TOO LIGHT! ";:756:::320 GOLDGOLD20:QQ(5(1)1):QQ3290 WNAME$(1)"NONE"290"'FOR YOUR GENEROSITY I WILL INCREASE THE POTENCY OF ONE OF YOUR WEAPONS!' ";:756:::SS1<WNAME$(SS)"NONE"QRSS1:280SSS4SSSS1:250\QR4QQ(QR(1)1):WSIDE%(QQ)WSIDES%(QQ)1:320":"THE AIR AROUND THE FOUNTAIN BEGINS TO GLOW BUT THAT'S ALL THAT HAPPENS. ";:756:::3206@KK(5)2:350%,"MACE":WT%(5)3:350.6A$;T@A$:A$"P"ĺ"PEAR":WT%(5)4:350eJA$"W"320zT"WORD":WT%(5)5^h:"'AND WHAT NAME SHOULD I INSCRIBE ON IT?'":"> ";WN$(5):(WN$(5))0360Qr:"'I HAVE LIMITS OF CRAFTSMANSHIP:'":" C"Y"240 A$"N"210# 530 :"'WHAT DO YOU WANT ME TO MAKE -":"(A)XE (B)OW (M)ACE (SP)EAR OR (SW)ORD?'":"> ";:250:360 A$:(A$)13530 W14:A$("ABMS",W,1)Ă:250 W280,290,300,310 "AXE":WT%(5)1:350 ""BOW":WT%(3210) (A$)1(A$)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$756::} :"'YOU MUST 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$)1D";:SW%(I);:35:PR%(I):c x3:"SELECT 1-";WN;" OR FOR NONE ";:A$:"":(A$)13210} (A$)1(A$)WN120 GOLDPR%((A$))ė:3:"YOU DON'T HAVE THAT MUCH GOLD! ":I11000:I:110 AN$A$::"'GOOD CHOICE! A GREAT BARGAIN!' ";:34,21:q <:"'MAYHAP YOU WOULD LIKE TO LOOK AT MY STOCK OF USED WEAPONS?' (Y/N) ";:AN$:"":AN$"N"240 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);:" 768:16300,0:16301,0Q0,(X07):1,X0((X07)7):2,Y0:3,N:36608Y50(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$:(X0103X0168)200320Y034)ĺDK$"FRE":DK$"CHAIN VILLAGE.2"7X068410Y09X0133:Y0119:DK$"FRE":DK$"BLOAD MAIN.PIC":DK$"CHAIN MAIN.0,@800"Y0124X0133:Y014:16302,0:DK$;"BLOAD PRACTICE.PIC":768:16300,0:16301,0:DK$;"CHAIN PRACTICE.0"Y079X07)7):2,Y0:3,N:36608:(11)0460D36608:A$"I"Y0Y05XA$"M"Y0Y05lA$"J"X0X05A$"K"X0X050,(X07):1,X0((X07)7):2,Y0:3,N:36608X0198ĺDK$"FRE":DK$"CHAIN VILLAGE.1"X0198410(X068(Y09916384):KK128320TJ16368,0:KKKK128:A$(KK):A$"/"A$"?"Ĺ16303,0:110|TA$"I"A$"M"A$"J"A$"K"Č36608^A$"I"Y0Y05:400hA$"M"Y0Y05:400rA$"J"X0X05:400|A$"K"X0X05:400460)0,(X07):1,X0((OMPLEXITY W. DICE W. SIDES":" 1% - 50% 1 - 2 1 - 8 ";:756::|:"COMPLEXITY > ";WO$:(WO$)1(WO$)50380WO%(5)(WO$):"WEAPON DICE > ";WD$:(WD$)1(WD$)2400WD%(5)(WD$):"WEAPON SIDES > ";WS$:(WS$)1(WS$)8420^WS%(5)(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$:ING, ";NAME$;"!'":DK$"FRE"::DK$;"CHAIN VILLAGE.0"b A$"H"PT1:MXHD:AA$"HARDINESS":180 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 n:"'BECAUSE OF 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 = ";CH6 "H, A, C OR FOR NONE ";:A$:"":(A$)13ė:"'GOOD FARTTRIBUTE?' (Y/N) ";:A$:"":A$"N"ė:"'GOOD FARING, ";NAME$;"!'":DK$"FRE"::DK$;"CHAIN VILLAGE.0"w 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::^<"A LOVELY YOUNG 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;"!"g P"MAGICALLY CHANGE AN A 768:16300,0:16301,0Q0,(X07):1,X0((X07)7):2,Y0:3,N:36608`Y034260h(602NAME$: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: 4TP$"SPEAR"* WT%(5)5TP$"SWORD"0)(W(6)5),DW%(I)W(3):DW%(I)0700LSW%(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)1,7):RTRW:RT4RTRT18vRT4RTRT3W(4):630TP$(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)5 OW%(I ";:A$:"":DK$"FRE"::DK$;"CHAIN VILLAGE.0"<NI1WN_XRWW(10):RW0RWWR(I1)600b(I3RWWR(1))(I4RWWR(2))(I4RWWR(1))600lWR(I)RW:EWRW1:NW$(I)("SLAYMORELFKILLSTINGERSCRUNCHCENTURIFALCOORWIDOWERFLASHERSLASHERFREEDOM",EW7;23);"4 - ";WN$(4):"WEAPON 1-4 OR FOR NO EXCHANGE ";WA$:(A$)13530y(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)0:"'GOODBYE, ";MN$(0);"! COME AGAIN.'IZARDS AND WEAPON":"EXPERTS. 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::A:"1 - ";WN$(1);23);"2 - ";WN$(2):"3 - ";WN$(3)"":A$"N"210!A$"Y"450GOLDPR%(5)ė:"'YOU DON'T HAVE ENOUGH GOLD TO PAY FOR":"YOUR ";WN$(5);"! OUT OF MY SHOP!' ";:A$:""::DK$"FRE":DK$;"CHAIN VILLAGE.0"BGOLDGOLDPR%(5)::"GRENDEL WORKS ON YOUR ";WN$(5);",":"OFTEN CALLING IN W"120& (IP$)1(IP$)32MX120 GOLD(((IP$))(5000(CH50)))ė:"YOU DON'T HAVE ENOUGH GOLD LEFT! ";:756::120 RL(20(1)1):RLCHė:"THE SPELL DIDN'T WORK! SORRY!":I11000:I:GOLDGOLD((IP$)(2500(CH50))):120 PT1HDHD(IP$) PT2AGAG(IP$)7PT3CHCH(IP$)GOLDGOLD((IP$)(5000(CH50)))::"THE WITCH BEGINS AN INCANTATION AND YOU ARE ENVELOPED IN A HAZY, WHITE CLOUD. 'IT IS DONE!' ";:756:::120B:"HERMANN, THE OWNER, SAYS,":" 'WELCOME, @00@ P  DNhO38@/8wpnaI@ P3fL3fLhO@/ ?@`shO@/N ?@(D`s@/ ?@p`sN ?/ъ@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| 3fLhO@@$   ` NhO@%@00@ _NhO3l@/p?`@@ H`@3fL3fLhO@/ ?@`shO@/D? ?Тx|/`sՈТ@>ʕ ?ՈТx|/`sТʕD? ?Т/`sТʕ ?Т/`sՈТx|ʕ@Id ?ՈТ8wpna> fO |q@A?03fL'{ՈТx|ʕՈТ/ԨѢŊԈ "x|ʕԨѢŊԨѢŊԨѢŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕՈ@?x|/ՈТʕ H`ՈST!":I11000:I:GOLDGOLDBT:310U JUST WON TRIPLE YOUR MONEY!":I11000:I:GOLDGOLD(BT3):310hRL80ė:"YOU JUST WON DOUBLE YOUR MONEY!":I11000:I:GOLDGOLD(BT2):310rRL55ė:"YOU WON ";BT;" GOLD PIECES!":I11000:I:GOLDGOLDBT:310%|:"SORRY, ";NAME$;", YOU LO":DK$;"CHAIN VILLAGE.0",@(BT$)0310rJ(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:::310C^BT(BT$):RL(100(1)1):RL95ė:"YOCE YOUR BETS. DO YOU WANT IN, ";SX$;"? (Y/N) ";:A$:"":A$"N"ė:"'SO LONG!'":DK$"FRE"::DK$;"CHAIN VILLAGE.0",A$"Y"2906:"'YOU HAVE ";GOLD;". YOUR BET, ";SX$;"?":"THE HOUSE LIMIT IS 10,000 (0 TO QUIT).'":"> ";BT$:BT$"0"ė:DK$"FRE";NAME$;"!":"PERHAPS 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"x":"'PLACE YOUR BETS. PLA@/`| ?3fL3fLhO@``@?@/@`  C `0pQDՈx|ʕԨѢŊԨѢŊԨѢŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈx|0?'?pߢʕPpAaՈ Nx|@s/ՈТ8paUʕ`ՈТx|/ `sТʕ ?Тx|/D`sТʕN ?Т/p{`sՈТxO%(W);"% ";WD%(W);" D ";WS%(W) W:23:16368,0:"(HIT ANY KEY TO CONTINUE) ";:A$::16304,0:16297,0::34,21::340 :"THE MAN LEANS OVER THE COUNTER AND SAYS,'I GIVE GENERAL DIRECTIONS FOR FREE. ";:756::L "AND FOR A SMALL CHARGE A22ĺ" AND SHIELD"; 30);"AE=";AE;"%"::"GOLD IN HAND=";GOLD;", BANK=";BANK""::"WEAPONS";19);"CMPLX DAM":W14:W1WN$(W)"NONE"180 WN$(W)"NONE"ĺ:" NO WEAPONS":180# WN$(W);20(WO%(W)0)((WO%(W))10)((WO%(W))100));WxS: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);"% ";:: :A2(AC2):"ARMOUR: ";("SKIN LEATHERCHAIN PLATE ",A271,7);:ACIDES%(W):W: d34,0::"YOU ARE THE ";("MIGHTY FAIR ",17(SEX$"F"),7);NAME$::"YOUR ATTRIBUTES ARE:":" HD=";HD;" AG=";AG;" CH=";CH: n"YOU KNOW THE FOLLOWING SPELLS--":SM0:S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)51,5);" ";:SM1  768:16300,0:16301,0Q0,(X07):1,X0((X07)7):2,Y0:3,N:36608o(34,21::X0198X06880xP340 ZNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WS3fL3fLhO@/ ?@`s@/ ?@`s@/ ?hO@@f`s8wpna]@/~3fL3fLhO@@@/x|ъ @Ŋ0p3$ d!<`O|g0|qQgw}_w  Q:"NhO@%@00@  NhO0@/@ `@3fL3fLhO@/ ?`@?@`sA!Ŋxx|/ъ`Ŋ07`n@]ъ ?Ŋx|/ъ`sъ ?x/ъ`sъ ?/ъ`sŊx|ъs3 ?Ŋxpna/ъŊhO@@pC@0@H RpC `03QDŊ1 "x| ѢŊԨѢŊԨѢŊԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊx|0 /ъŊъ HpNphO@/ 07`v@]@`3fL3fLhO@/ ?@`shO@/N ?@`s@/ ?hO@`sp?`@@/@?3fL3fLʕ ?ՈТ/`q`ՈТx|ʕ.ՈТ@>0@ x RC `?f3_Dc `zNhO@%@00@  NhO0@/@ HpAa OF ";40CH;" GP, I GIVE":"INTERESTING AND USEFUL INFORMATION ";:756::X XX(0) :"SO, WHAT'LL IT BE? (D)IRECTIONS OR":"(I)NFORMATION?' ";:A$:"":A$"I"A$"D"210 A$"I"2603:"THE PROPRIETOR OF THE NORTHWEST SHOP COACHES SPELL CASTING. IT'S EXPENSIVE, THOUGH. ";:756:::"THE WEAPONS PRACTICE SHOP TO THE SOUTH- WEST IS QUITE POPULAR. THE OWNER IS AN EXCELLENT INSTRUCTOR. ";:756::(:"THE WESTERN SHOP BELONGS TO AN UNUSUAL MAN. BUT HE'S QUITE GOOD AT TEACHIN;"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 2000 A$"S"ė:"'GOODBYE AND GOOD LUCK, ";NA$;"!ITY 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::f :AA$;" ABILITY IS ";WA%(AA);"%";25)0 dW110,120,130,1402 nAA$"AXE":AA1:170J xAA$"BOW":AA2:170c AA$"MACE":AA3:170 A$;:A$:A$"P"AA$"SPEAR":AA4:170 A$"W"140 AA$"SWORD":AA52 :"'MY FEE IS ";1000(CH20);" GOLD PIECES PER TRY.":"YOUR CURRENT ABILW):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 (SW)ORD?";:A$:W14:A$("ABMS",W,1)Ă:9 768:16300,0:16301,0Q0,(X07):1,X0((X07)7):2,Y0:3,N:36608a(X0198450u2X068Y09980~<280 FNAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$:GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(68:16300,0:16301,0:(4);"CHAIN VILLAGE.0"FY099X0138190O350DK$;"OPEN LOC":DK$;"WRITE LOC":X0:Y0:N:DK$;"CLOSE LOC":&DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:90:DK$;"CLOSE":A$"M"Y0Y05'A$"J"X0X05;A$"K"X0X05n0,(X07):1,X0((X07)7):2,Y0:3,N:36608X0198(X068Y099)(X068Y034)ĺDK$"FRE":DK$;"CHAIN PRACTICE.1"0Y09X0133:Y0119:DK$"FRE":16302,0:(4);"BLOAD VILLAGE.PIC":716303,0:1007|A$"I"A$"M"A$"J"A$"K"Č36608PA$"I"Y0Y05:440iA$"M"Y0Y05:440A$"J"X0X05:440A$"K"X0X05:4405000,(X07):1,X0((X07)7):2,Y0:3,N:36608:(11)050036608:A$"I"Y0Y05";:756:::350J"UNDER A LOOSE PAVING BLOCK YOU FOUND A SACK OF GOLD COINS WORTH 100 GP! ";:GOLDGOLD100:756:::QQQQ1:350T^KK(16384):KK128350h16368,0:KKKK128:A$(KK):A$"L"X0CXY0CYFLAG1320rA$"/"A$"?"Ĺ114:310.""NORTHEAST":CX183:CY19:310M,"SOUTHEAST":CX183:CY1146"CORNER OF THIS FIELD AND (L)OOK YOU MAY DISCOVER WEALTH.' ";:756:::FLAG1:350@:FLAG0:XX(2(1)1)BQQ5XX2EXX2ĺ"NOTHING HERE! OBVIOUSLY A BAD TIP. G ARMOUR SKILLS.' ";:756:::350GOLD(40CH)0GOLDGOLD(40CH)::"IF YOU GO TO THE ";:XX(4(1)1):XX270,280,290,300 :"YOU DON'T ENOUGH GOLD FOR MY TIP! ";:756:::210"NORTHWEST":CX83:CY19:310 "SOUTHWEST":CX83:CY' ";:756::DK$"FRE":DK$;"CHAIN PRACTICE.0" RL(10(1)1):A$"R"ė:"PUFF PUFF PUFF. 'STAMINA'S IMPORTANT!' ";:756:::200RL10ė:"'A CRITICAL HIT! VERY GOOD!":WA%(AA)WA%(AA)5:"NOW, CONTINUE.' ";:GOLDGOLD(1000CH20):756::200pRL5RL10ė:"'A HIT! GOOD!":WA%(AA)WA%(AA)2:"NOW, CONTINUE.' ";:GOLDGOLD(1000CH20):756::200:"'A MISS. TRY HARDER!":"NOW, CONTINUE.' ";:GOLDGOLD(1000CH20):756::200?:"'AH, SO. WELCOME TO MY HUMBLE SHOP, O MIGHTY ADV0(CH20)):490h0:"'YOU NEED MOVE FASTER! NOW GET UP!' ";:756:::GOLDGOLD(1000(CH20)):490HAIN PRACTICE.0"PA$"R"ė:"CLANK. PUFF. CLANK. 'YOU O.K.?' ";:A$::490RL(10(1)1):RL10ė:"'DAT WAS REAL GOOD!' ";:756:::AEAE5:GOLDGOLD(1000(CH20)):490&RL5ė:"'GOOD! YOU GETTING IT!' ";:756:::AEAE2:GOLDGOLD(100000(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"520490A$"S"ė:"'ME SORRY SEE YOU GO. BYE NOW!' ";:A$::DK$"FRE":DK$;"CICE.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::I:"ARMOUR SKILL IS ";AE;"%";25);"GOLD = ";GOLD:GOLD(1(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"450A$"N"ė:"OH WELL, ME HERE IF YOU NEED ME!' ";:756:::DK$"FRE":DK$;"CHAIN PRACT(10(1)1):RL10ė:"'PERFECT CAST! INCREDIBLE!' ";:756:::GOLDGOLD(1000(CH20)):SA%(SP)SA%(SP)5:370RL5ė:"'NOTHING? CONCENTRATE HARDER!' ";:756:::GOLDGOLD(1000(CH20)):370':"'SUCCESS! GOOD CAST!' ";:756:::GOLDGOLD R, S ";:A$:"":A$"C"A$"R"A$"S"4005370A$"S"ė:"'MY ANCIENT ANCESTORS THANK YOU FOR YOUR EXCELLENT PATRONAGE!' ";:756:::DK$"FRE":DK$;"CHAIN PRACTICE.0"A$"R"ė:"GASP. MUMBLE. GASP. 'BREATHE DEEPLY.' ";:A$::370sRL 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::400,|"(C)AST (R)EST (S)TOP":"SELECT C,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::6h"'NOW CAST THE SPELL WHILE I OFFER SUGGESTIONS FROM NEARBY. SP,1)Ă:300k6A$"N"ė:"'MAY YOUR MAGICS BE ALWAYS SUCCESSFUL!'":DK$"FRE"::DK$;"CHAIN PRACTICE.0"@SP14:A$("BHSP",SP,1)QQSPJ:SPQQ:SA%(SP)0ė:"YOU WILL HAVE TO BUY THAT SPELL FIRST! ";:756:::300`T"'SO, YOU WANT TO LEARN ENTURER. 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::,:"(P)OWER (H)EAL (B)LAST (S)PEED (N)ONE' ";:A$:"":SP15:A$("PHBSN",