' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]E˵B̵CõDĵEµµBD ĵ ⵭µLj` 鷎귭෍ᷩ췩緈JJJJx L8ᷭ緍췩 ᷈LɍL巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&" ۰!õĵ񷮻ʊֵ׵ Rĵ µL  !"#$%&'()*+,-./0123456789:;<=>? $( 1 +&  "  "  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0:-,,-6,,-+0-;9-#0-,31-*(E(B;+4! h8+3 10PX !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌` L ۰L8õ浍õĵBD`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD$ H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`  ƴɻLcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@ LNRANGW?DAT?FIL?VOI/FULLOCKESYNTABUFFEFILETYPPTND  ``ȸ ǩ⩩㩭*0 H hL㩭Ʉ R `8DDEE` TRACKSFREE SECTORS DISK ERROR:  %+19<- (   Ϡ@跻~!Wo*9~~ɬƬ~~~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL 켍ٶ׶ L{ BH [ h`Lo õ ڬL 켍׶ٶ L~H hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ X E @ JE @  H ԩ QƴG0>ȴ  Ȑ `紅D贅E Bƴ  / 0L / ,, `D ǩ  LG  `` ŵBѵ-` ѵB-` ܫ XI볩쳢8DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭  Lª 뷰` Lk ݵܵߵ޵ ^`8ܵ i B8` 9L%ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵BֵO G굎뵎쵬 뵎쵌`` ַ յյ`@ +õm浍õĵL õBĵCصص Qƴ0"BLȿ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` # dɠݠӮϮĠŠz$X0:"IN STORAGE----":I18:XXLN$(I)"NONE":Q(LO%(I)):LN$(I);:(24(LO%(I)0)(Q10)(Q100)):LO%(I);"% ";LD%(I);" D ";LS%(I):I:I14:Q$WN$(I)ĂII18:Q$LN$(I)ĂI:10:"T H E B A N K E R":U$:5008::"RUN ";ADNAME$W2ZW4:WN$(W2)WN$(W21):WT%(W2)WT%(W21):WO%(W2)WO%(W21):WD%(W2)WD%(W21):WS%(W2)WS%(W21):W2:WN$(4)"NONE"::4:"I G M O' S L O C K E R S, I N C."U$:5060:W0:I14:WWWN$(I)"NONE":I::LQ1İ5008::1944N.NAME":ADNAME$:DK$;"CLOSE"'8100t:I112:J25I:I:U$:J:U$:I:I1211:J25I:I:40):J:40):I10:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$:::$DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT":REC:200:DK$;"CLOSE":DK$;300:5:"INSERT DISKETTE WITH ADVENTURE (OR KEEP"::"THIS DISKETTE FOR BEGINNERS CAVE) IN"::"DISK DRIVE IN SLOT SIX, DRIVE ONE THEN"::"HIT 'C'"::::" ";:16368,0A$:A$"C"1020DK$;"OPEN EAMON.NAME":DK$;"READ EAMO"Q$:I18:LN$(I):LT%(I):LO%(I):LD%(I):LS%(I):I:DK$"CLOSE"G6X:Q(NAME$)DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC::(NAME$,Q1):202:DK$;"CLOSE"DK$"OPEN CHAR.PRE":DK$"WRITE CHAR.PRE":200:DK$"CLOSE CHAR.PRE"CMD::CMD1000,2000,3000,4000,5000,5500,60008NAME$tHD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):WA,LQQ$NAME$".LOC":DK$"OPEN"Q$:DK$"WRITEKER TO DEPOSIT OR":" WITHDRAW SOME GOLD."::" 5. EXAMINE YOUR ABILITIES."s:" 6. GO TO THE ADVENTURERS' LOCKERS."::" 7. TEMPORARILY LEAVE THE UNIVERSE."x::"(HIT THE KEY FOR YOUR CHOICE, 1-7)";A$:CMD(A$):CMD1CMD7130-H A L L":I139:"_";:I:: i"AS YOU WANDER ABOUT THE HALL, YOU":"REALIZE YOU CAN DO ONE OF SEVEN THINGS:"::" 1. GO ON AN ADVENTURE."::" 2. VISIT THE WEAPON SHOP FOR ARMS."Pn:" 3. HIRE A WIZARD TO TEACH YOU SPELLS."::" 4. FIND THE BANX$` FGOLD,BANK:AC:W14:WNAME$(W),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE" II14:WN$(I)""WN$"NONE" KWN$(I)"NONE"WO%(I)0:WD%(I)0:WS%(I)0 MI PP(X)(XRTIO.5) Z216,0 d:Q(0) f9:"T H E M A I N OLD ONERR GOTO100t *Q$NAME$".LOC":DK$"OPEN"Q$:DK$"READ"Q$:I18:LN$(I),LT%(I),LO%(I),LD%(I),LS%(I):I:LQ1 1DK$"CLOSE" 2DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";REC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AE <SE,WD%(6),WS%(6),LN$(8),LT%(8),LO%(8),LD%(8),LS%(8)< 7000 DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE" #Q91ĺDK$"RUNEXP.UPDATE": %49 &Q$NAME$".EXP":DK$"OPEN"Q$:DK$"READ"Q$:XN,XE,XL:DK$"CLOSE" (M AN ADVENTURE -> RUN EXP.UPDATE* 8000@ (4)"MAXFILES 3"O :::255 DK$(4):U$"_______________________________________" 5:"EAMON ADVENTURER'S GUILD":"7625 HAWKHAVEN DR.":"CLEMMONS, NC 27012"1 SA%(5),WA%(6),WN$(6),WT%(6),WO%(6)=F MAIN HALL (BUY STUFF & GO ON ADVENTURES) ORIG. BY DONALD BROWNL 7/92 MODS: ADD LOCKER/ IMPROVED CHAR STATS DISPLAYS/ EXPERIENCE ... BY JEFF HURLBURT (COMPUTIST MAGAZINE) 713-645-8680  8000 SUB: Q9=1 MEANS HALL RUN FROōԠĠƠōҠƠӍԠΠŠŠ΍ŠƠŠōĠٍӠōҧӠǍESE":"VERY CHEAPLY. I NEED ";P(100);" GOLD":"PIECES FOR THE LEATHER, ";P(250);" FOR":"THE CHAIN, AND ";P(500);" FOR THE PLATE.":% TIĺ"ALSO, I CAN GIVE YOU A TRADE-IN ON YOUR":"OLD ARMOUR OF ";TI;" GOLD PIECES.":& "WELL, WHAT WILL IT BE?'B125(A21)60(A22)100(A23):TI(B1RTIO.5)$ 1990:"MARCOS TAKES YOU TO THE ARMOUR SECTION":"OF HIS SHOP AND SHOWS YOU SUITS OF":"LEATHER ARMOUR, CHAIN ARMOUR, AND PLATE.":1998:TIB12TIB12% 1990:"HE SAYS, 'I CAN PUT YOU IN ANY OF THR LEAVE IT.'"::"(HIT T OR L) ";8#V A$:A$"T"2003D#j :2300#t :X14:("ABMS",X,1)(W$,1)ĴX2440,2450,2460,2470#~ X# BP25:2370# BP40:2370# BP20:2370# (W$,2,1)"P"BP25:2370# BP50:23702$ A2(AC2):SHACA22:T ONE FROM ME, REMEMBER?'"::2002p"B BPBPBP(WO%(T)5)BP2(WO%(T)5):P(BPRTIO.5):PBP4P(BP4.5)"L 1990:"MARCOS EXAMINES YOUR "N$" AND":"SAYS, 'LOOKSA LIKE YOU'VE DINGED 'ER":"A BIT. I CAN OFFER ";P;" GOLD PIECES.'":"#M "'TAKE IT OUYING A":"WEAPON?'"::"(HIT Y OR N) ";F! A$:A$:A$"Y"ĺ:2050R!$ :2170!. 1990:"MARCOS ASKS, 'WELL, WHAT WEAPON YOU":"WANTA RETURN?"::2650::A$"X"2003""8 W2W:W14:(WN$(W),(N$))N$Ă:"MARCOS LAUGHS AND SAYS, 'YOU NEVER":"BOUGH:N$(W$,L):"MARCOS FROWNS AT YOU AND SAYS,"::"'THIS "N$" IS A WEAPON LIKE I SELL,":"REMEMBER!'":1998:2420 :GOLDGOLDP:ZWW:1920 1990:"MARCOS GIVES YOU YOUR MONEY AND TAKES":"YOUR WEAPON.":1998*! 1990:"MARCOS ASKS YOU, 'HOW ABOUT BOWN!'":2002!W$"NONE"2290]1990:"MARCOS SAYS, 'I THINK YOU ARE WASTING MY TIME!":"MARCOS SHOOS YOU OUT OF HIS STORE.":1999L5((W$,5)"SWORD"(W$,5)"SPEAR")4((W$,4)"MACE")3((W$,3)"BOW"(W$,3)"AXE"):L02300p 1990E IT OR":"LEAVE IT!'"::"(HIT T OR L) ";FA$:A$:A$"T"2003:1990:"MARCOS SAYS, 'OKAY, WHAT'VE YOU GOT?"::"(WEAPON NAME) ";W$:W$""2287 W14:WN$(W)W$Ă::"MARCOS FROWNS AT YOU AND SAYS, 'YOU":"CAN'T SELL A WEAPON YOU DON'T 1990:"MARCOS ASKS YOU, 'IS THIS WEAPON YOU":"WANT TO SELL ME A STANDARD WEAPON LIKE":"I SELL? (HIT 'Y' OR 'N') ";A$:A$"Y"2350A$"N"2003,A$::P(50RTIO.5):"MARCOS SAYS, 'THEN I CAN ONLY GIVE YOU":P;" GOLD PIECES FOR IT, TAK8Uz1990:"HE NOW ASKS YOU, 'NOW HOW ABOUT SOME":"ARMOUR?'"::"(HIT Y OR N) ";{A$:A$:A$"N"ĺ:1SH2580,2210A$"Y"24902003"MARCOS SMILES AND SAYS, 'COME BACK":"AGAIN SOON!' AS HE SHOOS YOU OUT OF HIS":"SHOP."::1999xES AS YOU LEAVE.":1999=HW14:WN$(W)N$N$N$"#":2120]RW:W14:WN$(W)"NONE"Ă\WN$(W)N$:WT%(W)TP:WO%(W)10(2Q):WD%(W)DICE:WS%(W)SIDES:GOLDGOLDPf1990:"MARCOS HANDS YOU YOUR WEAPON AND TAKES":"THE PRICE FROM YOU.":p199PBPBP(Q1)BP2(Q3):PP(P)3>PGOLD2120?1990:"MARCOS SHAKES A FINGER AT YOU AND SAYS,":"'YOU SHOULDN'T PLAY TRICKS ON AN OLD":"FRIEND!'":A"'COME BACK WHEN YOU GOTTA MORE":"GOLD OR YOU WANT SOMETHING YOU CAN":"AFFORD.' MARCOS WAV MA"Q91E*ESTART ADV (SAVE NAME)]EL43382:L1,40:F$ADNAME$:L9(F$):L978130E(F$,4)"THE "L9L94:F$(F$,L9)EL,L9:I1L9ELI,((F$,I,1)):IE300'DDK$;"DELETE THE ADVENTURER"-DlDXDK$"CLOSE":"EXIT ON ";(222);" @ ";(218)256(219);"."Di(222)5ĺ:"KEY >> ";:Q$:Q$Dk(4);"RUN THE WONDERFUL WORLD OF EAMON"DlD@Q90:F$"":I48:F$F$((512I)128):I EJF$" CI:LN$(ZX)Q$:5503"Cp:11Cw"AS YOU LEAVE THE HALL, THE IRISHMAN":"COMES UP TO YOU, SLAPS YOU ON THE BACK":"AND SAYS, 'Y'ALL COME BACK REAL SOON,":"YA HEAH?'"CzDK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:200:DK$;"CLOSE"D͍ō΍΍΍(ZW)XAWN$(ZW)LN$(ZX):WT%(ZW)LT%(ZX):WO%(ZW)LO%(ZX):WD%(ZW)LD%(ZX):WS%(ZW)LS%(ZX)ALN$(ZX)LN$(0):LT%(ZX)LT%(0):LO%(ZX)LO%(0):LD%(ZX)LD%(0):LS%(ZX)LS%(0)AWN$(ZW)"NONE"İ1920:5580AQ$WN$(ZW)AI14:IZW5570BQ$WN$(I)557 ANYTIME!'":1999M@"GET WHICH ITEM? ";Q$:1947:ZXI:Q$""Q$"NONE"5503\@ZX85537@Q$"NONE":1945:ZWI:ZW55550@"SWAP FOR WHAT ITEM? ";Q$:1945:ZWI:ZW45530ALN$(0)WN$(ZW):LT%(0)WT%(ZW):LO%(0)WO%(ZW):LD%(0)WD%(ZW):LS%(0)WS%ITEM? ";Q$:1945:ZWI:Q$""Q$"NONE"5503:?ZW55533a?1940:"YOU HAVE NO '"Q$"'!":5502?Q$"NONE":1947:ZXI:ZX95550?"SWAP FOR WHAT ITEM? ";Q$:1947:ZXI:ZX95550?1940:"NO '"Q$"' IS IN STORAGE!":5502@A$"R"ĺ"'COME BACKOLDGOLD7000:I18:LN$(I)"NONE":I:LQ1:"YOUR LOCKER IS READY.'">"YOU SMILE, PICK UP YOUR KEY,":"AND GO TO YOUR LOCKER.":5502>"DO YOU STORE AN ITEM OR RETRIEVE ONE?":" (SPC TO EXIT OR S, R) ";:A$:A$:1940:A$"S"5540+?"STORE WHICH "REACH LEVEL 7. REMEMBER, THE PRICE IS":"JUST 7000 GOLD FOR A ROOMY LOCKER!'":1999=GOLD7000ĺ"HAVE THE 7000 GOLD TO PURCHASE":"YOUR OWN LOCKER.'":1999=:"ARE YOU READY TO BUY A SPACE? (Y/N) ";:Q$:Q$:Q$"Y"1999D>:"'EXCELLENT! ";:G(I);"% ";WD%(I);" D ";WS%(I):I(<8<{///LOCKERSH<|1940:5505R<~1998b<1940:5515<"THE LOCKER ATTENDANT GREETS YOU: 'GOOD":"AFTERNOON, "NAME$"!'":LQ5514<XL6GOLD69995511<:"'COME BACK AS SOON AS YOU"<XL65510V=ERCHAIN PLATE ",A271,7):I17:(Q$,I,1)" "ĂIF;Q$(Q$,I1)u;"ARMOUR: "Q$;:ACA22SH1:" & SHIELD";;26);"AE=";AE;"% AC=";AC:;"WEAPONS";23);"COMPLEX DAMAGE""<I14:Q(WO%(I)):WN$(I);:(24(WO%(I)0)(Q10)(Q100)):WO%:50253::12);:S14:SA%(S)ĺ3);SA%(S);"%";>:S::D::"YOUR WEAPON ABILITIES ARE--":" AXE BOW CLUB SPEAR SWORD":I15:1(I3)(WA%(I)0)((WA%(I))10)((WA%(I))100));WA%(I);"% ";:I::5;A2(AC2):Q$("SKIN LEATH ";XE;:20(XE99999):"ADVENTURES: ";XN:"ATTRIBUTES: HD=";HD;" AG=";AG;" CH=";CH:9"GOLD IN HAND=";GOLD;", BANK=";BANK:99"MAGIC SKILLS: ";:SM09S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)51,5);" ";:SM1:S:SMĺ" ZILCH!":"THANKS YOU AND WALKS AWAY.":1999885004:5010:5030u823:16368,0:"(HIT ANY KEY TO CONTINUE) ";:A$::1008Q$"MIGHTY ":SEX$"F"Q$"FAIR "8:Q$"THE "Q$NAME$:I((32(Q$))2):I:Q$;I);"LVL ";XL:I139:"_";:I:V9"EXPERIENCE:LE FOR":"A 'MODEST' DEPOSIT OF ";GOLD;".":40027"HE WALKS AWAY, SHOUTING ABOUT FOOLS":"WHO PLAY TRICKS ON 'KNIDLY BANKERS'.":1999"8GOLDGOLDMNY:BANKBANKMNY:1950:"SHYLOCK TAKES YOUR MONEY, PUTS IT IN":"HIS BAG, LISTENS TO IT JINGLE, THEN":IT?' >> ";A$6A$""4003@6MNY(((A$))):MNYGOLD412061950:"THE BANKER IS VERY PLEASED WHEN YOU":"TELL HIM THE SUM, BUT WHEN HE DISCOVERS":"THAT YOU DON'T HAVE THAT MUCH ON YOU,"07CH28(1)GOLD2999ĺ"HE HELPFULLY SUGGESTS YOU SETT1950:"THE BANKER HANDS YOU YOUR GOLD AND":"SAYS, 'THAT LEAVES YOU WITH ";BANK:"PIECES IN MY CARE.' HE SHAKES YOUR":"HAND AND WALKS AWAY.":1999 61950:"SHYLOCK GETS A WIDE GRIN ON HIS FACE":"AND SAYS, 'EXCELLENT! HOW MUCH DO YOU":"WANT TO DEPOS͍ ōōōȍ͍àҧӠ׍ōō͍:":\2NAME$", MY DEAR ";("GIRLBOY",(SEX$"M")41,4);",":"THIS IS A GENUINE PLEASURE!"2"DO YOU WISH TO MAKE A DEPOSIT(!) OR,":"PERHAPS, A TINY WITHDRAWAL?' (SPC/D/W) ";2A$:A$:A$"D"ĺ:40902A$"W"100@3BANK1ĺ"HA! GOOD TRY, "N"WANTING SOMETHING FOR NOTHING.":1999611950:4005B1:1998R11950:40151"YOU HAVE NO TROUBLE SPOTTING SHYLOCK":"MCFENNEY, THE LOCAL BANKER, DUE TO HIS":"LARGE BELLY."2:"YOU ATTRACT HIS ATTENTION, AND":"HE COMES OVER TO YOU AND SAYSHOKAS TEACHES YOU YOUR SPELL, TAKES":"HIS FEE, AND RETURNS TO HIS STOOL ON":"THE BAR."05 "AS YOU WALK AWAY YOU HEAR HIM":"ORDER A DOUBLE DRAGON BLOMB.":1999&1 1970:"AS YOU LEAVE, YOU HEAR HOKAS MUTTERING":"ABOUT CHEAPSKATE ADVENTURERS ALWAYS":70:"HOKAS SAYS, 'I OUGHT TO TAKE YOUR":"GOLD ANYWAY, BUT HAVEN'T YOU FORGOTTEN":"SOMETHING? I ALREADY TAUGHT YOU "A$"!'"/* CH(1)283002/+ :"SHAKING HIS HEAD SADLY, HE RETURNS TO":"THE BAR.":1999X00 GOLDGOLDP:SA%(SP)(50(1)26):1970:"D":A$:PP(5000):31004. A$"POWER":A$:PP(100). :PGOLDİ1970:"WHEN HOKAS SEES THAT YOU DON'T HAVE":"ENOUGH TO PAY HIM, HE STALKS TO THE":"BAR, MUTTERING ABOUT YOUNGSTERS WHO":"SHOULD BE TURNED INTO FROGS.":1999.& SA%(SP)03120{/) 19 POWER ";P(100);"GP":b- "WELL, WHICH WILL IT BE?'"::"(SPC TO LEAVE OR PICK B, H, S, P) ";- A$:SP14:A$("BHSP",SP,1)Ă::3200- SP3060,3070,3080,3090- A$"BLAST":A$:PP(3000):3100- A$"HEAL":A$:PP(1000):3100. A$"SPEEYS, 'SO YOU WANT OLD":"TOKEY TO TEACH YOU SOME MAGIC, HEH HEH?"_, "WELL, IT'LL COST YOU. ";, "TODAY MY FEES ARE:":C2CH(11(1)5):C2C2(C20):RTIO10C2- " BLAST ";P(3000);"GP":" HEAL ";P(1000);"GP":" SPEED ";P(5000);"GP":" :2750+ A$"W"2755A+ "WORD":BP50:N$"SWORD":TP5:SIDE8N+ DICE1:_+ A$"X":A$:e+ u+ 1970:3005+ :1998+ 1970:3015@, "AFTER A FEW MINUTES DILIGENT SEARCHING,":"YOU FIND HOKAS TOKAS, THE OLD MAGE. HE":"LOOKS AT YOU AND SA14:A$("ABMS",W,1)ĂW:2755;*n W2680,2690,2700,2710g*x "AXE":BP25:N$"AXE":TP1:SIDE6:2750* "BOW":BP40:N$"BOW":TP2:SIDE6:2750* "MACE":BP20:N$"MACE":TP3:SIDE4:2750* A$;:+ A$:A$"P"ĺ"PEAR":BP25:TP4:SIDE5:N$"SPEAR" BUY THE SHIELD, MARCOS":"FROWNS AND SAYS, 'I'M SORRY, BUT I":"DON'T GIVE CREDIT!'"::2113)< GOLDGOLDP(50):SH1:ACA22SH:1990:"MARCOS TAKES YOUR GOLD AND GIVES YOU":"A SHIELD.":2003)P )Z "(HIT THE KEY(S), A B M SP OR SW) ";: *d A$:W'NOW HOW ABOUT":"A SHIELD? I CAN LET YOU HAVE ONE FOR":"ONLY ";P(50);" GOLD PIECES!'"::"(HIT Y OR N)";( A$:A$:A$"N"ĺ:1((1)1.9)2289,2210(( A$"Y"2003])2 A$::GOLDP(50)İ1990:"WHEN HE SEES THAT YOU DO NOT HAVE":"ENOUGH GOLD TOUGHT TO PAY FOR YOUR":"ARMOUR AND SAYS, 'I DON'T GIVE CREDIT!'"::2570' GOLDGOLDP:A2A1:ACA22SH:1990:"MARCOS TAKES YOUR OLD ARMOUR AND YOUR":"GOLD AND HELPS YOU INTO YOUR NEW":"ARMOUR."' 1998:SH2003l( 1990:"MARCOS SMILES AND SAYS, CES.":B& "WELL, WHAT WILL IT BE?'"::"(HIT SPC OR L, C, P) ";~& A$:A$:A14:A$("NLCP",A,1)Ă:1(SH0)2580,2003& :A12570H' PP(100(A2)250(A3)500(A4))TI:PGOLDİ1990:"MARCOS FROWNS WHEN HE SEES THAT YOU DO":"NOT HAVE ENO"HE SAYS, 'I CAN PUT YOU IN ANY OF THESE":"VERY CHEAPLY. I NEED ";P(100);" GOLD":"PIECES FOR THE LEATHER, ";P(250);" FOR":"THE CHAIN, AND ";P(500);" FOR THE PLATE.":& TIĺ"ALSO, I CAN GIVE YOU A TRADE-IN ON YOUR":"OLD ARMOUR OF ";TI;" GOLD PIEST,HEAL,SPEED,POWERōӠ׍΍ƍԠččōōҍ͍čP;" GOLD PIECES.'":G#M "'TAKE IT OR LEAVE IT.'"::"(HIT T OR L) ";]#V A$:A$"T"2003i#j :2300#t :X14:("ABMS",X,1)(W$,1)ĴX2440,2450,2460,2470#~ X# BP25:2370# BP40:2370# BP20:2370# (W$,2,1)"P"BP25:2370 $ B LAUGHS AND SAYS, 'YOU NEVER":"BOUGHT ONE FROM ME, REMEMBER?'"::2002"B BPBPBP(WO%(T)5)BP2(WO%(T)5):P(BPRTIO.5):PBP4P(BP4.5)#L 1990:"MARCOS EXAMINES YOUR "N$" AND":"SAYS, 'LOOKSA LIKE YOU'VE DINGED 'ER":"A BIT. I CAN OFFER ";1990:"MARCOS ASKS YOU, 'HOW ABOUT BUYING A":"WEAPON?'"::"(HIT Y OR N) ";k! A$:A$:A$"Y"ĺ:2050w!$ :2170!. 1990:"MARCOS ASKS, 'WELL, WHAT WEAPON YOU":"WANTA RETURN?"::2650::A$"X"2003G"8 W2W:W14:(WN$(W),(N$))N$Ă:"MARCOSW"(W$,3)"AXE"):L02300 1990:N$(W$,L):"MARCOS FROWNS AT YOU AND SAYS,"::"'THIS "N$" IS A WEAPON LIKE I SELL,":"REMEMBER!'":1998:2420 :GOLDGOLDP:ZWW:1920 1990:"MARCOS GIVES YOU YOUR MONEY AND TAKES":"YOUR WEAPON.":1998O! YOU":"CAN'T SELL A WEAPON YOU DON'T OWN!'":2002FW$"NONE"22901990:"MARCOS SAYS, 'I THINK YOU ARE WASTING MY TIME!":"MARCOS SHOOS YOU OUT OF HIS STORE.":1999 L5((W$,5)"SWORD"(W$,5)"SPEAR")4((W$,4)"MACE")3((W$,3)"BOEl4E@Q90:F$"":I48:F$F$((512I)128):IJEJF$" MA"Q91PEkESTART ADV (SAVE NAME)EL43382:L1,40:F$ADNAME$:L9(F$):L978130E(F$,4)"THE "L9L94:F$(F$,L9)EL,L9:I1L9ELI,((F$,I,1)):IEARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:200:DK$;"CLOSE"GD300hDDK$;"DELETE THE ADVENTURER"nDDXDK$"CLOSE":"EXIT ON ";(222);" @ ";(218)256(219);"."Di(222)5ĺ:"KEY >> ";:Q$:Q$Dk(4);"RUN THE WONDERFUL WORLD OF EAMON")"#"Q$(Q$,(Q$)1)(65((1)25)):5585ACQ$Q$"#":5585YCI:LN$(ZX)Q$:5503cCp:11Cw"AS YOU LEAVE THE HALL, THE IRISHMAN":"COMES UP TO YOU, SLAPS YOU ON THE BACK":"AND SAYS, 'Y'ALL COME BACK REAL SOON,":"YA HEAH?'">DzDK$;"OPEN CH20:5580BQ$WN$(ZW)-BI14:IZW5570BBQ$WN$(I)5570{B(Q$,1)"#"Q$(Q$,(Q$)1)(65((1)25)):5560BQ$Q$"#":5560BI:WN$(ZW)Q$BLN$(ZX)"NONE"5503BQ$LN$(ZX)BI18:IZX5595BQ$LN$(I)5595-C(Q$,1)WN$(ZW):LT%(0)WT%(ZW):LO%(0)WO%(ZW):LD%(0)WD%(ZW):LS%(0)WS%(ZW)AWN$(ZW)LN$(ZX):WT%(ZW)LT%(ZX):WO%(ZW)LO%(ZX):WD%(ZW)LD%(ZX):WS%(ZW)LS%(ZX)ALN$(ZX)LN$(0):LT%(ZX)LT%(0):LO%(ZX)LO%(0):LD%(ZX)LD%(0):LS%(ZX)LS%(0)BWN$(ZW)"NONE"İ191940:"NO '"Q$"' IS IN STORAGE!":5502R@A$"R"ĺ"'COME BACK ANYTIME!'":1999@"GET WHICH ITEM? ";Q$:1947:ZXI:Q$""Q$"NONE"5503@ZX85537@Q$"NONE":1945:ZWI:ZW55550@"SWAP FOR WHAT ITEM? ";Q$:1945:ZWI:ZW45530EALN$(0O EXIT OR S, R) ";:A$:A$:1940:A$"S"5540l?"STORE WHICH ITEM? ";Q$:1945:ZWI:Q$""Q$"NONE"5503{?ZW55533?1940:"YOU HAVE NO '"Q$"'!":5502?Q$"NONE":1947:ZXI:ZX95550?"SWAP FOR WHAT ITEM? ";Q$:1947:ZXI:ZX95550'@ȠčĠččҍӠ׍ō΍ō A SPACE? (Y/N) ";:Q$:Q$:Q$"Y"1999>:"'EXCELLENT! ";:GOLDGOLD7000:I18:LN$(I)"NONE":I:LQ1:"YOUR LOCKER IS READY.'">"YOU SMILE, PICK UP YOUR KEY,":"AND GO TO YOUR LOCKER.":5502.?"DO YOU STORE AN ITEM OR RETRIEVE ONE?":" (SPC Tƍ͍ԍӠ׍ōD69995511.=:"'COME BACK AS SOON AS YOU"==XL65510="REACH LEVEL 7. REMEMBER, THE PRICE IS":"JUST 7000 GOLD FOR A ROOMY LOCKER!'":1999=GOLD7000ĺ"HAVE THE 7000 GOLD TO PURCHASE":"YOUR OWN LOCKER.'":1999(>:"ARE YOU READY TO BUYI14:Q(WO%(I)):WN$(I);:(24(WO%(I)0)(Q10)(Q100)):WO%(I);"% ";WD%(I);" D ";WS%(I):Ii<y<{///LOCKERS<|1940:5505<~1998<1940:5515<"THE LOCKER ATTENDANT GREETS YOU: 'GOOD":"AFTERNOON, "NAME$"!'":LQ5514 =XL6GOL%(I))100));WA%(I);"% ";:I::v;A2(AC2):Q$("SKIN LEATHERCHAIN PLATE ",A271,7):I17:(Q$,I,1)" "ĂI;Q$(Q$,I1);"ARMOUR: "Q$;:ACA22SH1:" & SHIELD";;26);"AE=";AE;"% AC=";AC:;"WEAPONS";23);"COMPLEX DAMAGE"c> ";A$]6A$""40036MNY(((A$))):MNYGOLD412071950:"THE BANKER IS VERY PLEASED WHEN YOU":"TELL HIM THE SUM, BUT WHEN HE DISCOVERS":"THAT YOU DON'T HAVE THAT MUCH ON HIMSELF IN":"THE CROWD.":19995GOLDGOLDMNY:BANKBANKMNY:1950:"THE BANKER HANDS YOU YOUR GOLD AND":"SAYS, 'THAT LEAVES YOU WITH ";BANK:"PIECES IN MY CARE.' HE SHAKES YOUR":"HAND AND WALKS AWAY.":1999M61950:"SHYLOCK GETS A WIDE GRIN ON HA$""4003/4MNY(((A$))):MNYBANK408041950:MNY;"!!! (GASP)"::"THE BANKER THROWS YOU A TERRIBLE GLANCE":"AND SAYS, 'THAT'S MORE THAN YOU'VE GOT!"4CH28(1)4002 5"YOU KNOW I DON'T MAKE LOANS TO YOUR":"KIND!' WITH THAT HE LOSES$:A$"D"ĺ:4090"3A$"W"1003BANK1ĺ"HA! GOOD TRY, "NAME$".":"UNFORTUNATELY, YOUR ACCOUNT":"BALANCE IS ZERO!":40023:"SHYLOCK SAYS, 'WELL, YOU HAVE ";BANK:"GOLD PIECES STORED WITH ME. HOW MANY DO":"YOU WANT TO TAKE BACK?' >> ";A$ 4"YOU ATTRACT HIS ATTENTION, AND":"HE COMES OVER TO YOU AND SAYS:":2NAME$", MY DEAR ";("GIRLBOY",(SEX$"M")41,4);",":"THIS IS A GENUINE PLEASURE!"2"DO YOU WISH TO MAKE A DEPOSIT(!) OR,":"PERHAPS, A TINY WITHDRAWAL?' (SPC/D/W) ";3A$:AOU HEAR HOKAS MUTTERING":"ABOUT CHEAPSKATE ADVENTURERS ALWAYS":"WANTING SOMETHING FOR NOTHING.":1999w11950:40051:199811950:40151"YOU HAVE NO TROUBLE SPOTTING SHYLOCK":"MCFENNEY, THE LOCAL BANKER, DUE TO HIS":"LARGE BELLY."E2::"THE BAR.":199900 GOLDGOLDP:SA%(SP)(50(1)26):1970:"HOKAS TEACHES YOU YOUR SPELL, TAKES":"HIS FEE, AND RETURNS TO HIS STOOL ON":"THE BAR."05 "AS YOU WALK AWAY YOU HEAR HIM":"ORDER A DOUBLE DRAGON BLOMB.":1999g1 1970:"AS YOU LEAVE, Y"SHOULD BE TURNED INTO FROGS.":19999/& SA%(SP)03120/) 1970:"HOKAS SAYS, 'I OUGHT TO TAKE YOUR":"GOLD ANYWAY, BUT HAVEN'T YOU FORGOTTEN":"SOMETHING? I ALREADY TAUGHT YOU "A$"!'"/* CH(1)2830020+ :"SHAKING HIS HEAD SADLY, HE RETURNS TO":PP(3000):31004. A$"HEAL":A$:PP(1000):3100X. A$"SPEED":A$:PP(5000):3100u. A$"POWER":A$:PP(100)$/ :PGOLDİ1970:"WHEN HOKAS SEES THAT YOU DON'T HAVE":"ENOUGH TO PAY HIM, HE STALKS TO THE":"BAR, MUTTERING ABOUT YOUNGSTERS WHO":Q)WA%(Q)3(WA%(Q)66)2((1)3):WA%(Q)100WA%(Q)100IIWA%(Q):l QQ8:SA%(Q)1SA%(Q)992110*SA%(Q)SA%(Q)4((1)4):SA%(Q)100SA%(Q)1004ISA%(Q):>"NOT ALLOWED! oaY> ";:Q$:HQ99:RAXE,BOW,CLUB,SPEAR,SWORD,BLA:WN$(I):WT%(I):WO%(I):WD%(I):WS%(I):I:DK$"CLOSE"=[Q(Q$)64:Q1Q122120XQ:Q2020,2030,2040,2050,2050,2050,2050,2050,2080,2080,2080,2080HDHD1:IHD:AGAG1:IAG:CHCH1:ICH:QQ3:WA%(Q)1002110: WA%(: ";:Q$:Q$:2000#`:Q991070MjX:25:I;" << DONE ";:Q$:16:1::dtWW1:P(2)W1060~DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";RECNA$:HD:AG:CH:I14:SA%(I):I:I15:WA%(I):I:AE:SEX$7GOLD:BANK:AC:I14 HARDINESS";:17:HD:"[B] AGILITY";:17:AG:"[C] CHARISMA";:17:CHBI15:Q$:"[";(67I);"] ";Q$;:17:WA%(I)10WA%(I)1);WA%(I):ILI14:Q$:"[";(72I);"] ";Q$;:17:SA%(I)10);SA%(I):IV:16:"SELECT ATTRIBUTE OR SKILL TO ENHANCE16):Q1JJ16I:LL16:9700JJLI:L18WQ(QEJ)L:"*";:QI2LLL:990oQEJ(QQ3):LW2P(1)QE:P(2)L:P(2)W1060L9011501180$:NA$" ADVANCES A LEVEL!!":(7)::" ";:Q$:.:E8"[A](DF7)#pQEQE3(DGNZ)(DG0))z?...LEVEL ADVANCEZWP(2):QEP(1)QE:JQEfI0:L0II100:Q(JI):Q16LL16:JJ(I16):930LLQ:LW31010(ADJUST OVER-EXP):"*";QE;" *";L;" ";:I0:J0:LW2II100:Q(LIATTRIB DIF4 DA(HVHD)(AVAG)(CVCH)C*SPELL DIFm4DS0:I14:DSDS(SA%(I)TA%(I)):I>WEAPSKILL DIFHDF0:I15:DFDF(WA%(I)XA%(I)):IRARMOR DIF\DZ(ACOA)(AEVA)fQE(DA50)(DZ11)(DW3)(BW25)(DS33)G200):DG1DG1WEAP DIF/DW0:I14WN$(I)XN$(I)WT%(I)XT%(I)WO%(I)XO%(I)WD%(I)XD%(I)WS%(I)XS%(I)DW1:760I:800BETTER WEAPBW0:I14J14:(WO%(I)XO%(J))(WD%(I)WS%(I)XD%(J)XS%(J))ĂJ:BWBW1 J2010(VAE30)5(VAE50)3(VAE75):(Q)JAEVAEJ(Q):640QlL9L:Lĺ:WvsLL1:"*"(48L)" ";:...CALC EXPERIENCEGOLD DIFDGGOOG:DG0DG1DG0720Q0:DG100000Q((DG100000)100000):Q9Q9DGQ(DJ(Q):640x:I14:QSA%(I)TA%(I):J114(TA%(I)25)3(TA%(I)50)2(TA%(I)80):(Q)JSA%(I)TA%(I)J(Q):640DINI15:QWA%(I)XA%(I):J155(XA%(I)25)4(XA%(I)50)3(XA%(I)80):(Q)JWA%(I)XA%(I)J(Q):640XIAbQAEVAE:"RUN MAIN HALL"<P(0)1:E$(1)F$:N%(1)1:I1:410R...CHANGE FILTER:L0:QHDHV:J53(HV13)(HV25):(Q)JHDHVJ(Q):640&QAGAV:J53(AV13)(AV25):(Q)JAGAVJ(Q):640 0QCHCV:J53(CV13)(CV25):(Q)JCHCVI1P(0):E$(I):N%(I):I,DK$"CLOSE"I:"ADVENTURES OF "NA$:"LEVEL: ";P(2);" EXPERIENCE: ";P(1):I139:"_";:I:34,4:5I1P(0):E$(I);31(E$(I)));N%(I);(" TIMES",6(N%(I)1)):I34,0::"ANY KEY >> ";:Q$::DK$08:P(I):I+^I1P(0):E$(I),N%(I):IBhDK$"CLOSE":216,0crI1P(0):E$(I)F$ĂI:390z|N%(I)N%(I)1:410I300I300N%(I)1:E$(I)F$:P(0)I216,0:NZN%(I):540:670:910DK$"OPEN"Z$:DK$"WRITE"Z$I08:P(I):IUST":"CALL IT: ADVENTURE X!'":F$"ADVENTURE X"h :" ";:Q$::290 L9(L):F$"":I1L9:F$F$((LI)) I:L1,32 "216,0:Z$NA$".EXP" ,520 6DK$"UNLOCK"Z$ @DK$"OPEN"Z$ JDK$"READ"Z$ TINTURE DISKETTE> ";:Q$:" 267} DK$"UNLOCK EAMON.NAME":DK$;"OPEN EAMON.NAME":DK$;"READ EAMON.NAME":F$:DK$;"CLOSE" (F$,4)"THE "F$(F$,(F$)4) :"'AH! HERE IT IS.'": 268/ DK$"CLOSE"::5:"'HMMMMM... NO HELP THERE. I'LL JDK$;"CLOSE" (GET ADV NAME): L43382:(L1)40270 :5:"THE SECRETARY OF HALL RECORDS LOOKS":"AT YOUR PRINTOUT AND SIGHS. 'FOR SOME" "REASON,' SHE SAYS, 'THE NAME OF YOUR":"LATEST QUEST WAS NOT SENT IN.'" :"PGOLD2120?1990:"MARCOS SHAKES A FINGER AT YOU AND SAYS,":"'YOU SHOULDN'T PLAY TRICKS ON AN OLD":"FRIEND!R, OR SWORD?"::2650:A$"X"20031990:"MARCOS SAYS, 'WELL, I JUST HAPPEN TO":"HAVE THREE ";N$;"S IN, OF VARYING":"QUALITY. I'VE GOT A VERY GOOD ONE FOR":P(2BP);" GP, A FAIR ONE FOR ";P(BP);" GP,"5 "AND A KINDA SHABBY ONE FOR ";P(BP2):" SMILES AT YOU AND SAYS, 'THATSA":"GOOD, BUT FIRST YOU GOTTA SELL ME A":"WEAPON. YOU KNOW THE LAW--NO MORE THAN":"FOUR WEAPONS PER PERSON!'"::2002" 1990:"MARCOS SMILES AT YOU AND SAYS, 'GOOD.":"I GOTTA THE BEST. YOU WANTA AXE, BOW,":"MACE, SPEAӠōҠƠŠҍҠō čàԣĠƠΠԍčҍ׍͍ RS,R0":NCDI1NC:DK$;"READ CHARACTERS,R";I:Q$:NAME$Q$1580SNN01570dQ$""1570Q$:(NAME$,(NAME$)1)Q$1580"I,DK$"CLOSE":R1I:NN1:INFO..."Q$NAME$".LOC"=DK$;"OPEN"Q$:DK$;"WRITE"Q$sI18:XN$(I):XT%(I):XO%(I):XD%(I):XS%(I):IDK$"CLOSE":"DONE":DK$"CLOSE":216,0::480:220...SCAN FOR NAME MATCH DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTE650:"DONE": F...WRITE EXP-PZ11430VZ:"WRITING CHAR EXPERIENCE INFO..."jdQ$NAME$".EXP"nDK$"OPEN"Q$:DK$"WRITE"Q$xI08:P(I):II1P(0):E$(I):N%(I):IDK$"CLOSE":"DONE":Z21500:"WRITING CHAR LOCKER 1520:216,0:R1NC13405NN0:1520:R1NC1330i(:"OVERWRITE _"Q$"? (Y/N) ";:490:Q$"Y"13402NCNC1:DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R0":NC:DK$"CLOSE":R1NC<DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";R1::DK$"OPEN"Q$:DK$;"READ"Q$SI18:XN$(I),XT%(I),XO%(I),XD%(I),XS%(I):I:1240\Z21lDK$"CLOSE"w216,0::" INSERT TARGET DISKETTE IN DRIVE 1. ":::480::"WRITING MAIN CHAR INFO..."1080 DK$"UNLOCK CHARACTERS"D CHAR .EXP FILE$`Q$NAME$".EXP"/j1170^tDK$;"UNLOCK"Q$:DK$"OPEN"Q$:DK$;"READ"Q$r~I08:P(I):II1P(0):E$(I),N%(I):E$(I);:30:N%(I)10);N%(I):I:1180Z11DK$"CLOSE"Q$NAME$".LOC"1230DK$;"UNLOCK"Q$:AC(Q$):Q$""AC65AC90(Q$)215006NAME$Q$A1080]DK$"UNLOCK CHARACTERS"{$1520:216,0:R1NC1100."CANNOT FIND "NAME$"!"::15008"CANNOT READ 'CHARACTERS' FILE":1500B...READ CHAR MAIN INFO (R1)L520V...REA.DK$"WRITE CHARACTERS,R";N:N$:DK$"CLOSE"JQ$"IN":N$""Q$"OUT"_:T$" IS "Q$"!"sZN1:ZNC980|740NDK$"CLOSE"220...MOVE CHARACTER:9:"MOVE CHARACTER":500:NN1:Z10:Z20)"NAME OF CHARACTER: ";Q$> EXIT ";:Q$:Q$!*Q$"X"90024Q$"K"980?>...KEEPLHQ1970R:"OKAY. I NEED THE 1ST LETTER OF":" _"N$"'S NAME: ";:Q$:Q$\AC(Q$):Q$""AC65AC90800fN$Q$N$:T$N$:920p750z...REMOVEQ970T$N$:N$"""CLOSE"'DK$;"OPEN CHARACTERS,L150"NNZNC:DK$;"READ CHARACTERS,R";NiN$:Q0:N$""Q1:N${HD,AG,CH:: DK$:"[";N10);N;"] ";:Qĺ"-";N$;:27:2(HD10));HD;2(AG10));AG;2(CH10));CH :" REMOVE KEEP ";:Q$:Q$:I139:"_";:I:::...READ FROM CHARACTERS (R1)DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";R1..CHARS# IF NO LIVE CHARS KEEP #1E NNJ:NCNN:NC1NC1:CC(1)1 DK$;"OPEN CHARSTEMP,L150":DK$;"WRITE CHARSTEMP,R0":NC:DK$"CLOSE" R21NC:R1CC(R2):520:620:R2-DK$"OPEN OCHARACTERS":DK$"DELETE OCHARACTERS":DK$"RENAME CHARACTERS,OSTART: MARK & COUNT LIVE CHARS= T:9:"UPDATE/BACKUP":500{ ^DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC hJ0:K1NC:DK$;"READ CHARACTERS,R";K:A$:A$""JJ1:CC(J)K rA$""ĄA$:"-"A$ |K DK$"CLOSE" ///XFER LIVE LIVE":"HEROES. THE CURRENT 'CHARACTERS' FILE":"IS RENAMED TO 'OCHARACTERS."| ::" PUT SOUCE DISKETTE IN DRIVE 1. ": ":" TO EXIT, , , OR ";:Q$:Q$ ,Q$"U"340 6Q$"S"720 ;Q$"M"1010 @460 J...UPDATE/BACKUP ANOTHER DISKETTE" :" *NOTE: 'KEEP' AUTOMATICALLY RESTORES A":"CHARACTER TO LIFE. 'REMOVE' KILLS-OFF":"A CHARACTER. CHANGES ARE TO THE":"CURRENT 'CHARACTERS' FILE." :"**NOTE: SELECTING CREATES NEW"N "'CHARACTERS' FILE HAVING ONLY YOUR5),WS%(5),XN$(8),XT%(8),XO%(8),XD%(8),XS%(8)F E$(300),N%(300),P(8)S DK$(4) ::7:"CHARACTERS FILE CLEANER!":500 I(0) :" SELECT CHARACTERS TO KEEP/REMOVE*" " UPDATE/BACKUP 'CHARACTERS' FILE**" " MOVE A HERO TO dCHARACTER FILE CLEANER:nREMOVES ALL DEAD CHARS.VxSAVES ORIGINAL FILE ASj'OCHARACTERS'.NEW (CLEANED FILE) IS'CHARACTERS'.BY JEFF HURLBURT 6/92COMPUTIST #88, CC(64),SA%(5),WA%(5),WN$(5),WT%(5),WO%(5),WD%(               Ơҍ Ӡō ӠōҠƠŠҍŠƠŠčҠōŠƠ͍Ƞҍ Ơҍ̧ӠԠҠō٠ƠӍȠōҧӠōԠ ͍ōàōōԠččōōҍ͍čōōōȍōōҠԍ͍ōōōō΍ƍϵƍ͍ԍŠōō   ӠōҠƠŠҍŠƠŠčԠҠōҠō ƠҍȠōŠƠ͍ԠΠŠŠ΍٠ƠӍҠƠӍԠō ƍ͍ԍӠ׍ōōōč   Πůנ̢Πůנ̠ǠƠԢŠŧӠŢԭέΠĠůעΠůנ̢ŠРƠ٢Š͠Ơ٢Πůנ̠ȠԠâΠůנ̠ȠĠâŠŢŠ٢Ԡ̢ŠȠĠƠǠŢΠԠ̢ΠȯȠŢΠԠ̢Ԡ̢ŠŠƠǠŢΠԠ̢ŠҢŠԠŠҢԠ̢ŠȠĠƠǠŢŠŠŢˠȯȠ̢ŠԠŠҢōԍȍÍԍΠԍΠԍˠԍ     ՠŠΠȠĠĠӠǠΠӠҮŠӠǠӠŠԠƠˠĠӠǠ٠٠ĠĮՠŠ̠̠ΠǠŠӮՠŠҠӠŠͧӠԭϭԠҮŠӠŠΠΠӠ ĠΠŠˠΠӠŮΠӠԠĠŠӠŮԭĠҠӠΠŠͬǠՠȠϠӠĠǠϠŠՠȠĮΠҠӠŠլĠǠĠĠǠĮΠӠĠӠҠȠӬɡɧ͠ȡŠӠŬ٬ǠĠ٠ΠŠ͠ȠաŠӠĠĠԠϠӠӠƠŠΧԠΠȠΠ٠өΠŠͮŠӠŠΠԠȠРŠȠšŠӠŠΠԠȠРŠȠšŠӠŠˠԠȠРŠȠšӠՠ٠ŠħӠŬŠԠΠŠӠ͠ŠĮŠՠŠǠŠĠΠĠάՠŠŠΠŠ̠ŠĠǠҠӠƠοӠӠŮӠՠ٠ŠħӠŠũԠΠŠӠĠŠħӠŮӠŠŠӠĠӬŠΠӠĠӠϮӠŠŠӠĠԠՠΧԠŠԬԠΠŠӠŠŠƠӠĮӠՠȠŠԬԠ٠ӠŠĠϠӠŠƠŠŬǠՠԮҠŠӠ͠ŠРĠϠԠծŠĠ٠ƠŠŠӠŮŠĠ٠ƠŠ̠ӠŮ z    ŠԠӠĠŬ̠ȠˠƠ̠ĠΠӠŮŠĠ٠ƠŠԭàӠĠΠŠĮŠĠ٠ƠȠӠŮŠ٠ŠƠӠŮŠԧӠ٠ӠĠŮŠӠĠΠԠŮŠӠĠΠԠŮŠӠĠˠԠŮŠӠΠ٠ŠŮŠӠŠԠΠŠҠƠŠͮŠӠŠŠƠӠšŠӠ̠ĠŠȠŠǠΠŠŮΠΠŠŠӠŠŬŧŠӠΠĠˠŮԠӠΠŠӠĠӠ٠̠Įz$??? ŠҠ ЮŠ׮Ԡ  ŮΠ Ʈà ҮРԻ Ȯà ӠӠ ήӠ ҮŠ ȮР Ӡ ƮР ƮР ҮР ޭŠӠŠ> ήŠ ήӠ !ήàEήӠή͠Ӡ  ŠŠȠӯ ůӯԠ ήà" Š٠ƠԠ٠ޭΠϠϠԠϠ Š̠ĠƠΠנӠΠ̠?ŠҠͮРΠҧӠĠ:"OR VIEW ROSTER":"OR ELSE!'"::"DO YOU GO OVER TO THE DESK, JOIN THE":" BEER DRINKERS, VISIT THE TEMPLE, OR":" CHECK OUT THE ROSTER OF HEROES?":" (HIT 'D' 'B' 'T' OR 'R'.) ";:A$::A$"D"220A$"T"İ500::140A$"R"67.":"MANY MEN AND WOMEN ARE GUZZLING BEER""AND THERE IS LOUD SINGING AND LAUGHTER."::" ON THE NORTH SIDE OF THE CHAMBER IS""A CUBBYHOLE WITH A DESK. OVER THE DESK":"IS A SIGN WHICH SAYS 'REGISTER HERE"!"OR VISIT TEMPLE OF RESTORATION"GUY92"6I112:"11":I:"0":"M":"200":"0":"0"iI14:"NONE":"0":"0":"0,0":I:DK$"CLOSE"216,0:X1500:I(1):(16384)128ĂXX(16368):*:" YOU ARE IN THE OUTER CHAMBER OF THE":"HALL OF THE GUILD OF FREE ADVENTURERStDK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:R1NC:DK$;"READ CHARACTERS,R1":A$:DK$"CLOSE":135216,0:DK$"CLOSE":DK$"DELETE CHARACTERS":DK$"OPEN CHARACTERS,L150":DK$"WRITE CHARACTERS,R0":1:DK$"WRITE CHARACTERS,R1":"NUnDK$(4):DK$;"BLOAD EAMON.PIC,A$4000":ZZ(16299)(16297)(16302)(16304)jxX((78)(79))}DK$"OPEN SNAPPY,L64":DK$"READ SNAPPY,R0":NS:R((1)NS1):DK$"READ SNAPPY,R";R:CM$:C1$(CM$,23):C2$(CM$,24):DK$"CLOSE SNAPPY"131K$"READ"Z$:90^:34,0:98b_"THIS CHARACTER DOES NOT YET HAVE":"AN ADVENTURING RECORD. ";laQ$:b216,0:DK$"CLOSE":140d::i:"EAMON ADVENTURER'S GUILD":"7625 HAWKHAVEN DR.":"CLEMMONS, NC 27012":"(919)766-7490":I1250::T EXPERIENCE: ";P(1)::I139:"_";:I:>Y34,6:7:QQ0:J1ZIJP(0):QQQQ1:E$,N%:E$;31(E$));N%;(" TIMES",6(N%1))[QQ1493\I]QQ0:DK$"CLOSE":" ";:Q$:1:9)::JI1:JP(0)ĺDK$"OPEN"Z$:DK$"POSITION"Z$",R";I29:DDK$"CLOSE"::NA$""ĺ:"FIRST, YOU MUST VISIT THE TEMPLE":"TO RESTORE THIS CHARACTER.":580:67 R"THE ADVENTURES OF "NA$: SZ$NA$".EXP" T95 UDK$"UNLOCK"Z$:DK$"OPEN"Z$:DK$"READ"Z$ VI08:P(I):I W216,0(X"LEVEL: ";P(2);" "[";R10);R;"] ";:A$""Ą"";A$:"-";= I"";HD,AG,CH:A$;W K28:HD;" ";AG;" ";CHj MR:DK$"CLOSE" N:" TO EXIT OR # TO VIEW >> ";A$:A$""140 OQQ(A$):QQ49QQ57140 PQQ(A$):QQNC140a Q55:DK$;"READ CHARACTERS,R";QQ:NA$:AUTY IS GREATLY  ENJOYED.$ - 2100o 7DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:: <:((40(Q$))2):Q$:I139:"_";:I::: CQ$"R O S T E R O F H E R O E S":60 F55:R1NC:DK$;"READ CHARACTERS,R";R:A$' H6  1- PLAYER CAN RESTORE DEAD CHAR AT THE 'TEMPLE'.  2- PLAYER CAN VIEW RXPERIENCE RECORDS OF CHARACTERS VIA THE 'ROSTER'.   DRAGON PICTURE SHOWN  DURING PROGRAM BY  R.L. PHILLIPS & FRIENDS  OF ANN ARBOR, MICH.  THE BE (919) 766-7490 d PLAYER INPUTS CHARACTER NAME AND (IF EXISTING CHAR) GOES TO MAIN HALL. IF NAME NOT IN 'CHARACTERS' FILE THEN 'NEW CARACTERS' PROGRAM IS RUN 1ST.  7/92 MODS BY JEFF HURLBURT (COMPUTIST MAGAZINE) 713-645-8680:$ THE WONDERFUL WORLD OF EAMONM BOOT-UP PROGRAM FOR EAMON UNIVERSE| ORIG. RULES & CORE PROGRAMS BY DON BROWN ON-GOING DEVELOPMENT: TOM ZUCHOWSKI, E.A.G. EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012          6  :5(4)"RUN THE WONDERFUL WORLD OF EAMON"AQHDAGCH:ZZZZ1:".";) kAQ381107 lZZ9105X mHDHD1:AGAG1:CHCH1:106g nAQ47120 sHD7AG7CH7109 x:" HARDINESS--";HD:" AGILITY --";AG:" CHARISMA --";CH;"'": }OLD XCHAR/REROLL GOSUB WAS HERE2 "(HIT 'R' TRISHMAN WALKS AWAY AND IN WALKS A":"TALL MAN OF POSSIBLY ELVISH DESCENT."::"HE STUDIES YOU FOR A MOMENT AND SAYS,":"'HERE IS A BOOKLET OF INSTRUCTION FOR" dZZ0:"YOU TO READ, AND YOUR PRIME ATTRIBUTES":"ARE ..."; iHDA(8):AGA(8):CHA(8) jR,S6,D1":DK$;"READ THE ADVENTURER":NAME$:DK$;"CLOSE" 2:"THE IRISHMAN SAYS, 'FIRST I MUST KNOW":"WHETHER YE BE MALE OR FEMALE. WHICH ARE":"YE (HIT 'M' FOR MALE, 'F' FOR FEMALE)?"; <SEX$:SEX$"M"80 FSEX$"F"60 PSEX$: Z:"THE I  THE WONDERFUL WORLD OF4 EAMON:V CHARACTER GENERATORp AND INSTRUCTIONSv BY DONALD BROWN 5/92 UPDATE DK$(4)R(X)(X(1)1)A(X)R(X)R(X)R(X)7 (DK$;"OPEN THE ADVENTURE     2)560+R:570g0DK$"WRITE CHARACTERS,R";R:NA$:DK$"CLOSE"::"OKAY, ";NA$;" IS RESTORED!":580:"I CAN'T FIND ANY DEAD ";NA$:DK$"CLOSE"D:" ";:Q$:Q$NTHE TEMPLE2Q$"THE TEMPLE OF RESTORATION":60^"WHO IS TO BE RESTORED?"::" >> ";NA$vNA$""NA$" "59055:R1NC:DK$"READ CHARACTERS,R";R:N$:ME$N$NA$ĺ:N$" IS IN GOOD SHAPE!":DK$"CLOSE":580N$""555&ME$(NA$,THE MAN CUTS OFF ANOTHER FINGER!!!":"HE EATS THIS ONE TOO!!":"THE MAN STARTS SLOWLY, 'WELL YE BE ":"OUTTA FINGERS!'":"THE MAN THEN SPINS AROUND AND RUNS YOU":"THROUGH WITH A SPEED YOU HAVE NEVER":"SEEN BEFORE! (AND NEVER WILL AGAIN.)":345 OTS":"GOOD FER YE!!!"xCNT2ĺ"I'VE 'BOUT HAD ME FILL O' YER SICK":"SENSA 'UMOR!!":"NOW GIMME YER NAME!!":CNT3ĺ"THE MAN CUTS ONE OF YOUR FINGERS OFF!!":"HE THEN EATS IT!!!!":"THEN HE SAYS 'ARE YE READY T' TALK NOW?":?CNT13ĺ""OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE":b///NO NAME ROUTINEn217:5CNTCNT1:CNT1450" HE PULLS OUT A SWORD AND BEGINS TO":"SHARPEN IT, SAYING 'YE'D BEST BE GIVIN'":"ME YER NAME LADDIE, IF YE KNOW W"TAKE CARE OF YE.'":?@350:DK$;"RUN NEW CHARACTERS,S6,D1"JDK$::" HE LOOKS UP AND SAYS, 'AH, HERE YE"::"BE! WELL, GO AND HAVE FUN IN THE HALL!'":T350:DK$;"RUN MAIN HALL,S6,D1"X///END: CLOSE ADDEDYDK$"CLOSE"::J^DK$;N HERE. HAVE YE GIVEN"::"IT TO ME ARIGHT?'"::"HOW DO YOU ANSWER (HIT 'Y' OR 'N') ";x"A$:A$::A$"N"İ400:2306" HE HITS HIS FOREHEAD AND SAYS, 'AH,"::"YE MUST BE NEW HERE! WELL, WAIT JUST"::"A MINUTE AND I'LL BRING SOMEONE OUT TO"::"USE MORE THAN TWENTY LETTERS."::230w" HE STARTS LOOKING THROUGH HIS BOOK,"::"MUTTERING ABOUT ";C1$::C2$:55:R1NC:DK$;"READ CHARACTERS,R";R:A$:A$NAME$330XR:DK$:" HE EVENTUALLY LOOKS AT YOU AND SAYS,"::"'YER NAME'S NA IMELESS! COME BACK WHEN"::"YE BE READY TO MAKE A BIT O' SENSE.'":580:140:(NAME$)2(NAME$,1)"A"(NAME$,1)"Z"İ400:230'(NAME$)20İ217:"'"NAME$"?!'"::" HE SCOWLS AT YOU AND SAYS, 'YER"::"NAME'S TOO LONG FER ME BOOK. I CANNA"::RE GREETED HERE BY A BURLY"::"IRISHMAN WHO LOOKS AT YOU WITH A SCOWL"::"AND ASKS YOU, 'WHAT'S YOUR NAME?'":235y:"YOU GIVE HIM YOUR NAME."::" >>> ";NAME$KNAME$""İ217:5:"'NO NAME, NO GAME. YE CANNA BE NOSIN'"::"ABOUT THE HALL NAA$"B"140m::" AS YOU GO OVER TO THE MEN, YOU FEEL"::"A SWORD BEING THRUST THROUGH YOUR BACK":"AND YOU HEAR SOMEONE SAY, 'YOU REALLY"::"MUST LEARN TO FOLLOW DIRECTIONS!'":345Q$"T H E M A I N D E S K":60:s217:"YOU AITE CHARACTERS,R";R:NAME$8HD:AG:CH:X14:"0":u&"5":"-10":"20":"10":"0":"0":SEX$:"200":"0":"0"0W14:"NONE":"0":"0":"0,0"::DK$;"CLOSE"DDK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE" HIS HAND AND SAYS,":"'LIVE LONG AND PROSPER.'":\"YOU NOW WANDER INTO THE MAIN HALL."DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:R1NC:DK$;"READ CHARACTERS,R";R:A$:A$""Ă:DK$;"WRITE CHARACTERS,R0":NC1:RNC1DK$;"WRS":"FOUND IN ADVENTURES, EXCEPT FOR WEAPONS":"AND ARMOUR.":g"(HIT ANY KEY TO CONTINUE) ";:A$2::"THE MAN BEHIND THE DESK TAKES BACK THE":"INSTRUCTIONS AND SAYS, 'IT IS NOW TIME":"FOR YOU TO START YOUR LIFE.' HE MAKES":"AN ODD SIGN WITH"::"OTHER TYPES OF MAGIC MAY WORK IN VARIOUSADVENTURES, AND ITEMS MAY HAVE SPECIAL":"PROPERTIES. HOWEVER, THESE WILL NOT":"WORK IN OTHER ADVENTURES THAN WHERE THEYWERE FOUND. THUS, IT IS BEST (AND YOU">"HAVE NO CHOICE BUT TO) SELL ALL ITEMC SPELLS. THERE ARE FOUR":"SPELLS YOU MAY LEARN."::"BLAST--HURT YOUR ENEMIES FROM A DISTANCEHEAL --REMOVE DAMAGE FROM YOUR BODY.":"SPEED--DOUBLE YOUR DEXTERITY FOR A TIME""POWER--DOES SOMETHING WEIRD. THE EXACT":" EFFECT IS UNPREDICTABLE.NTO THE BANK, WHERE IT CANNOT BE":"STOLEN. HOWEVER, IT IS A GOOD IDEA TO":"CARRY SOME GOLD WITH YOU FOR USE IN"r"BARGAINING AND RANSOM SITUATIONS."::"(HIT ANY KEY TO CONTINUE) ";:A$::|"YOU MAY ALSO HIRE A WIZARD TO TEACH YOU":"SOME MAGIT OFF WITH 200 GOLD PIECES,":"WHICH YOU WILL WANT TO SPEND ON SUPPLIESFOR YOUR FIRST ADVENTURE. YOU WILL GET":"A LOWER PRICE FOR ITEMS IF YOUR CHARISMAIS HIGH.":rh"AFTER YOU BEGIN TO ACCUMULATE WEALTH,":"YOU MAY WANT TO PUT SOME OF YOUR MONEY":"I,J"(HIT ANY KEY TO CONTINUE) ";:A$::T"YOUR CHARISMA (";CH;") AFFECTS HOW CITIZENS":"OF EAMON REACT TO YOU. YOU AFFECT A":"MONSTER'S FRIENDLINESS RATING BY YOUR":"CHARISMA LESS TEN, DIFFERENCE TIMES TWO":"(";(CH10)2;"%)":^"YOU STAR.":"THEREFORE, YOU CAN BE HIT WITH ";HD:"1-POINT BLOWS BEFORE YOU DIE.":@"HOWEVER, YOU WILL NOT BE TOLD HOW MANY":"BLOWS YOU HAVE TAKEN. YOU WILL BE":"MERELY TOLD THINGS SUCH AS"::" 'WOW! THAT ONE HURT!'":"OR 'YOU DON'T FEEL VERY WELL'":(HIT ANY KEY TO CONTINUE) ";:A$::,:"YOU CAN CARRY WEIGHTS UP TO TEN TIMES":"YOUR HARDINESS, OR ";HD10;" GRONDS.":"(A MEASURE OF WEIGHT, ONE GROND=10 DOS)":K6"ADDITIONALLY, YOUR HARDINESS TELLS HOW":"MANY POINTS OF DAMAGE YOU CAN SURVIVE"WHICH WILL GO UP WHEN YOU HIT A BLOW":"WEARING ARMOUR AND YOUR EXPERTISE IS":"LESS THAN THE ARMOUR YOU ARE WEARING.""NO MATTER HOW HIGH YOUR ARMOUR EXPERTISEIS, HOWEVER, THE NET EFFECT OF ARMOUR":"WILL NEVER INCREASE YOUR CHANCE TO HIT.":&""IONS ARE--"::"ARMOR";15);"HITS PROTECT ODDS ADJUST"::" NONE";18);"0";35);"- 0%":" LEATHER";18);1;35);"-10%":" CHAIN";18);2;35);"-20%"w" PLATE";18);5;35);"-60%":" SHIELD";18);1;35);"- 5%":::"YOU WILL DEVELOP AN ARMOUR EXPERTISE,":NTINUE)";:A$::"THERE ARE FOUR ARMOR TYPES, AND YOU MAY":"ALSO CARRY A SHIELD IF YOU DO NOT USE":"A TWO-HANDED WEAPON. THESE PROTECTIONS":"WILL ABSORB HITS PLACED UPON YOU(ALMOST":"ALWAYS!) BUT THEY LOWER YOUR CHANCE TO""HIT. THE PROTECT 5%":" SWORD 0%":" BOW -10%":"EVERY TIME YOU SCORE A HIT IN BATTLE,":"YOUR ABILITY IN THE WEAPON CLASS MAY GO":"UP BY 2%, IF A RANDOM NUMBER FROM 1-100":"IS LESS THAN YOUR CHANCE TO MISS!":"(HIT ANY KEY TO COH 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 O READ INSTRUCTIONS, 'T' TO GIVE THEM BACK)";J A$:A$:A$"T"500[ A$"R"140 ::"YOU READ THE INSTRUCTIONS AND THEY SAY--"::" INFORMATION ABOUT THE WORLD OF EAMON ":f :"YOU WILL HAVE TO BUY A WEAPON. YOUR":"CHANCE TO HIT WITP;" GOLD PIECES.'":G#M "'TAKE IT OR LEAVE IT.'"::"(HIT T OR L) ";]#V A$:A$"T"2003i#j :2300#t :X14:("ABMS",X,1)(W$,1)ĴX2440,2450,2460,2470#~ X# BP25:2370# BP40:2370# BP20:2370# (W$,2,1)"P"BP25:2370 $ B LAUGHS AND SAYS, 'YOU NEVER":"BOUGHT ONE FROM ME, REMEMBER?'"::2002"B BPBPBP(WO%(T)5)BP2(WO%(T)5):P(BPRTIO.5):PBP4P(BP4.5)#L 1990:"MARCOS EXAMINES YOUR "N$" AND":"SAYS, 'LOOKSA LIKE YOU'VE DINGED 'ER":"A BIT. I CAN OFFER ";1990:"MARCOS ASKS YOU, 'HOW ABOUT BUYING A":"WEAPON?'"::"(HIT Y OR N) ";k! A$:A$:A$"Y"ĺ:2050w!$ :2170!. 1990:"MARCOS ASKS, 'WELL, WHAT WEAPON YOU":"WANTA RETURN?"::2650::A$"X"2003G"8 W2W:W14:(WN$(W),(N$))N$Ă:"MARCOSW"(W$,3)"AXE"):L02300 1990:N$(W$,L):"MARCOS FROWNS AT YOU AND SAYS,"::"'THIS "N$" IS A WEAPON LIKE I SELL,":"REMEMBER!'":1998:2420 :GOLDGOLDP:ZWW:1920 1990:"MARCOS GIVES YOU YOUR MONEY AND TAKES":"YOUR WEAPON.":1998O! YOU":"CAN'T SELL A WEAPON YOU DON'T OWN!'":2002FW$"NONE"22901990:"MARCOS SAYS, 'I THINK YOU ARE WASTING MY TIME!":"MARCOS SHOOS YOU OUT OF HIS STORE.":1999 L5((W$,5)"SWORD"(W$,5)"SPEAR")4((W$,4)"MACE")3((W$,3)"BOIVE YOU":P;" GOLD PIECES FOR IT, TAKE IT OR":"LEAVE IT!'"::"(HIT T OR L) ";kA$:A$:A$"T"2003:1990:"MARCOS SAYS, 'OKAY, WHAT'VE YOU GOT?"::"(WEAPON NAME) ";W$:W$""22871W14:WN$(W)W$Ă::"MARCOS FROWNS AT YOU AND SAYS, ' YOU OUT OF HIS":"SHOP."::19991990:"MARCOS ASKS YOU, 'IS THIS WEAPON YOU":"WANT TO SELL ME A STANDARD WEAPON LIKE":"I SELL? (HIT 'Y' OR 'N') ";A$:A$"Y"2350A$"N"2003QA$::P(50RTIO.5):"MARCOS SAYS, 'THEN I CAN ONLY GES":"THE PRICE FROM YOU.":&p1998zz1990:"HE NOW ASKS YOU, 'NOW HOW ABOUT SOME":"ARMOUR?'"::"(HIT Y OR N) ";A$:A$:A$"N"ĺ:1SH2580,2210A$"Y"24902003!"MARCOS SMILES AND SAYS, 'COME BACK":"AGAIN SOON!' AS HE SHOOSETHING YOU CAN":"AFFORD.' MARCOS WAVES AS YOU LEAVE.":1999bHW14:WN$(W)N$N$N$"#":2120RW:W14:WN$(W)"NONE"Ă\WN$(W)N$:WT%(W)TP:WO%(W)10(2Q):WD%(W)DICE:WS%(W)SIDES:GOLDGOLDPf1990:"MARCOS HANDS YOU YOUR WEAPON AND TAK:Q13:A$("GFP",Q,1)Ă:2287F4PBPBP(Q1)BP2(Q3):PP(P)X>PGOLD2120?1990:"MARCOS SHAKES A FINGER AT YOU AND SAYS,":"'YOU SHOULDN'T PLAY TRICKS ON AN OLD":"FRIEND!'":<A"'COME BACK WHEN YOU GOTTA MORE":"GOLD OR YOU WANT SOM, I JUST HAPPEN TO":"HAVE THREE ";N$;"S IN, OF VARYING":"QUALITY. I'VE GOT A VERY GOOD ONE FOR":P(2BP);" GP, A FAIR ONE FOR ";P(BP);" GP," "AND A KINDA SHABBY ONE FOR ";P(BP2):"WHICH DO YOU WANT?'"::"(HIT THE KEY, G F OR P) ";!*A$:A$L ME A":"WEAPON. YOU KNOW THE LAW--NO MORE THAN":"FOUR WEAPONS PER PERSON!'"::2002 1990:"MARCOS SMILES AT YOU AND SAYS, 'GOOD.":"I GOTTA THE BEST. YOU WANTA AXE, BOW,":"MACE, SPEAR, OR SWORD?"::2650:A$"X"20031990:"MARCOS SAYS, 'WELL2CH(11(1)5):C2C2(C20):RTIO10C2A$:A$:TR13:A$("BSA",TR,1)ĂTR:1990:1((1)1.9)(GOLD300)2210,2289,2113:TR2050,2220,2490VWN$(4)"NONE"İ1990:"MARCOS SMILES AT YOU AND SAYS, 'THATSA":"GOOD, BUT FIRST YOU GOTTA SEL͍ NDK$;"RUN MAIN HALL"SCOMMIT SUICIDE, ELSE 'N'";YlA$:A$"Y"A$"N"620kv::A$"N"ı"WE RESSURRECT YOU AGAIN AND YOUR PRIME"::"ATTRIBUTES ARE --":::110:SEX$:JG:"0":"0"560DAME$".":"UNFORTUNATELY, YOUR ACCOUNT":"BALANCE IS ZERO!":40023:"SHYLOCK SAYS, 'WELL, YOU HAVE ";BANK:"GOLD PIECES STORED WITH ME. HOW MANY DO":"YOU WANT TO TAKE BACK?' >> ";A$3A$""40033MNY(((A$))):MNYBANK4080b41950:MNY;"!:":\2NAME$", MY DEAR ";("GIRLBOY",(SEX$"M")41,4);",":"THIS IS A GENUINE PLEASURE!"2"DO YOU WISH TO MAKE A DEPOSIT(!) OR,":"PERHAPS, A TINY WITHDRAWAL?' (SPC/D/W) ";2A$:A$:A$"D"ĺ:40902A$"W"100@3BANK1ĺ"HA! GOOD TRY, "N"WANTING SOMETHING FOR NOTHING.":1999611950:4005B1:1998R11950:40151"YOU HAVE NO TROUBLE SPOTTING SHYLOCK":"MCFENNEY, THE LOCAL BANKER, DUE TO HIS":"LARGE BELLY."2:"YOU ATTRACT HIS ATTENTION, AND":"HE COMES OVER TO YOU AND SAYSHOKAS TEACHES YOU YOUR SPELL, TAKES":"HIS FEE, AND RETURNS TO HIS STOOL ON":"THE BAR."05 "AS YOU WALK AWAY YOU HEAR HIM":"ORDER A DOUBLE DRAGON BLOMB.":1999&1 1970:"AS YOU LEAVE, YOU HEAR HOKAS MUTTERING":"ABOUT CHEAPSKATE ADVENTURERS ALWAYS":70:"HOKAS SAYS, 'I OUGHT TO TAKE YOUR":"GOLD ANYWAY, BUT HAVEN'T YOU FORGOTTEN":"SOMETHING? I ALREADY TAUGHT YOU "A$"!'"/* CH(1)283002/+ :"SHAKING HIS HEAD SADLY, HE RETURNS TO":"THE BAR.":1999X00 GOLDGOLDP:SA%(SP)(50(1)26):1970:"D":A$:PP(5000):31004. A$"POWER":A$:PP(100). :PGOLDİ1970:"WHEN HOKAS SEES THAT YOU DON'T HAVE":"ENOUGH TO PAY HIM, HE STALKS TO THE":"BAR, MUTTERING ABOUT YOUNGSTERS WHO":"SHOULD BE TURNED INTO FROGS.":1999.& SA%(SP)03120{/) 19 POWER ";P(100);"GP":b- "WELL, WHICH WILL IT BE?'"::"(SPC TO LEAVE OR PICK B, H, S, P) ";- A$:SP14:A$("BHSP",SP,1)Ă::3200- SP3060,3070,3080,3090- A$"BLAST":A$:PP(3000):3100- A$"HEAL":A$:PP(1000):3100. A$"SPEEYS, 'SO YOU WANT OLD":"TOKEY TO TEACH YOU SOME MAGIC, HEH HEH?"_, "WELL, IT'LL COST YOU. ";, "TODAY MY FEES ARE:":C2CH(11(1)5):C2C2(C20):RTIO10C2- " BLAST ";P(3000);"GP":" HEAL ";P(1000);"GP":" SPEED ";P(5000);"GP":" :2750+ A$"W"2755A+ "WORD":BP50:N$"SWORD":TP5:SIDE8N+ DICE1:_+ A$"X":A$:e+ u+ 1970:3005+ :1998+ 1970:3015@, "AFTER A FEW MINUTES DILIGENT SEARCHING,":"YOU FIND HOKAS TOKAS, THE OLD MAGE. HE":"LOOKS AT YOU AND SA14:A$("ABMS",W,1)ĂW:2755;*n W2680,2690,2700,2710g*x "AXE":BP25:N$"AXE":TP1:SIDE6:2750* "BOW":BP40:N$"BOW":TP2:SIDE6:2750* "MACE":BP20:N$"MACE":TP3:SIDE4:2750* A$;:+ A$:A$"P"ĺ"PEAR":BP25:TP4:SIDE5:N$"SPEAR" BUY THE SHIELD, MARCOS":"FROWNS AND SAYS, 'I'M SORRY, BUT I":"DON'T GIVE CREDIT!'"::2113)< GOLDGOLDP(50):SH1:ACA22SH:1990:"MARCOS TAKES YOUR GOLD AND GIVES YOU":"A SHIELD.":2003)P )Z "(HIT THE KEY(S), A B M SP OR SW) ";: *d A$:W'NOW HOW ABOUT":"A SHIELD? I CAN LET YOU HAVE ONE FOR":"ONLY ";P(50);" GOLD PIECES!'"::"(HIT Y OR N)";( A$:A$:A$"N"ĺ:1((1)1.9)2289,2210(( A$"Y"2003])2 A$::GOLDP(50)İ1990:"WHEN HE SEES THAT YOU DO NOT HAVE":"ENOUGH GOLD TOUGHT TO PAY FOR YOUR":"ARMOUR AND SAYS, 'I DON'T GIVE CREDIT!'"::2570' GOLDGOLDP:A2A1:ACA22SH:1990:"MARCOS TAKES YOUR OLD ARMOUR AND YOUR":"GOLD AND HELPS YOU INTO YOUR NEW":"ARMOUR."' 1998:SH2003l( 1990:"MARCOS SMILES AND SAYS, CES.":B& "WELL, WHAT WILL IT BE?'"::"(HIT SPC OR L, C, P) ";~& A$:A$:A14:A$("NLCP",A,1)Ă:1(SH0)2580,2003& :A12570H' PP(100(A2)250(A3)500(A4))TI:PGOLDİ1990:"MARCOS FROWNS WHEN HE SEES THAT YOU DO":"NOT HAVE ENO"HE SAYS, 'I CAN PUT YOU IN ANY OF THESE":"VERY CHEAPLY. I NEED ";P(100);" GOLD":"PIECES FOR THE LEATHER, ";P(250);" FOR":"THE CHAIN, AND ";P(500);" FOR THE PLATE.":& TIĺ"ALSO, I CAN GIVE YOU A TRADE-IN ON YOUR":"OLD ARMOUR OF ";TI;" GOLD PIEP50:2370W$ A2(AC2):SHACA22:B125(A21)60(A22)100(A23):TI(B1RTIO.5)$ 1990:"MARCOS TAKES YOU TO THE ARMOUR SECTION":"OF HIS SHOP AND SHOWS YOU SUITS OF":"LEATHER ARMOUR, CHAIN ARMOUR, AND PLATE.":1998:TIB12TIB12% 1990:(ZW)XAWN$(ZW)LN$(ZX):WT%(ZW)LT%(ZX):WO%(ZW)LO%(ZX):WD%(ZW)LD%(ZX):WS%(ZW)LS%(ZX)ALN$(ZX)LN$(0):LT%(ZX)LT%(0):LO%(ZX)LO%(0):LD%(ZX)LD%(0):LS%(ZX)LS%(0)AWN$(ZW)"NONE"İ1920:5580AQ$WN$(ZW)AI14:IZW5570BQ$WN$(I)557 ANYTIME!'":1999M@"GET WHICH ITEM? ";Q$:1947:ZXI:Q$""Q$"NONE"5503\@ZX85537@Q$"NONE":1945:ZWI:ZW55550@"SWAP FOR WHAT ITEM? ";Q$:1945:ZWI:ZW45530ALN$(0)WN$(ZW):LT%(0)WT%(ZW):LO%(0)WO%(ZW):LD%(0)WD%(ZW):LS%(0)WS%ITEM? ";Q$:1945:ZWI:Q$""Q$"NONE"5503:?ZW55533a?1940:"YOU HAVE NO '"Q$"'!":5502?Q$"NONE":1947:ZXI:ZX95550?"SWAP FOR WHAT ITEM? ";Q$:1947:ZXI:ZX95550?1940:"NO '"Q$"' IS IN STORAGE!":5502@A$"R"ĺ"'COME BACKOLDGOLD7000:I18:LN$(I)"NONE":I:LQ1:"YOUR LOCKER IS READY.'">"YOU SMILE, PICK UP YOUR KEY,":"AND GO TO YOUR LOCKER.":5502>"DO YOU STORE AN ITEM OR RETRIEVE ONE?":" (SPC TO EXIT OR S, R) ";:A$:A$:1940:A$"S"5540+?"STORE WHICH "REACH LEVEL 7. REMEMBER, THE PRICE IS":"JUST 7000 GOLD FOR A ROOMY LOCKER!'":1999=GOLD7000ĺ"HAVE THE 7000 GOLD TO PURCHASE":"YOUR OWN LOCKER.'":1999=:"ARE YOU READY TO BUY A SPACE? (Y/N) ";:Q$:Q$:Q$"Y"1999D>:"'EXCELLENT! ";:G(I);"% ";WD%(I);" D ";WS%(I):I(<8<{///LOCKERSH<|1940:5505R<~1998b<1940:5515<"THE LOCKER ATTENDANT GREETS YOU: 'GOOD":"AFTERNOON, "NAME$"!'":LQ5514<XL6GOLD69995511<:"'COME BACK AS SOON AS YOU"<XL65510V=ERCHAIN PLATE ",A271,7):I17:(Q$,I,1)" "ĂIF;Q$(Q$,I1)u;"ARMOUR: "Q$;:ACA22SH1:" & SHIELD";;26);"AE=";AE;"% AC=";AC:;"WEAPONS";23);"COMPLEX DAMAGE""<I14:Q(WO%(I)):WN$(I);:(24(WO%(I)0)(Q10)(Q100)):WO%:50253::12);:S14:SA%(S)ĺ3);SA%(S);"%";>:S::D::"YOUR WEAPON ABILITIES ARE--":" AXE BOW CLUB SPEAR SWORD":I15:1(I3)(WA%(I)0)((WA%(I))10)((WA%(I))100));WA%(I);"% ";:I::5;A2(AC2):Q$("SKIN LEATH ";XE;:20(XE99999):"ADVENTURES: ";XN:"ATTRIBUTES: HD=";HD;" AG=";AG;" CH=";CH:9"GOLD IN HAND=";GOLD;", BANK=";BANK:99"MAGIC SKILLS: ";:SM09S14:SA%(S)ĺ("BLASTHEAL SPEEDPOWER",(S1)51,5);" ";:SM1:S:SMĺ" ZILCH!":"THANKS YOU AND WALKS AWAY.":1999885004:5010:5030u823:16368,0:"(HIT ANY KEY TO CONTINUE) ";:A$::1008Q$"MIGHTY ":SEX$"F"Q$"FAIR "8:Q$"THE "Q$NAME$:I((32(Q$))2):I:Q$;I);"LVL ";XL:I139:"_";:I:V9"EXPERIENCE:LE FOR":"A 'MODEST' DEPOSIT OF ";GOLD;".":40027"HE WALKS AWAY, SHOUTING ABOUT FOOLS":"WHO PLAY TRICKS ON 'KNIDLY BANKERS'.":1999"8GOLDGOLDMNY:BANKBANKMNY:1950:"SHYLOCK TAKES YOUR MONEY, PUTS IT IN":"HIS BAG, LISTENS TO IT JINGLE, THEN":IT?' >> ";A$6A$""4003@6MNY(((A$))):MNYGOLD412061950:"THE BANKER IS VERY PLEASED WHEN YOU":"TELL HIM THE SUM, BUT WHEN HE DISCOVERS":"THAT YOU DON'T HAVE THAT MUCH ON YOU,"07CH28(1)GOLD2999ĺ"HE HELPFULLY SUGGESTS YOU SETT1950:"THE BANKER HANDS YOU YOUR GOLD AND":"SAYS, 'THAT LEAVES YOU WITH ";BANK:"PIECES IN MY CARE.' HE SHAKES YOUR":"HAND AND WALKS AWAY.":1999 61950:"SHYLOCK GETS A WIDE GRIN ON HIS FACE":"AND SAYS, 'EXCELLENT! HOW MUCH DO YOU":"WANT TO DEPOS!! (GASP)"::"THE BANKER THROWS YOU A TERRIBLE GLANCE":"AND SAYS, 'THAT'S MORE THAN YOU'VE GOT!"w4CH28(1)40024"YOU KNOW I DON'T MAKE LOANS TO YOUR":"KIND!' WITH THAT HE LOSES HIMSELF IN":"THE CROWD.":19995GOLDGOLDMNY:BANKBANKMNY:ΠŠҧӠǍΠַϠōӠƠŠčĠٍҧӠōŠčȠҍ̧ӠǠčԠĠƠōύԠΠŠŠҍӠōҧӠӍŠƠŠō     "."(Di(222)5ĺ:"KEY >> ";:Q$:Q$UDk(4);"RUN THE WONDERFUL WORLD OF EAMON"[DlD@Q90:F$"":I48:F$F$((512I)128):IDJF$" MA"Q91DDSTART ADV (SAVE NAME)DL48815:L,96:F$ADNAME$:L9(F$):L978130E(F$,4)U ON THE BACK":"AND SAYS, 'Y'ALL COME BACK REAL SOON,":"YA HEAH?'"CzDK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:200:DK$;"CLOSE"C300CDK$;"DELETE THE ADVENTURER"CDXDK$"CLOSE":"EXIT ON ";(222);" @ ";(218)256(219);(ZX)"NONE"5503BQ$LN$(ZX)5BI18:IZX5595JBQ$LN$(I)5595B(Q$,1)"#"Q$(Q$,(Q$)1)(65((1)25)):5585BQ$Q$"#":5585BI:LN$(ZX)Q$:5503Bp:11DCw"AS YOU LEAVE THE HALL, THE IRISHMAN":"COMES UP TO YOU, SLAPS YO0):LT%(ZX)LT%(0):LO%(ZX)LO%(0):LD%(ZX)LD%(0):LS%(ZX)LS%(0)^AWN$(ZW)"NONE"İ1920:5580mAQ$WN$(ZW)AI14:IZW5570AQ$WN$(I)5570A(Q$,1)"#"Q$(Q$,(Q$)1)(65((1)25)):5560AQ$Q$"#":5560AI:WN$(ZW)Q$BLN$":1945:ZWI:ZW55550L@"SWAP FOR WHAT ITEM? ";Q$:1945:ZWI:ZW45530@LN$(0)WN$(ZW):LT%(0)WT%(ZW):LO%(0)WO%(ZW):LD%(0)WD%(ZW):LS%(0)WS%(ZW)@WN$(ZW)LN$(ZX):WT%(ZW)LT%(ZX):WO%(ZW)LO%(ZX):WD%(ZW)LD%(ZX):WS%(ZW)LS%(ZX)>ALN$(ZX)LN$("NONE":1947:ZXI:ZX95550Q?"SWAP FOR WHAT ITEM? ";Q$:1947:ZXI:ZX95550}?1940:"NO '"Q$"' IS IN STORAGE!":5502?A$"R"ĺ"'COME BACK ANYTIME!'":1999?"GET WHICH ITEM? ";Q$:1947:ZXI:Q$""Q$"NONE"5503?ZX85537@Q$"NONE"AND GO TO YOUR LOCKER.":5502>"DO YOU STORE AN ITEM OR RETRIEVE ONE?":" (SPC TO EXIT OR S, R) ";:A$:A$:1940:A$"S"5540>"STORE WHICH ITEM? ";Q$:1945:ZWI:Q$""Q$"NONE"5503>ZW55533>1940:"YOU HAVE NO '"Q$"'!":5502?Q$AVE THE 7000 GOLD TO PURCHASE":"YOUR OWN LOCKER.'":1999~=:"ARE YOU READY TO BUY A SPACE? (Y/N) ";:Q$:Q$:Q$"Y"1999=:"'EXCELLENT! ";:GOLDGOLD7000:I18:LN$(I)"NONE":I:LQ1:"YOUR LOCKER IS READY.'">"YOU SMILE, PICK UP YOUR KEY,":THE LOCKER ATTENDANT GREETS YOU: 'GOOD":"AFTERNOON, "NAME$"!'":LQ5514a<XL6GOLD69995511<:"'COME BACK AS SOON AS YOU"<XL65510<"REACH LEVEL 7. REMEMBER, THE PRICE IS":"JUST 7000 GOLD FOR A ROOMY LOCKER!'":19999=GOLD7000ĺ"H" & SHIELD";,;26);"AE=";AE;"% AC=";AC:R;"WEAPONS";23);"COMPLEX DAMAGE";I14:Q(WO%(I)):WN$(I);:(24(WO%(I)0)(Q10)(Q100)):WO%(I);"% ";WD%(I);" D ";WS%(I):I;;{///LOCKERS;|1940:5505;~1998;1940:5515H<"" AXE BOW CLUB SPEAR SWORD"u:I15:1(I3)(WA%(I)0)((WA%(I))10)((WA%(I))100));WA%(I);"% ";:I:::A2(AC2):Q$("SKIN LEATHERCHAIN PLATE ",A271,7):I17:(Q$,I,1)" "ĂI:Q$(Q$,I1) ;"ARMOUR: "Q$;:ACA22SH1: MA"Q91E*ESTART ADV (SAVE NAME)]EL43382:L1,40:F$ADNAME$:L9(F$):L978130E(F$,4)"THE "L9L94:F$(F$,L9)EL,L9:I1L9ELI,((F$,I,1)):IE300'DDK$;"DELETE THE ADVENTURER"-DlDXDK$"CLOSE":"EXIT ON ";(222);" @ ";(218)256(219);"."Di(222)5ĺ:"KEY >> ";:Q$:Q$Dk(4);"RUN THE WONDERFUL WORLD OF EAMON"DlD@Q90:F$"":I48:F$F$((512I)128):I EJF$" CI:LN$(ZX)Q$:5503"Cp:11Cw"AS YOU LEAVE THE HALL, THE IRISHMAN":"COMES UP TO YOU, SLAPS YOU ON THE BACK":"AND SAYS, 'Y'ALL COME BACK REAL SOON,":"YA HEAH?'"CzDK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC:200:DK$;"CLOSE"D0:B(Q$,1)"#"Q$(Q$,(Q$)1)(65((1)25)):5560NBQ$Q$"#":5560`BI:WN$(ZW)Q$yBLN$(ZX)"NONE"5503BQ$LN$(ZX)BI18:IZX5595BQ$LN$(I)5595B(Q$,1)"#"Q$(Q$,(Q$)1)(65((1)25)):5585CQ$Q$"#":5585990:2015"AS YOU ENTER THE WEAPON SHOP, MARCOS":"CAVIELLI (THE OWNER) COMES FROM OUT OF":"THE BACK ROOM AND SAYS, 'WELL, AS I""LIVE AND BREATH, IF IT ISN'T MY OLD PAL":NAME$"!":"SO, YOU WANT TO BUY A WEAPON, SELL":"A WEAPON, OR GET SQ$LN$(I)ĂID:10:"T H E B A N K E R":U$:5008:::z:10:"T H E W I Z A R D":U$:5008:5010::::9:"W E A P O N S H O P":U$:5040::5008:::" ";:Q$:Q$:1998::1001990:20051998: 1$:5060:W0:I14:WWWN$(I)"NONE":I::LQ1İ5008::1944X0:"IN STORAGE----":I18:XXLN$(I)"NONE":Q(LO%(I)):LN$(I);:(24(LO%(I)0)(Q10)(Q100)):LO%(I);"% ";LD%(I);" D ";LS%(I):I:I14:Q$WN$(I)ĂII18: FRESH MEAT":DK$;"WRITE FRESH MEAT":REC:200:DK$;"CLOSE":DK$;"RUN ";ADNAME$W2ZW4:WN$(W2)WN$(W21):WT%(W2)WT%(W21):WO%(W2)WO%(W21):WD%(W2)WD%(W21):WS%(W2)WS%(W21):W2:WN$(4)"NONE"::4:"I G M O' S L O C K E R S, I N C."=UA$:A$"C"1020^DK$;"OPEN EAMON.NAME":DK$;"READ EAMON.NAME":ADNAME$:DK$;"CLOSE"h8100:I112:J25I:I:U$:J:U$:I:I1211:J25I:I:40):J:40):I10:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$:::O$DK$;"OPENK$"OPEN CHAR.PRE":DK$"WRITE CHAR.PRE":200:DK$"CLOSE CHAR.PRE"I300:5:"INSERT DISKETTE WITH ADVENTURE (OR KEEP"::"THIS DISKETTE FOR BEGINNERS CAVE) IN"::"DISK DRIVE IN SLOT SIX, DRIVE ONE THEN"::"HIT 'C'"::::" ";:16368,0IDES%(W):W,LQQ$NAME$".LOC":DK$"OPEN"Q$:DK$"WRITE"Q$:I18:LN$(I):LT%(I):LO%(I):LD%(I):LS%(I):I:DK$"CLOSE"6:Q(NAME$)DK$;"OPEN CHARACTERS,L150":DK$;"WRITE CHARACTERS,R";REC::(NAME$,Q1):202:DK$;"CLOSE"@D FOR YOUR CHOICE, 1-7)";;A$:CMD(A$):CMD1CMD7130nCMD::CMD1000,2000,3000,4000,5000,5500,6000yNAME$HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$ GOLD:BANK:AC:W14:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WS:" 3. HIRE A WIZARD TO TEACH YOU SPELLS."::" 4. FIND THE BANKER TO DEPOSIT OR":" WITHDRAW SOME GOLD."::" 5. EXAMINE YOUR ABILITIES."s:" 6. GO TO THE ADVENTURERS' LOCKERS."::" 7. TEMPORARILY LEAVE THE UNIVERSE."x::"(HIT THE KEYX)(XRTIO.5) Z216,0' d:Q(0)^ f9:"T H E M A I N H A L L":I139:"_";:I:: i"AS YOU WANDER ABOUT THE HALL, YOU":"REALIZE YOU CAN DO ONE OF SEVEN THINGS:"::" 1. GO ON AN ADVENTURE."::" 2. VISIT THE WEAPON SHOP FOR ARMS."nEC:NAME$:HD,AG,CH:X14:SA%(X)::X15:WA%(X)::AEC <SEX$ FGOLD,BANK:AC:W14:WNAME$(W),WTYPE%(W),WODDS%(W),WDICE%(W),WSIDES%(W):W:DK$;"CLOSE" II14:WN$(I)""WN$"NONE" KWN$(I)"NONE"WO%(I)0:WD%(I)0:WS%(I)0 MI PP(NAME$".EXP":DK$"OPEN"Q$:DK$"READ"Q$:XN,XE,XL:DK$"CLOSE"T (OLD ONERR GOTO100 *Q$NAME$".LOC":DK$"OPEN"Q$:DK$"READ"Q$:I18:LN$(I),LT%(I),LO%(I),LD%(I),LS%(I):I:LQ1 1DK$"CLOSE"9 2DK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R";RR.":"CLEMMONS, NC 27012"r SA%(5),WA%(6),WN$(6),WT%(6),WO%(6),WD%(6),WS%(6),LN$(8),LT%(8),LO%(8),LD%(8),LS%(8)} 7000 DK$;"OPEN THE ADVENTURER":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE" #Q91ĺDK$"RUNEXP.UPDATE": %49= &Q$T MAGAZINE) 713-645-8680a  8000 SUB: Q9=1 MEANS HALL RUN FROM AN ADVENTURE -> RUN EXP.UPDATEk 8000 (4)"MAXFILES 3" :::255 DK$(4):U$"_______________________________________" 5:"EAMON ADVENTURER'S GUILD":"7625 HAWKHAVEN D=F MAIN HALL (BUY STUFF & GO ON ADVENTURES) ORIG. BY DONALD BROWNL ON-GOING DEVELOPMENT: TOM ZUCHOWSKI, E.A.G. (919) 766-7490 7/92 MODS: ADD LOCKER/ IMPROVED CHAR STATS DISPLAYS/ EXPERIENCE ...  BY JEFF HURLBURT (COMPUTIS                             @@1 `}<p`><@u{``?`/U~pUkU.`_?3`+Uzx3`U:`fp^>?`aN*=~Uf*`0C0u4^*Uz|]*U.U*UxO_*}`px~x~`?uq_p~p@AM5>6<|?l8x@U{0ux?}| U*U*UC^*u``~U{_F@~p/U*`@U*U`V*}+U*p/Fy||\sC@OagL3fxssgg,U*U>`U:8<|8|yy@_xCxpU*U*UpukgaLzǟxv|W*0`x/U*U+U*UzW>^*pg`i uw3x@X`opA ]*`gxXqf sU>x@@@U>ja ?X?/Uz`0@Uz`Lu?Vx,p~pW~p?V*0U*g`,u_~U~x{uf|y*U*u00U*`@1 Nj| |?@@Uj`~|W*u`+W.u, tWsasx``/}CUj``x3x?`*U`@@{Wjg*`0U*U*^*U+U*U@y*@1 ps_jp{0<`W*`gxxYYfxq@Uj|p0unyy|| sO@AgC3fxapCagW*UVzl< |0Xp0x/U*U*ULU*|a0X)U*U/CO0ss3xxp_*xp10}|x@?^*0U*g` 6>G1|l3l<00ux:xsUOxkU?sg+U*u?0U*`@1 o|pN |?@|Uj`x_*ux/U., V3`>~`/@Uj`` x?x`3`*u@NWzg*`0U?U*}_*U/U*U@y* @1 p+p~0&|@U*`gXYYYf ^?@Uj?Uj0u~ll 3CAOGaC3g@aCa`0U*UpW: |0^*upy8j<@u?x@~~:x@<^*@OO1>|l3l|00u;0UOxo:?`f/U*}0U*`@@1 <P~3@OU`x0x*u@@xU>f*`pA0U|W*U?`O_*U.U*ULY*`D3L@G0x+=p?0>8pU*`gXyyf Vj@U*/Uj@<}Vy l,sCGOOaFGsgppaAac,U*U~W:ll l0X@}|@MM16 <;|`0pU{?uOx/`?U*0U*`                       ٠ǠӠŠΧΠƠȠŠҠȮ٠ӠΧΠ٠ĠҠŠΠϠϮǠӠΧҠ̠ŠӠΧРĠ̠٠Ġ̠ԠӠҠҠήǠϠŠӠΠˠӠŮǠΠ٠ӠŠԠҠǠŠӠ׭ԭ̠ӠƠŠנӠ̠Ϡ͠ήƠŠӠŠŠŧӠǠϠԠӠԠŮŠĠŠϠӠҠĠΠΠήĠҠΧǠӠĠŠΠԠΠǮŠΠӠŠΠҠŠԠŠ̮ŠĠŠϠӠҠĠŠϠٮǠҠӠϠϠΠǠŠӠƠӮǠӠǠŠϠĠ͠٠ŠčŠӠŠӠϠȠҠŠĠӮ?6>@OO;>6~||3~||L@Wl0^UC0`LW*|0U*g`,U*U@U>~>0x@W*U*uG16~|<1~8xLV>l?}~W0`OW*}0U*g`,U*U@U~z~~p_*U*ux?U*3`" --";= RL(100(1)1):HIT0:RL5RLMD%(OF,10)HIT1K HIT3600c RL97ĺ"A MISS.": "A FUMBLE!":FR(100(1)1):FR3540(MD%(OF,9))ĺ" FUMBLE RECOVERED.":: FR76ĺ" WEAPON DROPPED!":AD%(MD%(OF,9),4)ROOM:MD%(OF,9)1::(DF,14))DF0300D MD%(DF,3)MD%(DF,3)2:NBTLMD%(DF,14)0:TD%(0)TD%(0)MD%(DF,1):TD%(1)TD%(1)MD%(DF,1):FD%(0)FD%(0)MD%(DF,13):FD%(1)FD%(1)MD%(DF,13):300N R2ROOM:MD%(DF,14)0:5100 HIT0:MD%(OF,9)1ı MN$(OF);" ATTACKS ";MN$(DF)::100= MD%(0,9)1ĺ:"YOU HAVE NO WEAPON READY!"::100\ OF0:DFM:3500:HIT3130 INCW2AD%(MD%(0,9),6):WA%(W2)WA%(W2)2 EAAE300 (100(1)1)MD%(0,10)3130& A2:EAAE1A10 AEAEA:MD%(0,10)MD%(0,10)A: (MD%:300$ A1NA:AD%(A,4)12080YWTWTAD%(A,3):AD%(A,4)ROOM:AN$(A);" DROPPED."e A:300| ///ATTACK COMMAND 1950 S$"RAT"3050 M13:MD%(M,5)ROOMS$MN$(M) M M1NM:S$MN$(M)MD%(M,5)ROOMĂ::"ATTACK WHO?":50///DROP COMMAND'1950oNBTLĺ:"YOU CAN'T DO THAT WITH UNFRIENDLIES ABOUT!"::100S$"ALL"2060A1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING A ";S$::100WTWTAD%(A,3)::"DROPPED.":AD%(A,4)ROOM:(A,4)1:WTWTAD%(A,3)::AD%(A,2)2MD%(0,9)1300AV16000b`A1NA:AD%(A,4)ROOM1150jWTAD%(A,3)10MD%(0,1)ĺAN$(A);" IS TOO HEAVY":1150tAN$(A);" TAKEN.":AD%(A,4)1:WTWTAD%(A,3)~::300S$""ĺ:C$(C);" WHAT";:S$:19S$"RAT"10704A1416:AD%(A,4)ROOMS$AN$(A):$^.S$"GOLD"S$"COINS"S$AN$(5)8A1NA:AN$(A)S$AD%(A,4)ROOMĂ::"I SEE NO ";S$;" HERE!"::100BWTAD%(A,3)10MD%(0,1)ĺ:"IT IS TOO HEAVY FOR YOU."::1006L:"GOT IT.":AD%ROOMMD%(M2,14)DFM2:3500:M2200:M2:4309M2:400?aNBTL(FD%(0)TD%(0)):NBTLĂMgp100///GET COMMAND1950S$"TORCH"ĺ:"ALL TORCHES ARE BOLTED TO THE WALL AND":"CANNOT BE REMOVED."::300S$"ALL"1120M,14))MD%(M,1):FD%(MD%(M,14))FD%(MD%(M,14))MD%(M,13):430O^MD%(M,14)390yhOFM:TD%(1)MD%(0,1)DF0:3500:430rM21NM:MD%(M2,5)ROOMMD%(M2,14)(1).25DFM2:3500:M2200:M2:430|M2:DF0:3500:430OFM,M21NM:MD%(M2,5),///COMMANDS RETURN TO HERE-6NBTL440M@M1NM:MD%(M,5)ROOM430JMRFD%(MD%(M,14))TD%(MD%(M,14))FD%(MD%(M,14))TD%(MD%(M,14))5(41(1)20)<TMD%(M,4)MRĺ:MN$(M);" FLEES OUT AN EXIT."::17500:MD%(M,5)R2:TD%(MD%(M,14))TD%(MD%(0(C$(C)));::::1604 C$(C)S$S$V$:V$C$(C) C1000,1000,2000,3000,4000,4000,5000,5000,5000,5000,5000,5000,5000,5000,5000,5000,5000,5000,6000,7000,8000,10000,11000,12000,13000,14000,15000,16000,17000,17000,17000,18000,18000,19000,20000,21000A$(A$,2):1651 A$""A$CZ$:(37):17:A$Y CZ$A$:A2(A$):(A$,A,1)" "Ăw V$(A$,A1):S$(A$,A1) (S$,1)" "S$(S$,2):185 C1NC:C$(C)V$C$(C)S$Ă::"HUH? I ONLY UNDERSTAND THESE COMMANDS-- ";:C1NC:C$(C);2 M:A1NA1:AD%(A,4)ROOM(ANA)V%(ROOM)ĺDK$;"READ EAMON.DESC,R";A100:A$:DK$:A$ AD%(A,4)ROOM(ANA)V%(ROOM)ĺ"YOU SEE ";AN$(A) A:AD%(NA,4)ROOMĺ"YOUR ";AN$(A);" IS HERE." V%(ROOM)1 :" YOUR COMMAND?";A$ (A$,1)" "< }V%(ROOM)ĺDK$;"READ EAMON.DESC,R";ROOM:A$:DK$:A$:u M1NM:MD%(M,5)ROOMMD%(M,15)ĺMN$(M);" IS HERE." MD%(M,5)ROOMMD%(M,15)ĺDK$;"READ EAMON.DESC,R";M300:A$:DK$:A$:MD%(M,15)1:M10ĺDK$;"READ EAMON.DESC,R202":A$:DK$::A$:[ 2DK$(4):220002 d///GIVE ROOM DESC IF NEVERQ i///HERE, THEN GET COMMANDW n sSPDSPDSPD1:SPDMD%(0,2)MD%(0,2)2:MD%(0,10)MD%(0,10)2MD%(0,2) xV%(ROOM)ĺDK$;"READ EAMON.ROOM NAMES,R";ROOM:A$:DK$:"YOU ARE STANDING IN":" ";A$:\< EAMON ADVENTURE #1:-> THE BEGINNERS CAVE <-@Y BY DONALD BROWN_ EAMON ADVENTURER'S GUILD 7625 HAWKHAVEN DR. CLEMMONS, NC 27012 (919)766-7490 (:10:"PLEASE WAIT A SHORT WHILE"::" (WAKING UP THE MONSTERS)""::300''."NOTHING HAPPENS."::300;'2///SAY COMMANDE'21950`'2S$"TROLLSFIRE"20000u'2S$"POWER"6000'2S$"HEAL"7000'2S$"BLAST"8000'3S$"SPEED"10000'3:"OKAY, '";S$;"'"::300'6///DRINK COMMAND'61950(6NBTL20(0,2)2MD%(0,2)h&.'SPD(25(1)1)::"YOU CAN FEEL THE NEW AGILITY FLOWING":" THROUGH YOU!"::300&*:NBTLĺ"AS YOU SMILE, THE ENEMY ATTACKS YOU."::300&+"NOTHING HAPPENS."::300'.:NBTLĺ"AS YOU WAVE AT YOUR ENEMY, HE ATTACKS":" YOU.T SPELL%J1950^%TM1NM:S$MN$(M)MD%(M,5)ROOMĂ::"YOU CAN'T BLAST ";S$;"!"::300v%^S1:7500:SUC300%h:"DIRECT HIT!"::S5:D1:DFM:3650::300%'///SPEED SPELL%'S3:7500:SUC300&$'SPDMD%(0,10)MD%(0,10)2MD%(0,2):MD%///HEAL SPELL&$bS2:7500:SUC14050/$l300v$LSUC0:SA%(S)RL(100(1)1):SUC(((RLS2%(S))(RL5))(RL95))$VSUCĺ:"NOTHING HAPPENED.":$`RL(100(1)1):RLS2%(S)S2%(S)S2%(S)2:SA%(S)SA%(S)2$jS2%(S)S2%(S)2$t%@///BLAS"YOU ARE TELEPORTED SOMEWHERE IN THE":" DUNGEON"::R2(26(1)1):NBTL0:5100#RR86ĺ:"YOU HEAR A VERY LOUD SONIC BOOM":" THAT ECHOES THROUGH THE TUNNELS."::300#RR95ĺ:"ALL OF YOUR HITS ARE HEALED."::MD%(0,13)0:300#10020 $XMD%(0,9)0."M:RAISENBTL0:R2ROOM:5100q"A1NA:AD%(A,4)ROOMRAISE1:AN$(A);" VANISHES!":AD%(A,4)0"A:RAISEĺ:300"RR(100(1)1):RR11ĺ:"THE SECTION OF TUNNEL YOU ARE IN ":" COLLAPSES AND YOU DIE.":DIE1:23010R#RR31ĺ:M,1)!(M:NBTL(TD%(0)0)$!21008!p///POWER SPELLP!zS4:7500:SUC300 "RAISE0:M1NM:M213M:AD%(M2,4)ROOMAD%(M2,4)1RAISE1:MN$(M);" COMES ALIVE!":AD%(M2,4)0:MD%(M,5)ROOM:MD%(M,13)0:MD%(M,9)0AD%(MD%(M,9),4)0:MD%(M,9)MD%(0,9),13)N M1NM:MD%(M,5)R3ĭMD%(M,14)200(1)MD%(M,4)MD%(M,5)ROOM:5150g MD%(M,5)ROOM5160 FRMD%(M,3):FRFR100FRFR((CH10)2) MD%(M,14)(FR100(1)):MD%(M,14)NBTL1!AMD%(M,14):FD%(A)FD%(A)MD%(M,13):TD%(A)TD%(A)MD%(5DK$;"READ EAMON.ROOMS,R";ROOM:D21D:R2::DK$BR25100ROOM1D1ĺ:"YOU SUCCESSFULLY RIDE OFF INTO THE":"SUNSET.":23010:"YOU CAN'T GO THAT WAY!":V%(ROOM)0:100 R3ROOM:ROOMR2:TD%(0)0:TD%(1)MD%(0,1):FD%(0)0:FD%(1)MD%(0ESC,R";A100:A$:DK$::A$::LK11A:LK300rDK$;"READ EAMON.DESC,R";ROOM:A$:DK$::A$::ROOM15300"YOU FOUND A HIDDEN TUNNEL GOING OFF TO":"THE EAST!"::300///MOVE COMMANDNBTL2020D16:(V$,1)("NSEWUD",D,1)Ă"MIMIC"ĺ:"AS THE MIMIC DIES, IT ROLLS OVER AND":"YOU FIND A RING UNDERNEATH IT.":AD%(6,4)ROOMi:~///LOOK COMMANDNBTL2020S$"LABEL"S$"BOTTLE"15000LK0"A1NA1:AN$(A)S$(AD%(A,4)ROOMAD%(A,4)1)ĺDK$;"READ EAMON.DMD%(DF,1)MD%(DF,13)D2:MD%(DF,5)0:A2NA1NMDF:AD%(A2,4)ROOM:MD%(DF,9)0AD%(MD%(DF,9),4)ROOM~FD%(0)TD%(0)NBTL0DF0DIE1:23010MN$(DF)"PIRATE"ĺDK$;"READ EAMON.DESC,R203":A$:DK$::A$::AD%(10,8)6:V%(ROOM)0:aMN$(DF):" IS STILL IN GOOD SHAPE.":@[:MN$(DF);" IS HURTING.":``:MN$(DF);" IS IN PAIN.":e:MN$(DF);" IS VERY BADLY INJURED.":j:MN$(DF);" IS AT DEATH'S DOOR,":" KNOCKING LOUDLY.":dtMN$(DF);" IS DEAD!"::AMD%(DF,14):FD%(A)FD%(A)(S(1)1)::D2D2AMD%(DF,8):D21ĺ" BLOW BOUNCES OFF ARMOUR"::GMD%(DF,13)MD%(DF,13)D2:MD%(DF,13)MD%(DF,1)3700LAMD%(DF,14):FD%(A)FD%(A)D2Q(MD%(DF,13)5MD%(DF,1)1)3670,3675,3680,3685,3690 V:MN$(DF);" TAKES DAMAGE BUT"D%(OF,10)):MD%(OF,10)MD%(OF,10)2INC^DMD%(OF,11):SMD%(OF,12):A1:RL5ĺ"A HIT!":3650"A CRITICAL HIT!":R2(100(1)1):R251A0:3650R286S1.5S:3650$R296D2D:3650)R2100D3D:3650.3700HBD20:D31D:D2D2 FR953550U " WEAPON BROKEN!":AD%(MD%(OF,9),4)0:MD%(OF,9)1:(1).9ĺ:x " BROKEN WEAPON HURTS USER!" FR1003560 DMD%(OF,11):SMD%(OF,12):DFOF:A1:3650 DMD%(OF,11)2:SMD%(OF,12):DFOF:A0:3650&INC((100(1)1)ME."::DK$;"READ EAMON.DESC,R1":A$:DK$:A$7@V:"AS YOU STAND THERE, YOU SEE THE LOCAL":"KNIGHT MARSHAL COME OUT TO INSPECT YOU."::8JVWN$(1)"NONE"ĺ"HE SHAKES HIS HEAD AND SAYS, 'YOU MUST":"HAVE AT LEAST ONE WEAPON TO ADVENTURE":"HERE! GO BACKPEN EAMON.DESC,L256":DK$;"OPEN EAMON.ROOM NAMES,L64":DK$;"OPEN EAMON.ROOMS,L64",76V:"YOU HAVE NO TROUBLE FINDING A HORSE":"THAT YOU, WELL, BORROW TO TAKE YOU":"ON YOUR FIRST ADVENTURE. YOU FOLLOW":"SEVERAL SIGNS TO TAKE YOU TO THE":"BEGINNERS CAVA2112:MD%(A,A2):A2,A:DK$;"CLOSE"5VDK$;"OPEN FRESH MEAT":DK$;"READ FRESH MEAT":REC:MN$(0),MD%(0,1),MD%(0,2),CH:A14:SA%(A):5VA15:WA%(A)::AE,SEX$,GOLD,BANK,AC5"VA14:WN$(A),WT%(A),WO%(A),WD%(A),WS%(A)::DK$;"CLOSE"Q6,VDK$;"OMN$(NM),MD%(NM,15)_4UDK$;"OPEN EAMON.ARTIFACTS,L128":A1NA:DK$;"READ EAMON.ARTIFACTS,R";A4UAN$(A):A214:AD%(A,A2):A2:AD%(A,2)1āA258:AD%(A,A2):A24VA:DK$;"OPEN EAMON.MONSTERS,L128":A1NM:DK$;"READ EAMON.MONSTERS,R";A&5 VMN$(A):%(7,5)ROOM30RR2ROOM:5100h3:RS$"DOOR"ĺ:"THE DOOR WILL OPEN WHEN YOU MOVE THROUGH":"IT."::1003DR:"MIND TELLING ME HOW?"::1003U///INIT THINGS4UDK$;"OPEN EAMON.DESC,L256":DK$;"READ EAMON.DESC,R0":NR,NA,NE,NM:AN$(NA1),AD%(NA1,8),9)10ĺDK$;"READ EAMON.DESC,R205":A$:DK$:A$::S5:D1:DF0:A0:3650:300u2PTR1:MD%(0,12)10:AD%(10,8)10:3002R///OPEN COMMAND2RNBTL20202RS$"CHEST"ROOMAD%(12,4)21050 3&RDK$;"READ EAMON.DESC,R201":A$:DK$::A$::AD%(12,4)0:MD:100$1 N///TROLLSFIRE ACTIVATION.T1*NAD%(10,4)1ĺ:"NOTHING HAPPENS."::300c14NTR205001>NDK$;"READ EAMON.DESC,R206":A$:DK$::A$::TR0:AD%(10,8)6:MD%(0,9)10MD%(0,12)61HN300M2PDK$;"READ EAMON.DESC,R204":A$:DK$::A$::MD%(0,20200BJ1950/0LJS$"WATER"S$"SEA"190400VJ:"SORRY, BUT I'M AFRAID TO GO INTO THE":" WATER WITHOUT MY LIFE PRESERVER!"::3000`JS$"CAVE"ROOM1V$"S":50001jJ:"I'M NOT SURE WHAT YOU MEAN BY THAT.":"TRY GIVING A DIRECTION TO MOVE.":IC AND":" CANNOT ";V$::300-/BM0:17500>/BNBTL0:5100w/\DDK$;"READ EAMON.ROOMS,R";ROOM:D16:DR%(D)::DK$/fDR2DR%(6(1)1):R2117510/pD/PF:"YOU ARE CARRYING THE FOLLOWING--":A1NA:AD%(A,4)1ĺ" ";AN$(A)/ZF:30008JNBTL)2MD%(0,2):MD%(0,9)A:MD%(0,11)AD%(A,7):MD%(0,12)AD%(A,8)h.>S$"TROLLSFIRE"ĺ:"READIED."::300.>TR0:MD%(0,12)10:20000.hB///FLEE COMMAND.rBNBTLĺ:"WHAT ARE YOU FLEEING FROM?"::100/|BMD%(7,5)ROOMĺ:"YOU ARE HELD FAST BY THE MIMFLOP THREE TIMES THEN DIE.":.-:DIE1:23010E->///READY A WEAPONO->1950->A1NA:AN$(A)S$AD%(A,4)1Ă::"YOU AREN'T CARRYING IT!"::100->AD%(A,2)2ĺ:"THAT ISN'T A WEAPON!"::100=.>MD%(0,10)(EAAE)(EAAE)AD%(A,5)WA%(AD%(A,6)K?"::300,:"AS YOU READ THE BOOK, YOU FEEL A WEIRD":"SENSATION OVERTAKING YOU. YOU SUDDENLY":"REALIZE THAT YOU ARE TURNING INTO A":"SMALL FISH.":,:ROOM26ĺ"YOU FALL INTO THE SEA AND ARE PROMPTLY":"EATEN BY A BIG FISH.":-:ROOM26ĺ"YOU ~+:S$"LABEL"S$"BOTTLE"ĭAD%(3,4)ROOMAD%(13,4)ROOMAD%(3,4)1AD%(13,4)1ĺ"THE BOTTLE SAYS, 'HEALING POTION'"::300+:S$"TROLLSFIRE"20000+:S$"BOOK"ĺ:"THERE ARE NO MARKINGS TO READ!"::300 ,:AD%(9,4)1AD%(9,4)ROOMĺ"WHAT BOO(7AD%(3,4)0:AD%(13,4)1"*27300*8S$"WATER"(S$,3)"SEA"ĺ:"A JOB SIMILAR TO GETTING BLOOD FROM A":" TURNIP."::300*8:"THE WATER TASTED SALTY, BUT IT DOESN'T":"SEEM TO BE POISONOUS."::300*:///READ COMMAND*:1950*:NBTL2020H214080,14090,14100,14110:)7"YOU FEEL GREAT!"::14120[) 7"YOU FEEL BETTER."::14120)7"THOUGH YOU FEEL BETTER, YOU ARE STILL":" VERY, VERY SICK!"::14120)7"THOUGH YOU FEEL BETTER, YOU ARE STILL":" AT DEATH'S