' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`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)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./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(#*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH 20 LDIVERSI-DOS(TM) BY BILL BASHAM C1982 DSR THIS DISK CONTAINS A HIGH-SPEED OPERATING SYSTEM CALLED DIVERSI-DOS. TO LEGALLY USE DIVERSI-DOS, PLEASE SEND A ONE-TIME FEE OF $30 DIRECTLY TO: DSR, INC. 5848 CRAMPTON CT. ROCKFORD, IL 61111 815 877-1343 (VISA/MC) YOU WILL RECEIVE A UTILITY DISK, DOCUMENTATION, AND A VALIDATION STICKER AS PROOF OF PAYMENT. YOUR HONESTY WILL ALLOW DSR TO DISTRIBUTE FUTURE PROGRAMS THIS SAME, LOW-COST WAY. <> Ӝsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( 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 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@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@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pBZ\  յյ\BIR Z-^ Jp\IZLL-p  Ԡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(`# d£àĠàz# u`"*""""""""" "">"<<"<"<""*""""""""$ """2""*"Ġ"*"**""""""""*""""""*""<<<"<ρÁ㣞"*""2"""**""""""""""ȁؿكș*<<<<<><<" ·" ""޿<6"""<" *<">ᗠ"*"&"<<<<<"><6""<" Ƈ<6*>66<<<<>">"<п那ȇಠ"  ǟ࿈" """ فȖ" &描ῠȁ6""  "" & ਼揿"  ऎ񟈌" " ؛ "̱>""  "" О쁠""  SAYS, 'THIS IS":"A WEAPON LIKE I SELL, REMEMBER!'":2420U14:UW$(U)W$P(P4.2):Q((1)25)11::"AS YOU TRY TO GIVE THE WEAPON TO MARCOS":"HE SHOWS YOU A SHELF BULGING WITH":W$;"S AND SAYS, 'I'M SORRY":2294:2300"BUT I JUSTA GOT?"::"(ENTER THE WEAPON NAME)";W$:W14:WN$(W)W$Ă::"MARCOS FROWNS AT YOU AND SAYS, 'YOU":"CAN'T SELL A WEAPON YOU DON'T OWN!'"::2210:L(W$,5)"SWORD"(W$,5)"SPEAR"(W$,4)"MACE"(W$,3)"BOW"(W$,3)"AXE":Lĺ"MARCOS FROWNS AT YOU AND FOR IT, TAKE IT OR":"LEAVE IT!'"::"(HIT T OR L) ";TA$:A$"L"ĺA$::2210fA$"T"2260FSĺ:"MARCOS TAKES THE ";FW$(FS);" FROM ":HIR$(FR%(FS));", AND HANDS YOU THE GOLD.":GOLDGOLDP:100A$::"MARCOS SAYS, 'OKAY, WHAT'VE YOU GHOP."::100:"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"22308A$::P(50RTIO.5):"MARCOS SAYS, 'THEN I CAN ONLY GIVE YOU":P;" GOLD PIECESGOLDP(50)(CL2FS)2210kz"HE NOW ASKS YOU, 'NOW HOW ABOUT SOME":"ARMOUR?'"::"(HIT Y OR N) ";A$:A$"N"ĺA$::2210A$"Y"2180A$:2490 "MARCOS SMILES AND SAYS, 'COME BACK":"AGAIN SOON!' AS HE SHOOS YOU OUT OF HIS":"S(N$,3)"BOW"(N$,4)"MACE"(N$,5)"SPEAR"(N$,5)"SWORD"U((((1)2)4.5)1.9):2140eWU2\WN$(W)N$:WT%(W)TP:WO%(W)(5U)(2Q):WD%(W)DICE:WS%(W)SIDES:GOLDGOLDPf"MARCOS HANDS YOU YOUR WEAPON AND TAKES":"THE PRICE FROM YOU.":p:"DOOR."::100CFSFW$(FS)N$:FW%(FS,1)TP:FW%(FS,2)(5U)(2Q):FW%(FS,3)DICE:FW%(FS,4)SIDES:GOLDGOLDP:"MARCOS HANDS ";HIR$(FR%(FS));" THE WEAPON.":100HW15:WN$(W)N$N$N$"#":2120RW:W15:WN$(W)"NONE"Ă]T(N$,3)"AXE". ENTER 'Y' TO"::"COMMIT SUICIDE, ELSE 'N'";KlA$:A$"Y"A$"N"620]v::A$"N"ı"WE RESSURRECT YOU AGAIN AND YOUR PRIME"::"ATTRIBUTES ARE --":::110D"0":JS:"0":SEX$:JG:"0":"0"560DE"TDDK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE"mNDK$;"RUN MAIN HALL"sSX /// SUICIDE ROUTINE .b:"YOUR CHARACTER IS SUCH A POOR EXCUSE"::"FOR AN ADVENTURER THAT WE WILL ALLOW"::"YOU TO COMMIT SUICIDEEAD CHARACTERS,R";R:A$:A$""Ă:DK$;"WRITE CHARACTERS,R0":NC1:RNC1pDK$;"WRITE CHARACTERS,R";R:NAME$HD:AG:CH:X14:"0":&"5":"-10":"20":"10":"0":"0":SEX$:"200":"0":"0"0W14:"NONE":"0":"0":"0,0"::DK$;"CLOSND 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.'":"YOU NOW WANDER INTO THE MAIN HALL."IDK$;"OPEN CHARACTERS,L150":DK$;"READ CHARACTERS,R0":NC:R1NC:DK$;"R4:AA0:CA1:IA10:X15:WA%(X)WA%(X)8:SA%(4)50:N CHOICE BUT TO) SELL ALL ITEMS":"FOUND IN ADVENTURES, EXCEPT FOR WEAPONS":"AND ARMOUR.":"(HIT ANY KEY TO CONTINUE) ";:A$::"THE MAN BEHIND THE DESK TAKES BACK THE":"INSTRUCTIONS Aȍ΍ō"2*"""""̣""""""""*"號Ё>""2*22"2""*"""""*">""""""""""2*"""""""**2"""""<2ǣ迌сرE?":::2830'-% (N$,4)"NONE"ī2210Q-' (N$,1)" "N$(N$,((N$)1)):2855w-( U14:UW$(U)N$N$N$"#":2856-) U:U14:UW$(U)""Ă-* UW$(U)N$ ., :" 'HMMM...', SAYS MARCOS, 'THE":;N$;" IS NOT THE TYPE OF":"WEAPON I USUALLY GET REQUET IN NOW) ";N$l, :N$""ĺ"MARCOS SAYS, 'YOUR LIPS MOVED BUT I DIDN'T CATCH THE NAME.'":::2830 -" (N$)18ĺ"THAT SOUNDS LIKE A STRANGE WEAPON. ALL MY WEAPONS HAVE NAMES OF 18 LETTERS OR LESS. PERHAPS THIS WEAPON IS KNOWN BY ANOTHER NAM"ĺ"PEAR":BP25:N$"SPEAR":TP4:SIDE5:2750>+ A$"W"2720g+ "WORD":BP50:N$"SWORD":TP5:SIDE8t+ DICE1:+ UNUSUAL WEAPON ROUTINE BY BOB LINDEN+ "UNUSUAL"+ :"'WHATSA THIS UNUSUAL WEAPON CALLED?'":, "YOU NAME THE WEAPON (TYPE IM SP SW OR U) ";:A*d A$:W15:A$("ABMSU",W,1)Ă:2660a*n W2680,2690,2700,2710,2800*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$"PCREDIT!'"::2630b)< GOLDGOLDP(30):SH1:"MARCOS TAKES YOUR GOLD AND GIVES YOU":"A SHIELD.":m)F :100s)H )K "(HIT THE KEY(S), A B M SP OR SW) ";:)P A$:W14:A$("ABMS",W,1)Ă:2640)U W2680,2690,2700,2710*Z "(HIT THE KEY(S), A B FOR":"ONLY ";P(30);" GOLD PIECES!'"::"(HIT Y OR N)";U( A$:A$"N"ĺA$::2630g(( A$"Y"2590)2 A$::GOLDP(30)ĺ"WHEN HE SEES THAT YOU DO NOT HAVE":"ENOUGH GOLD TO BUY THE SHIELD, MARCOS":"FROWNS AND SAYS, 'I'M SORRY, BUT I":"DON'T GIVE R ARMOUR.":FD%(FS,5)A1:100' "MARCOS TAKES YOUR OLD ARMOUR AND YOUR":"GOLD AND HELPS YOU INTO YOUR NEW":"ARMOUR."::GOLDGOLDP:ACA:AHAC1:AA8A' SHCL226309( "MARCOS SMILES AND SAYS, 'NOW HOW ABOUT":"A SHIELD? I CAN LET YOU HAVE ONEAT HEAVY ARMOUR?":2490& A(A$):PP(50A)TI:PGOLDĺ"MARCOS FROWNS WHEN HE SEES THAT YOU DO":"NOT HAVE ENOUGH TO PAY FOR YOUR":"ARMOUR AND SAYS, 'I DON'T GIVE CREDIT!'"::2570' FSĺ"MARCOS TAKES YOUR GOLD AND HELPS ";HIR$(FR%(FS));" INTO THEID% "WELL, WHAT WILL IT BE?'"::"(HIT N FOR NOTHING OR # (1-9) ";l% A$:A$"N"((A$)1(A$)9)2530% A$::A$"N"2570& CL2(A$)3FSĺ:"MARCOS LAUGHS AND SAYS 'THAT WOULD BE A REAL SIGHT, WOULDN'T IT? YOU TRYING TO CAST A SPELL IN TH20:2370($ (W$,2,1)"P"BP25:23708$ BP50:2370$ "MARCOS SAYS 'I HAVE THESE ARMOURS:":X19:" ";X;". ";ARM$(X);" FOR ";P(X50);" G.P.":$ ACFSTIAC15:"ALSO, I CAN GIVE YOU A TRADE-IN ON YOUR":"OLD ARMOUR OF ";TI;" GOLD PIECES.":$::2210#` A$"T"2390#e FSĺ:"MARCOS TAKES THE ";FW$(FS);" FROM ":HIR$(FR%(FS));", AND HANDS YOU THE GOLD.":GOLDGOLDP:100#j A$::2300#t :W14:("ABMS",W,1)(W$,1)ĴW2440,2450,2460,2470#~ W# BP25:2370# BP40:2370 $ BP IT. TAKE IT OR ":"LEAVE IT."::"ENTER 'T' OR 'L':";:2390"L "MARCOS EXAMINES YOUR WEAPONS AND SAYS,":"'WELL, YOU'VE BANGED IT UP A BIT, BUT":"I CAN GIVE YOU ";P;" GOLD PIECES":"FOR IT, TAKE IT OR LEAVE IT.'"::"(HIT T OR L) "; #V A$:A$"L"ĺA4:(WN$(W),(N$))N$Ă:"MARCOS LAUGHS AND SAYS, 'YOU NEVER":"BOUGHT ONE FROM ME, REMEMBER?'"::2210!B BPBPBP(WO%(T)5)BP2(WO%(T)5):P(BPRTIO.5):PBP4P(BP4.5)<"G FSĺ:"MARCOS SAYS 'WELL, I CAN ONLY GIVE YOU":P;" GOLD PIECES FOR?'"::"(HIT Y OR N) ";5  A$:A$"Y"ĺA$::2050G  A$"N"2320W $ A$::2160] . 0 FSBP(("2540202550",(FW%(FS,1)1)21,2)):WO%(0)FW%(FS,2):T0:2370 3 :"MARCOS ASKS, 'WELL, WHAT WEAPON YOU":"WANTA RETURN?"::2635:i!8 W2W:W1A$"MARCOS GIVES YOU YOUR MONEY AND TAKES":"YOUR WEAPON."::UW$(U)"":GOLDGOLDP:W2W4:WN$(W2)WN$(W21):WT%(W2)WT%(W21):WO%(W2)WO%(W21):WD%(W2)WD%(W21):WS%(W2)WS%(W21)::WN$(4)"NONE  :"MARCOS ASKS YOU, 'HOW ABOUT BUYING A":"WEAPONOT ";Q;" OF THOSE IN A COUPLE""A MINUTES AGO AND I DON'T NEED MORE."::"BUT, BECAUSE I LIKE'A YOU, I'LL STILLA":"GIVE YOU ";P;" GOLD PIECES FOR IT;"::"TAKE IT OR LEAVE IT!'"::"(HIT T OR L) ";A$:A$"L"ĺA$::2210A$"T"2296 ā̃>"""""<""l"<<<<"Á́Ʊ"<"<Ãll"<<"Ł""<2""""""2>l""<<<<Ȣ"""<"6"賐Ї""""6lll""""""<<l<>"< l"6"""22""$"""ύ""""""""""""࿂, IT'LL COST YOU. TODAY MY FEES ARE:":C2CH(11(1)5):C2C2(C20):RTIO10C24 " 1. BLAST ";P(3000);"GP":" 2. HEAL ";P(1000);"GP":" 3. SPEED ";P(5000);"GP":" 4. POWER ";P(100);"GP"C5 " 5. CHARM ";P(2000);"GP":" 6. FEAR ";P(1800)OUHEAR A MUFFLED 'AHA!' AND MARCOS EMERGESWITH HIS ARMS FULL."D3 3 :"AFTER A FEW MINUTES DILIGENT SEARCHING,":"YOU FIND HOKAS TOKAS, THE OLD MAGE. HE":"LOOKS AT YOU AND SAYS, 'SO YOU WANT OLD":"TOKEY TO TEACH YOU SOME MAGIC, HEH HEH?"P4 "WELLA$"P"ĺ"PEAR":BP(BP5):SIDE(SIDE1):TP4:2997D2 A$"W"2988n2 "WORD":BP(BP10):SIDE(SIDE1):TP52 SIDE3SIDE3>3 :"MARCOS DISAPPEARS INTO THE BACK ROOM. YOU HEAR THINGS BEING DRAGGED ABOUT AND THE RATTLING OF CONTAINERS. FINALLY, YR, OR SWORD?"91 "(HIT THE KEY(S), A B M SP OR SW) ";:c1 A$:W14:A$("ABMS",W,1)Ă:2960~1 W2970,2975,2980,29851 "AXE":BP(BP5):TP1:29971 "BOW":BP(BP8):TP2:29971 "MACE":BP(BP4):SIDE(SIDE2):TP3:29971 A$;:22 A$:(1))(8(1))(8(1))(6(1))6)2)(DICE)):BP250:2950 1 :" 'OK', SAYS MARCOS, 'I GOTTA LOOK INNA BACK ROOM TO SEE IF I GOT ANY OF THESE IN STOCK. YOU CAN HELP ME BY TELLING ME WHICH WEAPON YOUR UNUSUAL WEAPON IS MOSTLIKE: AXE, BOW, MACE, SPEA(((1)1.1)1):SIDE((((6(1))(6(1))(6(1))6)2)(DICE)):BP30:2950/h "SUPERIOR":DICE((((.46(1))2)10)1):SIDE((((6(1))(6(1))(6(1))(6(1))5)2)(DICE)):BP100:2950=0r "MATCHLESS":DICE((((.55(1))2)10)1):SIDE((((8STS FOR.".6 :" 'WHATSA THE CLASS OF THIS WEAPON THAT YOU FIGURE YOU CAN AFFORD?',MARCOS SAYS,'I GOT AVERAGE, SUPERIOR, AND MATCHLESS'".@ :"(HIT THE KEY, A S OR M)".J A$:W13:A$("ASM",W,1)Ă:2890.T W2910,2920,2930N/^ "AVERAGE":DICE͍͍čōōōōӍ͍ōōōōōΠӍ΍ЍΠ̠ĠҧӠōΠ΍čΠ̠ĠҧӠōĠ΍č٠ҍ͍ōōōōōPR:SUMSUMPR::DK$T<#SUMGOLDĺ:"THE MAN GLARES AT YOU AND SAYS,":"'YOU BETTER GET YE SOME ENOUGH BEFORE":"TRYIN TA BE FUNNY AGAIN.'":"WITH THAT HE ESCORTS YOU OUT OF THE SHOP":100DUF#NF10ĺ:"I'M SORRY, BUT I CAN ONLY":"LET YOU HIRE ME FIRS1:!ALIGN0:AGAG2:ININ1:@ALIGN1:ININ1:HDHD1:_ALIGN2:HDHD2:ININ2: BY JOHN NELSON ADAPTED FROM DON BROWN'S EAMON DK$(4):WA%(1)5:WA%(2)15:WA%(3)10:WA%(4)0:WA%(5)0 "=LAWFUL GOOD,";::"2";::"=NEUTRAL GOOD,";:"3";::"=TRUE NEUTRAL,";::"4";::"=NEUTRAL EVIL,";::"5";::"=CHAOTIC EVIL)";A1$:A1(A1$):A11A152020A12041,2042,2043,2044,2045ALIGN2:CHCH2:ALIGN1:ININ1:HDHDERS,R";R:NA$:DK$"CLOSE"::"VERY WELL,";NA$;",":" YOU HAVE BEEN RESURRECTED.":16120@>:NA$;" ISN'T DEAD OR DOES'NT EXIST.":DK$"CLOSE"@>22:7:"";:A$:100@?@ N :::::::::::::: FIND CHAR :::::::::::::: |A*NHARACTERS,R";REC:200:DK$;"CLOSE"CSTDK$;"DELETE THE ADVENTURER"ISmS4! THIEF,FIGHTER,CLERIC,MAGICIANS>! QUILTED,PADDED,LEATHER,STUDDED,CHAIN,SCALE,BANDED,PLATE,RIB-PLATES(# /// GET ALL FRIENDST2#CHECK1NF:DK$;"READ FRIENDS,R";CHECK:A$:$(FD%(X,5)1(FD%(X,5)0)):\F::"(PRESS ANY KEY TO CONTINUE)...";:16368,0:A$::100Gp"AS YOU ENTER THE CASINO, YOU SEE ALL ":"SORTS OF PEOPLE TRYING TO BEAT THE ODDS":"AND MOST OF THEM SEEM TO BE FAILING.":"THERE ARE FOUR DIFFERENT GAMES GO^EWN$(W);20(WO%(W)0)((WO%(W))10)((WO%(W))100));WO%(W);"% ";WD%(W);" D ";WS%(W)EW:23:16368,0:"(PRESS ANY KEY TO CONTINUE) ";:A$:EFR0ī100F:X1FR:HIR$(FR%(X));" IS FOLLOWING YOU.":" WEAPON:";FW$(X):" ARMOUR:";ARMA))100));WA%(W);"% ";::LD:"ARMOUR: ";ARM$(AC);:SH0ĺ" AND SHIELD";D30);"AE=";AE;"%"::"GOLD IN HAND=";GOLD;", BANK=";BANK"D:"WEAPONS";19);"CMPLX DAM":W15:W1WN$(W)"NONE"5090EWN$(W)"NONE"ĺ:" NO WEAPONS":5090(tLN(218)(219)256s(~ERR6ERR5LN4040ė:10:5:"DISK DOES NOT CONTAIN PROPER":10:"CHARACTERS FILE."(ERR6LN350ė:10:5:"THIS IS NOT THE MASTER DISKETTE."(21::"ERROR";::":";ERR;" -IN LINE ";LN):7:"";:A$:%><%>DK$;"OPEN CHARACTERS,L150"f%>:"CHARACTER TO BE RESURRECTED:";NA$%>DK$;"READ CHARACTERS,R0":NC%>R1NC:DK$"READ CHARACTERS,R";R:N$:ME$%>N$""Ă:16110%>ME$(NA$,2)Ă:16110W&>DK$"WRITE CHARACTE1:5:"MACE":3:10:1:4:"SWORD":5:10:1:8}$8DK$"CLOSE":DK$"OPEN EAMON.NAME":DK$"READ EAMON.NAME":AD$:DK$"CLOSE"$9DK$"RUN ";AD$$: /// END$:DK$;"CLOSE"$:$> ///RESURRECT%>:5:10:"INSERT MASTER DISKETTE."::07:" >>> PUT FILE INTO TABLEe'D$"OPEN EAMON ][.ADVLOG,L64":D$"READ EAMON ][.ADVLOG,R0":NA$'AN$(50),DN$(50),ST$(50),NB%(50),B1%(50).'A1NA:D$"READ EAMON ][.ADVLOG,R";A:AN$(A):DN$(A):ST$(A):NB%(A):B1%(A)::D$8'. >>> WRITE'. >>> WRITE ALL).A1NA:700:/.= ND$(4):*ND$"OPEN EAMON II.ADVLOG,L64":D$;"DELETE EAMON II.ADVLOG":D$;"OPEN EAMON II.ADVLOG,L64":D$"WRITE EAMON II.ADVLOG,R0":1'4ND$"WRITE EAMON II.ADVLOG,R1":"MAIN HALL AND BEGINNER'S CAVE":::"RESURRECT CHARACTERS":DK$;"OPEN CHARACTERS,L256"g?>5:"CHARACTER TO BE RESURRECTED:";NA$?>DK$;"READ CHARACTERS,R0":NC?>R1NC:DK$"READ CHARACTERS,R";R:N$:ME$?>N$""Ă:16110?>ME$(NA$,2)Ă:16110X@>DK$"WRITE CHARACTSHOWN TO A DUMPY LITTLE ROOM":"OVER-LOOKING THE STREET. THE INNKEEPER":"WISHES YOU A GOOD NIGHT AND RETURNS TO":"THE DESK."REFR0ĺ"YOUR HIRED HAND SNEAKS OUT AS SOON AS ":"YOU FALL ASLEEP!"RG"SJDK$;"OPEN CHARACTERS,L256,S6,D1":DK$;"WRITE C8);"" $ /// SPECIAL LABELE(15);(60(TI$))2);TI$:p(14);(27);(71);(29(MT$))2);MT$(60(ST$))2);ST$"(27);(72);(20);"";,(60(SB$))2);SB$:(18);""6@BUZ12:CLICK110:X(16336):CLICK:TIMEЂ:D$"PR#0":20%x /// PRINT LABELG(15);22);"ADVENTURE #";A:x(14);(27);(71);(29(AN$(A)))2);AN$(A)(27);(72);(20);" "YY81:A16YY80:A10YY79A23YY82"COPYRIGHT (C) 19";YY;" BY ";DN$(A);" * DOS 3.3":(10":20LSG$"G":N1İ7600/VSG$"S"7700D`D$"PR#1":ABEgjX1N:7800:::D$"PR#0":20 >> SETS OR GROUP?"AS SET OR GROUPED?":"INPUT 'S' OR 'G':";SG$:SG$"S"SG$"G"7620SG$:D$"PR#1":X1N:ABE:7800::  /// SINGLE LABELS[*"ADVENTURE #:";A$:A(A$):D$"PR#1":L1N:7800::D$"PR#0":20r /// SPEC. LABELS"TITLE (1ST LINE):";TI$"MAJOR TITLE:";MT$"SECONDARY TITLE:";ST$"BOTTOM LINE:";SB$D$"PR#1":X1N:7900::D$"PR#A$:"HOW MANY LABELS (DEFAULT = 1):";N$:N(N$):N0N1Xv:(A$)1B1:ENA:7500t(A$)17100,7200,7300 /// RANGE LABELS"INPUT RANGE AS BB-EE:";A$:B(A$):E((A$,((B))2)):B1BNABE7110ENAE2BE71107500X15:WA%(X): |AE" SEX$2 GOLD:BANKF AC:AH:AA:SH X15:WN$(X):WT%(X):WO%(X):WD%(X):WS%(X)::PTS DERS,R";REC<200F300PZD$;"CLOSE"d ///READ OLDNA$:CLHD:AG:CH:IN X18:SA%(X): X15:WA%(X):( AE2 SEX$B GOLD:BANKV AC:AH:AA:SH X15:WN$(X):WT%(X):WO%(X):WD%(X):WS%(X)::PTS " , ///WRITE NEW JD$;"WRITE CHAR1,R";REC TNA$:CL ^HD:AG:CH:IN hX18:SA%(X): rTHE CASINO.":GOLDGOLD((1)125):100Q~:"YOU MADE A FEW GOLD PIECES CARRYING":"WATER FOR THE FIRE DEPARTMENT.":GOLDGOLD((1)108):100Q:"THE MAN COULDN'T FIND ANYTHING FOR YOU":"RIGHT NOW AND ASKED YOU TO TRY LATER.":100~R@"YOU ARE   D$(4),D$;"OPEN CHARACTERS,L256"FD$;"OPEN CHAR1,L256"gD$;"READ CHARACTERS,R0":NCu(REC1NC2D$;"READ CHARACTERS,R";REC<200F300PZD$;"CLOSE"d ///READ OLDNA$:CLHD:AG:CH:IN X1ĠӍŠ̠͠נΠŠȠĠƠĠ٠ĠĠΠàŮؠŮĠӍŠ̠ȠԠԠٮΠŠĠ٠ĠǠΠٮؠŮȠЍà͠ΠǠРĠΠŠƠŠӮؠŮĠӍŠӠҠŠӠŠĠ׮נ٠̠ŠϠؠӮĠԠŠԠĠԠΠŠŠΠӠŠĠŠԠԠҠԠԠԠҠΠŠŠԠӠΠΠŠčŧĠƠΠΠŧĠ    /// SPECIAL LABEL3(15);(60(TI$))2);TI$:^(14);(27);(71);(29(MT$))2);MT$w(60(ST$))2);ST$"(27);(72);(20);"";,(60(SB$))2);SB$:(18);""6@BUZ12:CLICK110:X(16336):CLICK:TIME110:TIME:BUZx /// PRINT LABEL5(15);22);"ADVENTURE #";A:f(14);(27);(71);(29(AN$(A)))2);AN$(A)(27);(72);(20);" "YY81:A16YY80:A10YY79A23YY82"COPYRIGHT (C) 19";YY;" BY ";DN$(A);" * DOS 3.3":(18);"" :N1İ7600VSG$"S"77002`D$"PR#1":ABEUjX1N:7800:::D$"PR#0":20m >> SETS OR GROUP?"AS SET OR GROUPED?":"INPUT 'S' OR 'G':";SG$:SG$"S"SG$"G"7620SG$:D$"PR#1":X1N:ABE:7800:::D$"PR#0":20ELSI*"ADVENTURE #:";A$:A(A$):D$"PR#1":L1N:7800::D$"PR#0":20` /// SPEC. LABELS}"TITLE (1ST LINE):";TI$"MAJOR TITLE:";MT$"SECONDARY TITLE:";ST$"BOTTOM LINE:";SB$D$"PR#1":X1N:7900::D$"PR#0":20 LSG$"G"BELS (DEFAULT = 1):";N$:N(N$):N0N1Fv:(A$)1B1:ENA:7500b(A$)17100,7200,7300z /// RANGE LABELS"INPUT RANGE AS BB-EE:";A$:B(A$):E((A$,((B))2)):B1BNABE7110ENAE2BE71107500  /// SINGLE LABOBODY)":700:20'X /// PRINT LABELSb:"SELECT LABELS FOR:":" 1. ALL ADVENTURES PRINTED":" 2. RANGE OF ADVENTURES":" 3. SINGLE ADVENTURE"g" 4. SPECIAL LABEL":"INPUT YOUR CHOICE (1-4):";lA$:A$"1"A$"4"7020(qA$:"HOW MANY LA # TO DELETE:";A$:A(A$):A1ANADV6010oST$(A)"PROD"ĺ"CANNOT DELETE A PRODUCTION ADVENTURE.":999:20ST$(A)"TEST"ĺ"ARE YOU SURE YOU WANT TO DELETE ":AN$(A);"?":"INPUT (Y OR N):";A$:A$"N"20AN$(A)"(OPEN)":ST$(A)"NONE":DN$(A)"(NE:";AN$(NA1)-"AUTHOR'S NAME:";DN$(NA1)H"STATUS : ";ST$(NA1)dANA1:NANA1:700:20| >>>> QUIT ROUTINEADDĺD$"WRITE EAMON ][.ADVLOG,R0":NA:D$"CLOSE":5500|D$"RUN EAMON ][ MASTER"p /// DELETE ADVENTURE*z"ADVENTURE100( "NEW AUTHOR NAME:";DN$(A):3100H "NEW STATUS:";ST$(A):3100b >>>> CHECK FOR DONE& "MORE CHANGES FOR THIS RECORD? (Y/N)";0 A$:A$"Y"A$"N"3120: :A$"Y"3030D 700:20 >>>> ADD RECORDADD1 "ADVENTURE NAM AN$(A);" ":"BY ";DN$(A):"STATUS:";ST$(A): "INPUT FIELD TO CHANGE:":" 1. ADVENTURE NAME":" 2. AUTHOR NAME":" 3. STATUS":"INPUT YOUR CHOICE (1-3):"; A$:A$"1"A$"3"3050 :(A$)3070,3080,3090 "NEW ADVENTURE NAME:";AN$(A):3 ";:36,5:AN$(A);:36,30:DN$(A)' >  /// DISPLAY LISTx PC0::A1NA:A;". ";5);AN$(A);35);ST$(A):2500: 999:PC0:20 PCPC1:PC20İ999:PC0:: >>>> CHANGE ROUTINE "ADVENTURE #:";A A(A)ANAA13010. G,R0":NA 4; :"PRESS ANY KEY TO CONTINUE";:A$::Q  >>>> PRINT LIST "ALL OR PRODUCTION ONLY (A OR P):";A$:A$"A"A$"P"1010 D$"PR#1":A1NA:A$"A"ST$(A)"PROD"İ1100 8 BD$"PR#0":999:20 L >>> PRINT LINE! VA;".; <8000, PA$:A$"1"A$"7"İ8000:80\ Z:(A$)1000,2000,3000,4000,6000,7000,5000t  >>>> WRITE RECORD D$"WRITE EAMON ][.ADVLOG,R";A:AN$(A):DN$(A):ST$(A):NB%(A):B1%(A):D$   >>>> WRITE RECORD 0 *D$"WRITE EAMON ][.ADVLO ";::"2";::" DISPLAY LIST"::" ";::"3";::" CHANGE RECORD": (" ";::"4";::" ADD RECORD"::" ";::"5";::" DELETE ADVENTURE": 2" ";::"6";::" PRINT LABELS"::" ";::"7";::" RETURN TO MASTER"::"INPUT YOUR CHOICE (1-7):" EAMON ADVENTURE LOG: MAINTENANCE@Z BY JOHN NELSON`fl D$(4)::10000:11::"EAMON ADVENTURE LOG":::14:"BY JOHN NELSON"::8:"SELECT ACTION:":F " ";::"1";::" PRINT LIST"::"       130108 AN$(A);" ":"BY ";DN$(A):"STATUS:";ST$(A): "INPUT FIELD TO CHANGE:":" 1. ADVENTURE NAME":" 2. AUTHOR NAME":" 3. STATUS":"INPUT YOUR CHOICE (1-3):"; A$:A$"1"A$"3"3050 :(A$)3070,3080,3090  "NEW ADVENTURE NAME:"+ VA;". ";:36,5:AN$(A);:36,30:DN$(A)1 H  /// DISPLAY LIST PC0::A1NA:A;". ";5);AN$(A);35);ST$(A):2500: 999:PC0:20 PCPC1:PC20İ999:PC0:: >>>> CHANGE ROUTINE "ADVENTURE #:";A A(A)ANAAN II.ADVLOG,R0":NA 4E :"PRESS ANY KEY TO CONTINUE";:A$::[  >>>> PRINT LIST "ALL OR PRODUCTION ONLY (A OR P):";A$:A$"A"A$"P"1010 D$"PR#1":A1NA:A$"A"ST$(A)"PROD"İ1100 8 BD$"PR#0":999:20 L >>> PRINT LINECE (1-7):"; <80006 PA$:A$"1"A$"7"İ8000:80f Z:(A$)1000,2000,3000,4000,6000,7000,5000~  >>>> WRITE RECORD D$"WRITE EAMON II.ADVLOG,R";A:AN$(A):DN$(A):ST$(A):NB%(A):B1%(A):D$   >>>> WRITE RECORD 0 *D$"WRITE EAMOLIST"::" ";::"2";::" DISPLAY LIST"::" ";::"3";::" CHANGE RECORD": (" ";::"4";::" ADD RECORD"::" ";::"5";::" DELETE ADVENTURE": 2" ";::"6";::" PRINT LABELS"::" ";::"7";::" RETURN TO MASTER"::"INPUT YOUR CHOI( EAMON ADVENTURE LOG: MAINTENANCE@Z BY JOHN NELSON`fl D$(4)::10000:11::"EAMON ]";(91)" ADVENTURE LOG":::14:"BY JOHN NELSON"::5:"SELECT ACTION:":P " ";::"1";::" PRINT           ҠƠ΍Ġ٠ȍčŠčΠ΍č΍čĠٍŠ΍čŠԍΠ΍čύ͍ōōōōōӍ͍ōōōōō΍͍ŭĠōōōōōύ͍ōōōōōǍ͍ōōōōōō͍ōōōōōٍ͍àԍōōōō     100gP`:"YOU MADE A FEW GOLD PIECES SHOVELING":"THE BLACKSMITH'S BARN.":GOLDGOLD((1)183):100Pj:"YOU MADE A FEW GOLD PIECES PITCHING":"HAY AT THE STABLES.":GOLDGOLD((1)153):100(Qt:"YOU MADE A FEW GOLD PIECES POURING":"DRINKS IN  ٍ͍ōōōō): rX15:WA%(X): |AE* SEX$: GOLD:BANKN AC:AH:AA:SH X15:WN$(X):WT%(X):WO%(X):WD%(X):WS%(X)::PTS ZD$;"CLOSE"d ///READ OLDNA$:CLHD:AG:CH:INX18:SA%(X): X15:WA%(X): AE SEX$( GOLD:BANK< AC:AH:AA:SHv X15:WN$(X):WT%(X):WO%(X):WD%(X):WS%(X)::PTS| " , ///WRITE NEW 6ALIGN((1)21) JD$;"WRITE CHARACTERS,R";REC TNA$:CL:ALIGN ^HD:AG:CH:IN hX18:SA%(X  D$(4),D$;"OPEN CHARACTERS,L256"MD$;"READ CHARACTERS,R0":NC[(REC1NC{2D$;"READ CHARACTERS,R";REC<200F300PZD$;"CLOSE"d ///READ OLDNA$:CLHD:AG:CH:INX18:SA%(X): X15:WA  z #?????? ?         ŠĠƠΠ۠Ԡұ Р  ŠҠ ȠԠӠΠ̠RנӠ"٠Ԡ Ӡ Π۠Ǡ" Π۠Ǡ Π۠Ҡ<ΠۮǠ ΠۮǠΠۮŠ"">ND"::10:"<";::"R";::">ESURRECT A CHARACTER":D8000\:"M";::22:CMD$uCMD$(13)CMD$"M"X16:CMD$("MASTER",X,1)Ă:8000:4090CMD$:CX:X6:"C100,12000,13000,14000,15000,16000J8000T4090^:OUR ENC,WEAPON DATA,QUIT+///OTHER MENU86:958_10:"<";::"M";::">AIN MENU":10:"<";::"A";::">DVENTURE ONLY":10:"<";::"S";::">EE CHARACTERS":10:"<";::"T";::">EST AN ADVENTURE":10:"<";::"E";::"OPEN CHARACTERS,L256":DK$;"WRITE CHARACTERS,R";REC:12080:DK$;"CLOSE"N2< NAME,HARDINESS,AGILITY,CHARISMA,INTELL,BLAST,HEAL,SPEED,POWER,CHARM,FEAR,TELEPORT,SLEEP,AXE,BOW,MACE,SPEAR,SWORD,ARMOUR EXPERTISE,SEX CHANGE,GOLD,BANK,ARMOUR CLASS,ARMON TYPE:";WTYPE%(WN)4OTTD:TDTDWD%(WN)WS%(WN)R"ENTER COMP:";WOODS%(WN)p"ENTER DICE:";WDICE%(WN)"ENTER SIDES:";WSIDES%(WN)TDTDWD%(WN)WS%(WN):TDOTĭWD%(WN)WS%(WN)24WD%(WN)1:WS%(WN)8 ///SAVE CHARACTERH(DK$;"ENTER NEW GOLD IN BANK AMOUNT:";BANKx"ENTER NEW ARMOUR CLASS:";AC:AC7ĺ"ARMOUR CLASS MAY NOT EXCEED 7.":3770~X14:TDTDWD%(X)WS%(X):"ENTER WHICH WEAPON TO EDIT(1-4):";WN:"ENTER NEW WEAPON NAME:";WNAME$(WN)"ENTER WEAPBILITY:";WA%(5):?"ENTER NEW ARMOUR EXPERTISE:";AE:ESEX$"M"ĺ"CHARACTER IS NOW A FEMALE.":SEX$"F":TIME11000:TIME:SEX$"F"ĺ"CHARACTERS IS NOW A MALE.":SEX$"M":TIME11000:TIME:"ENTER NEW GOLD AMOUNT:";GOLD:(G+L"ENTER NEW POWER RATING:";SA%(4):1QXV"ENTER NEW AXE ABILITY:";WA%(1):^[`"ENTER NEW BOW ABILITY:";WA%(2):ej"ENTER NEW CLUB ABILITY:";WA%(3):ot"ENTER NEW SPEAR ABILITY:";WA%(4):y~"ENTER NEW SWORD A:"ENTER NEW AGILITY RATING:";AG:AG29AG24:@t$"ENTER NEW CHARISMA RATING:";CH:CH29CH24:z)."ENTER NEW BLAST RATING:";SA%(1):38"ENTER NEW HEAL RATING:";SA%(2):=B"ENTER NEW SPEED RATING:";SA%(3):BJ$(X)  X! :"SELECT:";OP) 23 OP3590,3600,3610,3620,3630,3640,3650,3660,3670,3680,3690,3700,3710,3720,3730,3750,3760,3770,3790,3870 OP20100 3500"ENTER NEW NAME";NAME$:"ENTER NEW HARDINESS RATING:";HD:HD29HD24:C1NC+ DK$"READ CHARACTERS,R";REC:NA$B * NA$CHA$Ă:3410L 4 9000V > 3420_ H REC R :10:10::"CHARACTER NOT FOUND."::TIME12000:TIME:DK$;"CLOSE":3000 \ DK$;"CLOSE" X120 X9ĺX;". ";OBJ$(X):3540 X;". ";OMAIN MENU" 8000 CMD$( CMD$E  CMD$"D"ĺD$;"RUN INIT"W  CMD$"R"100a  8000k & 3060 ///MODIFY A CHARACTER :6:"ENTER CHARACTER:";CHA$ 16368,0  DK$;"OPEN CHARACTERS,L256" DK$;"READ CHARACTERS,R0":NC  RE$ DK$;"RUN THE WORLD OF EAMON II"=  /// ADVENTURE LISTR DK$"RUN ADVLOG"m ///MODIFY A CHARACTER} 16368,0: 10::"CHARACTER MODIFICATION": 6:10:"<";::"D";::">ESTROY CHARACTERS FILE": 10:"<";::"R";::">ETURN TO 1 10:"<";::"N";::">AMES OF CHARACTERS":; 8000M :"E";::22W CMD$a CMD$z CMD$(13)CMD$"E" X15:CMD$("EAMON",X,1)Ă:8000:210 CX:X5: C1000,2000,3000,4000,5000 8000 220  /// ENTER EAMON ":15:": :":' o9586 s16:CP$:r x6:10:"<";::"E";::">NTER THE WORLD OF EAMON II": 10:"<";::"A";::">DVENTURE/AUTHOR LIST": 10:"<";::"M";::">AINTENANCE FUNCTIONS": 10:"<";::"O";::">THER MENU":ȍ΍ōύ͍ōōōōōŠƠ̠ō̠ҍč ƠӍΠ΍č:"PROD":0:0:D$"CLOSE"RS,R";R:NA$:DK$"CLOSE"::"VERY WELL,";NA$;",":" YOU HAVE BEEN RESURRECTED.":16120&>:NA$;" ISN'T DEAD OR DOESN'T EXIST.":DK$"CLOSE"&>22:7:"";:A$:100&?& N /// FIND CHAR]'*N"NAME OF ADVENTURER:";NA$:DK$ ADVENTURE TO TEST AND PRESS ANY"::" KEY TO CONTINUE"y#8A$::DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT"#81:"TESTOR OF BENCH":HD:AG:CH:BL:HE:SP:PO:X15:WA%(X):0$815:"M":2000:1300:4:"AXE":1:10:1:6:"BOW":2:10:USE DEFAULTS?";5"8A$:A$"N"A$"Y"İ8010:14510j"8A$:A$"Y"HD18:AG18:CH18:HE40:SP40:14540"8"HARDINESS:";HD:"AGILITY:";AG:"CHARISMA:";CH"8"SPELLS:";BL,HE,SP,PO"8WA%(1)15:WA%(2)0:WA%(3)30:WA%(4)10:WA%(5)20@#8:5:"INSERT+!610:"<";::"T";::">EST CHARACTER":5!68000M!6:"R";:22::CMD$f!6CMD$(13)CMD$"R"!6X14:CMD$("BRAT",X,1)Ă:8000:14050!6SX:X4:!7:S14100,100,12000,14500!7 ///BUGLIST!7DK$"RUN BUGLOG""8:"DO YOU WANT TO 1 324::"PRESS ANY KEY TO CONTINUE ";::A$:: 3100R 6 ///TEST ADVENTURE 6:14::"TEST ADVENTURE"::6:10:"<";::"B";::">UG LIST": 610:"<";::"R";::">ETURN TO MAIN MENU": 610:"<";::"A";::">DVENTURE WITH REG. CHAR.":Y DAM ODDS"3" "!3I14=3WNAME$(I)"NONE"132803WNAME$(I);17(WNAME$(I)));WODDS%(I);"%";6(WODDS%(I)0)((WOODS%(I))9)((WODDS%(I))99));WDICE%(I);"D";WSIDES%(I);33(WSIDES%(I)9));WODDS%(I)2AGEAWA%(WTYPE%(I));"%"3I"ARMOUR: ";:(AC2)113150,13160,13170,13180B^3"SKIN";:13190Yh3"LEATHER";:13190nr3"CHAIN";:13190|3"PLATE";:131903(" AND SHIELD",110(AC2(AC2)));" AE=";AE;"%"3" "3"WEAPON INFORMATION:" 3"NAME COMPLEXIT3" "!313);"SPELL ABILITY"k"3"BLAST ";SA%(1);" HEAL ";SA%(2);" SPEED ";SA%(3);" POWER ";SA%(4),3" ":13);"WEAPON ABILITY"63"AXE ";WA%(1);9);"BOW ";WA%(2);9);"CLUB ";WA%(3)@34);"SPEAR ";WA%(4);10);"SWORD ";WA%(5)J3" ".T3H MEAT":REC:12080:DK$;"CLOSE":DK$;"RUN ";ADNAME$G2 DISPLAY CHARQ2:10i220000:FOUND4000s290002:"NAME: ";NA$2"SEX ";SEX$;3);"GOLD ";GOLD;3);" IN BANK ";BANK2" "3"HARDINESS ";HD;" AGILITY ";AG;" CHARISMA ";CH4:WNAME$(W):WTYPE%(W):WOODS%(W):WDICE%(W):WSIDES%(W):WCD/IN/Ob/l/DK$;"OPEN EAMON.NAME":DK$;"READ EAMON.NAME":ADNAME$:DK$;"CLOSE"v/:5:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$:::4/DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESLOSE" &.".:10:200001.FO14000;.9000/:"INSERT ADVENTURE DISKETTE INTO DRIVE 1"::" AND PRESS ANY KEY TO CONTINUE"&/A$::121100/NAME$:HD:AG:CH:X14:SA%(X)::X15:WA%(X)::AE:SEX$=:/GOLD:BANK:AC:W1F#X14:SA%(X):X*P#X15:WA%(X):X2Z#AE<d#SEX$Kn#GOLD,BANKSx#AC#X14:WNAME$(X),WTYPE%(X),WOODS%(X),WDICE%(X),WSIDES%(X):X#EA5(AC2(AC2)):AC1EAEA10:AC3EAEA10:AC5EAEA40#EAEAAE:EA0EA0#DK$;"Cȍ΍ō SHOULD HAVE LISTENED& 40 THAN WIPING THE NOSES OF GREENHORNS.,NEEDING SOMEONE TO LEAD THEM BY THE HAND,THROUGH FOR SOME STUPID UPSTARTS.,TO HIS MOTHER AND BEEN A BRAIN SURGEON.PSTARTS.,TO HIS MOTHER AND BEEN A BRAIN SURGEON.EHORNS ALWAYS,TTHEN SPINS AROUND AND RUNS YOU":"THROUGH WITH A SPEED YOU HAVE NEVER":"SEEN BEFORE! (AND NEVER WILL AGAIN.)":A HAVE NEVER":"SEEN BEFORE! (AND NEVER WILL AGAIN.)":4 HAVING BETTER THINGS TO,YOUNG GREENHORNS ALWAYS,THE THINGS HE HAS TO GO,HEE MAN CUTS ONE OF YOUR FINGERS OFF!!":"HE THEN EATS IT!!!!":"THEN HE SAYS 'ARE YE READY T' TALK NOW?":CNT13ĺ"THE MAN CUTS OFF ANOTHER FINGER!!!":"HE EATS THIS ONE TOO!!":p"THE MAN STARTS SLOWLY, 'WELL YE BE ":"OUTTA FINGERS!'":"THE MAN " HE PULLS OUT A SWORD AND BEGINS TO":"SHARPEN IT, SAYING 'YE'D BEST BE GIVIN'":"ME YER NAME LADDIE, IF YE KNOW WOTS":"GOOD FER YE!!!"CNT2ĺ"I'VE 'BOUT HAD ME FILL O' YER SICK":"SENSA 'UMOR!!":"NOW GIMME YER NAME!!":iCNT3ĺ"TH HE LOOKS UP AND SAYS, 'AH, HERE YE"::"BE! WELL, GO AND HAVE FUN IN THE HALL!'":yT350:DK$;"RUN MAIN HALL,S6,D1"^DK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE": ///NO NAME ROUTINECNTCNT1:CNT1450"N"ĺA$::400:230$,A$"Y"2906A$::" HE HITS HIS FOREHEAD AND SAYS, 'AH,"::"YE MUST BE NEW HERE! WELL, WAIT JUST"::"A MINUTE AND I'LL BRING SOMEONE OUT TO"::"TAKE CARE OF YE.'":@350:DK$;"RUN NEW CHARACTERS,S6,D1"UJDK$::" G ABOUT ";C1$::C2$:OR1NC:DK$;"READ CHARACTERS,R";R:A$:A$NAME$330R:DK$:" HE EVENTUALLY LOOKS AT YOU AND SAYS,"::"'YER NAME'S NA IN HERE. HAVE YE GIVEN"::"IT TO ME ARIGHT?'"::"HOW DO YOU ANSWER (HIT 'Y' OR 'N') ";"A$:A$AME$""(NAME$)2(NAME$,1)"A"(NAME$,1)"Z"İ400:230(NAME$)20ĺ" HE SCOWLS AT YOU AND SAYS, 'YER"::"NAME'S TOO LONG FER ME BOOK. I CANNA"::"USE MORE THAN TWENTY LETTERS."::230" HE STARTS LOOKING THROUGH HIS BOOK,"::"MUTTERINREALLY"::"MUST LEARN TO FOLLOW DIRECTIONS!'":A$:::" YOU ARE GREETED THERE BY A BURLY"::"IRISHMAN WHO LOOKS AT YOU WITH A SCOWL"::"AND ASKS YOU, 'WHAT'S YOUR NAME?'"::"YOU GIVE HIM YOUR NAME (TYPE IT IN NOW) ";NAME$::NIT 'D' FOR DESK OR 'M' FOR MEN) ";E X11000:(16384)155ĂXU 16368,0:i A$:A$"D"220z A$"M"1900A$:::" AS YOU GO OVER TO THE MEN, YOU FEEL"::"A SWORD BEING THRUST THROUGH YOUR BACK"::"AND YOU HEAR SOMEONE SAY, 'YOU 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 ELSE!'":$ :"DO YOU GO OVER TO THE DESK OR JOIN THE"::" MEN DRINKING THE BEER?"::" (H,24):DK$"CLOSE SNAPPY"Z DK$;"OPEN CHARACTERS,L256":DK$;"READ CHARACTERS,R0":NC:DK$< 5:" YOU ARE IN THE OUTER CHAMBER OF THE"::"HALL OF THE GUILD OF FREE ADVENTURERS."::"MANY MEN AND WOMEN ARE GUZZLING BEER"::"AND THERE IS LOUD SINGING T 10 APPLICANTS":"THERE'S A LAW ABOUT STARTIN' AN ARMY":"YE KNOW."UP#:"TO HIRE -";::DK$;"OPEN FRIENDS,L64":R1NF:DK$;"READ FRIENDS,R";R:A$:R"."A$::DK$UZ#"I'LL NEED ";(SUM);" GOLD PIECES."::"DO YOU STILL WANT TO HIRE ALL OF 'EM ?";Vd#-+ :(4);"RUN EAMON ]";(91);" MASTER"M ЍӠҍӠ΍ĠϧˍŠԍ$(3)ė:"OH,A WISE GUY HUH ?":"WHATS YOUR NAME:";R$:R$"JON"R$"JOHN"ġ:3000XBD"NAME OF ADVENTURER:";NA$:DK$"OPEN CHARACTERS,L256":DK$"READ CHARACTERS,R0":NC:REC1NC:DK$"READ CHARACTERS,R";REC:N$A4NN$NA$Ă:FOUND0:20100A>NFOUND1:DK$:AN:10:10::"CHARACTER NOT FOUND."::TIME12000:TIME:DK$;"CLOSE":RBSPINS A ROUND A RUNS YOU":"THROUGH WITH A SPEED YOU HAVE NEVER SEEN BEFORE! (AND NEVER WILL AGAIN.)": ROLE-PLAYING SYSTEM BASED ON EAMON - A CREATION OF DON BROWN ------------------------   EAMOF YOUR FINGERS OFF!!":"HE THEN EATS IT!!!!":"THEN HE SAYS 'ARE YE READY T' TALK NOW?":CNT6ė::"THE MAN CUTS OFF ANOTHER FINGER!!!":"HE EATS THIS ONE TOO!!":f::"THE MAN STARTS SLOWLY,'WELL,I'M NOT":" 'UNGRY NO MORE!'":"THE MAN THEN SWORD AND BEGINS TO":"SHARPEN IT, SAYING 'YE'D BEST BE GIVIN'":"ME YER NAME LADDIE, IF YE KNOW WOTS":"GOOD FER YE!!!"}CNT2ė::"I'VE 'BOUT HAD ME FILL O' YER SICK":"SENSA 'UMOR!!":"NOW GIMME YER NAME!!":ZCNT3ė::"THE MAN CUTS ONE AH, HERE YE":"BE! WELL, GO AND HAVE FUN IN THE HALL!'":^T350:DK$;"RUN MAIN HALL,S6,D1"^DK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE": ///NO NAME ROUTINECNTCNT1:CNT1450w::" HE PULLS OUT A S,A$"Y"2906A$:::" HE HITS HIS FOREHEAD AND SAYS, 'AH,":"YE MUST BE NEW HERE! WELL, WAIT JUST":"A MINUTE AND I'LL BRING SOMEONE OUT TO":"TAKE CARE OF YE.'":@350:DK$;"RUN NEW CHARACTERS,S6,D1":JDK$:::" HE LOOKS UP AND SAYS, 'TERS,R";R:A$:A$NAME$330R:DK$:::" SUDDENLY,HE LOOKS UP AT YOU AND SAYS -":"YER NAME'S NA IN HERE,";NAME$".":"ARE YE SURE YE SPELT' IT RIGHT?""HOW DO YOU REPLY - ";::"Y";::"ES ";::"N";::"O ?";"A$:A$"N"ĺA$::400:230"Z"İ400:230(NAME$)20ė::" NOW JUST HOWDA YOU THINK IMA GONNA":"FIND YER NAME IF I CANNA EVEN SAY IT":"IN ONE BREATH ,HUH?"::230::" HE STARTS LOOKING THROUGH HIS BOOK,":"MUTTERING ABOUT ";C1$:C2$:R1NC:DK$;"READ CHARAC" YOU ARE GREETED THERE BY A BURLY":"IRISHMAN WHO LOOKS AT YOU SOURLY AND":"SAYS - 'SIGN THE REGISTER,MATE.'":::34,1623:10:"":22:7:"X:____________________";:9:"";NAME$:NAME$""(NAME$)2(NAME$,1)"A"(NAME$,1)UESTS.":" AS YOU";:" THREAD YOUR WAY THROUGH THE" "CROWD,CLAPS ON THE BACK AND VARIOUS":"DRUNKEN HAILS SURROUND YOU.FINALLY,YOU":"REACH A LARGE DESK ON THE FAR SIDE OF ":"THE ROOM." X11000:(16384)155ĂX 16368,0:16303,0|:NG WITH":"ACTIVITY.YOU RECOGNIZE THIS PLACE AS ":"ONCE A SMALL BUT BUSY DEPOT FOR FREE ":"ADVENTURERS."3 " IT HAS CHANGED, HOWEVER ,INTO A GREAT":"HALL WHERE MANY A GALLIANT ADVENTURER":"SIT ATOP BARSTOOLS AND REST AFTER ":"RETURNING FROM THEIR QK$;"READ SNAPPY,R";NR:SS$(NR)::DK$;"CLOSE SNAPPY"i }R((1)NS1):C1$(SS$(R),23):C2$(SS$(R),24) DK$;"OPEN CHARACTERS,L256":DK$;"READ CHARACTERS,R0":NC:DK$j :3:" YOU ARE ENTERING A LARGE OPEN SQUARE,":"CROWDED WITH PEOPLE,AND BUSTLI BOB DAVIS.  5  -----------------------= c:T d(4);"MAXFILES 8" nDK$(4):DK$;"BLOAD EAMON ][.IMAGE,A$2000":16304,0:16297,0:16302,0 sX((78)(79))4 xDK$"OPEN SNAPPY,L64":DK$"READ SNAPPY,R0":NS:SS$(NS):NR1NS:DON ][  (  WAS DEVELOPED BYF JOHN NELSON AND ALTHOUGHd  AN ENHANCED VERSION OF  EAMON,IT CONTAINS MANY  ADDED FEATURES AND  REVISIONS.   EAMON ][ WAS CREATED  WITH THE HELP OF  JON HENG ANDg  ------------------------> THE WORLD OF EAMON ][Db A COMPUTERIZED FANTASY ROLE-PLAYING SYSTEM BASED ON EAMON - A CREATION OF DON BROWN ------------------------   EAM     :AA2:CA3:IA2:X15:WA%(X)WA%(X)8::h"HA4:AA1:CA4:IA5:X15:WA%(X)WA%(X)3:SA%(2)50:,HA4:AA0:CA1:IA10:X15:WA%(X)WA%(X)8:SA%(4)50: ///GET AND ADJUST ALIGNMENT/::"AND WHAT ALIGNMENT ARE YE ?":"(";::"1";::ESSURRECTION WAS SUCCESSFUL AND ":"YOUR PRIME ATTRIBUTES ARE --":::11024::" PRESS ANY KEY TO CONTINUE ";:A$::: >> ADJUST CLASSCL1550,1560,1570,1580HA3:AA3:CA3:IA2:X15:WA%(X)WA%(X)3::,HA4"NOTE--"wb"YOUR CHARACTER IS SUCH A POOR EXCUSE":"FOR AN ADVENTURER THAT WE WILL ALLOW":"YOU TO COMMIT SUICIDE."g"DO YOU WANT TO COMMIT SUICIDE-";::"Y";::"ES/";::"N";::"O ?";lA$:A$"Y"A$"N"620v::A$"N"ıJ:"YOUR R)::"0":SEX$:"200":"0":"0":"0":"0":"0"\0W15:"NONE":"0":"0":"0":"0"::"0"m:DK$;"CLOSE"DDK$;"OPEN THE ADVENTURER":DK$;"WRITE THE ADVENTURER":NAME$:R:DK$;"CLOSE"NDK$;"RUN MAIN HALL"SX /// SUICIDE ROUTINE ]: HALL."DK$;"OPEN CHARACTERS,L256":DK$;"READ CHARACTERS,R0":NC:R1NC:DK$;"READ CHARACTERS,R";R:A$:A$""Ă:DK$;"WRITE CHARACTERS,R0":NC1:RNC1DK$;"WRITE CHARACTERS,R";R:NAME$:CLHD:AG:CH:IN:X18:SA%(X):.&X15:WA%(XIND THE DESK TAKES BACK THE":"INSTRUCTIONS AND SAYS, 'IT IS NOW TIME":"FOR YOU TO START YOUR LIFE.' HE MAKES":"AN ODD SIGN WITH HIS HAND AND SAYS,":"'EXPECT THE IMPOSSIBLE AND THE"" IMPROBABLE' ---":"YOU NOW WANDER INTO THE MAINNE"""ON MANY MISSIONS, YOU WILL GAIN MORE AND":"MORE CONFIDENCE. DO NOT MAKE THE MISTAKE":"OF THINKING YOU CAN VANQUISH EVERY EVIL":"MONSTER YOU RUN ACROSS, EITHER. THIS IS","THE FASTEST WAY TO KILL YOURSELF."1000::"THE MAN BEHRY VULNERABLE WHEN YOU ARE A NEWER":"ADVENTURER. THIS IS BECAUSE YOU LACK THE""SKILLS OF A GOOD FIGHTER. THESE MUST BE":"DEVELOPED SLOWLY THROUGH PRACTICE. START":"WITH EASIER ADVENTURES AND PROGRESS TO A":"MORE DIFFICULT ONE. WHEN YOU HAVE GOIN AREAS. MAGIC""CAN GET YOU OUT OF SOME TERRIBLE MESSES":"SOMETIMES, BUT SHOULD BE USED SPARINGLY,":"SINCE IT IS VERY EXHAUSTING ON YOU.":1000O"WHEN YOU FIRST START YOUR ADVENTURING, A":"LITTLE CAUTION SHOULD BE EXERCISED. YOU":"ARE VE00"THERE ARE DIFERENT KINDS OF MAGIC IN THE":"WORLD. THE FIRST IS UNIVERSAL MAGIC. THE":"KIND THAT HOKAS TEACHES IS THIS TYPE. IT""USUALLY WORKS IN ALL LOCATIONS. THE NEXT":"KIND OF MAGIC IS LOCAL MAGIC. THIS TYPE":"WILL WORK ONLY IN CERTAIES AND SPELLS. YOU WILL NEED SOME""WEAPONS AND ARMOUR TO START OUT WITH. AN":"ARMOURY IS LOCATED IN THE CENTER OF TOWN":"TO PROVIDE YOU WITH THESE.":"WHEN YOU GET ENOUGH GOLD, YOU CAN HIRE A":"WIZARD TO TEACH YOU SOME MAGIC SPELLS. ":10$"R"140n ::"YOU READ THE INSTRUCTIONS AND THEY SAY--"::" INFORMATION ABOUT THE WORLD OF EAMON II":$:"YOU WILL BE ADVENTURING IN A WORLD WHERE":"ANYTHING CAN HAPPEN. YOU WILL NEED TO BE":"READY FOR ANYTHING. USE YOUR GOLD TO BUY":"SUPPL)AA:CHA(8)CA:INA(8)IAt x" HARDINESS--";HD:" AGILITY --";AG:" CHARISMA --";CH:"INTELLIGENCE--";IN }HDAGCH35İ600 :"(";::"R";::"EAD INSTRUCTIONS OR ";::"G";::"IVE THEM BACK)"; A$:A$"G"500 A$"X"90 A0 Z::"THE IRISHMAN 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" d"YOU TO READ, AND YOUR PRIME ATTRIBUTES":"ARE--": nHDA(8)HA:AGA(80*4A$:PBPBP(Q1)BP2(Q3):PP(P)>PGOLDĺ:"MARCOS SHAKES A FINGER AT YOU AND SAYS,":"'YOU SHOULDN'T PLAY TRICKS ON AN OLD":"FRIEND! COME BACK WHEN YOU GOTTA MORE":"GOLD OR YOU WANT SOMETHING YOU CAN":"AFFORD.' HE THEN SHOOS YOU OUT THE"HREE ";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$:Q13:A$("GFP",Q,1)Ă:209RSON!'"::2220BCL2FSN$"MACE":BP30:TP3:DI1:SI4:2070 "MARCOS SMILES AT YOU AND SAYS, 'GOOD.":"I GOTTA THE BEST. YOU WANTA AXE, BOW,":"MACE, SPEAR, SWORD, OR UNUSUAL WEAPON?";:2650t:"MARCOS SAYS, 'WELL, I JUST HAPPEN TO":"HAVE T20):RTIO10C2:A$:TR13:A$("BSA",TR,1)Ă:2030WA$::TR2050,2220,2490WN$(5)"NONE"FSĺ"MARCOS SMILES AT YOU AND SAYS, 'THATSA":"GOOD, BUT FIRST YOU GOTTA SELL ME A":"WEAPON. YOU KNOW THE LAW--NO MORE THAN":"FIVE WEAPONS PER PESEE YOU BROUGHT A FRIEND. WHICH ONE":"WILL BE FIRST HERE?":"INPUT 'Y' FOR YOURSELF, 'F' FOR FRIEND";:3200"SO, YOU WANT TO BUY A WEAPON, SELL A ":"WEAPON, OR GET SOME BETTER ARMOUR?"::"(HIT THE KEY, B S OR A) ";C2CH(11(1)5):C2C2(CENDS,R";FR%(X):A$:A:D19:FD%(X,D):::DK$"CLOSE"<6:"AS YOU ENTER THE WEAPON SHOP, MARCOS":"CAVIELLI (THE OWNER) COMES FROM OUT OF":"THE BACK ROOM AND SAYS, 'WELL, AS I"l"LIVE AND BREATH, IF IT ISN'T MY OLD PAL":NAME$;"!":FR0ĺ"I K$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT":REC:FR:200o.FR0āX1FR:HIR$(FR%(X)):D19:FD%(X,D)::8FR0āX1FR:FW$(X):D14:FW%(X,D)::DK$;"CLOSE":DK$;"RUN ";ADNAME$FR0ı6DK$"OPEN FRIENDS,L64":X1FR:DK$"READ FRIS CAVE) IN"::"DISK DRIVE IN SLOT SIX, DRIVE ONE THEN"::"HIT 'C'"::::" ";:16368,0tA$:A$"C"1020zDK$;"OPEN II.NAME":DK$;"READ II.NAME":ADNAME$:DK$;"CLOSE":5:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$::::$DGOLD:BANK:AC:AH:AA:SH:W15:WN$(W):WT%(W):WO%(W):WD%(W):WS%(W):W:PTSZDK$;"OPEN CHARACTERS,L256":DK$;"WRITE CHARACTERS,R";REC::DK$;"CLOSE":1500^:5:"INSERT DISKETTE WITH ADVENTURE (OR KEEP"::"THIS DISKETTE FOR BEGINNER("LAMBXGED",X,1)Ă:130$ A$:5 A$"L"1000F A$"A"2000W A$"M"3000h A$"B"4000y A$"X"5000 A$"G"6000 A$"E"7000 A$"D"8000 NAME$:CL:HD:AG:CH:IN:X18:SA%(X)::X15:WA%(X)::AE:SEX$TEARN SPELLS":" (";::"B";::")ANKER TO DEPOSIT OR":" WITHDRAW SOME GOLD.":" (";::"X";::")AMINE YOUR ABILITIES." s" (";::"E";::")MPLOYMENT OFFICE":" (";::"D";::")EWDROP INN TO SLEEP" x:"ENTER YOUR OPTION:"; A$:X18:A$.5)* ZX14:CL$(X)::X19:ARM$(X): d:"AS YOU WANDER ABOUT THE HALL, YOU":"REALIZE YOU CAN DO ONE OF EIGHT THINGS--":" (";::"L";::")EAVE ON AN ADVENTURE.":" (";::"A";::")RMOURY SHOP FOR WEAPONS"} n" (";::"M";::")AGIC SHOP TO Lz 2DK$;"OPEN CHARACTERS,L256":DK$;"READ CHARACTERS,R";REC:NAME$:CL:HD,AG,CH,IN:X18:SA%(X)::X15:WA%(X)::AE <SEX$ FGOLD,BANK:AC,AH,AA,SH:W15:WN$(W),WT%(W),WO%(W),WD%(W),WS%(W):W:PTS:DK$;"CLOSE CHARACTERS" PP(X)(XRTIOTURER,S6,D1":DK$;"READ THE ADVENTURER":NAME$:REC:DK$;"CLOSE" #DK$"OPEN FRIENDS,L64":DK$"READ FRIENDS,R0":NF:HIR$(NF),FW%(NF,4):X1NF:DK$"READ FRIENDS,R";X:HIR$(X)::FD%(NF,9):D$ $HIR%(NF),FR%(NF),ARM$(NF),FW$(NF) ( ONERR GOTO 100)P THE WORLD OF EAMON II$*F MAIN HALL (BUY SPELLSb AND EQUIPMENT AND~ GO ON ADVENTURES) BY JOHN NELSON  FROM DON BROWN'S EAMON  DK$(4) ONERR GOTO 17000@ DK$;"OPEN THE ADVEN               !!!!!!!!!" """""              "SEX$:SEX$"M"80# FSEX$"F"60/ PSEX$: U21:"'AND WHAT OCCUPATION DO YOU CLAIM...":" ";::"T";::"HIEF,";::"F";::"IGHTER,";::"C";::"LERIC OR ";::"M";::"AGICIAN ?"; XA$:X14:A$("TFCM",X,1)Ă:88 YA$:CLX:1500:200R(X)(X(1)1). A(X)R(X)R(X)R(X) (DK$;"OPEN THE ADVENTURER,S6,D1":DK$;"READ THE ADVENTURER":NAME$:DK$;"CLOSE" 2::"THE IRISHMAN SAYS, 'FIRST I MUST KNOW":"WHAT SEX YE MIGHT BE..";::"M";::"ALE OR ";::"F";::"EMALE ?"; <` THE WORLD OF EAMON ][%+G CHARACTER GENERATORa AND INSTRUCTIONSg BY JOHN NELSON ADAPTED FROM DON BROWN'S EAMON DK$(4):WA%(1)5:WA%(2)15:WA%(3)10:WA%(4)0:WA%(5)0        )5:WD%(2)1:WS%(2)4:10030i>8DK$"CLOSE":DK$"OPEN EAMON.NAME":DK$"READ EAMON.NAME":AD$:DK$"CLOSE"|>9DK$"RUN ";AD$>: :::::::::::::: THE END :::::::::::::: >:DK$;"CLOSE">:>> :::::::::::::: RESURRECT :::::::::::::: ?>:10RE TO TEST AND PRESS ANY"::" KEY TO CONTINUE"q=8A$::DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT">8AE%15:SEX$"M":GOLD2000:BANK1300:AC4:AH10:SH5:AA15:WN$(1)"SWORD":WT%(1)5:WO%(1)10:WD%(1)1:WS%(1)8:WN$(2)"CLUB":WT%(2)3:WO%(2$"N"A$"Y"İ5130:14510V<8A$:A$"Y"HD18:AG18:CH18:IN18:HE40:SP40:14540<8"HARDINESS:";HD:"AGILITY:";AG:"CHARISMA:";CH<8"SPELLS - (B,H,S,P):";BL,HE,SP,PO<8WA%(1)15:WA%(2)0:WA%(3)30:WA%(4)10:WA%(5)208=8:5:"INSERT ADVENTUGOLDX6:69006ILUCK50ĺ:"YOU BROKE EVEN!":6900pILUCK30ĺ:"YOU LOST SOME GOLD!":GOLDGOLDX6:6900I:"YOU LOST LOTS OF GOLD!":GOLDGOLDX10:6900IGOLD0GOLD0I100bJX"YOU FIND YOUR WAY TO THE EMPLOYMENT":"OFFICE AND A FAT RPN",X,1)Ă:6030%HA$:A$"N"100NHXX5:LUCK((1)100((1)IN24))HXGOLDĺ:"THEY SAY YOU DON'T HAVE ENOUGH GOLD AND":" THROW YOU OUT!":100HLUCK90ĺ:"YOU WON BIG!!":GOLDGOLDX10:6900ILUCK70ĺ:"YOU CAME OUT AHEAD!":GOLDING ON."wGz"A GAME CALLED BACKHACK, A GAME CALLED":"POKE-HER, A GAME CALLED RUE-LET, AND A":"GAME CALLED CRAP.":G"WHICH GAME DO YOU WISH TO ENTER?":" INPUT 1ST LETTER: 'B' 'P' 'R' 'C' ":" (OR 'N' FOR NOTHING.) ";HA$:X15:A$("BCҠƠȍ͍ō׍ōč X:X4:';7:S14100,100,12000,145008;7 ///BUGLISTj;7 :::::::::::::: BUG LIST :::::::::::::: ;(7:DK$;"RUN BUGLIST";8 *** TEST CHARACTER ***;8:"DO YOU WANT TO USE DEFAULT VALUES":"FOR CHARACTER ATTRIBUTES AND SKILLS?";<8A$:A">UG LIST"9:610:"<";::"R";::">ETURN TO MAIN MENU"p:610:"<";::"A";::">DVENTURE WITH NORMAL CHAR.":610:"<";::"T";::">EST CHARACTER":65110:617:CMD$:6CMD$(13)CMD$"R":6X14:CMD$("BRAT",X,1)Ă:5110:14050;6SINUE:";:A$9316368,0:>94ALIGN13520,13522,13524,13526O94AL$AL$(1):`94AL$AL$(2):q94AL$AL$(3):94AL$AL$(4):94AL$AL$(5):96 :::::::::::::: TEST ADVENTURE :::::::::::::: :6:14::"TEST ADVENTURE"::6:10:"<";::"B";:: DAM ODDS"83I15/83WN$(I)"NONE"1328083WN$(I);17(WN$(I)));WO%(I);"%";6(WO%(I)0)((WO%(I))9)((WO%(I))99));WD%(I);"D";WS%(I);833(WS%(I)9));WO%(I)2AGEAWA%(WT%(I));"%"83I8316368,0 9324:7:":PRESS ANY KEY TO CONT;:131907d3"SCALE";:1319037e3"BANDED";:13190H7f3"PLATE";:13190a7g3"RIB-PLATE";:1319073:(" AND SHIELD",110(AC2(AC2)));:30:" AE=";::AE;::"%"73"-----------WEAPON INFORMATION-----------" 8318:"NAME COMPLEXITY 1:"SWORD:";WA%(5)*6J3X140:"-";::166T3"ARMOUR: ";::(AC2)113150,13151,13152,13153,13154,13155,13156,13157,13158,131596^3"SKIN";:131906_3"QUILTED";:131906`3"PADDED";:131906a3"LEATHER";:131906b3"STUDDED";:131907c3"CHAIN"AL :";SA%(2):"SPEED:";SA%(3):"POWER:";SA%(4):"CHARM:";SA%(5):"FEAR :";SA%(6):"BLINK:";SA%(7):"SLEEP:";SA%(8)5,38:20:"WEAPON ABILITY":20:"--------------"66321:"AXE :";WA%(1):21:"BOW :";WA%(2):21:"CLUB :";WA%(3):21:"SPEAR:";WA%(4):2RIC":1303942"MAGICIAN"!4242:"HD:";::HD;::" AG:";::AG;::" CH:";::CH;::" IN:";::IN"";::5);"SEX:";::SEX$::4321:"GOLD:";GOLD:21:"BANK:";BANK43" "435:"SPELL ABILITY":"-------------"r5"3"BLAST:";SA%(1):"HEREC1NC:9000:13000:30:230DK$;"CLOSE":g32 :::::::::::::: DISPLAY CHAR ::::::::::::::32::"NAME: ";NA$;" THE";:13500:" ";AL$;" ";:CL13035,13036,13037,1303832"PEASANT":1303932"THIEF":1303932"FIGHTER":13039 42"CLEE"?2v/:5:"YOU ARE ABOUT TO ADVENTURE IN":::ADNAME$:::2/DK$;"OPEN FRESH MEAT":DK$;"WRITE FRESH MEAT":REC:10030:DK$;"CLOSE":DK$;"RUN ";ADNAME$20 *** SEE CHARACTERS ***20DK$;"OPEN CHARACTERS,L256":DK$;"READ CHARACTERS,R0":NC30::::: ADVENTURE ONLY :::::::::::::: 11.:20000@1.FO14000J1.90001/:"INSERT ";::"ADVENTURE";::" DISKETTE INTO DRIVE 1"::" AND PRESS ANY KEY TO CONTINUE"1&/A$:2l/DK$;"OPEN EAMON.NAME":DK$;"READ EAMON.NAME":ADNAME$:DK$;"CLOSWRITE CHARACTERS,R";REC-0.'NAME$:CL:ALIGNA03'HD:AG:CH:INV04'X18:SA%(X):k05'X15:WA%(X):s06'AE}07'SEX$08'GOLD:BANK0B'AC:AH:AA:SH0L'W15:WN$(W):WT%(W):WO%(W):WD%(W):WS%(W):W:PTS0'DK$;"CLOSE":$1. :::::::::IN/F#X18:SA%(X):X//P#X15:WA%(X):X7/Z#AEA/d#SEX$Q/n#GOLD:BANKe/x#AC:AH:AA:SH/#X15:WN$(X):WT%(X):WO%(X):WD%(X):WS%(X):X:PTS/#DK$;"CLOSE"/&/' *** WRITE CHARACTERS ***0$':DK$;"OPEN CHARACTERS,L256":DK$;"NON":1490:22:23:100:10:6:85:1:8:1."DK$"WRITE FRIENDS,R3":"HOAGIE":800:22:23:70:0:4:70:1:6:1:DK$"CLOSE".".(# :::::::::::::: READ CHARAC :::::::::::::: .-#DK$;"READ CHARACTERS,R";REC.2#NA$:CL:ALIGN/<#HD:AG:CH:NY KEY TO ABORT";:A$:A$"C"6020A-t":DK$;"OPEN FRIENDS,L64"-~"DK$;"DELETE FRIENDS":DK$;"OPEN FRIENDS,L64":DK$;"WRITE FRIENDS,R0":"3"-"DK$"WRITE FRIENDS,R1":"HOGARTH":"750":"18":16:80:0:4:60:1:6:1+."DK$"WRITE FRIENDS,R2":"ABERTACKS:";SP:s,!:DK$;"OPEN FRIENDS,L64":DK$;"WRITE FRIENDS,R";REC:NAME$:PR:HD:AG:CO:DO%:OO%:DK$;"CLOSE"},!8560,`" *** INIT FRIENDS ***#-j"::" W A R N I N G ":::"INITING ERASES ALL OLD FRIENDS"::"PRESS 'C' TO CONTINUE - A5 +!8685$+!"NEW NAME:";NAME$:?+!"PRICE TO HIRE:";PR:V+!"HARDINESS:";HD:k+!"AGILITY:";AG:+!"COURAGE:";CO:+!"DEFENSIVE ODDS:";DO%:+!"ARMOUR:";AH:+!"OFFENSIVE ODDS:";OO%:+!"DICE:";DI:+!"SIDES:";SI: ,!"NBR AT. ARMOUR:";AH:" 8. OFF.ODDS:";OO%:" 9. DICE:"DI:"10. SIDES:";SI:"11. NBR ATTACKS:";SPw*z!16:"NUMBER TO CHANGE:";*!"";NN$:NN(NN$):NN$(13)M*!NN0ı*!NN0NN118575*!+!NN8610,8615,8620,8625,8630,8635,8637,8640,8645,8650,865HD:AG:CO:DO%:AH:OO%:DI:SI:SP:DK$;"CLOSE":8560j)f!:10:15::"CHARACTER NOT FOUND."::8040:)p!4:958:" 0. EXIT":" 1. NAME:";NAME$:" 2. PRICE:";PR:" 3. HARDINESS:";HDY*u!" 4. AGILITY:";AG:" 5. COURAGE:";CO:" 6. DEF.ODDS:";DO%:" 77(H!4:"ENTER NAME:";NM$:NM$""Ą"RECORD#:";REC:8535(R!DK$;"OPEN FRIENDS,L64":DK$;"READ FRIENDS,R0":FC:REC1FC:DK$;"READ FRIENDS,R";REC:NAME$:NAME$NM$Ă:DK$;"CLOSE":8550(W!DK$;"OPEN FRIENDS,L64"8)\!DK$;"READ FRIENDS,R";REC:NAME$:PR:  E"t'Y:15:"FRIENDS LIST":FC0Ģ10:12::"NO FRIENDS IN FILE."::22:8:":PRESS ANY KEY TO CONTINUE:";:A$::'^4:X1FC:X".";N$(X)::'h22:8:":PRESS ANY KEY TO CONTINUE:";:G$:'r'4! *** EDIT FRIENDS ***'>!:15:"EDIT FRIENDS"ENDS,R0":FC:DK$;"WRITE FRIENDS,R";FC:NAME$:PR::HD:AG:CO:DO%:AH:OO%:DI:SI:SP:DK$;"CLOSE"k&&@ *** LIST FRIENDS ***&J:'TDK$;"OPEN FRIENDS,L64":DK$;"READ FRIENDS,R0":FC:REC1FC:DK$;"READ FRIENDS,R";REC:N$(REC)::DK$;"CLOS";DI%"SIDES:";SI,%"NBR ATTACKS:";SPt%15:"IS IT ALL CORRECT - ";::"Y";::"ES OR ";::"N";::"O ?";%O$:O$"Y"O$"N"7600%O$"N"7510%%DK$;"OPEN FRIENDS,L64":DK$;"READ FRIENDS,R0":FC%FCFC1e&DK$;"WRITE FRI $7000$:32400$L *** ADD A FRIEND ***J$V:15:"ADD A FRIEND"l$`4:"NAME:";NAME$:NAME$""ı}$j"PRICE:";PR$t"HARDINESS:";HD$~"AGILITY:";AG$"COURAGE:";CO$"DEF.ODDS:";DO%$"ARMOUR:";AH$"OFF.ODDS:";OO%%"DICE:IENDS ***;#b:F$"MODIFY FRIENDS":((40(F$))2)::F$:#l5:"1. ADD A FRIEND":"2. EDIT A FRIEND":"3. LIST FRIENDS":"4. RETURN TO MAIN MENU"#q5110#v15:17:C$:C$(13)ı#{C(C$):C07030#C1C47030#C7500,8500,8000,7100::"PRESS 'C' TO CONTINUE - ANY KEY TO ABORT";:A$:A$"C"6020c"u:DK$;"OPEN CHARACTERS,L256""zDK$;"DELETE CHARACTERS":DK$;"OPEN CHARACTERS,L256":DK$;"WRITE CHARACTERS,R0":"1":DK$;"WRITE CHARACTERS,R1"::DK$;"CLOSE"" #X *** MODIFY FRTER ***-!:12::"TRANSFER CHARACTER"::8!20000F!FOUNDıP!9000!:"INSERT ";::"DESTINATION";::" DISKETTE - ":" AND PRESS ANY KEY.";:A$!10000!A"p::" W A R N I N G ":::"INITING ERASES ALL OLD CHARACTERS""PASSWORD";::":"; _C$""{ dX118:S$:1:39:X:10:16:S(16336)(16336)(16336)(16336):63998:C$C$S$: nC$Z$ė:10:12::"INCORRECT PASSWORD."::22:8:":PRESS ANY KEY TO CONTINUE:";:A$:100 x3000!| *** TRANSFER CHARAC::8:"";:A$5100j :::::::::::::: PROMPT-MENU :::::::::::::: ::15:10:"SELECT:";(95); BUZ12:CLICK110:S(16336):CLICK:TIME110:TIME:BUZ:P *** CHECK *** Z::10:"ENTER ";::"READ CHARACTERS,R0":NC:N1NC:DK$;"READ CHARACTERS,R";N:N$(N)fjN$(N)""N2$(N)"OUT TO LUNCH"tt:N1NC~DK$:"#";N;": ";N$(N);:N$(N)""ĺ"("N2$(N)")"(N20)N20ĺ:8:"";:A$::N::DK$;"CLOSE",ǫţο>" 0 Ɓ0> ǟ "ȇФ(13)CMD$"M">X16:CMD$("MASTER",X,1)Ă:4730LCX:X6:vC4870,12000,12500,14000,15000,160006:958:100DK$"CLOSE":. :::::::::::::: DISPLAY NAMES :::::::::::::: BLBVDK$;"OPEN CHARACTERS,L256":DK$;">AIN MENU"610:"<";::"A";::">DVENTURE ONLY"`10:"<";::"S";::">EE CHARACTERS"*10:"<";::"T";::">EST AN ADVENTURE">10:"<";::"E";::">ND"R10:"<";::"R";::">ESURRECT A CHARACTER"f5110z17:CMD$CMD$аWS%(WN):TDOTĭWD%(WN)WS%(WN)24WD%(WN)1:WS%(WN)8=bPv::10000:: :::::::::::::: SECOND MENU :::::::::::::: ::13::": :":13:" EAMON II MASTER ":13:": :":6:958 10:"<";::"M";::N$(WN):4305:WN$(WN)""ıL24:868:"ENTER WEAPON TYPE:";WT%(WN):4305lOTTD:TDTDWD%(WN)WS%(WN)24:958:"ENTER COMP:";WO%(WN):4305&24:958:"ENTER DICE:";WD%(WN):4305:24:958:"ENTER SIDES:";WS%(WN):43057NTDTDWD%(WN)W SHIELD HITS:";SH:lX15:TDTDWD%(X)WS%(X):"ENTER WHICH WEAPON TO EDIT(1-5):";WN:4305:431034,17::"NAME:";WN$(WN):"TYPE:";WT%(WN):"COMP.:";WO%(WN):"W.DICE:";WD%(WN):"W.SIDES:";WS%(WN):24:868:"ENTER NEW WEAPON NAME:";Wr"ENTER NEW GOLD AMOUNT:";GOLD'|R"ENTER NEW GOLD IN BANK AMOUNT:";BANKX"ENTER NEW ARMOUR CLASS:";AC:AC9ĺ"ARMOUR CLASS MAY NOT EXCEED 9.":4250"ENTER NEW ARMOUR A:";AA:"ENTER NEW ARMOUR HITS:";AH:"ENTER NEW ABILITY:";WA%(2)>"ENTER NEW CLUB ABILITY:";WA%(3)Dk"ENTER NEW SPEAR ABILITY:";WA%(4)q"ENTER NEW SWORD ABILITY:";WA%(5)""ENTER NEW ARMOUR EXPERTISE:";AE6JSEX$"M"SEX$"F"OSEX$"F"SEX$"M"T!£ 0>" "<" l"<lۃ㟬Ⴣ Ïئ         NG:";SA%(4)577"ENTER NEW CHARM RATING:";SA%(5)=9b<"ENTER NEW FEAR RATING:";SA%(6)h=?"ENTER NEW BLINK RATING:";SA%(7)@A"ENTER NEW SLEEP RATING:";SA%(8)FZ"ENTER NEW AXE ABILITY:";WA%(1):n"ENTER NEW BOHARISMA RATING:";CH:CH29CH24&\"ENTER NEW INTELLIGENCE RATING:";IN:IN29IN24b"ENTER NEW BLAST RATING:";SA%(1)"ENTER NEW HEAL RATING:";SA%(2) "ENTER NEW SPEED RATING:";SA%(3) 2"ENTER NEW POWER RATI3635 4x6" 2=";AL$(1):" 1=";AL$(2):" 0=";AL$(3):" -1=";AL$(4):" -2=";AL$(5):"ENTER NEW ALIGNMENT:";ALIGN~8B"ENTER NEW HARDINESS RATING:";HD:HD29HD24Vj"ENTER NEW AGILITY RATING:";AG:AG29AG24~ "ENTER NEW C0,4010,4050,4090,4130,4170,4210,4230,4250,4255,4260,4265,4290,3620,4470WOP0ĉ::a3550t$13000::3510."ENTER NEW NAME";NAME$13" 1=THIEF":" 2=FIGHTER":" 3=CLERIC":" 4=MAGICIAN":"ENTER NEW CLASS:";CL:CL1CL4CL(CL) X140:"-";:% 34,(37)1= 18:X140:"-";: 20:958:17:868::"SELECT";:31::"0 TO EXIT";:7:":";OP:20 OP0OP30(OP)OP3560G OP3630,3635,3638,3650,3690,3730,3740,3770,3810,3850,3890,3895,3900,3903,3905,3930,397E)";* A$:A$"F"A$"C"A$"N"3255> A$"C"İ6000:L A$"N"ıX 8800: :::::::::::::: CHAR MODIFY ::::::::::::::  :16368,0 :20000 FOUND0ı 9000 :X115 X".";OBJ$(X);20);X15;".";OBJ$(X15) 000\ :"(EDIT ";::"C";::"HARACTERS OR ";::"F";::"RIENDS OR ";::"N";::"ONE)"; A$:A$"N"A$"C"A$"F"3210 A$"F"7000 A$"C"İ3300  :"(INIT ";::"C";::"HARACTERS OR ";::"F";::"RIENDS OR ";::"N";::"ON"<";::"R";::">ETURN TO MAIN MENU"0 5110> 17:CMD$R CMD$(13)100 CMD$"D"CMD$"I"CMD$"E"CMD$"T"CMD$"R"3060 CMD$"D"ĺD$;"RUN INIT" CMD$"T"İ5500 CMD$"E"İ3200 CMD$"I"İ3250 CMD$"R"100& 3:::::: MAINT FUNCTS :::::::::::::: 4 16368,0:Z 10::"CHARACTER MODIFICATION": 6:10:"<";::"E";::">DIT A CHARACTER/FRIENDS" 10:"<";::"I";::">NIT CHARACTERS/FRIENDS FILE" 10:"<";::"T";::">RANSFER CHARACTER"& 10:ET YOU DO THAT! THEY'D ARREST":"US BOTH FOR RAISING AN ARMY!!":100K:"THE MAN PICKS UP SOME APPLICATIONS FROM":"THE DESK AND SAYS 'GOOD! WE GOT GOOD":"MEN LOOKIN' FER WORK!":"THEIR NAMES ARE:"LX1NF:" ";X;". ";HIR$(X);" ";("(TAKEN) BEARDED MAN BEHIND THE":"COUNTER ASKS 'YOU WANT TO HIRE SOMEBODY":"OR ARE YOU LOOKING FOR WORK?"mJ]FLAG0Jb:"INPUT 'H' FOR HIRE OR 'W' FOR WORK :";JlA$:A$"W"A$"H"A$"N"7020JvA$:A$"N"100JA$"W"7500DKFR10ĺ:"I CAN'T LAMON :::::::::::::: ^ :::"ENTER THE WORLD OF EAMON ]["::" - TYPE (Y) TO CONFIRM";:A$o A$"Y"100u  DK$;"RUN THE WORLD OF EAMON ]["  :::::::::::::: ADVLOG ::::::::::::::  DK$"RUN EAMON ][ ADVLOG"$ :::::::: ALL.A1NA:700:.+ ND$(4):n*ND$"OPEN EAMON ][.ADVLOG,L64":D$"WRITE EAMON ][.ADVLOG,R0":14ND$"WRITE EAMON ][.ADVLOG,R1":"MAIN HALL AND BEGINNER'S CAVE":"DONALD BROWN":"PROD":0:0:D$"CLOSE"4 ";::"1";::" PRINT LIST"::"::"O";::">THER MENU"G 10:"<";::"N";::">AMES OF CHARACTERS"U 5110:17_ CMD$x CMD$(13)CMD$"E" X15:CMD$("EAMON",X,1)Ă:220 CX:X5: C1000,2000,5200,4550,4910 5110 220  :::::::::::::: ENTER E13::": :":13:" EAMON ][ MASTER ":13:": :": x6:10:"<";::"E";::">NTER THE WORLD OF ";::"EAMON ][": 10:"<";::"A";::">DVENTURE/AUTHOR LIST" 10:"<";::"M";::">AINTENANCE FUNCTIONS" 10:"<";ARMOUR A,ARMOUR HITS,SHIELD HITS,WEAPON DATAI < DISPLAY CHARACTER~ F 18,4,8,14,5,8,16,12,10,7,12,11,8,2,1,13,6,8,9 P LAWFUL GOOD,NEUTRAL GOOD,TRUE NEUTRAL,NEUTRAL EVIL,CHAOTIC EVIL d :::::::::::::: MAIN MENU :::::::::::::: M n::SNT 1TREAIEB":P:V1P:Q:Z$Z$(ZZ$,Q,1):B -X15:AL$(X):, 2 NAME,CLASS,ALIGNMENT,HARDINESS,AGILITY,CHARISMA,INTELLIGENCE,BLAST,HEAL,SPEED,POWER,CHARM,FEAR,BLINK,SLEEP,AXE,BOW,MACE,SPEAR,SWORD,ARMOUR EXPERTISE,SEX CHANGE,GOLD,BANK,ARMOUR CLASS,Y: ----------------------------- EAMON ][ MASTER WAS CREATED BY JON HENG AND JOHN NELSON ----------------------------- :::::::::::::: INIT ::::::::::::::  DK$(4)::OBJ$(30),N$(99):X130:OBJ$(X)::Q16336- (ZZ$"HTR2                  ΍͍ŭĠōōōōōύ͍ōōōōōǍ͍ōōōōōō͍ōōōōōٍ͍àԍōōōō΍žԠүӍľ٠ӠōɾԠӯӠōԾҠȱ   ,R0":0:D$"CLOSE"%. >> LOAD BUGSm.R1NB:D$"READ EAMON ][.BUGLOG,R";R:ADV%(R),BN$(R),BD$(R),DT$(R)s.}.D$:BA:D$D$"OPEN EAMON ][.BUGLOG,L256":D$"READ EAMON ][.BUGLOG,R0":NB:D$:NB0İ12000! :14::"EAMON BUG LOG"::6: ",(HIR%(X)0)71,7)6L::"WHICH ONE YOU WANT? ";NL"(1-";NF;:"):";A$bLA$"ALL"İ9000L(A$)1(A$)NFĺ:"I'M SORRY, I DIDN'T CATCH THAT.":7060LR(A$):HIR%(R)ĺ:"YOU ALREADY HIRED ";HIR$(R);"!":7000 MDK$;"READ FRIENDS,R";R:"UPDATE ROUTINE":20%X >> GO BACKBbD$"RUN EAMON ][ MASTER"_D$"RUN EAMON ][ MASTER"@::20:15:"SELECT:";:BUZ12:CLICK110:S(16336):CLICK:TIME110:TIME:BUZ:'D$(4):D$"OPEN EAMON ][.BUGLOG,L256":D$"WRITE EAMON ][.BUGLOGS,L64":D$"WRITE FRIENDS,R0":D$"WRITE FRIENDS,R0":"3"WZFD$"WRITE FRIENDS,R1":"HOGARTH":"750":"18":16:80:0:60:D$"WRITE FRIENDS,R2":"ABERNON":1490:22:23:100:15:89WdFD$"WRITE FRIENDS,R3":"HOAGIE":800:22:23:70:0:70:D$"CLOSE"(X8JR$:R$"Y"R$"N"9060Vn#R$"Y"ĺ:"THE GROUP FOLLOWS YOU OUT THE DOOR.":GOLDGOLDSUM:FRNF:X1NF:FR%(X)X:HIR%(X)1::100Vx#:"WELL WHY DID YE WASTE ALL ME TIME ?":100VhB(222)5ĺDK$"RUN EAMON ][ MASTER"V|B7WPFD$(4):D$"OPEN FRIEND"<"Ã">>Ł<"< < " Ȣ "< "<賐Ї"""" """"""""""""*"""""""""""" ""*"""`$%d6""""0DD8ύ࿂""" 8""8"8̣ 8 "" 8"""號Ё>""2<><""""""<"""*">"*$>>"2"""**><"""*>"*>"ǣ迌сر*>"*>">>$$>0ĐĄ<"<$">$<$"$ȁ$>*">$">""Ġ"*"*  "  """""" <"""""*$" "<ρÁ㣞*"">"**" <   """""*"< ȁؿكș*""*""""$$"0<Dx·޿ " $"">$ $ "$$"*<" $""<"ᗠ"*"&<" ""< Ƈ&<<