' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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)*++`FG8`0($ p,&"_]` L/浍굺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#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  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 iõ`  \ 濭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@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-#(# @:͠٠ˠ@跻~!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 H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ 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˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d ֠:z# :u`,1190,1200,1210,1220,1230,1240,1250,1260,1270,1280,1290,1300,1310,1320,1330,1340,1350,1360p 768:PLAY A NOTEy X210z$MAIN PROGRAM LOOP - VERSION 34,A$:A(A$)I6:(((1)15)1)`@A47A58NNA21wJA64A91NNA64TA48A90ī300^A57A65ī300Z NN1010,1020,1030,1040,1050,1060,1070,1080,1090,1100,1110,1120,11301140,1150,1160,1170,1180 ,DD:768:"WITH ";:768:"ME.";:0,CC:7684 0A$:= X210 768O 0A$:X X210200:XU 3):"NOW ";:0,CC:768:"I'VE ";:768:"LEARNED";:0,GG:768:"MY";:768 "A, ";:0,AA:768:"B, ";:768:"C'S ":0,GG:768 :X1300:X 3);"NEXT ";:0,FF:768:"TIME ";:768:"WON'T ";:0,EE:768:"YOU ";:768* &"SING ";:0>$MAIN PROGRAM LOOP - VERSION 21NN1269,A$O6:(((1)15)1)NN1010,1020,1030,1040,1050,1060,1070,1080,1090,1100,1110,1120,1130,1140,1150,1160,1170,1180,1190,1200,1210,1220,1230,1240,1250,1260768:PLAY A NOTENN X1  $MAIN PROGRAM LOOP - VERSION 1-FC3BNN(((1)FC1)RNNPRī220\PRNNd,A$z6:(((1)15)1)NN1010,1030,1050768:PLAY A NOTEX1500:XX210:z#???    ͠ԠҠ ʮҠ!îҠԠàҠGͮ٠ "ήҠή̠ԠϠҠ͠Ҡ͠ҠӠ͠٠ˠЮЮ ЮàήΠŠRECTORY !!!": |:1000"X138:B$B$"=":3 ,X10511:NAME$(X)B$:I 6NAME$(0)(B$,19)U @D$(4)} E12:12:"READING CATALOG ":12:29 Y63075 ^2054:D$"CATALOG" c216,0:D$"PR#0":D$"IN#0": h(NA$(0),1)" "Ģ12:868:"!!! ERROR - UNABLE TO READ DI85:34,22 23:958T "SELECT A FILE BY NUMBER -->";A$:A(A$):AMAX2010_ A1Ĭ} :::T(A)66T$"BRUN " T(A)84T$"EXEC " T(A)65T(A)73T$"RUN " 23:T$A$(A) 23:D$T$A$(A)  NAME$(105),A$(105),T(105) ((NA$(N),8,1))942000! XX1: A$(X)(NA$(N),8,30)T T(X)((NA$(N),2,1))h X21İ30:2000 X21X61X101İ80 X41İ40:2000 $X41X81İ90 .X61İ30:2000 8X81İ40:2000 BX101İ30:2000 L40  MAXX 32,0:23:1::U Z85:23:"IS YOUR PROGRAM LISTED HERE? Y/";::"N";::" ";:A$:w dA$"Y"MAXN1:N105::2000 n23:958:34,1:35,21::35,24: 60:X0 N1105 ((NA$(N),8,1))652000 ((NA$(N),8,1))61N105:2000 8(ST6UVk,ȱk-`),-`G ::63000]Y140:"=";::qX;:5:A$(X):(" "X" ";:6:(A$(X),15):2X" ";:5:(NA$(X),8,15):<1:20:22:20:34,1:2:FP33,21:32,19:1:1:: U33,40:     $"Z"3060xA$"G"3340,A$"V"3670=A$"W"3960NA$"T"4260_A$"P"4330pA$"S"4460|:1190 LABORATORY:::" ICARUS' LAB "34,1:B:"A SKINNY BALD-HEADED MAN IN A BLOOD- Y""19:" G)UILD OF STRENGTH"@ 20:" V)AULT OF RICHES"^21:" W)ASPIN GEARSHOP"|22:" P)ORTAL TO TOWNS"(6:"GO WHERE? ";A$2A$""1160<A$"I"1480FA$"B"2410PA$"F"2780ZA$"L"2860dA$"H"2940 nA S)IGN OF WELCOME",12:" I)CARUS' LAB"U13:" B)ATTLEFIELDS OF HORNBLOUGH"u14:" T)EMPLE OF AK'BORU"15:" F)OUNTAIN OF YOUTH"16:" L)ARAGATHRA'S RESTAURANT"17:" H)ALL OF COMMENDATIONS"18:" Z)AERDIDAIN'S LIBRAR4660:G0ĺ:1130`IT$(G)$jJWt:"PRESS E TO EDIT OR TO GO BACK";A$h~A$"E"1180uX0:490 EDITING MENU:::" TOWN OF CHANGES ":34,1::"YOU ARE STANDING IN THE TOWN SQUARE."11:" 10:27:"FOOD=";:X62:4660:GU$12:1:"COND=";:X63:4660:X0ĺ" GOOD":1080f." NON-GOOD"813:1:"-------------------"BJ16:J13:J")";:X63J:4660:G0ĺ:1110LIT$(G)VJ13:21:(J64);")";:X69J:4660:AAG:AF8:17:"/";:X56:4660:AG256:X55:4660:AAG:A8:27:"GOLD=";:X59:4660:AG65536:X58:4660:AAG256:X57:4660:AAG:A9:1:"ACY=";:X32:4660:G10:1:"LUC=";:X34:4660:G10:9:"AC=";:X61:4660:G!6:17:"/";:X46:4660:AG256:X45:4660:AAG:AW6:23:"(";:X48:4660:G;")"6:27:"GEMS=";:X50:4660:AG256:X49:4660:AAG:A7:1:"END=";:X28:4660:G8:1:"SPD=";:X30:4660:G8:9:"HP=";:X52:4660:AG256:X51:"AGE=";:X37:4660:G4:27:"EXP=";:X42:4660:AG16777216:X41:4660:AAG65536:X40:4660:AAG256:X39:4660:AAG:A5:1:"MGT=";:X24:4660:G6:1:"PER=";:X26:4660:G6:9:"SP=";:X44:4660:AG256:X43:4660:AAG:A42:33:X20:4660( G1ĺ"KNIGHT":870A*G2ĺ"PALADIN":870Y4G3ĺ"ARCHER":870q>G4ĺ"CLERIC":870HG5ĺ"SORCERER":870RG6ĺ"ROBBER":870\"NONE"f4:1:"INT=";:X22:4660:Gp4:9:"LEVEL=";:X36:4660:Gz4:18:670 2:21:X18:4660/ G1ĺ"GOOD":720E G2ĺ"NEUT":720[ G3ĺ"EVIL":720g "NONE"} 2:26:X19:4660 G1ĺ"HUMAN":790 G2ĺ"ELF":790 G3ĺ"DWARF":790 G4ĺ"GNOME":790 G5ĺ"H-ORC":790 "NONE"&( 0"ENTER CHOICE (0 RETURNS): ";A$C :A(A$):A1A18ī310l D:IA:4660:G0Ė1:2:"EMPTY":620 N1:2:X014:4660:G0X14:610 X(G); bX l2:17:":"; vX16:4660:G1640,650,660 " O":670 " M":670 " F":IS ";::"WRITES";::" TO DISK!"E :"GO AHEAD? ";A$:A$"Y"310t :"WRITING":36888,2:36864:36888,1:310  CHARACTER MENU :I118:I") "; 4660:G0ĺ"EMPTY";:540 X014:4660:G0X14:530 (G); X :X0:I 16:" W)RITE CHARACTERS TO DISK"? T17:" V)IEW CHARACTERS"R ^18:" Q)UIT"n h13:"YOUR CHOICE? ";A$~ rA$"L"420 |A$"W"450 A$"V"490 A$"Q"ĉ:: 310 :"LOAD NEW CHARACTERS? ";A$ A$"Y"310 230! :"TH IN A DRIVE"4 5:" AND PRESS THE KEY"` 5:" TYPE A '2' FOR DRIVE 2 ACCESS";A$u A$"2"Ĺ47082,2 36864  MAIN MENU ":::" MIGHT AND MAGIC CHARACTER EDITOR " ,34,1 6: @15:" L)OAD NEW CHARACTERS"! JEd*"n* M & M CHAR. EDITOR)x*A* BY TIMOTHY SCOTTH*P:^IT$(255)vI1255:IT$(I):I~T1D$(4):B24576(36864)169220D$"BLOAD M.BINARY,A$9000"47092,1:47082,1 10:5:"INSERT CHARACTER DISK                         &T "NEW FOOD: ";A$:A$""ī1180;&^ A(A$):A0A402890O&h CA:4650:1180Z&r HALL&| :::" HALL OF COMMENDATIONS ":34,1:N' :"BEFORE YOU AND A HUGE DAIS SURROUNDED BYMANY GUARDS SITS LORD YTILAER, KING OF ALL THE LAND. H%, :::" LARAGATHRA'S RESTAURANT ":34,1:%6 :"A VERY BEAUTIFUL WOMEN CLOTHED IN GOLDENSILK SMILES AT YOU AND SAYS: 'DO YOU WISH SERVICE?'"%@ :"ANSWER (Y/N): ";A$:A$"N"ī1180%J ::"CURRENT FOOD: ";:X62:4660:G ,1:J$ :"YOU ARE STANDING BEFORE THE FOUNTAIN OF YOUTH, TAKE A DRINK?"s$ :"ANSWER (Y/N): ";A$:A$"N"ī1180$ ::"CURRENT AGE: ";:X37:4660:G$ :"NEW AGE: ";A$:A$""1180$ A(A$):A1A1002810$ CA:4650:1180$" RESTAURANT<:A$""2720'# A(A$):A1A9926905# CA:4650;# _# 6:"ORIGINAL "C$": ";:4660:G# 7:"NEW "C$": ";:"";A$:A$""2440# A(A$):A1A992740# CA:4650:2440# FOUNTAIN$ :::" FOUNTAIN OF YOUTH ":34"PERSONALITY":X26:2680:X25:2730M"P C$"ENDURANCE":X28:2680:X27:2730r"Z C$"SPEED":X30:2680:X29:2730"d C$"ACCURACY":X32:2680:X31:2730"n C$"LUCK":X34:2680:X33:2730"x :3:"CURRENT "C$": ";:4660:G # 4:"NEW "C$": ";:"";A$)UCK"! 2:"ALTER: ";A$*! A$""1180;! A$"I"2610L! A$"M"2620]! A$"P"2630n! A$"E"2640! A$"S"2650! A$"A"2660! A$"L"2670!( 2510!2 C$"INTELLECT":X22:2680:X21:2730!< C$"MIGHT":X24:2680:X23:2730$"F C$ 'HULLO! THEY CALL ME QUICK SILVER. DO YOU REQUIRE TRAINING?'"m ~ :"ANSWER (Y/N): ";A$:A$"N"1180 :4:" I)NTELLECT" 5:" M)IGHT" 6:" P)ERSONALITY" 7:" E)NDURANCE" 8:" S)PEED" 9:" A)CCURACY"! 10:" L90. X014:C0:4650:X,8 X0(A$)1KB C((A$,X1,1))128:4650RL X\V 1520o` BATTLEFIELDSj :::" BATTLEFIELDS OF HORNBLOUGH ":34,1:E t :"A YOUNG AND NIMBLE LOOKING PERSON WALKS OVER TO GREET YOU: "'4:"NEW CLASS: ";A$:A$""ī1520AA(A$):A1A62260UCA:4650:1520s::"CURRENT NAME:";:X04660:G0ĺ"EMPTY":2330 X014:4660:G0X14:2330 (G);:X :"NEW NAME (15 CHARS): ";A$:A$""1520$ (A$)15222ĺ"PALADIN":2200+fG3ĺ"ARCHER":2200DpG4ĺ"CLERIC":2200_zG5ĺ"SORCERER":2200xG6ĺ"ROBBER":2200"NONE"6:"1) KNIGHT"7:"2) PALADIN"8:"3) ARCHER"9:"4) CLERIC"10:"5) SORCERER"11:"6) ROBBER"NONE"6:"1) HUMAN"+7:"2) ELF"> 8:"3) DWARF"Q9:"4) GNOME"e 10:"5) H-ORC"*4:"NEW RACE: ";A$:A$""ī15204A(A$):A1A52090>CA:4650:1520H::"CURRENT CLASS: ";:X20:4660RG1ĺ"KNIGHT":2200\G14:"NEW ORIGINAL ALIGNMENT: ";A$:A$""1520KA(A$):A1A31940_CA:4650:1520::"CURRENT RACE: ";:X19:4660G1ĺ"HUMAN":2040G2ĺ"ELF":2040G3ĺ"DWARF":2040G4ĺ"GNOME":2040G5ĺ"H-ORC":2040W ALIGNMENT: ";A$:A$""ī152080A(A$):A1A31830L:CA:4650:1520xD::"ORIGINAL ALIGNMENT: ";:X17:4660NG1ĺ"GOOD":1910XG2ĺ"NEUT":1910bG3ĺ"EVIL":1910l"NONE"v6:"1) GOOD"7:"2) NEUT"8:"3) EVIL""M"C1:4650:1520/A$"F"C2:4650:1520CC3:4650:1520m::"CURRENT ALIGNMENT:";:X18:4660G1ĺ"GOOD":1800G2ĺ"NEUT":1800G3ĺ"EVIL":1800"NONE"6:"1) GOOD"7:"2) NEUT"8:"3) EVIL"&4:"NE6A$""ī1180"@A$"S"16703JA$"A"1750DTA$"O"1860U^A$"R"1970fhA$"C"2120wrA$"N"2290|1580::"CURRENT SEX: ";:X16:4660G1ĺ"M":1710G2ĺ"F":1710"O""NEW SEX: ";A$:A$""1520A$STAINED LAB COAT STRUTS UP AND SAYS 'CAN I BE OF ASSISTANCE?'"j:"ANSWER (Y/N): ";A$:A$"N"1180~:4:" N)AME"5:" S)EX"6:" A)LIGNMENT"7:" O)RIGINAL ALIGNMENT"8:" R)ACE""9:" C)LASS",2:"ALTER: ";A$ 6JDE$64660:J") ";IT$(J)+6J16\6"F)WD B)ACK J)UMP10 R)VRS10 G)ET ";A$l6A$""11806A$"F"D246OO16A$"B"D1OO16A$"J"D241OO96A$"J"D241O2456"A$"R"D9OO96,A$"R"D9O076A$"U OF A HIGH ELF. BUT AS YOU LOOK AGAIN -- HE SEEMS TO BE OF A ROYAL DWARF STOCK. HE SPEAKS:"5"'HELLO THERE! I AM THE DWELF. DO YOU WISH TO LOOK AT OUR GOODS?'"5:"ANSWER (Y/N): ";A$:A$"N"1180534,1::4680::34,95DO1:ED96FA2563940'4PC(A256):X58:465074ZAA(C256)P4dCA:X57:4650:3700_4n GEARSHOP4x:::" WASPIN GEARSHOP ":34,1:^5:"A MUSCULAR AND GOOD LOOKING CREATURE APPROACHES YOU. AS YOU SEE HIS FACE, IT REMINDS YO:4650:3700e3::"CURRENT GOLD: ";:X59:4660:AG65536:X58:4660:AAG256:X57:4660:AAG:A3 "NEW GOLD: ";A$:A$""37003A(A$):A0A167772153840357,0:58,0:59,03(A65536391032C(A65536):X59:46503<AA(C65536) 4A$"G"384023700X2::"CURRENT GEMS: ";:X50:4660:AG256:X49:4660:AAG:Ay2"NEW GEMS: ";A$:A$""37002A(A$):A0A6553537602C0:X49:4650:C0:X50:46502A25638302C(A256):X50:46502AA(C256) 3CA:X49 ":34,1:v1`:"YOU'RE AT THE TOWN TREASURY. IT IS UN- GUARDED!! ALL IS YOURS FOR THE TAKING!! ENTER IN?"1j:"ANSWER (Y/N): ";A$:A$"N"11801t:4:" J)EMS"1~5:" G)OLD"12:"TAKE WHICH: ";A$:A$""11801A$"J"3760 251030 ::C$;:4660:AG256:XX1:4660:AAG:AR0 "NEW "C$;:"";A$:A$""ı\0XX1z0A(A$):A0A6553535700A25636400$C(A256):46500.AA(C256)08XX1:CA:46500B0L VAULT1V:::" VAULT OF RICHES : ":X54:3570:34308/ :4:"1) CURRENT SPELL POINTS"[/ 5:"2) ORIGINAL SPELL POINTS"|/ 2:"ALTER: ";A$:A$""3370/ A(A$):A1A23510/ A1C$"CURRENT SPELL POINTS: ":X44:3570:35100 A2C$"ORIGINAL SPELL POINTS: ":X46:3570:3 CURRENT MAX (POISON LOWERS THIS)"C.z 6:"3) ORIGINAL HIT POINTS"d. 2:"ALTER: ";A$:A$""3370~. A(A$):A1A33430. A1C$"CURRENT HIT POINTS: ":X52:3570:3430. A2C$"CURRENT MAX: ":X56:3570:3430/ A3C$"ORIGINAL HIT POINTSU WISH, WE CAN 'TONE' UP YOUR BODY!'"N- :"ANSWER (Y/N): ";A$:A$"N"ī1180h-* :4:" H)IT POINTS"-4 5:" S)PELL POINTS"-> 2:"ALTER: ";A$:A$""ī1180-H A$"H"ī3430-R A$"S"ī3510-\ 3370-f :4:"1) CURRENT HIT POINTS"".p 5:"2) A(A$):A0A73290+, CA:4650:30907, GUILDu, :::" GUILD OF STRENGTH ":34,1:%- :"A WARRIOR OF IMMENSE PROPORTIONS STRIDESUP TO YOU AND SAYS: 'WELCOME. MY NAME IS INGOLD INGLORION, AND, IF YO AA(C16777216)$+ A655363250@+ C(A65536):X41:4650R+ AA(C65536)b+ A2563280|+ C(A256):X40:4650+ AA(C256)+ CA:X39:4650:3090+ ::"CURRENT SPELL LEVEL: ";:X48:4660:G+ "NEW SPELL LEVEL: ";A$:A$""3090,: ";:X42:4660:AG16777216:X41:4660:AAG65536:X40:4660:AAG256:X39:4660:AAG:A*X "NEW EXPERIENCE: ";A$:A$""3090*b X3942:(B(I1)127X),0:X*l A(A$):A0A42949672953150*v A167772163220* C(A16777216):X42:4650+R! DO YOU WISH TO LOOK AT MY TOMES OF KNOWLEDGE?'"\) :"ANSWER (Y/N): ";A$:A$"N"ī1180}) :4:" E)XPERIENCE POINTS") 5:" S)PELL LEVEL")& 2:"ALTER: ";A$:A$""1180)0 A$"E"3150): A$"S"3290)D 3090\*N ::"CURRENT EXPERIENCEAL LEVEL: ";:X35:4660:GI( 7:"NEW ORIGINAL LEVEL: ";A$:A$""ī1180_( A(A$):A13010s( CA:4650:1180( LIBRARY( :::" ZAERDIDAIN'S LIBRARY ":34,1:3) :"A WIZENED OLD GNOME HOBBLES TOWARDS YOU:'WELL, ADVENTUREE SPEAKS: 'WELCOME MY FRIEND. DO YOU DESIRE ANY PROMOTIONS?'"v' :"ANSWER (Y/N): ";A$:A$"N"1180' :3:"CURRENT LEVEL: ";:X36:4660:G' 4:"NEW LEVEL: ";A$:A$""3010' A(A$):A1A2552970' CA:4650( 6:"ORIGINAMBERGE +3,SORCERER STAFF,STAFF OF MAGICxF~ DEMON'S GLAIVE,DEVIL'S GLAIVE,THE FLAMBERGE,HOLY FLAMBERGE,EVIL FLAMBERGEF PADDED ARMOR,LEATHER ARMOR,SCALE ARMOR,RING MAIL,CHAIN MAILF SPLINT MAIL,PLATE MAIL,PADDED +1,LEATHER +1,SCALE +1>G RINGRDICHE +1MEV HALBERD +1,GREAT HAMMER +1,GREAT AXE +1,FLAMBERGE +1,STAFF +2E` GLAIVE +2,BARDICHE +2,HALBERD +2,GREAT HAMMER +2,GREAT AXE +2Ej FLAMBERGE +2,STAFF OF LIGHT,COLD GLAIVE,CURING STAFF,MINOTAUR'S AXE(Ft THUNDER HAMMER,GREAT AXE +3,FLREAT BOW +2UD. CROSSBOW LUCK,CROSSBOW SPEED,LIGHTENING BOW,FLAMING BOW,GIANT'S BOWD8 THE MAGIC BOW,BOW OF POWER,ROBBER'S X-BOW,ARCHER'S BOW,OBSIDIAN BOWDB STAFF,GLAIVE,BARDICHE,HALBERD,GREAT HAMMER EL GREAT AXE,FLAMBERGE,STAFF +1,GLAIVE +1,BAECTORTC AXE DESTROYER,X!XX!X'S SWORD,ADAMANTINE AXE,ULTIMATE SWORD,ELEMENT SWORDC SLING,CROSSBOW,SHORT BOW,LONG BOW,GREAT BOWC SLING +1,CROSSBOW +1,SHORT BOW +1,LONG BOW +1,GREAT BOW +1 D$ MAGIC SLING,CROSSBOW +2,SHORT BOW +2,LONG BOW +2,GMOND DAGGER,ELECTRIC SPEAR,HOLY MACEnB UN-HOLY MACE,DARK FLAIL,FLAIL OF FEAR,LUCKY SCIMITAR,MACE OF UNDEADB COLD AXE,ELECTRIC SWORD,FLAMING SWORD,SWORD OF MIGHT,SWORD OF SPEEDC SHARP SWORD,ACCURATE SWORD,SWORD OF MAGIC,IMMORTAL SWORD,AXE PROT+1,SCIMITAR +1YA BROADSWORD +1,BATTLE AXE +1,LONG SWORD +1,FLAMING CLUB,CLUB OF NOISEA DAGGER +2,HAND AXE +2,SPEAR +2,SHORT SWORD +2,MACE +2A FLAIL +2,SCIMITAR +2,BROADSWORD +2,BATTLE AXE +2,LONG SWORD +2$B ROYAL DAGGER,DAGGER OF MIND,DIA;:X69J:4660:G0ĺ:4730'@pIT$(G).@zJ4@?@ DATAl@ CLUB,DAGGER,HAND AXE,SPEAR,SHORT SWORD@ MACE,FLAIL,SCIMITAR,BROADSWORD,BATTLE AXE@ LONG SWORD,CLUB +1,CLUB +2,DAGGER +1,HAND AXE +1A SPEAR +1,SHORT SWORD +1,MACE +1,FLAIL ETURN>";A$? 1180 EQUIPMENT PRINT?H"-------------------"?RJ16:J2:J")";:X63J:4660:G0ĺ:4710?\IT$(G)@fJ2:21:(J64);")" LEVEL AND EXPERIENCE POINTS"_>:" GUILD OF STRENGTH : HIT POINTS AND SPELL POINTS">:" VAULT OF RICHES : GEMS AND GOLD">:" WASPIN GEARSHOP : ITEMS"> :" PORTAL TO TOWNS : WHERE YOU ARE PRESENTLY LIVING'" ?:"PRESS ";A$=" HALL OF COMMENDATIONS : LEVEL"= >:" ZAERDIDAIN'S LIBRARY : SPELL CASTING WHAT YOU SEE FIT. THERE ARE MANY PLACES TO VISIT SO HERE IS A BRIEF EXPLANATION OF"m<"OF EACH AREA:"<:" ICARUS' LAB : RACE, NAME, SEX, ALIGN- MENT AND CLASS" =:" BATTLEFIELDS OF HORNBLOUGH : ALL YOUR STATS, SUCH AS MIGHT, SPEED, LUC0:"CURRENT LOCATION: ";:(26861I)L;D2:"TELEPORT TO: ";A$:A$""ī1180f;NA(A$):A1A54360{;X26861I,A:1180;b SIGN;l:"YOU READ THE SIGN. IT SAYS:";vX<"'WELCOME TO THE TOWN OF CHANGES, HERE YOU MAY CHANGE YOUR CHARACTER TOA BLUE/WHITE PORTAL. HE GROWLS: 'SO YOU THINK YOU'RE GONNA GET BY ME DO YA???'"::"ANSWER (Y/N): ";A$:A$"N"1180::4:"1) SORPIGAL":5:"2) PORTSMITH":6:"3) ALGARY":&7:"4) DUSK":08:"5) ERLIQUIN"$;:1 YOUREQUIRE TREATMENT?'"@9:"ANSWER (Y/N): ";A$:A$"N"1180F99X63:C0:4650:"YOU ARE NOW FEELING GOOD!"::"PRESS ";A$:11809 PORTAL9:::" PORTAL TO TOWNS ":34,1:f::"YOU SEE A H-ORC GUARDING 8 TEMPLEJ8:::" TEMPLE OF AK'BORU ":34,1:8:"A VERY PLAIN WOMAN DRESSED IN A GRAY ROBE IS STANDING HERE. APPLYING BANDAGESTO A PATIENT'S EYES, SHE TURNS TO YOU AND SAYS:"9"'I AM CURA, CLERIC OF THE TEMPLE. DOG"41707@401027J"GET ITEM #";A$:A$""4010N7TA(A$):A1A2554010V7^CAu7h:"PUT "IT$(A)" IN WHICH"7r"POSITION (1-6/A-F): ";A$:A$""40107|A$"A"A$"G"X(A$)5:4650:40007A$"1"A$"7"X(A$)63:4650:400074200Y,DIAMOND KEYWMx CACTUS NECTAR,MAP OF DESERT,LASER BLASTER,DRAGON'S TOOTH,WYVERN EYEM MEDUSA HEAD,RING OF OKRIM,B QUEEN IDOL,W QUEEN IDOL,PIRATES MAP AM PIRATES MAP B,THUNDRANIUM,KEY CARD,EYE OF GOROS,(USELESS ITEM)AESTJLP DESTROYER WAND,ELEMENT SCARAB,SUN SCROLL,STAR RUBY,STAR SAPPHIRELZ WEALTH CHEST,GEM SACK,DIAMOND COLLAR,FIRE OPAL,UNOBTAINIUMLd VELLUM SCROLL,RUBY WHISTLE,KINGS PASS,MERCHANTS PASS,CRYSTAL KEY Mn CORAL KEY,BRONZE KEY,SILVER KEY,GOLD KEMODEL BOAT,DEFENSE CLOAK,KNOWLEDGE BOOKpK2 RUBY IDOL,SORCERER ROBE,POWER GAUNTLET,CLERIC'S BEAD,HORN OF DEATHK< POTION OF LIFE,SHINY PENDANT,LIGHTNING WAND,PRECISION RING,RETURN SCROLLLF TELEPORT HELM,YOUTH POTION,BELLS OF TIME,MAGIC OIL,MAGIC VOTIONHJ  SPEED POTION,SUNDIAL,CURING POTION,MAGIC POTION,DEFENSE RINGJ BAG OF GARAGE,SCROLL OF FIRE,FLYING CARPET,JADE AMULET,ANTIDOTE BREWJ SKILL POITION,BOOTS OF SPEED,LUCKY CHARM,WAND OF FIRE,UNDEAD AMULET'K( SILENT CHIME,BELT OF POWER,SHIELDKI COLD SHIELD,ELEC SHIELD,ACID SHIELD,MAGIC SHIELD,DRAGON SHIELDI ROPE & HOOK,TORCH,LANTERN,10 FOOT POLE,GARLICI WOLFSBANE,BELLADONNA,MAGIC HERBS,DRIED BEEF,ROBBER'S TOOLSJ BAG OF SILVER,AMBER GEM,SMELLING SALT,BAG OF SAND,MIGHT PLUE RING MAIL,RED CHAIN MAILfH X!XX!X'S PLATE,HOLY PLATE,UN-HOLY PLATE,ULTIMATE PLATE,BRACERS AC 8H SMALL SHIELD,LARGE SHIELD,SILVER SHIELD,SMALL SHIELD +1,LARGE SHIELD +1I LARGE SHIELD +1,SMALL SHIELD +2,LARGE SHIELD +2,LARGE SHIELD +2,FIRE MAIL +1,CHAIN MAIL +1,SPLINT MAIL +1,PLATE MAIL +1,LEATHER +2G SCALE +2,RING MAIL +2,CHAIN MAIL +2,SPLINT MAIL +2,PLATE MAIL +2G BRACERS AC 4,RING MAIL +3,CHAIN MAIL +3,SPLINT MAIL +3,PLATE MAIL +3H BRACERS AC 6,CHAIN MAIL +3,BRACERS AC 8,B1췩뷍h詷 `# L430:100:STST1:STDOS1100E VST0:TKTK1:BF0TKLT1100U `TKLT1030z j47507,174:47517,164:47445,213 t::"DONE":#&ABRACADATA DESIGN YOUR OWN HOME@TK0:ST0:LT35:CDWRV47507,0:47517,0eT1TK:490t47445,213TK((TK2))2Ĺ47445,212$430:100:STST1:STDOS1060.BF10908ST0:TKTK1:TKLT1040 B490:47445,213:TKT1:ST0 :46433,234! (4)"BRUN MAINS""! 40206,0:(4)"BRUNDDMOVER"' M(4)"BRUN MUSIC TEXT & KEYBOARD"g(4)"BRUN POLYHANDS"(4)"BRUN POLYMOVER-2"((4)"BRUN POLY MOVER-2"2(4)"BRUN POLYDOER-2"d(4)"BLOAD CHARTS"n(4)"BLOAD UPPERS"x 46432,234 181,223,170,159,245,170,1828 245,170,183,247,170,18283,247,170,182,223,170,158,223,170,159X 213,170,150,213,170,181,213,170,151,215,170,150,215,170,151 213,170,150,213,170,151,215,170,150,215,170,151,213,170,181 221,170,158,221,170,159,223,170,158,223,170,159,221,170,158 221,170,159,223,170,158,213,170,490:610:(TRK)LT1090? 8TK(TRK):ST(SCT):LTTK1:1020T B:"COPY DONE": 213,170,181,215,170,151,213,170,150,213,170,151,215,170,150 215,170,151,221,170,158,221,170,159,213,170,181,223,170,158 223,170,159,221,170,158,221,170,159,9SPELL IT/TK3:LT4:ST15:LS15:CDWR[47405,24:47406,96:47497,24:47498,96x47829,3:T1TK:490:210190:610TKTK1:LTLT1:(BUF)MBTK351040$47405,208:47406,19:47497,208:47498,183:47829,213:230 .TKT1:LT35:   ,1):.ZSLĞ:11:HS1:(DE$(B),S1,1):8d1310\nED$(DE$(B),SP,L):DE$(B1)ED$xED$(DE$(B),1,SP1):(DE$(B),SP1,1)" "ED$(DE$(B),1,SP2)DE$(B)ED$WW1:1440::7:16:DE$(B):8:16:DE$(B1)::PRINT BORDER!::19:9:23);:!19:9:23);; H20((DE$(B))2)1KL(DE$(B))g11:HS:(DE$(B),S,1)w(18:24:A$2A$(21)SLSS1<A$(8)S1SS1FA$"S"SPS:IWB11:DE$(I1)DE$(I):I:1390PS1Ğ:11:HS1:(DE$(B),S1tPRINT 5 WORDS~DB:F0+I1317CH20((DE$(D))2)VI2:2:38);bI13ĞpF11240I2:H:DE$(D):DWF1DWDD1ISPLIT WORDS1::19:9:"SPLIT THIS WORD? (Y/N):";:A$:A$"N"A$"n"Ģ4:14::DE$(ST)::1150:1100R8A$(13)FL1STBENB:5:14::DE$(EN)::BA$(13)FL1STBė:12:"START MUST COME BEFORE END":23:14:"PRESS A KEY:";:A$:FL0:ST0:1010LA$"S"(DE$(B))2İ1270VA$(27)ĝ:`1150j103090B59:AA1:950!BB1:9508LIST BEG/END FIND\B1:ST0:EN0:S0:SP0:H0:FL0f1440p115018:15:"COMMAND ( )";:18:24:A$A$(8)B1BB1A$(21)BWBB1$A$(32)WB5BB5.A$(13)FL0STB:FL1:J:FOUND15zX$(J)" "FOUND1XEJ1:FOUND0:910aWW1:KXSXE:DE$(W)DE$(W)X$(K):K:wMAKE DATA ABBRV.::1:1:40);:2:1:13);"INFOCOM DECODER";12):3:1:40);:ZB:A60:B59ZE1ıAR$(Z)(A)(B)ZZ1:B1Ĺ218,0:"DATA FILE NOT FOUND":E*(222)6F1Ĺ218,0:FF1:1304"AN ERROR (#";(222);")":"HAS OCCURRED ON LINE #";(218)(219)256>HPARSING ROUTINER7:1:">PARSING DATA"\J1400FfFOUND1890 pX$(J)" "FOUND0XS ABBREVIATIONS FOR ";F$$ISTENRK;" DATA ";Q$;AR$(I);Q$;",";Q$;DE$(I);Q$]KK10dII310:K;" DATA ";Q$;AB$(I);Q$;",";Q$;R$(I);Q$:KK10:ID$"CLOSE"F$: ** SUB-ROUTINES **ONERR CODE TRAP! (222)6F:1:">SENDING DATA TO DISK"Lb24:1:"FILE NAME TO SAVE DATA UNDER?:";F$\lD$"OPEN"F$mvD$"CLOSE"F$D$"DELETE"F$K860:Q$(34)D$"OPEN"F$D$"WRITE"F$"840 DATA ";ENST9;": REM NUMBER OF ABBREVIATIONS KNOWN""850 REM(DE$(J),K,1)"@"F1I F1K1ED$""(DE$(J),2,G):DE$(J)ED$:F0 F1K1ED$(DE$(J),1,K1)" "(DE$(J),K1,G):DE$(J)ED$:F0 &K:J 0WORDLIST CHOOSING :23:13:"PRESS A KEY:";:A$:1000 DBST:EEN:940 NOUTPUT DATAX62DE$(J)R$(I)> MA1K1G2ED$(DE$(J),2,G):DE$(J)ED$ MA1K1ED$(DE$(J),1,K1)R$(I)(DE$(J),K2,G):DE$(J)ED$ MA0 K I:J DELETE LEFTOVER @ 10:1:">DELETING LEFTOVER @'S" J1W G(DE$(J)) K1G @@@"ED$"@@"(DE$(I),4,G):DE$(I)ED$_ @(DE$(I),1,2)"@@"ED$"@"(DE$(I),3,G):DE$(I)ED$f JIy TABBREV. CHECK ^9:1:">CHECKING ABBREVIATIONS" hJ1W rI110 |G(DE$(J)) K1G (DE$(J),K,2)AB$(I)MA1 MA1K1G$"CLOSE INFOCOM DATA"1 850: CHANGE DELIMETERR 6:1:">CHANGING DELIMETER"a I1400Fz X$(I)";"X$(I)" " I 2040:** PARSE REPLACE LEADING @ 8:1:">REPLACING LEADING @'S" "I1W ,G(DE$(I))& 6(DE$(I),1,3)"10:AB$(I),R$(I):Iq n"@@"," ","@"," ","@M",".","@N",",","@O","!","@S","'","@W","-","@X",":","@Y","(","@Z",")" xREAD DATA 5:1:">GETTING DATA" D$"OPEN INFOCOM DATA" D$"READ INFOCOM DATA" F I1400F X$(I) I D INFOCOM TEXT DECODER0BY RYAN LANCTOTIREVISION # 15/03/88S(800g2INITIALIZATION<::1:1:40);:2:1:13);"INFOCOM DECODER";12):3:1:40);:FD$(4)PDE$(200),X$(1200),AB$(10),R$(10),AR$(130)ZW0:MA0 dI1          > TO JUMP 5"-22:21:" = QUIT MENU"345:10:"END:"->7:4:"SPLIT WORDS:"HH20:4:"-> = FORWARD"mR10:10:"+-------------------+"\16:10:"+-------------------+"f21:4:"<- = REVERSE"p22:5:"S = SPLIT WORD"z20:21:" = MARK WORD" 21:21:" = MARK WORD",21:21:" TO JUMP 5"622:21:" = QUIT MENU"@---+r ! PRINT 5 WORDS !| +--------------10);"ABBREVIATION EDITING";10):2:18);"MENU";18)`I222:I:1:" ":I:40:" ":Ir23:1:40);x4:4:"BEGINNING:"5:10:"END:"7:4:"SPLIT WORDS:"20:4:"-> = FORWARD"10:10:"+-------------------+""LETE INFOCOM DATA" :3 D$"OPEN INFOCOM DATA"O D$"WRITE INFOCOM DATA"X A1g *I1400Ar 4X$(I)y >I HD$"CLOSE INFOCOM DATA" R:: ):";:A$:A$"Y"A$"y"630' vY312b {24:1:38);::24:11:"WORKING";::" ON LINE #";Y;u XY12833680 D(A1)400X(40(Y3)) X$(D)(XY) X:Y AA1:170 D$"OPEN INFOCOM DATA,D1" D$"CLOSE INFOCOM DATA" D$"DE!sX$(1200):A1:D$(13)(4)XCOMDOS188:STDDOS173:47356,COMDOS:DOS$"INFOCOM"T$"Q"Ĺ47356,STDDOS:24:6:"PUT DATA DISK IN DRIVE #1";:A$:D$:750:D$"RUN INFOCOM DECODER,D1":|776,0:775: 16368,0::24:"SAVE THIS PAGE? (Y/N  Y122X140Y:XDXYX1,2(Y1))16X1,2(Y1)1)P(XY);[:1:iA$"Y"ĺox1:024:1:"PRESS A KEY TO CONTINUE-->";:A$170   PRINT SECTOR$ S$""5807 S$"+"SS13J S28S0:580[ S15SS15k S$"+"580~ &S$"-"SS13 0S13S15:580 :S0SS15 D2:21:S;" " N XPRINT PAGE b24:7:"DOUBLE SPACE? (Y/N):";:A$ l1v768 rPRINT DECODED SECTOR< |776,0:775::776,1:775| 16368,0::24:"PRINT THIS PAGE? (Y,N):";:A$:A$"Y"610 170 PRINT TRACK T$""470 T$"+"TT1:450 T$"-"TT1 T0T34 T34T0 2:9:T;" " < "47083,0:47084,T:47085,S:47088,0:47089,150:47092,1E ,768] 6AUTO DOS SELECTION{ @ERR(47093):ERR64380 JDOS(47356) TDOSSTDDOSĹ47356,COMDOS:2:30:DOS$"INFOCOM ":DOS$:360 ^47356,STDDOS:2:30:DOS$"STANDARD":DOS$ hT$:T$"Q"T$""T$"+"T$"-"T(T$)H T$"Q"Ĺ47356,STDDOS::_ T0T34T0:170h 420v 2:21:S 2:14:"SECTOR:";S$:S$"+"S$"-"S$""S(S$) S0S15Ģ2:21:" ":240 500 2:26:"DOS:";DOS$  CALL RWTS *# d*---------------------*) n1 x:Z (768)169ĺ(4)"BLOAD OBJ.READER"p SET UP VARIABLES COMDOS188:STDDOS173:47356,STDDOS:DOS$"STANDARD" MAKE SELECTIONS :10:"INFOCOM TEXT READER" 2:9:T* 2:3:"TRACK:"; *---------------------*;* INFOCOM TEXT READER *X* *u(* BY: *2* GEORGE BIGELOW *<* & JOHN BIGELOW *F* *P* ENHANCED BY: * Z* RAY DARRAH      CL)JJ) #JJJJJ)i ` ɍҠԠ􍱴؍̠ԱٍŠԱӱӍӍҬٍĠƠ󠰠蠴危ҳ򍱳ؠ󍱴Աҳؠ򍱴Íà䠱Ѡӱ嬠獱Ҭ٠ҍҍҍҍҍҲ󠰠蠳䠴Ҳ򍱳ҍҠұ򍱱ҬٍĠ󠰠䠱̠̍̍Ҳ󠳠䠴ٍ危·Ӡ썱٠ŸРĹӠ٠嬠危ԱҬٍĠƠͱҠƠʮҍҠѠұѠƠƍҲѠŠōҳѠĠčԠѠư!! ! ! ! ! :100:STST1:STDOS1100< VST0:TKTK1:BF0TKLT1100L `TKLT1030q j47507,174:47517,164:47445,213 t::"DONE.": SEASPELLER~CONTROLLER7TK0:ST0:LT35:CDWRM47507,0:47517,0\T1TK:490k47445,213TK((TK2))2Ĺ47445,212$430:100:STST1:STDOS1060.BF10908ST0:TKTK1:TKLT1040B490:47445,213:TKT1:ST0 L430""