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 MACHTHE.ADVENTURERTHE.ADVENTURER "  y !y )VILLAGE.1 1y !x )VILLAGE.2& y !x ,PRACTICE.PIC y !@,*PRACTICE.0 y !x3*PRACTICE.1 iy !xCHAR.REBIRTH-!'(MAIN.PICG ny !@,&MAIN.0Q 1!&MAIN.1Z Zy !x&MAIN.2d y !x&MAIN.3j +,!5+VILLAGE.PICr Py !@,)VILLAGE.0{ y !@,'EAMON.B* y !,&SNAPPY2y !,.NEW.CHARACTER16 Ny !yNEW.CHARACTER2@y !y*CHARACTERSB,9MAIN.HALLEy !y EAMON.GR.HALLy' 'STARTUP 1!REV.23MAY917!7%HELLO y !y%SETUP y ! UNPACKy !,)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 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$:O :"EAMON ADVENTURER'S GUILD":"7625 HAWKHAVEN DR.":"CLEMMONS, NC 27012"8:17::"EAMON":::7:" -> GRAPHICS MAIN HALL <-"::11:"BY RICK VOLBERDING"18:"LAST UPDATE: 5/23/91"LICT."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);(1"":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 WL. ";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 ASTER 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 SCOD 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 APPLND 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$;"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$: !"#$%&'(!   "" "" 8""8"8£5 8 "" 8"""'"0 *>"*>"Ïئ!ۃ㟬 `0La * D@!D @D@@ 0:ȡHe@ hhл`Ie@҈HM:48888: 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),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE"4HEN EATS IT! THEN HE SAYS 'ARE YE READYT' TALK NOW? ";:CNT13ĺ"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,0n"HE PULLS OUT A SWORD SAYING 'YE'D BEST BE GIVIN' ME YER NAME LADDIE, IF YE KNOWWOTS GOOD FER YE! ";tCNT2ĺ"I'VE 'BOUT HAD ME FILL O' YER SICK SENSA 'UMOR! NOW GIMME YER NAME!! ";::CNT3ĺ"THE MAN CUTS ONE OF YOUR FINGERS OFF T(X07):1,X0((X07)7):2,Y0:3,N:36608:(11)0210T@36608:A$"I"Y0Y05qJA$"M"Y0(Y05)(Y04)TA$"J"X0X05^A$"K"X0X05h0,(X07):1,X0((X07)7):2,Y0:3,N:36608:210 ///NO NAME ROUTINECNTCNT1:CNT14548888:!CT5Y029CT0:>KK(16384):KK12824016368,0:KKKK128:A$(KK):A$"I"A$"M"A$"J"A$"K"Č36608A$"I"Y0(Y05)(Y04):310A$"M"Y0Y05:310A$"J"X0X05:310"A$"K"X0X05:310,210960,ӹ16300,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"DH@b]">6""ǟȇФ!|g0 ?  Ɓ"< """" "*"" *""*"" !Ȣ%賐 `?LaLÃ*F@!8t8<   " $"">$ $ "$ D@ $"*<" $"<"Ї"DHA" """"""""*" ""$"0̣%號Ё|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$<:<" <"<< @ο <"< < " ̱Ł"   >"*$>>"Á́ <"<$">$<$"$Ʊ "O $>*">$">""ā"DHO@̃>""<<<""<<" >>$>0 ""<"<<<<"<"<((((((((((((((((((((((((((((((((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)+,-./0`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@JJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJ*9JJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKTSPATHSJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJJKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK)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 AND5789:;<=>?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. 134HE 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. KKK 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 WEAPONS (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"WE RESSURRECT YOU AGAIN AND YOUR PRIME"::"ATTRIBUTES ARE --"::::120ONG 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"ıME 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. TDK$;"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":"0FHIJKLMNO f@3Тx|/`sՈТ<0pʕ ?Ո`!fL3fL3Тx|/@`sТʕ@@? ? fL3fL3Т/x`sТʕ@ ?Тp`/`sՈpyТx|ʕ ?Ո' 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 UNPAC0":DK$;"WRITE CHARACTERS,R";REC::DK$;"CLOSE"= CX$PX$\ (CX$,1)"/"CX$CX$"/"i 8900:8 $"TYPE: (V)OLUMES ON-LINE":" (F)OLDERS AVAILABLE":" (C)LOSE CURRENT FOLDER"2 )" APE TO MAIN MENU":" (/) TO TYPE PATHNDNAME$: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,L15 1 8 TROLLSFIRE 5 25 1 10 NONE 0 0 0 0 NONE 0 0 0 0 FLUFFY 19 14 11 0 0 0 0 5 -10 20 10 0 0 M 58 0 1 SWORD 5 0 1 8 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 ACRD 5 20 2 10 SWORD 5 10 1 9 5 12 2 5 2 5 FLUFFY 19 18 16 0 0 0 0 5 -10 20 10 0 0 M 18 0 2 SWORD 5 10 1 8 NONE 0 0 0 0 NONE 0 0 0 0 NONE 0 0 0 0 1 8 SILVER DAGGER 5 5 1 2 FRED 18 18 18 0 100 0 0 5 -10 20 10 12 10 M 2245 0 5 SWORD 5 02 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ?SYNTAX ERROR IN 2030 SAM 22 22 21 100 200 100 100 40 40 40 40 70 25 M 12743 10000 5 AXE 1 0 2 5 TROLLSFIRE 5 25 2 8 CRYSTAL SWO":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"Т@p|g?g =`hO@@$  "DhO@00@00@ `#$@hO"@ @a `T>"X"A(@ x@hO@/@ ? ?Cc hO@`s@//r<`@hO@  9@/"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^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@ KEYS STEP THROUGH FOLDERS KEY TO SELECT FOLDER APE TO PREVIOUS MENU (/) 6,0:1220 ICĹ216,0:12178 JCX$A$AX$:C1:1096B K8900c L9:"AVAILABLE FOLDERS:":X0n N1125 Q:DK$"OPEN"CX$",TDIR":DK$"READ"CX$:A$:A$:A$ VB$:B$""1125 `(B$,18,3)"DIR"1110 aXX1:B$(X)(B$,2,16)" b(B$(X),1)" "AME OR PREFIX: ":16368,0:AX$:AX$:AX$(3)ĀF .AX$(27)1800X 3AX$"V"8000j 8AX$"F"1200| =AX$"C"8500 BAX$"/"1092 C1030 D:"TYPE PATHNAME OR PREFIX"::"/";AX$:A$CX$:CX$"/"AX$"/" GC0:1097 HDK$"PREFIX"CX$:21DklmnopSE 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:BANAT":REC:200:DK$;"CLOSE"'1560CDK$"DELETE SAVED.GAME"N216,0d,DK$;"RUN LEADIN"216,0:A1100:B$(A)""::DK$"FRE" 1803 DK$"PREFIX"PX$:216,0:1820 :"PREFIX: "PX$::"INSERT MASTER DISK AND TYPE 'C'":A$:A$:A$"C"ĺ(7):1801316304,0:16297,0::34,21:O&DK$"CHAIN MAIN.0,@800"l@ VOLUME POLLING ROUTINEJ:I37:DR$(I,1)"":DR$(I,2)"":hS3:D2r8080|DK$"PREFIX,S"S",D"DDK$"PREFIX":DR$(S,D)DD1:D2SS1:D1:S781000@ xhO@`@/@!@ߜphO@/@`ĈhO@/ ?@@`shO@/N ? @``s@/| ?/D`sТ0 ʕ@ ?Т/`sՈТxʕX{ ?ՈТA(EB/p`ՈТx|ʕՈТN Ax0@ x R3f0l@ f_DchO@00@0ԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈpx|@?p?pߢʕ}>.Ո@Ĝx| 0@a F0pG~`0sCՈТʕՈČТx|/`sТʕ(?Тx|@@`s@/ ?@`s^g =^@/| ?hO@`A A)@/@` {f0<@a fQDՈx|ʕԨѢŊԨѢŊ0ŊԨѢŊԨѢԨѢŊ0@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 @ qstuvwxy ʕ}.Ո`Т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) 8060216,0,P0:S37:D12TDR$(S,D)""PP1:PM$(P)DR$(S,D)\:g8160{DK$"PREFIX"PX$216,0  "THESE VOLUMES ARE CURRENTLY ON-LINE:" ::I1P:5:PM$(I)::I1:JI& 3J:5:PM$(J)+ 3I:5::PMhO@D`sYg)EN@/phO@PA@0@H Rf?L@a|gQDŊ x|ѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊ@x|@@ pO?pA~sG~~q<ъŊъ(aŊ`ɿx|/ъ`Ŋ=NGrъ ?Ŋ@Ljx|/ъ`s@<0xъBC ?x/ъ`sъp ?X07)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((NS!' ";: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(YOU 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 WEAPO((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 z|}~(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@Y034)ĺ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"Y079(X0103X0168)200320IZARDS 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)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$: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$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$:;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.' ";: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",EW7CE 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(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, "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 PT1HDHDING, ";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":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ė:"YOU 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 LONphO@/ 07`v@]@`3fL3fLhO@/ ?@`shO@/N ?@`s@/ ?hO@`sp?`@@/@?3fL3fLʕ ?ՈТ/`q`ՈТx|ʕ.ՈТ@>0@ x RC `?f3_Dc `zNhO@%@00@  NhO0@/@ HpAa x|0?'?pߢʕPpAaՈ Nx|@s/ՈТ8paUʕ`ՈТx|/ `sТʕ ?Тx|/D`sТʕN ?Т/p{`sՈТx@/`| ?3fL3fLhO@``@?@/@`  C `0pQDՈx|ʕԨѢŊԨѢŊԨѢŊԨѢŊԨѢԨѢŊԨѢŊ0ŊԨѢŊԨѢʕԨѢŊԈ@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:310hO@@pC@0@H RpC `03QDŊ1 "x| ѢŊԨѢŊԨѢŊԨѢŊԨѢŊѢŊԨѢŊԨѢ0ԨѢŊԨѢŊѢŊԨѢŊx|0 /ъŊъ HpA!Ŋxx|/ъ`Ŋ07`n@]ъ ?Ŋx|/ъ`sъ ?x/ъ`sъ ?/ъ`sŊx|ъs3 ?Ŋxpna/ъŊ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:CYLL 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 TEACHINOF ";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 SPEO%(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@/ ?`@?@`s";: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$"?"Ĺ16303,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"Y0Y05SP,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",pRL5RL10ė:"'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 ADV' ";: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::200;"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":7HOW 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. 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,SAM 1  FME$(NA$,2)Ă:500x PD$"WRITE CHARACTERS,R";R:NA$:D$"CLOSE"::"O.K. ";NA$;" YOU HAVE BEEN RESURRECTED.": "I CAN'T FIND ANY DEAD ";NA$:D$"CLOSE"  D$(4):Z:5:"INSERT MASTER DISKETTE AND PRESS"::" ANY KEY":A$:D$"OPEN CHARACTERS,L150":D$"READ CHARACTERS,R0":NC:D$("CHARACTER TO BE RESURRECTED:";NA$2R1NC:D$"READ CHARACTERS,R";R:N$:ME$ <N$""Ă:500:9010*d#DX$DX$A$:A1A11:A$;:9010: "; 2#16368,0:A$:A(A$)b7#(A13A8)DX$""Ė1:" ";:1:(X13)11134,1162z<#A13AX$DX$:1190F#A8ĭA12A1A11:11:DX$(DX$,A11):DX$" ";:A110:9010P#A8Ė11:A11:" ";:11:DX$"":9010Z#(A65A90)A46ĺ(7);b A138230%l CX$PM$(I):1210Q4!L(CX$):IL111:(CX$,I,1)"/"Ăb>!I1Ă:1030H!CX$(CX$,I):I1::1030":"If necessary, insert Adventure disk now.";::"CURRENT PREFIX:"::5:CX$:(#INPUT PATHNAME ROUTINE-#22:"PATHNAME$(I):0 20:" KEYS TO STEP THROUGH VOLUMES":" KEY TO RECHECK DRIVES (CTRL-I)":" KEY TO SELECT DESIRED PREFIX": 16368,0:A$:A(A$):A3ĀD A10A21JI:II1:IPI1:8230N A8A11JI:II1:IIPX A980000(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$::370sRLTHE 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$::10SAM 1