ккккккккккккккккккккккккккккккккккккккккккккккккл   ккккккккккккккккккккккккккккп   ъккккккккккккккккккккккккккк┐   ъккккккккккккккккккккккккккк┐   ·    ·     ■*а    ■ А    А_    *иg     И@Ti    "UUPjUUUU(j   "j    Иj    (j   кк

   а
@
   И"U
   ВВEP   ВВ   И"   а
   А   PU@
 1ЬPU@
                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                0/9╢АI│0е7:┬(PXл8,PYл2),Iн4, Д(4):Л:╔"O3DFEFEFEO2DEFEFE"/T└Ю:З@230,"score: ";SC:З/q╩З"      play again? y/n"/З╘K$│ Т:ЕK$│"Y" з50/Щ╒ЕK$┤▓"N" з980/ж┘Т65494,0/╣▐Т113,0:в 40999/┐чК/фшЮ:З:З:З"        barn-storming":З0еЄЗ" YOU CONTROL A SMALL AIRPLANE    WITH A JOYSTICK. THE OBJECT     IS TO AVOID OBSTACLES LIKE      FLOCKS OF GEESE AND WINDMILLS   WHILE FLYING THROUGH THE BARN   OPENINGS TO GAIN POINTS."0№№З" HIT THE WRONG PART OF THE BARN  OR ANY OTHER OBSTACLE AND YOUR  PLANE CRASHES."1Бж90001.Ю:З@228,"use high speed poke? y/n"1fK$│ Т:ЕK$│"Y" зТ65495,0 :ДЕK$┤▓"N" з1050 :ДТ65494,01lKР1У#(З@484,"press [enter] to continue";1н#)Е Т┤▓ Л(13) з9001 :ДР1╣ъ`└2:Бе50ART OF THE BARN  OR ANY OTHER OBSTACLE AND YOUR  PLANE CRASHES."1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                
Р1Ь╢
Б
')Б'CБ'bБ'{91НЦ╓╣жАзаZ&∙91НИ╓╣жазАZ&∙9Ю║НрЮ║Ю╖1ир┐
╓╣жЕзА╝
&ўН╒9Ю║╓╣:04жД4ZжВз
Z&∙5зД5╓╣:Ь╖/х9Ю╖╓╣P0ЕНЪЮ╖0╓╣PжЕзД0Ь║&ЎНХ9Ю║4жД4╓╣Zж
зАZ&∙5зД5╓╣:Ь╖-у9У'├R2 
2НЙ ╢0Н█╙╢
ОзД■
Пя
Ж4╖ #╢ "C╢ Л13Н▐'5ьA▌8оDЯ:Я<оHЯ>ж─Ч(цC▌6оJ0ЯB3L▀@фRНQ'5НkН]ЮBНJ&ю#3_я#&┼l$
НЮ║О3,жазАМ?,&Ў9G BRK @аН*
.'А.Ю)4ЮB№:5Я)·ЙН,МН5Oмд'1%LZ&Ў\9НН
╞
oвZ&√9Нод'ж"зД1%Z&є9╞4ккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккUUUUкккккккUUZеUjккккккккккккккеUUUUjкккккUUUUUUVккккккккккккккйUUUVккккккйUUUUUjкккккккккккккккеUUккккккккккккккйUUUUUUUUкккккккккккUUUZкккккккккUUUUUUUUZкккккккккйUUUUккккккккккеUUUUUUкккккккккккеUUUVкккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккжкккккккккккккккккккккккккккккккZккккккккккккккккккккккккккккккЪккккккккккккккккккккккккккккккйjккккккккккккккккккккккккккккккjккккккккккккккккккккккккккккккекккккккккккккккккккккккккккккккккжкккккккккккккккккккккккккккккккZкккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккк"INDIANAPLS.KKKKK"
"BUFFALOKKKKK"
"NEW ENGLANDKKKKK"
"N.Y. JETSKKKKK"
"MIAMIKKKKK"
"CINCINNATIKKKKK"
"CLEVELANDKKKKK"
"HOUSTONKKKKK"
"PITTSBURGKKKKK"
"DENVERKKKKK"
"KANSAS CITYKKKKK"
"LA RAIDERSKKKKK"
"SAN DIEGOKKKKK"
"SEATTLEKKKKK"
"DALLASKKKKK"
"NY GIANTSKKKKK"
"PHILADELPHIAKKKKK"
"ST. LOUISKKKKK"
"WASHINGTONKKKKK"
"CHICAGOKKKKK"
"DETROITKKKKK"
"GREEN BAYKKKKK"
"MINNESOTAKKKKK"
"TAMPA BAYKKKKK"
"ATLANTAKKKKK"
"LA RAMSKKKKK"
"NEW ORLEANSKKKKK"
"SAN FRAN.KKKKK"
OKKKKK"
"SEATTLEKKKKK"
"DALLASKKKKK"
"NY GIANT                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ║&:
В COPYRIGHT (C) T&D SOFTWARE 1986      barn stomring&I╚0:Бе60000&tЕDF зР :Д┼(PX,PY)м(PXл18,PYл10),A1,▒:Р&ЯЕDF зР :Д┼(PX,PY)м(PXл18,PYл10),A2,▒:Р&╩ЕDF зР :Д┼(PX,PY)м(PXл18,PYл12),A3,▒:Р&їЕDF зР :Д┼(PX,PY)м(PXл18,PYл12),BL,╜:Р' ЕDF зР :Д─(PX,PY)м(PXл18,PYл12),BL,G:Р'@	┼(248,100)м(255,166),CI,╜:Р'_
ЕGF┤5 з И GF Бж13,14,15,16'УGF│GFл1:Е В(GFм23)│┤2 ░ (PY▓GL ░ PY┤GLл14) з900'кЕGF▓25 зGF│0:Р :ДР'╦
┼(248,GL)м(255,GLл14),G1,╜:Р'ь┼(248,GL)м(255,GLл14),G2,╜:Р(
┼(248,GL)м(255,GLл14),G3,╜:Р(.┼(248,GL)м(255,GLл14),G4,╜:Р(BV│ Н(0):V│ Н(1)(lЕV┤10 з25 :ДЕV▓53 з22 :ДБж6:Бж7:Бж3:Р(ЪЕPY▓MA зБж6:PY│PYм8:Бж7:Бж4:Р :ДV│32:Бе21(┬ЕPY▓XA з900 :ДБж6:PY│PYл6:Бж7:Бж5:Р(┌ЕCY┤3 зИ CY Бж33,34)CY│CYл1:Е В(CYм23)┤│2 ░ PY▓120 з900) ЕCY▓25 зCY│0:CB│0:Р :ДР)>!┼(248,130)м(255,166),T1,╜:Р)^"┼(248,130)м(255,166),T2,╜:Р)В#ЕCY┤6 зИ CY Бж40,41,42,43,44,45)╘$CY│CYл1:Е В(CYм24)┤│3 зЕ PY▓140 ░ PY┤160 з╔"O2E":SC│SCл10:DF│1 :ДЕPY▓116 з900)ї%ЕCY│28 зDF│0:CY│0:CB│0:Р :ДР*(┼(248,120)м(255,166),B1,╜:Р*5)┼(248,120)м(255,166),B2,╜:Р*U*┼(248,120)м(255,166),B3,╜:Р*u+┼(248,120)м(255,166),B4,╜:Р*Х,┼(248,120)м(255,166),B5,╜:Р*╡-┼(248,120)м(255,166),B6,╜:Р+V2Х100,12699:Е Ж(12700)│182 ░  Ж(12701)│1 ░  Ж(12702)│21 з52 :ДЮ:З@225,"loading machine code from ";:Е Ж(&HC000)│68 зЗ"disk":╙M"BSMLMOD" :ДЗ"tape":ЧM"BSMLMOD"+■4GL│100:XA│166:MA│100:GS│12700:SM│13000:М A1(20),A2(20),A3(20),G1(7),G2(7),G3(7),G4(7),T1(10),T2(10),B1(12),B2(12),B3(12),B4(12),B5(12),BL(20),CI(40):╔"V31T200L100",	6Бж1000,<╚1,1:в SM,t>─(0,90)м(7,104),G1,G:─(8,90)м(15,104),G2,G:─(16,90)м(23,104),G3,G:─(24,90)м(31,104),G4,G,е@─(0,130)м(7,166),T1,G:─(8,130)м(15,166),T2,G,┴B─(48,140)м(66,150),A1,G,▌C─(48,152)м(66,162),A2,G,∙D─(48,170)м(66,182),A3,G-E─(216,120)м(223,166),B1,G:─(224,120)м(231,166),B2,G:─(232,120)м(239,166),B3,G:─(240,120)м(247,166),B4,G:─(248,120)м(255,166),B5,G-╤F┴3,1:╗(0,80)м(255,126),╜,BF:╗(0,128)м(255,191),╛,BF:─(248,100)м(255,166),CI,G-яJPX│80:PY│140:Бж7:Бж3:┐1,0.LАZZ│0е10й0:Бж20.?ZБж6:Т277,4:в GS:Бж9:ЕGF┤▓0 зБж10 :ДЕ Д(12)│1 зGF│1:Бж10.u\ЕCB┤▓0 зИ CB Бж30,35 :ДCB│ Д(2):CY│1:И CB Бж30,35.}cЛZZ.░ДАR│1 е 20 й 4:┬(PXл9,PYл2),R, Д(4):а Rн4л1,1:Л.└ОЕPY▓XA з950.═ШDF│0:Бж6/вPX│PXл2:PY│PYл2:Бж7:Бж5:Т277,7:а200мPY,1:Бе91 Й&7
В COPYRIGHT (C) T&D SOFTWARE  1986    astro-smash&F╚0:Бе60000&h┼(PX,PY)м(PXлDX,PYлDY),SP,╜:Р&Ж┼(X,Y)м(XлDX,YлDY),BL,╜:Р&ЬИ AA(I,2) Бе6,7,8&┼X│Xм4:Y│Yл4:ЕX┤20 зAA(I,2)│3:Бе9 :Д9&╙Y│Yл4:Бе9&їX│Xл4:Y│Yл4:ЕX▓230 зAA(I,2)│1'	И AA(I,0) Бе20,21,22,23'F
H│ Н(0):P│ Ж(&HFF00)░1:ЕH┤10 з14 :ДЕH▓53 з11 :ДР'mЕPX┤248 зX│PX:Y│PY:Бж4:PX│PXл8:Бж3's
Р'ШЕPX▓8 зX│PX:Y│PY:Бж4:PX│PXм8:Бж3'ЮР(KАI│1 е 5:Е В(AA(I,4)мSX)┤8 ░  В(AA(I,5)мSY)┤8 ░ AA(I,0)┤▓0 зSC│SCлAA(I,0)н10:АR│1 е4:┬(SX,SY),Rн2,R:╔"O2EDF":┬(SX,SY),Rн2,3:Л:╔"O3EDF":X│AA(I,4):Y│AA(I,5):Бж4:AA(I,0)│0(SЛ:Р(iИ AA(I,1) Бе25,26(И AA(I,1) Бе27,28(ЦИ AA(I,1) Бе 29,30(мИ AA(I,1) Бе31,32(═┼(X,Y)м(XлDX,YлDY),A1,╜:Бе35(ю┼(X,Y)м(XлDX,YлDY),A2,╜:Бе35)┼(X,Y)м(XлDX,YлDY),B1,╜:Бе35)0┼(X,Y)м(XлDX,YлDY),B2,╜:Бе35)Q┼(X,Y)м(XлDX,YлDY),C1,╜:Бе35)r┼(X,Y)м(XлDX,YлDY),C2,╜:Бе35)У┼(X,Y)м(XлDX,YлDY),D1,╜:Бе35)п ┼(X,Y)м(XлDX,YлDY),D2,╜)щ#AA(I,4)│X:AA(I,5)│Y:ЕAA(I,1)│1 зAA(I,1)│2 :ДAA(I,1)│1)ў$ЕY┤160 зР*R%AA(I,0)│0:╔"O1CDEFGABO2CDEFGABO3CDEFGAB":NL│NLл1:Бж4:╔"O4DGEGECGO5GGDFDD":ЕNL▓│10 з900*X'Р*ц2Х200:╚1:М AA(5,5),BL(10),SP(10),A1(10),A2(10),B1(10),B2(10),C1(10),C2(10),D1(10),D2(10):╝3:DX│12:DY│10:─(0,0)м(DX,DY),BL,G:╔"V31T100L100"+4AD│ Ж(186)н256л Ж(187):АI│0е159:НD:ТADлI,D:Л+"6Бж1000+><─(10,0)м(DXл10,DY),SP,G+r>─(46,0)м(46лDX,DY),A1,G:─(62,0)м(62лDX,DY),A2,G+и@─(82,0)м(82лDX,DY),B1,G:─(104,0)м(104лDX,DY),B2,G+рB─(124,0)м(124лDX,DY),C1,G:─(148,0)м(148лDX,DY),C2,G,D─(174,0)м(174лDX,DY),D1,G:─(206,0)м(206лDX,DY),D2,G,GF╝3:┬(128,191),110,1,.2:├(128,185),1,1:┐1,0,cGNL│0:АI│1е5:AA(I,0)│0:Л,wHPX│8:PY│144:Бж3,ЩJБж10:ЕP з80 :ДSX│PXл5:SY│PYм4,цKQ│ а(SX,SY):╜(SX,SY, Д(2)):ЕQ┤▓3 з╜(SX,SY,3):Бж17:╔"O2EDEFEEFO4EEE":Бе80-L╜(SX,SY,3):SY│SYм8:ЕSY▓10 з75 :Д╔"O4FDEAO5FDEA"-7PАI│1 е 5:ЕAA(I,0)┤▓0 з85-гQЕ Д(10)│1 зAA(I,0)│ Д(4):AA(I,1)│1:AA(I,2)│ Д(3):AA(I,3)│ Д(5)л3:AA(I,4)│ Д(30)н8:AA(I,5)│10л Д(4) :Д97-├UX│AA(I,4):Y│AA(I,5):Бж4:Бж5-╔aЛ-╥cБе74-эДЮ:З@232,"score: ";SC:З.ОЗ"        PLAY AGAIN? Y/N.!ШK$│ Т:ЕK$│"Y" з70.3вЕK$┤▓"N" з920.9чК._шЮ:З:З:З"         astro-smash":З:З.√ЄЗ" ALIENS ARE AGAIN INVADING       EARTH. THIS TIME, IN MANY       DIFFERENT SHAPES AND COLORS.    GRAB YOUR JOYSTICK AND KNOCK    'EM OUT OF THE SKY."/5№З" IF 10 ALIENS MAKE IT TO EARTH,  THE GAME IS OVER."/@Бж9000/gЮ:З@227,"use high speed poke? y/n"/Е$K$│ Т:ЕK$│"N" зТ65494,0:Р/Ш)ЕK$┤▓"Y" з1060/е.Т65495,0/лKР/╥#(З@484,"press [enter] to continue";/ь#)Е Т┤▓ Л(13) з9001 :ДР0=├PЖ 170,169,106,170,170,168,170,170,42,170,169,90,170,90,170,160,86,170,165,660М├RЖ 170,170,0,10,170,170,0,10,170,170,170,170,170,169,106,170,170,168,42,1680▌├TЖ 42,170,169,154,170,106,170,163,242,170,167,246,170,168,12,194,170,168,51,210├VЖ 170,170,170,170,170,165,90,170,170,170,42,168,170,170,169,170,170,85,106,1651Б├XЖ 66,170,160,22,170,170,128,42,170,170,128,42,170,170,170,170,170,149,86,1701╘├ZЖ 170,168,42,168,42,170,153,170,170,170,106,170,170,170,170,170,170,170,138,422(├\Ж 170,170,138,42,170,170,170,170,170,154,166,170,170,168,170,170,42,170,149,1702|├^Ж 170,169,106,170,170,170,170,170,170,170,42,138,170,170,42,138,170,170,170,1702Иъ`└2:Бе50,168,42,168,42,170,153,170,170,170,106,170,170,170,170,170,170,170,138,422(├\Ж 170,170,138,42,170,170,170,170,170,1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                $│"" з650/"МЕK$│"C" ▒ K$│"c" з670/<ПЕK$│"E" ▒ K$│"e" з660/UРЕK$│"A" ▒ K$│"a" з50/rСK│ Й(K$):ЕK┤1 ▒ K▓9 з504/|ТБе690/аФAZ│(PCм1)н512лSP:ЕAM│1 зNP│NPл1/═ХАZ│0е511:ТAZлZ, Ж(1024лZ):Т1024лZ,239::Л/╓ЭБе50/ЇЮTX│CX:TY│CY:CX│0:A│╠AD(0)0ЯF│м1:АI│0 е 31:Е Ж(AлI)┤▓96 зF│I:I│400/аЛ:ЕF│м1 з5040cбS1│F:F│м1:АI│31 е 0 йм1:Е Ж(AлI)┤▓96 зF│I:I│м100tвЛ:ЕF│м1 з5040ЫгL│FмS1л1:Z│ Б((32мL)о2):ЕS1│Z з5040╢дNM│ В(ZмS1):ЕS1┤Z з6850┼еА R│1 е NM0їжT│ Ж(A):А V│0 е 30:ТAлV, Ж(AлVл1):Л:ТAл31,T1за200,1:Л:CX│TX:CY│TY:Бе5041#нА R│1 е NM1WоT│ Ж(Aл31):АV│31 е 1 йм1:ТAлV, Ж(AлVм1):Л:Т A,T1vпа200,1:Л:CX│TX:CY│TY:Бе5041е▓W│╠SC(0):L│ З(MC$(K)):SX│510мW:ЕSX┤0 зSX│01█│ЕSX┤L зЗ@╠SC(0), О(MC$(K),SX); :ДЗ@╠SC(0),MC$(K);2┤CA│ Ж(&H88)н256л Ж(&H89)м1024:CY│ Б(CAо32):CX│CAмCYн32:Бе5042A╝Ю:З:З:З"      keyboard macros":З2c╛АI│1 е 9:З═" # ";I;:ЗMC$(I):Л2Л└З:З" press 1-9 to edit, m for menu"2б┬K$│ Т:ЕK$│"" з7062▒─ЕK$│"M" з502╬╞K│ Й(K$):ЕK┤1 ▒ K▓9 з7062э╚AQ│(Kм1)н32л128л3:З@AQ,"";2ў╩╗Й L$3╠MC$(K)│ О(L$,28):Бе70030▐Ю:З@232,"ok to quit? y/n"3F▀K$│ Т:ЕK$│"N" з503XрЕK$┤▓"Y" з9913wчХ200, Ж(116)н256л Ж(117):К3ВXЮ:З@644bЗ" THIS UTILITY PROGRAM ALLOWS     YOU TO EASILY CREATE AND EDIT   TEXT SCREENS TO BE USED BY      YOUR BASIC AND MACHINE          LANGUAGE PROGRAMS."4┬lЗ" ONCE YOU HAVE YOUR PAGES OF     TEXT ENTERED AND EDITED, YOU    CAN SAVE A MACHINE LANGUAGE     MODULE CONTAINING THE SCREEN    DATA AND THE DRIVER PROGRAM."4═vБж90004╪╝Ю:З@965▒╞З" ENTERING AND EDITING IS DONE    ON A PAGE BY PAGE BASIS. A      MAIN MENU GIVES YOU CONTROL     OVER LOADING, SAVING, ADDING A  PAGE, EDITING A PAGE, CHANGING  YOUR KEYBOARD MACROS, AND END-  ING THE PROGRAM."5╝╨Бж90005╟ Ю:З@3269*З" WHEN YOU ARE EDITING A PAGE OR  ENTERING A NEW PAGE, THE KEY-   BOARD PROVIDES YOU WITH EXTRA   COMMANDS."6╙4З" THE ARROW KEYS MOVE THE CURSOR  NON-DESTRUCTIVELY IN FOUR       DIRECTIONS. THE [ENTER] KEY     MOVES THE CURSOR TO THE START   OF THE NEXT LINE."7>З" THE [CLEAR] KEY FUNCTIONS AS A  CONTROL KEY."7HБж90007ДЮ:З@327НОЗ" BY PRESSING THE [CLEAR] KEY     AND THEN ANOTHER KEY, YOU CAN   ACTIVATE THE FOLLOWING COM-     MANDS:"8sШЗ" [CLEAR] C - CENTERS TEXT ON                 CURRENT LINE        [CLEAR] A - ABORTS EDIT MODE                BUT DOES NOT SAVE               CHANGES MADE        [CLEAR] E - ENDS EDIT MODE                  AND SAVES CHANGES"8ЖЪБж9000:Ю:З@1288·вЗ" NOTE: TO USE [CLEAR] KEY COM-   MANDS, YOU MUST PRESS [CLEAR],  THEN RELEASE IT AND PRESS THE   SECOND KEY."9мБж90009шЮ:З@649═ЄЗ" A KEYBOARD MACRO IS USED TO     STORE FREQUENTLY USED CHAR-     ACTER SEQUENCES, SUCH AS        'press [enter] to continue'.    THERE ARE NINE DIFFERENT STOR-  AGE AREAS AVAILABLE.":№З" YOU CAN EDIT THE KEYBOARD       MACROS FROM THE MENU.":■Бж9000:Ю:З@64;З" TO USE A MACRO FROM ADD A NEW   PAGE OR EDIT A PAGE MODE,       PRESS [CLEAR] FOLLOWED BY A     NUMBER KEY 1 THROUGH 9. EXAM-   PLE: PRESSING [CLEAR] 1 WOULD   CAUSE MACRO #1 TO BE PUT ON     THE PAGE AS THOUGH IT HAD BEEN  TYPED IN.";Бж9000;%LЮ:З@64;ьVЗ" TO USE THE MACHINE LANGUAGE     MODULE ONCE IT IS CREATED,      LOADM THE SAVED FILE, THEN":З:З" POKE 277,PAGE NUMBER:EXEC":З:З" AS NEEDED BY YOUR BASIC OR      MACHINE LANGUAGE MAIN PROGRAM.<WЗ" PAGE NUMBERS START AT ONE."<!XБж9000:Ю:З@64=`З"           EXAMPLES:             POKE 277,1:EXEC - DISPLAYS                        PAGE 1        POKE 277,5:EXEC - DISPLAYS                        PAGE 5        POKE 277,X:EXEC - DISPLAYS                        PAGE # IN"=*jЗ"                   VARIABLE X"=5tБж9000=;?Р=b@Ю:З@227,PF$л" filename: ";:╗Й F$:Р=Й#(З@484,"press [enter] to continue";=г#)Е Т┤▓ Л(13) з9001 :ДР=╒#МЮ:З@226,"enter page number (1-";:З═"##) ";NP;=∙#ЦЙ PC:ЕPC┤0 ▒ PC▓NP за1,1:Бе9100= #аР>?├PЖ 246,1,21,48,141,0,30,93,39,11,90,93,39,7,48,137,2,0,90,32>y├RЖ 246,16,142,4,0,166,128,167,160,16,140,6,0,38,246,57>Еъ`└1:Бе20;=г#)Е Т┤▓ Л(13) з9001 :ДР=╒#МЮ:З@226,"enter page number (1-";:З═"##) ";NP;=∙#ЦЙ PC:ЕPC┤0 ▒ PC▓NP за1,1:Бе9100= #аР                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                06.00,COMPETITIVE COMPUTERAh║ЖQUANTUM XT,2,256K/1M,C,2,YES (TTL),135 W,0,1,0,N,8,$899.00,AFTON COMPUTERAи─ЖZ-NIX,2,256K/640K,C,2,NO,135 W,2,1,1,Y,8,$999.00,Z-NIX CO.Aї╬ЖTANDY 1000,1,128K/256K,C,1,NO,100 W,0,1,2,N,3,$699.00,TANDY/RADIO SHACKB=╪Ж? PC/XT,2,640K/640K,C,2,NO,135 W,0,0,0,N,8,$699.00,D & D COMPUTERSBРтЖWIZARD TURBO 700,2,256K/640K,C,2,NO,135 W,2,1,0,Y,8,$1099.00,OSSMANN COMPUTERB▀ьЖIBM PC,1,256K/640K,C,2,YES (RGB),63 W,0,0,0,N,5,$1820.00,BULLDOG COMPUTERC*ЎЖCOMPAQ,1,256K/640K,C,2,YES,135 W,0,0,0,N,8,$1895.00,HARMONY COMPUTERSCg#(Т277, Д(16)м1:Т279,15:З@452,"press [enter] to continue";CБ#)Е Т┤▓ Л(13) з9001 :ДРC┼├PЖ 26,80,190,1,13,175,141,0,160,48,141,0,21,191,1,13,134,1,183,1D
├RЖ 22,183,1,23,127,1,21,111,141,0,152,28,175,57,166,141,0,145,76,167DR├TЖ 141,0,140,177,1,23,16,45,0,118,111,141,0,129,182,1,21,177,1,22DЫ├VЖ 39,29,132,15,183,1,22,72,49,141,0,116,49,166,16,174,164,16,175,141Dр├XЖ 0,102,49,40,16,175,141,0,97,32,21,16,174,141,0,88,49,33,16,172E$├ZЖ 141,0,83,38,2,49,56,16,175,141,0,72,142,4,0,198,32,141,52,167Eo├\Ж 128,90,38,249,142,4,63,198,15,141,40,167,132,48,136,32,90,38,246,142E╣├^Ж 5,254,198,31,141,25,167,132,48,31,90,38,247,142,5,192,198,14,141,11F├`Ж 167,132,48,136,224,90,38,246,126,0,0,166,160,16,172,141,0,8,38,2FC├bЖ 49,56,57,0,0,0,0,0,62,148,62,156,62,164,62,172,62,180,62,188FМ├dЖ 62,196,62,204,62,212,62,220,62,228,62,236,62,244,62,252,63,4,63,12Fт├fЖ 143,159,175,191,207,223,239,255,143,128,143,128,143,128,143,128,175,128,175,128G8├hЖ 175,128,175,128,191,128,191,128,191,128,191,128,207,128,207,128,207,128,207,128GО├jЖ 255,128,255,128,255,128,255,128,191,191,191,191,128,128,128,128,207,207,207,207Gф├lЖ 128,207,207,128,207,207,207,207,128,175,175,128,223,223,223,223,223,128,207,128H:├nЖ 143,143,159,159,175,175,191,191,207,207,223,223,239,239,255,255,166,169,166,169HР├pЖ 182,185,182,185,175,191,175,191,175,191,175,191,207,175,207,175,207,175,207,175H┤├rЖ 42,42,191,191,207,207,175,175H└ъ`└1:Бе208,223,223,223,223,223,128,207,128H:├nЖ 143,143,159,159,175,                                                                                                                                                                                                                                                                 Ж&U
В COPYRIGHT (C) T&D SOFTWARE 1986     screen generator                      rdg&d╚0:Бе60000'Х500,12999:М MC$(9):NP│0:LL│13000:MS│ Ж(116)н256л Ж(117):MP│ Б((MSмLLм40)о512):Z$│"^"л Л(10)л Л(8)л Л(9):╣ ╠AD(X)│CYн32лCXл1024:╣ ╠SC(X)│CYн32лCX:Е Ж(&HC000)│68 з DN│1 :Д DN│м1'[Ю:З@96:З"        screen module":З"      generation utility":З'А З:З"     want instructions? y/n"'е"K$│ Т:ЕK$│"N" з40 :ДЕK$┤▓"Y" з34'░#Бж7000(%(Ю:З@196,"enter start address for         machine language module.        (DEFAULT = ";:З═"#####) ";LL;:SA│0:Й SA(6*ЕSA│0 зSA│LL(M,Е SA┤LL за1,1:Бе40(g-MP│ Б((MSмSAм40)о512)(Г.П:АI│0 е 35:Н D:ТSAлI,D(Т0Л:SP│SAл37(░2Ю:З@7,"screen generator";(┬4З@45,"menu":З(∙6З"       i/o device = ";:Е DN│1 зЗ"disk" :ДЗ"tape")8З"       number of pages = ";NP:З)є:З"     C. CHANGE I/O DEVICE            L. LOAD SCREEN FILE             S. SAVE SCREEN FILE             A. ADD A NEW PAGE               E. EDIT A PAGE                  M. MODIFY MACROS                Q. QUIT"*<З:З"        your choice?";*kAK$│ Т:ЕK$│"" з65 :ДP│ Ю("CLSAEMQ",K$):ЕP│0 з 65 :ДИ P Бе 190,200,300,400,450,700,990*tEБе65*М╛ЕDN│1 зDN│м1 :ДDN│1*Х┐Бе50*╢╚PF$│"load":Бж8000:ЕF$│"" з50*╨╥Е DN│1 з╙M F$ :ДЧM F$+▄SA│ Ж(157)н256л Ж(158):SP│SAл37:NP│ Ж(SAл36):Бе50+'
,PF$│"save":Бж8000:ЕF$│"" з50+░
6ТSAл36,NP:EA│SAл40лNPн512:З:З"       START: ";SA:З"       END:   ";EA:З"       EXEC:  ";SA:Е DN│1 з ╪M F$,SA,EA,SA :Д ШM F$,SA,EA,SA+╗
^Бж9000+─
ЖБе50+╙
РЕNP│MP з65+ь
ХPC│NPл1:Ю:AM│1:Бе500+·
┬ЕNP│0 з65,"
╠Бж9100:ЕPC│0 з50 :ДAZ│(PCм1)н512лSP,E
╬Ю7:АZ│0е511:Т1024лZ, Ж(AZлZ):Л,T
ъAM│0:Бе500,g
ЇCX│0:CY│0:BC│0,Ю
°Q│ Ж(╠AD(0)):Е Ю(Z$,K$)┤▓0 з АZ│338 е 345:ТZ,255:Л,╕
∙ЕBC┤▓0 зBC│BCм1:Бе510,р
·A│ Ж(╠AD(0)):ЕA▓63 зA│Aм64 :ДA│Aл64,ї
√Т ╠AD(0),A:BC│10-
■K$│ Т:ЕK$│"" з505-[Т ╠AD(0),Q:ЕK$│"^" з600 :ДЕK$│ Л(10) з610 :ДЕK$│ Л(8) з620 :ДЕK$│ Л(9) з630-oЕK$│ Л(12) з650-ГЕK$│ Л(13) з640-ЫK│ К(K$):ЕK▓31 з520-еБе505-╜ЕCX│31 ░ CY│15 з504-╬
З@╠SC(0),K$;-яCX│CXл1:ЕCX▓31 зCY│CYл1:CX│0-∙Бе504.XЕCY│0 зCX│0:Бе504 :ДCY│CYм1:Бе504.GbЕCY│15 зCX│31:Бе504 :ДCY│CYл1:Бе504.`lЕCX▓0 зCX│CXм1:Бе504.ЕnЕCY│0 з504 :ДCY│CYм1:CX│31:Бе504.ЯvЕCX┤31 зCX│CXл1:Бе504.─xЕCY│15 з504 :ДCY│CYл1:CX│0:Бе504.█АЕCY│15 зCX│0:Бе504.ЄВCY│CYл1:CX│0:Бе504/КK$│ Т:ЕKTION IS THE   VIDEO DISPLAY ADAPTER. THIS     DECISION IS DEPENDENT ON YOUR   COMPUTER NEEDS. FOR BUSINESS    APPLICATIONS, YOU WILL PROB-    ABLY WANT A MONOCHROME DIS-     PLAY ADAPTER. THIS IS BECAUSE0$@З" MOST BUSINESS SOFTWARE IS       WRITTEN FOR THE MONOCHROME      GRAPHICS ADAPTER."03BБж9000:Ю:З0МDЗ" FOR GENERAL USE, YOU WILL PRO-  BABLY WANT A COLOR GRAPHICS     DISPLAY ADAPTER."1}FЗ" AFTER YOU BUY A SYSTEM, YOU     MAY DECIDE TO BUY BOTH ADAP-    TERS. THIS IS BECAUSE POPULAR   BUSINESS PACKAGES (LIKE LOTUS   1-2-3) REQUIRE A MONOCHROME     ADAPTER AND MOST OTHER SOFT-    WARE PACKAGES REQUIRE A COLOR   ADAPTER."1ПHБж9000:Ю:З@642qJЗ" PC COMPATIBLE SYSTEMS USUALLY   COME WITH ONE OR TWO FLOPPY     DISK DRIVES. THESE DRIVES ARE   USUALLY DOUBLE-SIDED, DOUBLE-   DENSITY. ONE DRIVE CAN STORE    360K OF DATA AND PROGRAMS.      THIS IS MORE THAN TWICE AS2ФLЗ" MUCH AS A COCO DISK DRIVE!"2жNБж9000:Ю:З@323МPЗ" SOME SYSTEMS COME COMPLETE      WITH A DISPLAY MONITOR. IF      NOT, THEN YOU MUST PURCHASE IT  SEPARATELY. WITH A MONOCHROME   VIDEO ADAPTER, YOU WILL NEED A  TTL INPUT MONITOR. THIS IS A    SPECIAL KIND OF MONITOR WHICH"3єRЗ" OFFERS OUTSTANDING TEXT AND     GRAPHICS QUALITY. TTL (DIRECT   DRIVE) MONITORS COST $90-$120."4TБж9000:Ю:З@324ьVЗ" IF YOU ARE BUYING A COLOR SYS-  TEM, THEN A COMPOSITE VIDEO     MONITOR OR AN RGB MONITOR IS    NEEDED. THE RGB MONITOR WILL    GIVE A BETTER PICTURE THAN A    COMPOSITE VIDEO ONE. COMPOSITE  VIDEO MONITORS COST $150-$250."5"XЗ" RGB (RED-GREEN-BLUE) MONITORS   COST $250-UP."54YБж9000:Ю:З@646+ZЗ" THE NEXT SYSTEM CONSIDERATION   IS POWER SUPPLY SIZE. LARGER    CAPACITY SUPPLIES ARE FAR       BETTER BECAUSE THE COMPUTER     NOT ONLY POWERS ITSELF; IT      ALSO POWERS THE INTERNAL FLOP-  PY DRIVES AND OPTIONAL INTERN-  AL HARD DISKS."6=\Бж9000:Ю:З@327#^З" THE NEXT THING TO CONSIDER ARE  THE I/O PORTS WHICH COME WITH   THE COMPUTER. SERIAL DATA       PORTS ALLOW YOU TO CONNECT A    MODEM, PRINTER, OR ANOTHER      COMPUTER. PARALLEL DATA PORTS   ALLOW YOU TO CONNECT A PARAL-"7Э`З" LEL INTERFACE PRINTER. OFTEN,   THE MONOCHROME GRAPHICS CARD    WILL INCLUDE A PARALLEL PRINT-  ER PORT ON-BOARD."7пbБж9000:Ю:З@327ЁdЗ" GAME PORTS ALLOW YOU TO PLUG    IN ONE OR TWO JOYSTICKS."8╒nЗ" SOME SYSTEMS COME WITH A REAL-  TIME CLOCK. THIS CLOCK IS       USUALLY BATTERY-BACKUP POWERED  SO THAT THE COMPUTER KNOWS THE  CORRECT TIME AND DAY WHENEVER   YOU START IT UP. THIS SAVES     YOU FROM TYPING IN THE TIME  9pЗ" AND DATE EVERY TIME YOU BOOT    UP THE SYSTEM."9rБж9000:Ю:З@32:tЗ" PC COMPATIBLES ARE EASY TO      EXPAND BECAUSE THERE ARE 5 TO   8 EXPANSION SLOTS BUILT-INTO    THE MACHINE. IN THESE SLOTS     YOU PLUG IN THE DISPLAY ADAPT-  ER CARD, I/O PORTS CARD, AND    ANY OTHER EXPANSION CARD YOU    NEED.":kvЗ" ADDING EXPANSION CARDS TO A PC  COMPATIBLE SYSTEM IS EASY AND   AESTETICALLY PLEASING.":}xБж9000:Ю:З@96;BВЗ" THE INFORMATION IN THIS PRO-    GRAM WAS TAKEN FROM THE COM-    PUTER SHOPPER, JUNE 1986. ALL   INFORMATION CONTAINED HEREIN    IS BELIEVED TO BE ACCURATE AT   TIME OF PROGRAM PUBLICATION.";TМБж9000:Ю:З@96<ЦЗ" WHEN YOU ARE DISPLAYING THE     COMPARATIVE LISTING ON THE      SCREEN, USE 'U' TO MOVE UP      ONE PAGE, USE 'D' TO MOVE DOWN  ONE PAGE. PRESSING 'Q' QUITS    THE DISPLAY LISTING MODE."<!аБж9000<`╚Ю:З@226,"output to printer or screen?                p/s";<w╔K$│ Т:ЕK$│"P" з300<И╩ЕK$│"S" з400<Т╤Бе201<ж
,PD│м2:АI│1 е NE<╣
6З#PD:АL│1 е 14<·
@З#PD,═"%            %: %                  %";PM$(L);PO$(I,L)=
JЛ:Л:З#PD=
РPG│1=
ЪЮ:З=]
дАI│1 е 14:З═" %            %: %            %";PM$(I),PO$(PG,I):Л=t
оK$│ Т:ЕK$│"U" з450=Е
░ЕK$│"D" з460=Ц
▓ЕK$│"Q" з900=а
╖Бе430=└
┬ЕPG│NE з430 :ДPG│PGл1:Бе410=▀
╠ЕPG│1 з430 :ДPG│PGм1:Бе410>ДЮ:З@232,"good bye...":АTD│0е1000:Л>╢Т113,0:в 40999>чК>║шЖBRAND,CLOCK SPEEDS,RAM BASE/MAX,VIDEO ADAPTER,# DISK DRIVES,MONITOR,POWER SUPPLY,SERIAL PORTS,PARALLEL PORTS,GAME PORTS,TIME CLOCK,SLOTS,PRICE,DEALER?LЖBLAZER XT,1,640K/640K,C,1,NO,135 W,0,1,0,N,8,$895.00,EMERALD COMPONENTS?PVЖRTR PC/XT,2,640K/640K,C,2,NO,135 W,1,1,1,Y,8,$859.00,RICHWELL TECH.?Ы~ЖCONN XT,1,256K/640K,C,2,NO,135 W,0,1,0,Y,8,$699.00,COMPUTER CREATIONS?хИЖIMPERIAL XT,2,640K/640K,C,2,NO,150 W,0,0,0,N,8,$749.00,IMPERIAL INT.@2ТЖDYNAMIC XT,1,640K/640K,C,1,NO,135 W,0,0,0,N,8,$595.00,COMPUTER DYNAMICS@БЬЖXT TURBO,2,640K/640K,M,2,YES (TTL),150 W,1,2,2,Y,8,$899.00,PC-PRO SYSTEMS@╠жЖTURBO XT,2,640K/640K,C,2,NO,135 W,0,0,0,N,8,$795.00,COMPUTER PRODUCTSA░Ж? PC/XT,2,256K/640K,C,2,NO,150 W,1,1,1,Y,8,$8E ACTION,WAND OF WONDER WITH 30 CHARGES,MACE+2,14 ARROWS +1JЇ╓Ж LEATHER ARMOR +1,GOLD NECKLACE WORTH 1000 GP.,POTION OF INVISIBILITY,SCROLL:PROTECTION FROM UNDEAD,POTION OF EXTRA HEALING,RING OF FIRE RESISTANCE,MORNING STAR л2,POTION OF FLYINGK>З:З"YOU MAY WEAR ";:ЕG│1зЗ"LEATHER ARMOR":A│8:ДЗ"PLATEMAIL ARMOR":A│3KhЕV$│"A"▒G│0зЗ"AND USE A SHIELD":A│Aм1KЯЕD▓14зАK│1еDм14:A│Aм1:Л:З"DEXTERITY BONUS:";м(Kм1)K╠&З"PRESS A KEY TO CONTINUE":в44539:Бе1615Kщ:З"DID YOU SAVE?":Бж360:РL╨Ю:З@64,"ADVENTURER:":З"YOU HAVE ";L7╒ЕGP│0зЗ"NOTHING!":ДЗGP"GOLD PIECESLM┌АK│1еIN:ЗIN$(K):ЛLZюв44539:РLz4З"NOTHING! IT'S EMPTY!!!":РA│Aм1:Л:З"DEXTERITY BONUS:";м(Kм1)K╠&З"PRESS A KEY TO CONTINUE":в44539:Бе1615Kщ:З"DID YOU SAVE?":Бж360:РL╨Ю:З@64,"ADVENTURE                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 "┴&2
В COPYRIGHT (C) T&D SOFTWARE 1986  pc survey&A╚0:Бе60000&ЙАI│1 е NE:Н BR$,CL$,BM$,VD$,DD$,MN$,PS$,SR$,PR$,GM$,RT$,SL$,PC$,MF$&╨PO$(I,1)│BR$:ЕCL$│"1" зPO$(I,2)│"4.77 MHZ" :ДPO$(I,2)│"4.77/8 MHZ"'PO$(I,3)│BM$:ЕVD$│"C" зPO$(I,4)│"COLOR" :ДPO$(I,4)│"MONOCHROME"'%PO$(I,5)│DD$'ЦPO$(I,6)│MN$:PO$(I,7)│PS$:PO$(I,8)│SR$:PO$(I,9)│PR$:PO$(I,10)│GM$:ЕRT$│"Y" зPO$(I,11)│"YES" :ДPO$(I,11)│"NO"'─PO$(I,12)│SL$:PO$(I,13)│PC$:PO$(I,14)│MF$'╠	Л:Р'ЎХ100,15799:NE│15:М PM$(14),PO$(NE,14)(АI│1е14:НPM$(I):Л(%Ю:З@42,"pc survey":З)З" IF YOU ARE THINKING ABOUT BUY-  ING AN IBM PC, OR A PC COMPAT-  IBLE, THIS PROGRAM MAY HELP     YOU. THIS PROGRAM WILL EXPLAIN  THE MANY THINGS TO THINK ABOUT  BEFORE DECIDING ON A SYSTEM.    AFTER THE EXPLANATION, A COMP-")НЗ" ARATIVE LISTING OF 15 PC'S      WILL BE DISPLAYED. YOU CAN      PRINT THE LISTING ON YOUR       PRINTER IF YOU WISH.":Бж3)║АI│15800 е 16147:НD:ТI,D:Л:в15800:Бж9000)┼Ю:З@32*_ З" MANY OF THE OFF-BRAND PC COM-   PATIBLES OFFER QUALITY HARD-    WARE AT A MUCH MORE REASONABLE  PRICE COMPARED TO THE COST OF   AN ACTUAL IBM PC."+"З" OFTEN YOU WILL FIND PC COMPAT-  IBLES WHICH OFFER MORE MEMORY,  MORE I/O PORTS, AND MORE FEA-   TURES THAN AN ACTUAL IBM PC AT  50%-60% OF THE COST OF AN IBM."+#Бж9000:Ю:З@96+Д$З" THIS MEANS YOU COULD BUY TWO    PC COMPATIBLES WITH MORE POWER  FOR THE SAME MONEY AS ONE IBM   PC."+Ц(Бж9000:Ю:З@32,|*З" PC COMPATIBLES TYPICALLY RUN    95%-100% OF ALL SOFTWARE WRIT-  TEN FOR THE IBM PC. THIS DOES   NOT USUALLY CREATE A PROBLEM    BECAUSE ALL POPULAR SOFTWARE    PACKAGES ARE ENGINEERED TO BE   COMPATIBLE WITH VIRTUALLY ALL",Э,З" MS-DOS OR PC-DOS SYSTEMS.,м.Бж9000:Ю:З-Р0З" THE NEXT CONSIDERATION WHEN     CHOOSING A SYSTEM IS THE COM-   PUTER CLOCK SPEED. ALL PC COM-  PATIBLES OFFER 4.77 MHZ OPER-   ATION. 4.77 MHZ IS THE CLOCK    SPEED IN AN ACTUAL IBM PC.      SOME SYSTEMS, HOWEVER, ALSO".22З" ALLOW YOU TO SWITCH THE SYSTEM  INTO 'TURBO' MODE. IN THIS      MODE THE COMPUTER RUNS AT       8 MHZ. SYSTEMS THAT ALLOW THIS  ARE CALLED TURBO SYSTEMS.".D4Бж9000:Ю:З@96.╙<З" THE NEXT CONSIDERATION IS MEM-  ORY SIZE. MOST SYSTEMS COME     WITH 256K OR 640K, AND ARE      EXPANDABLE TO 640K OF RAM ON-   BOARD.".х=Бж9000:Ю:З@64/╩>З" THE NEXT CONSIDERATER!"8$`АU│1е3:АI│150е1йм9:аI,1:Л:Л8~gЗ:З" THE MASTER CONTROLLER WILL      SOON HAVE YET ANOTHER UNDEAD    ZOMBIE SLAVE..."8ЪlЗ:Зд14);"----THE ARENA"8╜qЗ:З"...HIT r TO PLAY AGAIN..."8╤vЕ Т│"R"з15:Д6308чА:ГOPENING DISPLAY9ЩЮ Д(9)м1:АK│138е150й2:З@K,"o";:Л98ЮЗ@170,F$"oooo";:АB│204е364й32:З@B,F$;:Л9sвЗ@393,F$"oooooo";:З@424,F$"oooooooo";:З@237," ARENA ";9УдЗ@66,"press"G$"any"G$"key";9виАN│1е900:Л9┤▓Е Т│""з665:ДР9╒╝:ГANOTHER ONE BITES THE DUST9т╞ЕM┤1з7509ё╚Бж1200:N│1:╦З:З" YOU KILL THE ";M$;".":0╬З" A HATCH OPENS UP IN THE":З╨З" CEILING AND A LARGE SACK        FALLS DOWN TO THE FLOOR":З" WITH A LOUD THUMP!":в╤╔"V31T4O1D":АK│1е900:Л:┼╒З:З" THE SACK CONTAINS:":Бж920:х┌SS│SSл1:╔"O5A":З:Бж150:Бе80;юБж1200:T│0:M│1:O│0:P$│"";aяИ  Д(20) Бж760,765,770,775,780,785,790,795,800,805,810,815,820,825,830,835,840,845,850,855;ЩЁЕS│1 зSZ$│"LARGE!":ДЕS│2 зSZ$│"MEDIUM":ДSZ$│"SMALL";№ЇЗ" A SECRET DOOR OPENS 20 FEET     AWAY FROM YOU. SUDDENLY,":З" YOU SEE A ";M$:З" BEFORE YOU!"<їв44539<cЎБж1200:N│0:З:З" ";M$:З"--- AC:";A;" HIT DICE:";H:З" HP:";:Бж1100:ЗO"  # OF ATTACKS:";AT<ШўЗ" DAMAGE/ATTACK:";D$:З" SIZE:";SZ$:J│1:ЗP$:Бе98<▄°M$│"HYDRA":H│ Д(3)л4:A│5:AT│H:S│1:O│Hн8:ЕH│7зD$│"1-8":ДD$│"1-6"=+∙T│500:P$│"SPECIAL:PER HEAD (8HP) DESTROY- -ED, ONE ATTACK IS PERM. GONE":Р=e¤M$│"HURKLE":H│6:A│4:AT│2:S│2:D$│"2-8/2-8":T│ Д(500):Р=зM$│"TROLL":H│6:A│4:AT│3:S│1:O│(Hн4)л6л Д(6):D$│"5-8/5-8/2-12">T│800:P$│"SPECIAL: REGENERATES 3HP/ROUND 3 ROUNDS AFTER BEING DAMAGED.    ONLY TOTALLY KILLED BY FIRE OR  ACID.":Р>cM$│"MANTICORE":H│6:A│4:AT│3:S│1:O│(Hн4)л3л Д(6):D$│"1-3/1-3/1-8">╧T│ Д(1000):P$│"SPECIAL: 50% CHANCE TO SHOOT    6 TAIL SPIKES (1-6 PTS. EACH).  HAS A TOTAL 24 SPIKES":Р?M$│"WRAITH":H│5:A│4:AT│1:S│2:O│(Hн4)л3л Д(5):D$│"1-6+ONE LEVEL"?Ъ
T│411:P$│"SPECIAL: IMMUNE TO SPELLS THAT  DO NOT AFFECT UNDEAD. NON-SILV- -ERED WEAPONS DO NO DAMAGE,     SILVERED ONES DO 1/2.":Р?╤M$│"HILL GIANT":H│8:A│4:AT│1:S│1:D$│"2-16":T│950:Р@
M$│"STAG BEETLE":H│7:A│3:AT│3:S│1:D$│"4-16/1-10/1-10":Р@WM$│"TIGER":H│5:A│6:AT│3:S│1:O│(Hн4)л5л Д(5):D$│"2-5/2-5/1-10":T│111:Р@Н M$│"GLADIATOR":H│7:A│3:AT│1:S│2:D$│"1-10":T│400:Р@┬%M$│"GLADIATOR":H│8:A│5:AT│1:S│2:D$│"2-9":T│150:Р@ў*M$│"BLACK BULL":H│6:A│6:AT│1:S│1:D$│"2-12":T│5:РAp/M$│"GIGANTIC RAT":H│10:A│10:AT│1:S│1:D$│"3-12":P$│"SPECIAL: 5% CHANCE PER BITE OF  GETTING TYPHOID DISEASE.":T│300:РAЯ4M$│"GLADIATOR":H│7:A│5:AT│1:S│2:D$│"2-8":РA╨9M$│"APE":H│5:A│6:AT│3:S│1:D$│"1-4/1-4/1-8":РB>M$│"MINOTAUR":H│6:A│6:AT│1:S│1:D$│"1-10":O│(Hн5)л Д(8)л3:T│400:РBUCM$│"OGRE CHEIFTAIN":H│7:A│4:AT│1:D$│"1-12":S│1:T│ Д(1000):РBхHM$│"RUST MONSTER!":H│5:A│2:AT│2:D$│"SPECIAL":S│2:P$│"ATTACKS METAL ARMOR & WEAPONS   METAL HIT WILL IMMEDIATELY RUST AND FALL TO PIECES.":РC?MM$│"UMBER HULK":H│8:A│2:AT│3:S│1:D$│"3-12/3-12/1-10":T│600:АL│1е8:O│Oл Д(8):Л:O│Oл8:РC╨RM$│"DWARF":H│6:A│4:AT│1:D$│"1-8":S│3:T│200:P$│"SAVES AT 4 LEVELS HIGHER THAN   ACTUAL LEVEL AGAINST MAGIC AND  POISON":АK│1е6:O│Oл Д(10):Л:РDbWM$│"OCHRE JELLY":H│6:A│8:AT│1:D$│"3-12":S│2:P$│"LIGHTENING BOLTS ONLY DIVIDE    THE JELLY INTWO, WITH EACH      CREATURE DOING HALF DAMAGE":РDtОЗ б(32,G$);:РDПУ:ГA GENEROUS REWARD...D╟ШMI│ Д(4):ЕHD▓7 ▒P$▓"" ▒A┤4 зMI│ Д(2):ДЕ Д(9)│1з2100D╓вЕMI│1 з950E
мT│Tл Д(300):ЗT" GOLD PIECES":GP│GPлT:РE╢П:X│ Д(20):АL│1еX:НE$:ЛE4╖IN│INл1:IN$(IN)│E$EG╕ЗE$:Е Д(2)│1зРE{║T│Tл Д(100):З" AND ";T;" GOLD PIECES":GP│GPлT:РEЧLЕO┤1зАT│1еH:O│Oл Д(8):ЛEЭVРE╕░Ю:З@13,"ARENA":Бж910:РE╙x:Г********************Eю▄:ГCHARACTER GENERATIONF	с:Г********************F@цЮ:З"LET'S GENERATE SOME CHARACTERS":B│0:A│10:Бж910F\ы╔"T50":АX│1е12:╔ И(X):ЛF|ЁЗ:Й"ENTER DESIRED CLASS";C$FШ·Й"NAME OF CHARACTER";N$F┐Й"ENTER DESIRED LEVEL";L$:L│ Й(L$)G	S│ Д(12)л6:I│ Д(12)л6:W│ Д(12)л6:D│ Д(12)л6:C│ Д(14)л4:V│ Д(14)л4:G│0G>"V$│ О(C$,1):ЕV$│"C"▒V$│"P"▒V$│"D"зW│ Д(6)л12:H│4Gk,ЕV$│"M"▒V$│"I"зI│ Д(6)л12:H│2:G│2:Бе1820GФ6ЕV$│"F"▒V$│"P"▒V$│"R"зS│ Д(6)л12:H│5G║@ЕV$│"T"▒V$│"A"зD│ Д(6)л12:H│3:G│1G╪JЕV$│"P"▒V$│"D"зV│ Д(6)л12GЇLЕV$│"R"зH│4:B│BлHл Д(H)HMЕG┤2з1800HOАK│1еL:B│BлHл Д(H):ЛH@TЮ:АK│1е5:╔"T2":АJ│1е6:╔"T>C":Л:ЛHf^З"NAME:"N$:З"CLASS:"C$"  LEVEL:"LHНhЗ:З"STR:";S:З"INT:";I;д16);"HP:";BH│jЗ"WIS:";W;д16);"AC:";A::З"DEX:";DH╦lЗ"CON:";C:З"CHR:";VH▄nЗ:З б(32,45)IrЗ" <R>OLL ANOTHER ONE":З" OR <C>ONTINUE PROGRAM"I'|Z$│ Т:ЕZ$│""з1660IJЖЕZ$│"R"з1500:ДЕZ$│"C"з80:Д1660I═┬Ж POTION OF HEALING,IVORY RING WORTH 950 GP,SILVER VASE WORTH 700 GP,LONGSWORD +1 FLAME TONGUE,ROPE OF CLIMBING,BAG OF HOLDINGJ:╠Ж SHIELD +2,RING OF PROTECTION +2,RING OF FRE &{&0
В COPYRIGHT (C) T&D SOFTWARE 1986    arena&H
:Г****  ARENA  ****&`:ГBY RALEIGH RIVERS&w:Г1369 MILES DRIVE&Т
:ГCHARLESTON, SC 29407&░G$│ Л(128):F$│"ooooooooo"&∙Бж665:Бж1200:M│0:N│1:З:З"DO YOU WANT INSTRUCTIONS?":Бж360:ЕB$│"Y"з25'CЗ@160,"DO YOU WANT TO ROLL UP":З"A CHARACTER?":Бж360:ЕB$│"Y"з1500:Д80'ЕЗ:З" ARENA IS AN AD&D ADVENTURE FOR ONE CHARACTER, LEVEL 6-8.(
З"  THE MASTER CONTROLLER OF THE  ARENA HAS PLACED ADS IN EVERY   TAVERN AND INN, CHALLENGING ALL TO TEST THEIR SKILLS.(^З"  FOR EACH MONSTER KILLED,      A GENEROUS AMOUNT OF GOLD WILL  BE AWARDED BY THE M.C.(ыЗ"  HOWEVER, UPON A CHARACTER'S    DEATH, ALL GOODS ON THE CHAR-   -ACTER AT THAT TIME WILL       BECOME THE PROPERTY OF THE M.C.":Бж150)<-З" YOU, THE PLAYER, WILL RESOLVE  ALL COMBAT THAT TAKES PLACE IN  THE ARENA.)O1З:З" COMMANDS:)Х2З"[1] FOR DICE ROLLS, HIT <D>.":З"[2] FOR A NEW MONSTER, HIT <N>.)╗4З"[3] IF YOU KILL A MONSTER, <K>.)с6З"[4] IF A MONSTER SLAYS YOU, <S>*7З"[5] TO LEAVE ARENA, <L>.*&<З"[6] TO STORM CONTROL ROOM, <C>.*P=З"[7] CHECK INVENTORY --- <I>.":Бж150*пAЗ"THE MASTER CONTROLLER IS A      WIZARD BORED OF THE MUDANE AND  IS HIGHLY ENTERTAINED BY+sFЗ"WATCHING LIFE & DEATH BATTLES.":З"  HE OBSERVES THE FIGHTING BY   MAGICAL MEANS IN THE CONTROL    ROOM. OCCASIONALLY, THE M.C.    MAY BE AMUSED ENOUGH TO AWARD   YOU A MAGICICAL ARTIFACT...+╨KЗ"  THE ARENA IS BEST PLAYED AS   A HELPER FOR THE DUNGEON MASTER BUT ALSO DOES WELL FOR+єMЗ"SOLITARY PLAY.":З:Бж150:Бе20+■PБж1200,дUЗ" YOU ARE IN A LARGE 100' BY 100' ROOM. THE WALLS HAVE MANY      CLOSED COMPARTMENTS IN THEM.    BEHIND YOU IS THE EXIT, AND TO  THE RIGHT IS A LARGE IRON DOOR.-?bБж910:З" OPTIONS:   <D>ICE ROLLS":Зд12);"<N>EW MONSTER":Зд12)"<K>ILL":Зд12);"<C>ONTROL ROOM":Зд12);"<S>LAIN":Зд12);"<L>EAVE ARENA":Зд12);"<I>NVENTORY"-TlQ$│ Т:ЕQ$│""з108-pvЕQ$│"D"░M▓0зБж200:Бе757-ЕАЕQ$│"L" ░M▓0з300-ХКЕQ$│"C"з400-йМЕQ$│"S"░M▓0з600-╜ОЕQ$│"K"░N│0з700-╤РЕQ$│"N"░N│1з750-ёТЕQ$│"I"зБж2000:ЕN│0з758:Д80.Ф╔"T30O5G":Бе108.,ЦЗ" any key to continue":в44539:Ю:Р.=╚Ю:ЕDD┤▓0з210.y═З@130,"HOW MANY DICE DO YOU WANT TO    ROLL (MAX. 6) ?".и╧I$│ Т:ЕI$│""з207:ДDD│ Й(I$):ЕDD▓6▒DD│0з207.╙╥Ю:З@13,"DICE MODE":З б(32,35):Т65495,0.■▄З:З@96,"D4  D6  D8  D10  D12  D20  D%"/
цЗ б(31,45)/QЁЗ@416,"<SPACEBAR> TO ROLL DICE,        <Z> TO LEAVE DICE MODE."/n·Y$│ Т:ЕY$│"Z"зТ65494,0:Р/И
ЕY$│" "за160,2:в44539/щ
J│160:АL│1еDD:З@J, Д(4)" " Д(6)" " Д(8)" " Д(10)" " Д(12)" " Д(20)" " Д(100);:J│Jл32:Л:Бе250/Ї
,Бж120003
JЗ:З" YOUR CHARACTER OPENS THE DOOR  AND LEAVES THE ARENA."0y
TЗ:З" MONSTERS DEFEATED:";SS:З" EXPERIENCE PTS.:";SSн250:аSSл1н9,60П
cЗ б(32,"-"):Бе6250д
hB$│ Т:ЕB$│""з3600╣
rЕB$│"Y"▒B$│"N"зР0╦
|╔"T30G":Бе3600ь
Р:ГSTORMING THE CONTROL ROOM?1
ХM$│"MASTER CONTROLLER"1B
ЪБж1200:З:З" YOU OPEN THE DOOR TO THE":З" CONTROL ROOM.1╝
дЗ" YOU SEE A HUGE ROOM FILLED      WITH FURNITURE AND STRANGE      OBJECTS THAT SPARK LIGHTS AND   MAKE WEIRD SOUNDS.1╠
жАK│1е2000:Л2
йЗ"   SUDDENLY, YOU SEE A BIG MEAN DARK ANGRY SHAPE MAKING ITS WAY TOWARDS YOU!2n
мЗ" THE M.C. DRAWS OUT A HUGE      WAND. YOU MUST BATTLE THE       "M$"!!!"2Ж
оЗ"(MORE---)":в445392┬
│Бж1200:З:З" *** ";M$;" ***":З" AC:0  HIT DICE:9  HP:45"2с
┤З" ATTACK: (SPELLS)":Бж9102 
╢З:З" OPTIONS:":З" <D>ICE"3O
╖З" <S>PELL ATTACK FROM THE M.C.":З" <M>.C. KILLED!?":З" <A>DVENTURER KILLED3d
╕Q$│ Т:ЕQ$│""з4403|
╣ЕQ$│"D"зБж200:Бе4353М
║ЕQ$│"S"з4603Ь
╗ЕQ$│"M"з5503м
╝ЕQ$│"A"з6003╟
╜╔"V30T99ABCDEFG":Бе4404D
╠Ю:R│ Д(4):З:З" SPELL ATTACK!":ЕR│1зЗ" NINE DICE LIGHTENING BOLT!!!":З" 28 PTS. DAMAGE!":З" IF SAVE V.S. SPELLS, 14 PTS."4Х
═ЕR│2зЗ" fear SPELL!!!":З" SAVE VS SPELLS OR FLEE ARENA!!":Бж1850:ЕB$│"N"з30050
╧ЕR│3зЗ" CURSE SPELL!!!":З" SAVE VS SPELLS OR LOSE ONE":З" POINT OF CHARISMA!":Бж1850:ЕB$│"N"зЗ"SUBTRACT ONE POINT FROM YOUR    chr SCORE!":АL│1е2000:Л5o
╨ЕR│4зЗ" CONE OF COLD!!!":З" 30 PTS. DAMAGE (1/2 IF SAVED)"5З
╤а199,3:в44539:Бе4355▓&АP│1е63:Ю Д(8):аPн4,1:Л:Ю5:АL│1е3000:Л5ц'З" YOU'VE OVERTHROWN THE ARENA!!!!":З б(32,"#")6g+З" IN THE CONTROL ROOM, YOU FIND  A STRANGE WHITE OBJECT WITH MANYKEYS OF LETTERS. CONNECTED TO   THIS IS A MAGICAL BOX WITH6▓,З"ARCANE LORE ENSCRIBED ON THE    SURFACE. THE LAST LINE READS:":Бж1506э-Ю3:З"YOU ALSO FIND "2000л Д(500)" GP.,":З" A DAGGER +37.З" A SCARAB OF PROTECTION":З" A BAG OF TRICKS7h0З" A CRYSTAL BALL AND A JEWELED      CHALICE WORTH "(Sл1)н1000" GP."7Ч:З б(32,"#"):З"YOU ARE NOW A LEGEND!":Бе6257╖D╔"V3T155CCD":Е Т│"R"зО:Д5807╧W:ГTHAT'S ALL, FOLKS7ьXЮ:З:З" THE ";M$;" KILLS"8]З" YOUR CHARAC г&1
В COPYRIGHT (C) T&D SOFTWARE 1986    bi ins&@
В "BI INS"'0Ю:З" business inventory instructions ":З" THIS PROGRAM ALLOWS THE STORAGEAND RETRIEVAL OF UP TO 300 ITEMSIN EACH OF 5 DATA FILES FOR A   TOTAL OF 1500 DIFFERENT ITEMS.  EACH ITEM IS IDENTIFIED BY ITS  STOCK #(MAX 10 CHARACTERS LONG).";'ЇЗ"EACH ITEM IS ALLOWED A DESCRIP- TION OF UP TO 20 CHAR'S, A STORECOST(MAX 9999.99), A SALE PRICE (MAX 9999.99), AND A QUANTITY   (MAX 9999). THE PROGRAMS MAIN   MENU GIVES YOU THE OPTION TO"(└(Бж190:З" LOAD DATA, SAVE DATA, ADD A NEWITEM, DELETE AN ITEM, CHANGE AN ITEMS QUANTITY, EDIT ANY ITEMS  INFORMATION, PRINT INVENTORY,   DISPLAY INVENTORY, ENTER INITIALINVENTORY INFORMATION, OR END.")ж2З"THE PROGRAM WORKS WITH ONLY ONE DATA FILE AT A TIME. WHEN YOU   GET READY TO START ENTERING YOURINVENTORY, YOU SHOULD CHOOSE THEINITIAL INVENTORY OPTION AND    THEN OPT TO CREATE NEW DATA     FILES. BE SURE TO NEVER CREATE")╘<З"NEW FILES AGAIN ON THE SAME DISK":Бж190*║FЗ"IF YOU DON'T WANT YOUR INVENTORYERASED.AFTER CREATING NEW FILES,SELECT THE DATA FILE YOU WANT   THE INV TO GO IN. THEN START    ENTERING THE INV. WHEN THROUGH, YOU HAVE THE OPTION TO SORT THEMNUMERICALLY BY THEIR STOCK #'S"+бPЗ"(IF YOU DIDN'T ENTER THEM IN    NUM ORDER), OR TO CONTINUE. ONLYIF YOUR STOCK #'S ARE PURE #'S  (USING ONLY 0-9) CAN YOU USE THESORT OPTION. (THE SAME HOLDS    TRUE FOR WHEN YOU ADD NEW ITEMS TO YOUR INV.) YOU CAN THEN SAVE",iZБж190:З" IT OR GO TO THE MENU TO THEN   CHOOSE THE EDIT OPTION TO CHANGEYOUR MISTAKES AND THEN SAVE IT. YOU SHOULD ONLY USE THE INITIAL INVENTORY OPTION ONCE FOR EACH  DATA FILE. AFTER THAT, YOU"-MdЗ"SHOULD LOAD THE CORRECT DATA    FILE AND THEN USE THE 'ADD ITEM'OPTION TO CONTINUE EXPANDING THEINV FOR THAT FILE, AND THEN SAVETHE REVISED INV. WHEN YOU WANT  TO PRINTOUT THE INV, YOU NEED TOFIRST SAVE THE INV IF YOU'VE"-vnЗ"MADE ANY CHANGES, AND THEN ":Бж190.\xЗ" SELECT THE DATA FILE TO START  AT AND THE DATA FILE TO END AT. FOR THIS REASON, YOU SHOULD PRO-GRESS FROM ONE DATA FILE TO THE NEXT WHEN ENTERING YOUR INITIAL INV'S. THE PRINTOUT WILL SHOW   YOUR STORE NAME, THE DATE, AND"/@ВЗ"ALL THE INV INFO, INCLUDING THE PROFIT MARGIN (THE AMOUNT THE   SALE PRICE EXCEEDS THE STORE    COST,DIVIDED BY THE STORE COST).IF YOU HAVE MORE THAN ONE DATA  FILE PRINTED, THEN A BLANK LINE WILL SEPERATE EACH DATA FILE"0/МБж190:З" ON THE PRINTOUT. AT THE END OF THE PRINTOUT, UNDER THE SALE    PRICE COLUMN THE TOTAL OF ALL   THE ITEMS PRICES TIMES THE QTY'SWILL BE PRINTED. AND UNDER THE  $ TOTAL COLUMN THE SUM OF ALL   THE COST TOTALS WILL BE PRINTED.";1ЦЗ"THE DATA FILES WILL OCCUPY 40   GRANULES ON YOUR DISK, SO BE    SURE THERE'S ROOM FOR THEM. DO  NOT SAVE ANYTHING ELSE TO YOUR  INV DISK ONCE YOU'VE STARTED    ENTERING ANY INITIAL INV. ELSE  THE DATA WILL OVERWRITE IT AS ITGROWS."2аБж190:З" YOU CAN PUT OTHER FILES ON IT  BEFORE YOU START IT, THOUGH. BE SURE TO OCCASIONALLY SAVE YOUR  DATA FILES TO ANOTHER DISK THATSHAD THE PROGRAM CREATE THE FILESINITIALLY. THIS PROGRAM IS FOR  64K COCO'S WITH A DISK DRIVE."2]кЗ@384," PRESS enter TO LOAD 'BUS INV'.";:╗ЙX$:З@384,"   -NOW LOADING 'BUS INV'-"2l┤О"BUS INV"2в╛З@479," ";:╗Й"  PRESS enter TO CONTINUE. ";X$:Ю:РTHATSHAD THE PROGRAM CREATE THE FILESINITIALLY. THIS PROGRAM IS FOR  64K COCO'S WITH A DIS                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 *В&'
:ГCOPYRIGHT (C) T&D SOFTWARE 1986&2Бе 970&CТ359,57:┐0,1&╦(Ю:З@73,"*** menu ***":З@132,"1. DISCLAIMER":З@164,"2. LOADING INSTRUCTIONS":З@196,"3. PMODES AND PCLEARS":З@228,"4. *** ERRORS ***"'G2З@260,"5. SUBMISSION INFORMATION":З@292,"6. PRODUCT PRICE INFO.":З@324,"7. CHATTER!":З@356,"8. END":З@425,"ENTER (1-8)"'|<I$│ Т:Е I$│""з60 :ДЕ  Й(I$)┤9 ░  Й(I$)▓0з70 :Д60'нFI│ Й(I$):ИI Бе80,220,580,290,130,490,700,650'┤P:Г(NZЮ:З@40,"T & D SOFTWARE";:З@71,"HOLLAND MICHIGAN";:З@130,"REPRODUCTION OF ANY OF THE       FOLLOWING IS PROHIBITED.":З@194,"T & D SOFTWARE SHALL HAVE"(ьdЗ@226,"NO LIABILITY OR RESPONSIB-      ILITY TO CUSTOMER WITH RE-       SPECT TO ERROR, LOSS, OR         DAMAGES CAUSED BY THESE               PROGRAMS.")(nЗ@421,"COCO CASSETTE NO. 50                AUGUST 1986")7xБж680:Бе40)TВ:ГSUBMISSION INFORMATION*>МЮ:З@5,"submission information":З@64," T & D SOFTWARE PRODUCES 70% OF  ITS PROGRAMS 'IN HOUSE' OR      FROM AUTHORS LOCATED IN HOL-    LAND MICHIGAN.  THEREFORE,      ONLY ONE TO FIVE PROGRAMS ARE   PURCHASED EACH MONTH FROM OUT-"*╖ЦЗ" SIDERS.":З" WE PREFER TO OFFER SUBSCRIP-    TIONS INSTEAD OF MONEY BUT WE   SOMETIMES OFFER MONEY AS WELL.":Бж660+mаЮ:З@33,"procedure:":З" SIMPLY SEND YOUR PROGRAMS IN    (ON DISKETTE OR CASSETTE) ALONG WITH INSTRUCTIONS.  WE WILL TRY TO DECIDE IF WE CAN USE THEM    WITHIN FIVE WORKING DAYS.",DкЗ@224," IF WE CAN USE THE PROGRAM(S) WE WILL MAKE YOU AN OFFER.  IF WE  CANNOT USE THE PROGRAM WE WILL  SEND YOU THE TAPE OR DISKETTE   BACK ALONG WITH A SHORT EXPLA-  NATION OF WHY WE COULD NOT USE  IT.":Бж660,┘┤Ю:З@32," program suggestions:":З@96," WE USUALLY NEED HELP WITH       ADVENTURES, HOME FINANCE, AND   UTILITIES.  GAMES ARE ALSO      WELCOMED."-\╛З@256," WE PREFER PROGRAMS WHICH ARE    COMPLETE, BUG FREE, HUMOROUS,   AND WORK WITH A 16K EXTENDED    COLOR COMPUTER.":Бж660-я╚Ю:З@32," we need your programs":З@128," YOU PROBALBLY HAVE A BUNCH OF   PROGRAMS COLLECTING DUST SOME-  WHERE.  WE WOULD LOVE TO SEE    THEM!".Z╥З" WHO KNOWS?  IT MIGHT BE WORTH   A LOT MORE THAN THE $.37 IT     WILL COST TO SEND THEM.":Бж680:Бе40.u▄:ГLOADING INSTRUCTIONS/RцЮ:З@6,"loading instructions":З@96," AFTER REWINDING THE CASSETTE    TAPE, YOU SHOULD ZERO YOUR TAPE COUNTER.  TAPE COUNTER LOCA-    TIONS FOR THE PROGRAMS ARE      GIVEN FOR TWO POPULAR RADIO     SHACK TAPE PLAYERS:"/╕ЁЗ" THE OLDER (BLACK) TAPE RECORDER - CTR-80A AND THE NEWER (GREY)  TAPE RECORDER - CCR-81.":Бж6600Щ·Ю:З@6,"loading instructions";:З@32," WE USE A 60 MINUTE TAPE WHICH   ALLOWS US TO PUT EACH PROGRAM   ON TWO TIMES AND SOMETIMES EVEN THREE. IF THE FIRST COPY WILL   NOT LOAD BECAUSE OF AN ?IO      ERROR, TRY THE OTHERS."1{
З" PLEASE ASSUME THAT EACH PROGRAM IS WRITTEN IN BASIC UNLESS WE   TELL YOU OTHERWISE.  SIMPLY     FAST-FORWARD TO THE DESIRED     PROGRAM AND ENTER CLOAD, OR     CLOADM IF IT IS A MACHINE LAN-  GUAGE PROGRAM.":Бж660:Бе401М
:Г IO ERRORS1е
Ю:З@12,"?io errors":1▓
":ГERRORS1═
,Ю:З@8,"*** errors ***"2@
6З@64," WE WOULD LIKE TO COVER SOME OF  THE ERRORS WHICH MIGHT OCCUR    WHEN LOADING/RUNNING OUR PRO-   GRAMS."2Ё
@З@200,"1. ?FC ERROR":З@232,"2. ?FM ERROR":З@264,"3. ?IO ERROR":З@296,"4. ?OM ERROR":З@328,"5. ?OS ERROR":З@360,"6. ?SN ERROR":З@392,"7. RETURN TO MENU":З@456,"ENTER (1-7)"3
JI$│ Т:Е I$│""з330 :Д3403I
TI│ Й(I$):ЕI┤1▒I▓7з330:Д И I Бе350,370,390,430,450,470,4047
^Ю:З@7," *** fc error ***":З@96," THE ILLEGAL FUNCTION CALL WILL  HAPPEN WHEN YOU USE AN OUT OF   RANGE number WITH A basic       WORD.  FOR EXAMPLE - PMODE 5.   THIS MIGHT ALSO HAPPEN WHEN YOU TRY TO PMODE MORE THAN YOU      PCLEAR."4Е
hЗ" PLEASE REFER TO THE PMODES AND  PCLEARS IN THE MAIN MENU.":Бж680:Бе2905*
rЮ:З@7,"*** fm errors ***":З@96," BAD fILE mODE ERRORS WILL OCCUR WHEN YOU TRY TO cload A MACHINE LANGUAGE PROGRAM OR WHEN YOU    TRY TO cloadm A BASIC PROGRAM."5╩
|З:З" THIS ERROR WILL ALSO OCCUR WHEN YOU TRY TO INPUT DATA FROM A    FILE OPEN FOR OUTPUT(O), OR     PRINT DATA INTO A FILE OPEN FOR INPUT(I).":Бж680:Бе2906и
ЖЮ:З@7,"*** io errors ***":З@64," iNPUT/oUTPUT ERRORS ARE OFTEN   CAUSED BY TRYING TO LOAD A      PROGRAM FROM A BAD RECORDING OR TAPE.  THEY WILL ALSO OCCUR IF  YOU TRY TO LOAD A PROGRAM MID-  WAY THRU THE RECORDING."7n
РЗ" WE RECOMMEND THAT YOU USE THE   audio on COMMAND BEFORE YOU     ATTEMPT TO LOAD A QUESTIONABLE  PROGRAM.  LISTENING TO THE      PROGRAM LOAD MIGHT HELP IN      DIAGNOSING THE PROBLEM.":Бж6608J
ЪЮ:З@6,"*** io errors ***":З@64," SOMETIMES IT HELPS TO CHANGE    THE VOLUME OF YOUR TAPE PLAYER  WHEN TRYING TO LOAD A PROGRAM.  PLEASE REME                                                                                                                                                                                                                                                                          ┼ ├
┬─╟╚├─!"#$╟&'(┴*+├-./01├345┬7╚            INTRO50 BAS ЕBI INS  BASжBUS INV BAS%КARENA   BAS~DSKCLERKBAS)PCSURVEYBAS─TREASUREBAS,SCRENGENBASЙASTRO-S BASМNFLSCOREBAS2 NFL     DAT
 ╥BARNSTRMBAS╜BSMLMOD BIN
ЪSMASH   BIN6═                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                MBER THAT THERE ARE  AT LEAST TWO COPIES OF EACH     PROGRAM ON EACH TAPE."9$
дЗ" IF YOU CANNOT GET ANY COPIES OF ANY PROGRAM(S) TO LOAD, YOU CAN SEND THE FAULTY TAPE BACK TO US FOR A PROMPT REPLACEMENT.       PLEASE INCLUDE AN EXPLANATION   OF WHY YOU ARE RETURNING THE    TAPE.":Бж680:Бе290:
оЮ:З@7,"*** om errors ***":З@32," oUT OF mEMORY ERRORS OCCUR WHEN ALL AVAILABLE MEMORY HAS BEEN   USED OR RESERVED.  IT MIGHT     MEAN THAT YOU HAVE RESERVED TOO MUCH MEMORY FOR GRAPHICS SUCH   AS PCLEAR4 OR STRING SPACE SUCH AS CLEAR 4000.:∙
╕З" TO AVOID FRUSTRATING ?OM        ERRORS, WE RECOMMEND THAT 16K   USERS TURN THE COMPUTER OFF AND ON, THEN ENTER THE PCLEAR       STATEMENT BEFORE LOADING IN A   PROGRAM WHICH PCLEAR VALUE IS   LESS THAN 4.":Бж680:Бе290;П
┬Ю:З@6,"*** os errors ***":З@96," oUT OF sTRING SPACE ERRORS CAN  OCCUR WHEN YOUR STRING OPERA-   TIONS REQUIRE MORE MEMORY THAN  YOU ALLOW THEM."<
╠З:З" MAKING THE CLEAR STATEMENT      LARGER WILL HELP YOU CREATE     MORE MEMORY FOR YOUR STRING     SPACE.":Бж680:Бе290<ё
╓Ю:З@6,"*** sn errors ***":З@96," sYnTAX ERRORS RESULT FROM A LOT OF THINGS INCLUDING MISPELLED   COMMANDS OR ILLEGAL CHARACTERS. SOMETIMES THE COMPUTER WILL     TELL YOU THERE IS A ?SN ERROR   IN A LINE YOU KNOW IS CORRECT."={
рЗ" USUALLY YOU CAN RUN THE PRO-    GRAM AGAIN AND IT WORKS FINE.   SOMETIMES IT HELPS IF YOU RE-   TYPE THE ENTIRE LINE.":Бж680:Бе290=У
ъ:ГPRICE INFORMATION>&
ЇЮ:З@7,"price information":З@299,"SEND TO:":З@328,"T & D SOFTWARE":З@360,"P.O. BOX 256-C":З@391,"HOLLAND MI 49423" :З@422,"TEL. (616) 396-7577">@
∙З@113,"tape    disk";>╣
■З@130,"1 YEAR******* $70.00  $70.00":З@162,"6 MONTHS***** $40.00  $40.00":З@194,"SINGLE ISSUE* $ 9.00  $ 9.00":A│159>├Бж660?А&S$│ Л(128):Ю(3):З@7,"computer cassettes";:З@69,"*** 5 screw shell ***";:З@101,"***  free labels  ***";:З@133,"** error free tape **";:З@165,"* immediate shipping*";:З@235,"item price";?√0З@267,"c-10  .59";:З@299,"c-20  .69";:З@331,"c-60  .85";:З@363,"c-90  .99";:З@395,"case  .18";:З@425,"shipping $3.00";@2Бж660:Бж870@'CЮ:Бе40:Г END PRICE INFO@=D:ГPMODE + PCLEARSA!NЮ:З@8,"pmodes + pclears":З@64," THE NORMAL MEMORY AREA IS       LARGE ENOUGH FOR TEXT (LETTERS  AND NUMBERS) BUT NOT FOR GRA-   PHICS (CIRCLES, LINES, ETC.).   THE COLOR COMPUTER MAKES IT     POSSIBLE TO SET ASIDE ROOM FOR"A╫XЗ" GRAPHICS WITH THE pmode AND     pclear  COMMANDS.  GENERALLY,   THE HIGHER THE pmode VALUE,     THE MORE DISTINCT THE GRAPHICS  AND THE MORE MEMORY IS RE-      QUIRED.":Бж660B║bЮ:З@8,"pmodes and pclears":З@64," WHEN YOU FIRST FIRE UP THE      COLOR COMPUTER, THE PCLEAR      VALUE IS 4.  THEREFORE, ANY     PROGRAM OF OURS THAT HAS A      PCLEAR VALUE OF 4 SHOULD LOAD   AND RUN WITH NO DIFFICULTY "CSlЗ" WITH RESPECT TO pmodes AND      pclears.":З" THE PROGRAMS THAT MIGHT CAUSE   YOU PROBLEMS ARE THOSE WITH     pclear VALUES OF LESS THAN 4.":Бж660DvЮ:З@8,"pmodes and pclears":З@64," IF YOU HAVE ANY DOUBTS ABOUT    WHETHER OR NOT A PROGRAM WILL   LOAD OR RUN SUCCESSFULLY WE     RECOMMEND THE FOLLOWING PRO-    CEDURE:"D╣АЗ" (1) TURN YOUR COMPUTER OFF AND  ON.":З" (2) ENTER DIRECTLY FROM THE     KEYBOARD THE pclear VALUE FOL-  LOWED BY THE pmode VALUE.":З" (3) LOAD AND RUN THE PROGRAM.":Бж680:Бе40D╩КТ359,126:Ю:КDёФЗ@483,"press any key to continue";E
ЮI$│ Т:Е I$│""з 670 :Д РEVиЗ@484,"press";:З@490,"any";:З@494,"key";:З@498,"to";:З@501,"return";Er▓I$│ Т:Е I$│""з 690 :Д РEА╝:ГCHATTEREЖ╞ЮFE╨З@8,"*** chatter ***":З@64," IF YOU HAVE ANYTHING TO SELL,   (NON COMMERCIAL), TRADE OR      ANNOUNCE OR IF YOU JUST WISH    TO SAY 'HI' TO SOMEONE THEN WE  WOULD LIKE TO HEAR ABOUT IT."G,┌З" IT WON'T COST YOU ANYTHING BUT  ALL THAT WE ASK IS THAT YOU     SUBMIT YOUR 'CHATTER' BY THE    30TH OF THE MONTH PRIOR TO THE  NEXT ISSUE.  FOR EXAMPLE: IF    YOUR CHATTER ARRIVES BY THE     30TH OF JANUARY, WE CAN GET IT"GVфЗ" INTO OUR FEBRUARY EDITION.";:Бж660GdюЮ:Бж960:ЗHJЁЗ"  1. I AM INTERESTED IN TRAD-        ING PROGRAMS, UTILITIES,        SIMULATIONS, ADVENTURES,        HOME MANAGEMENT, ETC.           ANYONE INTERESTED SEND          WANTS AND A LIST OF YOUR        PROGRAMS OR SAMPLES TO:":ЗH┤ЄЗ"       JIM MCDOWELL                    4-C RECTOR COURT                WILMINGTON, DE  19810":Бж660H┬°Ю:Бж960:ЗIt·З"  2. looking for coco pen-pal        I HAVE A 16K EXT. COM-          PUTER, TAPE RECORDER,           PRINTER, AND LOTS AND           LOTS OF PROGRAMS TO TRADE       WITH."IЎ№З"     IF YOU ARE READING THIS         AND ARE INTERESTED IN A         NICE, GREAT FABULOUS            PEN-PAL, WRITE TO ME!"JY■З"       MICHAEL ALBERT                  661 NEPTUNE BLVD                LONG BEACH, NY 11561"JcБж660JqЮ:Бж960:ЗKЗ"  3. pen pals - I AM A COLOR         COMPUTER USER AND WOULD         LIKE TO CORRESPOND WITH         ALL COLOR COMPUTER NUTS         OUT THERE! MY ADDRESS:":ЗK|З"       RICH BUSSE                      2501 HODGES AVE                 GRANITE CITY, IL  62040"KЖ
Бж660K┌eЮ:Бе40:Г END OF CHATTER *********************************  START OF SUBROUTINESL&fЮ:З@0,"     $$$ bulk diskettes $$$":З:З"  quant     price     shipping"LыpЗ"   1-15     $1.20       $1.75     16-35      1.15        2.00     36-75      1.00        2.25     76-199      .95        3.00    200-499      .80        3.75    500-?        .70        5.00"MzЗ" ADD $.10 EA FOR BLANK SLEEVES"MДЗ:Зд4)"T & D COMPUTER PRODUCTS":Зд8)"P.O. BOX 256-C":Зд7)"HOLLAND MI 49423":Зд8)"(616) 396-7577";:Бж660:РMЭ└Ю:З@8,"*** chatter ***":РMм╩╚0:└1:Бе30IК/@ ~1~А~oНОoНЛoНЕжНБ╞ =уН{├
жДБ@%А@╞=0НЭ0Л1Нc╞жАзаZ&∙жНS╞└=эНVжНH╞└=уНK├`╙║
OцН70Л╞1Н0жакДзД0И Z&ЇжНLзНБ &ПoНжНLзНБ& |9@Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є<B:JJ<"">""|""<""|"   "|"""""|>  <  >>  <   "  &"""">"""B<""$8$""      >"6*""""""2*&"">"""""><""<   """*$<""<$""" ">""""""""""""""*6""""""""> >8     8@ 
*I ~ ?? |qRt%G">>>0
 @"&*2"">""$D~>  <<" <"">""""""">>  "



 ╨Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є Є?? |qRt%G">>>0
 @"&*2"">""$D~                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 З&2
В COPYRIGHT (C) T&D SOFTWARE 1986    bus inv&t
:ГBUS INV' BY MIKE FORREST,    1521 LANCELOT, BORGER TX 79007&Л╚0:└1:Х12741,32767&╗М SN$(300),ID$(300),QT(300),CT(300),SP(300)'g(Ю:З@7,"business inventory":З@45,"menu":З:Зд6)"0) LOAD INVENTORY":Зд6)"1) SAVE REVISED INV.":Зд6)"2) ADD AN ITEM TO INV.":Зд6)"3) DELETE AN ITEM":Зд6)"4) CHANGE A QTY."(2Т65494,0:Зд6)"5) EDIT":Зд6)"6) PRINT INVENTORY":Зд6)"7) DISPLAY INVENTORY":Зд6)"8) INITIAL INVENTORY":Зд6)"9) END":З@486,"SELECT OPTION (0-9) "; Л(143л112);:Y│299(;<S$│ Т:ЕS$│""з60:ДЕ К(S$)┤48▒ К(S$)▓57з60(ЗFЕS$┤▓"0"░S$┤▓"6"░ Й(S$)┤8░I│0зЗ@450,"(YOU NEED TO LOAD THE INV.)";:Бе60(┬PS│ Й(S$)л1:ИS Бе850,90,100,200,240,300,420,540,650,820(╙ZЮ:Бж800:Бе40)3dЮ:З" add item : "YмIм1"FREE SPACES.":З:Й" STOCK # ";SN$(Y):╗Й" DESCR.   ?";ID$(Y):E│Y:Бж930)нnЙ" QUANTITY";QT(Y):Й" STORE COST";CT(Y):Й" SALE PRICE";SP(Y):З" ADD ANOTHER ITEM? ";:Бж830:ЕK$│"Y"зЕY▓Iл2зY│Yм1:Бе100*
xЗ" SORT NEW ITEMS NUMERICALLY"," INTO OLD LIST? ";:Бж830:ЕK$│"N"зТ65495,0:Бе180*'ВТ65495,0:З" NOW SORTING...":Z│Yм1*9МZ│Zл1:АX│0е I*оЦЕ Й(SN$(X))┤│ Й(SN$(Z))зЛ X:I│Iл1:SN$(I)│SN$(Z):ID$(I)│ID$(Z):QT(I)│QT(Z):CT(I)│CT(Z):SP(I)│SP(Z):ЕZ┤299з140:Д40+аАW│I еX йм1:SN$(Wл1)│SN$(W):ID$(Wл1)│ID$(W):QT(Wл1)│QT(W):CT(Wл1)│CT(W):SP(Wл1)│SP(W):ЛW+dкI│Iл1:SN$(X)│SN$(Z):ID$(X)│ID$(Z):QT(X)│QT(Z):CT(X)│CT(Z):SP(X)│SP(Z):ЕZ┤299з140:Д40,/┤W│300:АZ│Y е Б(Yл(299мY)о2):W│Wм1:SN$│SN$(W):ID$│ID$(W):QT│QT(W):CT│CT(W):SP│SP(W):SN$(W)│SN$(Z):ID$(W)│ID$(Z):QT(W)│QT(Z):SP(W)│SP(Z):CT(W)│CT(Z):SN$(Z)│SN$:ID$(Z)│ID$:QT(Z)│QT:SP(Z)│SP:CT(Z)│CT:ЛZ,Л╛АZ│Y е299:I│Iл1:SN$(I)│SN$(Z):ID$(I)│ID$(Z):QT(I)│QT(Z):CT(I)│CT(Z):SP(I)│SP(Z):ЛZ:Бе40,┐╚Ю:З" delete item":З:╗Й" STOCK #";SN$:З:Т65495,0,ь╥АX│0еI:ЕSN$(X)│SN$ з220:Д ЛX:Бж910:Бе200-Q▄АY│X е Iм1:SN$(Y)│SN$(Yл1):ID$(Y)│ID$(Yл1):QT(Y)│QT(Yл1):CT(Y)│CT(Yл1):SP(Y)│SP(Yл1):ЛY:Т65494,0-МцI│Iм1:З" DELETE ANOTHER ONE ? ";:Бж830:ЕK$│"Y"з200:Д40-щЁЮ:З" change quantity":З:Й" STOCK #";SN$:Т65495,0:АX│0еI:ЕSN$(X)│SN$з250:ДЛ X:Бж910:Бе240.#·З" PRESENT QTY->"QT(X):З" aDD OR sUBTRACT ?":Т65494,0.K
K$│ Т:ЕK$│"A"з270:ДЕK$│"S"з280:Д260.t
З@127," ";:Й" ADD HOW MANY";CQ:Бе290.г
З@127," ";:Й" SUBTRACT HOW MANY";CQ:CQ│мCQ.¤
"QT(X)│QT(X)лCQ:З" NEW QTY->"QT(X):З"CHANGE ANOTHER QUANTITY? ";:Бж830:ЕK$│"Y"з240:Д40//
,Ю:З" edit an item":З:Й" STOCK #";SN$:Т65495,0/]
6АX│0еI:ЕSN$(X)│SN$ з320 :Д ЛX:Бж910:Бе300/ы
@Ю:З" edit an item":З:Т65494,0:З" 1) STOCK # - "SN$(X):З" 2) DSCR - ";ID$(X):З" 3) QTY  - "QT(X):З" 4) STORE COST - ";:З═"$$####.##";CT(X)0q
JЗ" 5) SALE PRICE - ";:З═"$$####.##";SP(X):З:З" CHANGE WHICH ONE? (1-5) "," (PRESS ^ TO EXIT, OR e TO EDIT  ANOTHER) "; Л(143л112)0╜
TK$│ Т:ЕK$│""з340 :ДЕ K$│"^"з40 :ДЕK$│"E"з300:ДЕ  Й(K$)▓5 ▒ Й(K$)┤1 з3400ц
^Y│ Й(K$):З:И Y Бе360,370,380,390,4001
hЙ" NEW STOCK # ";SN$(X):Бе41013
r╗Й" NEW DESCR.";ID$(X):E│X:Бж930:Бе4101P
|Й" NEW QTY ";QT(X):Бе4101t
ЖЙ" NEW STORE COST ";CT(X):Бе4101Ш
РЙ" NEW SALE PRICE ";SP(X):Бе4101м
ЪЗ@320," ":Бе3202
дЮ:З"HAVE YOU ALREADY SAVED THE DATA YOU HAVE JUST FINISHED ENTERING?";:Бж830:ЕK$│"N"з402и
оЮ:З:З"WHATS YOUR STORE NAME?":╗ЙCN$:З:╗Й"TODAYS DATE ? MN-DY-YR ";DT$:Й"FIRST DATA FILE TO BE PRINTED ? (1-5)";W:Й"LAST DATA FILE TO BE PRINTED ?  (1-5)";Z2╘
╕╗Й"PRESS enter IF PRINTER IS READY.";X$3 
┬З#м2:З#м2,д25м( Б( З(CN$)о2)))CN$" INVENTORY.   DATE -> ";DT$:З#м2:З#м23{
╠З#м2,"  STOCK #     ITEM DESCRIPTION   QTY COST/EA SALE PRICE $ TOTAL % PROFIT MARGIN"3▄
╓З#м2,"----------- -------------------- --- ------- ---------- ------- ---------------":Y│Wм14
рY│Yл1:F$│"INVDATA"л П( И(Y),1):Бж8604a
ъАX│0еI:ЕSN$(X)│""▒SN$(X)│"0000000000"з520 :ДSN$│ П("         "лSN$(X),10):З#м2,SN$;" ";4ё
ЇЗ#м2,═" %                  %";ID$(X);:З#м2,═"#### ";QT(X);:З#м2,═"####.##  ";CT(X);:З#м2,═"#####.##  ";SP(X);:З#м2,═"####.## ";QT(X)нCT(X);5>
■Бж900:З#м2,═"    #### ";MG;:З#м2,"%":ST│SP(X)нQT(X)лST:TT│TTлQT(X)нCT(X)5\Л X:ЕY│Z з530:ДЗ#м2:Бе4805╩З#м2, б(79, Л(45)):З#м2, б(43," ");:З#м2,═"  ######.##";ST;:З#м2,═"######.##";TT:З#м2:З#м2:ST│0:TT│0:Бе406Ю:З"display inventory":З:Й" 1ST STOCK # TO BE DISPLAYED ?  ";SN$6O&Т65495,0:АW│0еI:ЕSN$(W)│SN$зТ65494,0:Бе560:ДЛ W:Бж910:Бе5406q0АX│W еI й2:Ю:З:ЕSN$(X)│""з6007:З@64," stock # ";SN$(X):З" DESCR. ";ID$(X):З" QUANTITY ";QT(X):З" STORE COST ";:З═"$$####.##";CT(X):З" SALE PRICE ";:З═"$$####.##";SP(X):З" $ TOTAL ";7-DЗ═"   $$####.##";QT(X)нCT(X)7iNБж900:З" PROFIT MARGIN   ";MG;"%":ЕSN$(Xл1)│""▒X│I з6208+XЗ" stock # ";SN$(Xл1):З" DESCR. ";ID$(Xл1):З" QUANTITY ";QT(Xл1):З" STORE COST ";:З═"$$####.##";CT(Xл1):З" SALE PRICE ";:З═"$$####.##";SP(Xл1):З" $ TOTAL ";:З═"   $$####.##";QT(Xл1)нCT(Xл1)8]bX│Xл1:Бж900:X│Xм1:З" PROFIT MARGIN   ";MG;"%"8░lЗ@480," PRESS enter FOR NEXT TWO ITEMS, OR ^ TO RETURN TO MENU. "; Л(143л112);8▐vK$│ Т:ЕK$│ Л(13) з Л X :ДЕK$│"^"з40 :Д6308чАБе409)КЮ:З" CREATE NEW DATA FILES ON DISK?  ";:Бж830:ЕK$│"Y"зБж950:Х9uФЮ:З"initial inventory":З" WHAT DATA FILE WILL THIS GO IN? (1-5)?":Бж9209ыЮSN$(0)│"":АI│1 е299 й2:Ю:З" initial inv.";300мI;"SPACES LEFT.":З@448,"enter nothing for stk# when thru";:З@62," ":ПиC│1:╗Й" STOCK #  ?";SN$(I):ЕSN$(I)│""з700:Д ╗Й" DESCR.   ?";ID$(I):Й" QUANTITY ";QT(I):Й" STORE COST ";CT(I):Й" SALE PRICE ";SP(I):З:E│I:Бж930:ЕI│299зC│0:Бе700;2▓C│0:╗Й" STOCK #  ?";SN$(Iл1):ЕSN$(Iл1)│""з700:Д ╗Й" DESCR.   ?";ID$(Iл1):Й" QUANTITY ";QT(Iл1):Й" STORE COST ";CT(Iл1):Й" SALE PRICE ";SP(Iл1):E│Iл1:Бж930:Л I;Я╝I│IмC:Ю:З:З"TYPE y TO SORT THE STOCK #'S    INTO NUMERICAL ORDER, OR n TO   CONTINUE.":Бж840:ЕK$│"N"з780;┘╞З@165,"now sorting...":IN│9999999999:X│I:N│1:Т65495,0</╨АT│N е X:Е Й(SN$(T))┤IN зIN│ Й(SN$(T)):NI│T:ID$│ID$(T):QT│QT(T):CT│CT(T):SP│SP(T)<7┌Л T<фSN$(Nм1)│ Р( И(IN),2):ID$(Nм1)│ID$:QT(Nм1)│QT:CT(Nм1)│CT:SP(Nм1)│SP<▄юSN$(NI)│SN$(N):ID$(NI)│ID$(N):QT(NI)│QT(N):CT(NI)│CT(N):SP(NI)│SP(N):SN$(N)│"9999999999"=°IN│9999999999:N│Nл1:ЕN┤Xл1 з720=2З:З" through sorting.":Т65494,0:а100,15:I│Iм1=pЮ:З" ready to save inventory ?";:Бж830:ЕK$│"Y"зБж800:Бе40=╦З"TYPE y FOR MENU,OR n TO CONTINUEINITIAL INVENTORY.":Бж840:ЕK$│"Y"з40:ДЕC│1 з680:Д690=∙ З:З" NOW SAVING DATA TO FILE # "; П(F$,1)>=*Щ"O",#1,F$:АT│0еI:┘#1,SN$(T),ID$(T),QT(T),CT(T),SP(T):Л T:Ъ#1:Р>с4Ю:З:З" IF YOU HAVE ALREADY SAVED THE   REVISED INVENTORY THEN YOU CAN  PRESS  y  TO END, OTHERWISE     PRESS  n  TO RETURN TO MENU.    ":Бж840:ЕK$│"Y"зЮ:К :Д40>ю>З"(Y/N)"?HK$│ Т:ЕK$│"Y"▒K$│"N"зР :Д840?TRЮ:З:З" LOAD DATA FROM WHICH FILE?      (1-5) ?":Бж920:Бж860:Бе40?g\I│0:Щ"I",#1,F$?ПfЙ#1,SN$(I),ID$(I),QT(I),CT(I),SP(I)?мpЕ  М(1)з890:ДI│Iл1:Бе870?╢zЪ#1:Р?█ДMG│ Б((SP(X)мCT(X))оCT(X)н100):Р?■ОЗ"STOCK # NOT FOUND.":а50,15:Р@FШK$│ Т:ЕK$│""з920:ДЕ Й(K$)┤1▒ Й(K$)▓5з920:ДF$│"INVDATA"лK$:З" ";K$:Р@_вID$(E)│ О(ID$(E),20)@гмАT│1е20:Е Р(ID$(E),T,1)│ Л(34)з Р(ID$(E),T,1)│ Л(105):Л:Р :ДЛ:Р@ч╢З" CREATING DATA FILE #...":АX│1е5:X$│"INVDATA"л П( И(X),1):ЗX;AЖ└Щ"O",#1,X$:АY│0е299:SN$(Y)│"0000000000":ID$(Y)│"ANYTHING YOU WANT TO":QT(Y)│99:CT(Y)│1000.45:SP(Y)│1100.45:┘#1,SN$(Y),ID$(Y),QT(Y),CT(Y),SP(Y):ЛY:Ъ#1:ЛX:Р(E),T,1)│ Л(105):Л:Р :ДЛ:Р@ч╢З" CREATING DATA FILE #...":АX│1е5:X$│"INVDATA"л П( И(X),1):ЗX;AЖ└Щ"O",#1,X$:АY│0е299                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
&S
В COPYRIGHT (C) T&D SOFTWARE  1986     disk clerk                         RDG&b╚0:Бе60000&wВ READ DIRECTORY&S│3&╗▀ DV,17,S,S1$,S2$:SC$│S1$л О(S2$,127):S1$│"":S2$│"":P│0'8CD│ К( Р(SC$,Pн32л1)):Е CD│255 зР :ДЕCD┤▓0 з NF│NFл1:FL$(NF)│ Р(SC$,Pн32л1,8)л"."л Р(SC$,Pн32л9,3):АK│0е2:FD$(NF,K)│"":Л'[P│Pл1:ЕP┤8 з6 :ДS│Sл1:ЕS┤12 з5'aР'r
F│0:ЕNF│0 зР'ШАI│1 е NF:ЕFL$(I)│SR$ з F│I:I│100'аЛ:Р'ў
TF$│"":АI│1е12:A│ К( Р(FL$(AB),I)):ЕA▓64 ░ A┤91 з TF$│TF$л Л(Aл32) :ДTF$│TF$л Л(A)' Л:Р(7CA│CYн32л32лCX:C│ Ж(CAл1024):ЕC▓63 зQ│Cм64 :ДQ│Cл64(=Р({Х6000:╤2,256:CH$│ Л(255):М FL$(72),FD$(72,2),TF$(72):NF│0(ЖБж8000(╓Бж4000:Ю:З@232,"reading disk...";:Бж3:SR$│"FILEDESC.DAT":Бж10:ЕF│0 з30 :Д40)_NF│NFл1:FL$(NF)│"FILEDESC.DAT":FD$(NF,0)│"THIS RELATIVE DATA FILE":FD$(NF,1)│"CONTAINS FILENAMES AND FILE":FD$(NF,2)│"DESCRIPTIONS.")─ Бж1000:АI│1 е NF:╘ FL$│FL$(I):╘ F1$│FD$(I,0):╘ F2$│FD$(I,1):╘ F3$│FD$(I,2):NR│NRл1:┼#1,NR:Л:Бе50)Ї(АI│1 е NF:TF$(I)│FL$(I):Л:Бж1000:Е NR│0 з44*M*АR│1 е NR:─#1,R:SR$│FL$:Бж10:ЕF┤▓0 зTF$(F)│"":FD$(F,0)│F1$:FD$(F,1)│F2$:FD$(F,2)│F3$*S+Л*ж,АI│1 е NF:ЕTF$(I)┤▓"" з NR│NRл1:╘ FL$│FL$(I):╘ F1$│"":╘ F2$│"":╘ F3$│"":┼#1,NR*м.Л*╓2Ъ#1:NP│NFо14:ЕNP┤▓ Б(NP) зNP│ Б(NPл1)*▀7PN│1*ё<Ю:Бж3000:PT│1+9FSP│(PNм1)н14л1:DF│NFмSP:ЕDF┤14 з EP│SPлDF:NL│DFл1 :Д EP│SPл13:NL│14+THP│1:А I│SP е EP:Бж5000+mJЗ@AD,FL$(I);:P│Pл1:Л+ИPP│PT:Бж5000:AB│SPлPTм1+ЫQБж13:З@AD,TF$;+╧RЗ@33,FD$(AB,0);:З@65,FD$(AB,1);:З@97,FD$(AB,2);+цTK$│ Т:ЕK$│"^" з100+·UЕK$│ Л(10) з110,
VЕK$│ Л(8) з130, WЕK$│ Л(9) з120,1XЕK$│"N" з140,BYЕK$│"P" з150,SZЕK$│"H" з160,d[ЕK$│"Q" з990,u\ЕK$│"E" з200,~cБе84,йdЕPT│1 з84 :ДЗ@AD,FL$(AB);:PT│PTм1:Бе80,╒nЕPT│NL з84 :ДЗ@AD,FL$(AB);:PT│PTл1:Бе80-
xЕPT▓7 ▒ PTл7▓NL з84 :ДЗ@AD,FL$(AB);:PT│PTл7:Бе80-5ВЕPT┤8 з84 :ДЗ@AD,FL$(AB);:PT│PTм7:Бе80-SМЕPN│NP з84 :ДPN│PNл1:Бе60-pЦЕPN│1 з84 :ДPN│PNм1:Бе60-zаPD│м2-ЩвЗ#PD," Filename: ";FL$(AB)-вдЗ#PD-╡жЗ#PD,FD$(AB,0)-╚иЗ#PD,FD$(AB,1)-█кЗ#PD,FD$(AB,2)-фмЗ#PD-э│Бе84.0╚АK│0е2:L│ З(FD$(AB,K)):ЕL┤30 з FD$(AB,K)│FD$(AB,K)л б(30мL,32).6╩Л.D╠CX│1:CY│0.u╬Бж15:ТCAл1024,Q:K$│ Т:ТCAл1024,C:ЕK$│"" з206.Ж╨ЕK$│"^" з300.Ъ╥ЕK$│ Л(10) з310.н╘ЕK$│ Л(8) з320.└╓ЕK$│ Л(9) з330.╘╪ЕK$│ Л(13) з400.Ї┌K│ К(K$):ЕK▓31 ░ K┤128 з250.■▄Бе206/K· Р(FD$(AB,CY),CX,1)│K$:З@CA,K$;:CX│CXл1:ЕCX│31 зCY│CYл1:CX│1:ЕCY▓2 зCY│2/U
+Бе206/n
,ЕCY│0 з206 :ДCY│CYм1/x
5Бе206/С
6ЕCY│2 з206 :ДCY│CYл1/Ы
?Бе206/┤
@ЕCX│1 з206 :ДCX│CXм1/╛
IБе206/╪
JЕCX│30 з206 :ДCX│CXл1/т
SБе20607
РБж1000:АI│1 е NF:╘ FL$│FL$(I):╘ F1$│FD$(I,0):╘ F2$│FD$(I,1):╘ F3$│FD$(I,2):┼#1,I0A
ЪЛ:Ъ#10J
єБе840i▐Ю:З@232,"ok to quit? y/n";0▀K$│ Т:ЕK$│"N" з600СрЕK$┤▓"Y" з9910ЧчК0ўшЩ"D",#1,"FILEDESC.DAT:"л Р( И(DV),2):╨#1,12  з FL$,30  з F1$,30  з F2$,30  з F3$:NR│ е(1):Р1
╨Ъ#1:Р13╕Ю:З@0, б(8,CH$);"file description"; б(8,CH$);1]┬АI│0е2:З@32лIн32,CH$; б(30,32);CH$;:Л1п╠З@128, б(4,CH$)"directory drive ";:З═"#";DV;:З" page ";:З═"#";PN;:З б(4,CH$);1┌╓АI│0е6:З@160лIн32,CH$; б(30,32);CH$;:Л2рЗ@384, б(12,CH$)"commands" б(12,CH$);26ъЗ@416,CH$" eDIT DESCRIPTION  hARD COPY  "CH$;2hЇЗ@448,CH$" qUIT                         "CH$;2ЛЎЕPN┤▓1 зЗ@455,"pREVIOUS PAGE";2л°ЕPN┤▓NP зЗ@469,"nEXT PAGE";2╦■З@480, б(31,CH$);:Т1535,2552╤Р2єаЮ:З@230,"select drive (0-3)";30кK$│ Т:ЕK$│"" з 4010 :ДK│ Й(K$):ЕK┤0 ▒ K▓3 з4010 :ДDV│K:Р3?ИЕP▓7 з50203QТAD│130лPн32:Р3gЬAD│144л(Pм7)н32:Р3б@Ю:З@202,"disk clerk";:З@260,"want instructions? y/n";3╟JK$│ Т:ЕK$│"N" зР :ДЕK$┤▓"Y" з80103╥дЮ:З@644VоЗ" DISK CLERK IS A USEFUL UTILITY  FOR KEEPING TRACK OF THOSE      DISKS WHICH CONTAIN MANY PRO-   GRAMS AND OTHER DATA FILES."5╕З" DISK CLERK ALLOWS YOU TO ENTER  A DESCRIPTION OF EACH PROGRAM   INTO A DISK DATA FILE. YOU CAN  LATER RECALL THE INFORMATION    AND DISPLAY IT, PRINT IT, OR    EDIT IT."5┬Бж90005 Ю:З@966
 З" WHEN DISK CLERK IS RUN, IT      READS IN THE DISK DIRECTORY     AND CHECKS FOR A FILE CALLED    'FILEDESC.DAT'. IF THIS FILE    IS NOT FOUND, THEN IT IS CRE-   ATED. IF THE FILE EXISTS, THEN  THE FILE DESCRIPTION DATA IS    LOADED."6 Бж90006  lЮ:З7 vЗ" DISK CLERK WILL THEN DISPLAY    THE DIRECTORY ON THE SCREEN     14 FILES AT A TIME. A SPACE     AT THE TOP OF THE SCREEN WILL   CONTAIN THE CURRENT FILE DE-    SCRIPTION. AN INVERSE BAR IS    USED TO DESIGNATE THE CURRENT   FILE."7л АЗ" THIS BAR CAN BE MOVED BY THE    FOUR ARROW KEYS. PRESSING 'N'   SHOWS THE NEXT PAGE OF FILES.   PRESSING 'P' SHOWS THE PRE-     VIOUS PAGE OF FILES."7╢ КБж90007┴ ╨Ю:З@968m ┌З" PRESSING 'H' WILL GIVE A HARD   COPY (PRINTER) OUTPUT OF THE    CURRENT FILE AND FILE DESCRIP-  TION. PRESSING 'Q' TERMINATES   THE PROGRAM NORMALLY.":Бж9000:Ю:З@649P фЗ" PRESS 'E' ALLOWS YOU TO EDIT    THE FILE DESCRIPTION OF THE     CURRENT FILE. WHILE EDITING,    THE ARROW KEYS MOVE THE CUR-    SOR, THE [ENTER] KEY ENDS       EDITING AND SAVES CHANGES, AND  PRESSING ANY OTHER KEY WILL9д юЗ" CAUSE THAT KEY TO OVER-WRITE    THE CHARACTER CURRENTLY UNDER   THE CURSOR."9п °Бж90009╡#'Р9▄#(З@484,"press [enter] to continue";9Ї#)Е Т┤▓ Л(13)з9001:ДР:ъ`└1:Бе20R] KEY ENDS       EDITING AND SAVES CHANGES, AND  PRESSING ANY OTHER KEY WILL9д юЗ" CAUSE THAT KEY TO OVER-WRITE    THE CHARACTER CURRENTLY UNDER   THE CURSOR."9п °Бж90009╡#'Р9▄#(З@484,"press [enter] to continue";9Ї#)Е Т┤▓ Л(13)з9001:ДР:ъ`└1:Бе2                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 /|&8
В COPYRIGHT (C) T&D SOFTWARE 1986    treasure hunt&?
└4&IХ2000&R╚1,1&`(╔"O1T255"&f2╝&u<МLL(14,14)&{FЮ'dPЗ"TREASURE HUNT COMES FROM THE    JUNE 1986 ISSUE OF THE COLOR    COMPUTER PROGRAMMER MONTHLY     MAGAZINE FOR COLOR COMPUTER     USERS. EVERY MONTH OUR MAGAZINE IS PACKED WITH MANY ASSEMBLY,   MACHINE, AND BASIC PROGRAMS SUCH";(
QЗ"AS TREASURE HUNT. IF YOU WOULD  LIKE A COPY OF OUR LATEST ISSUE,PLEASE SEND $1.50 TO MATT       THOMAS, 8713 MOODY ROAD,        LOUISVILLE, KY 40219."(RЗ"ONE MOMENT PLEASE..."((ZБе2230(>dЕP│1зР :Д╟2е3:P│1(En┴4(]x╗(0,0)м(255,93),╜,B(lВ├(2,2),2,4(sМ┴3(НЦ╗(2,79)м(253,91),╜,BF(Фа┴1(икZ$│P$(1):Бж3980(├┤┬(120,40),10,1,.4,0,.5(╫╛Z$│P$(2):Бж3980(щ╚├(128,48),1,1(Ё╥┴4)▄Z$│P$(3):Бж3980)цZ$│P$(4):Бж3980)(Ё╜(120,40,4))9·├(124,2),4,4)?
Р)R
ЕP┤▓9з╟2е3:P│9)Y
┴4)q
"╗(0,0)м(255,93),╜,B)А
,├(2,2),2,4)З
6┴3)б
@╗(2,79)м(253,91),╜,BF)з
JР)╝
TЕP│2зР:Д╟2е3:P│2)├
^┴4)█
h╗(0,0)м(255,93),╜,B)ъ
r├(2,2),2,4)ё
|┴1*
ЖZ$│P$(5):Бж3980*
Р├(4,89),1,1*!
ЪЕP│14зР*/
дX│20:Y│91*6
о┴4*Q
╕╗(X,Y)м(Xл4,Yм32),╜,BF*X
┬┴1*s
╠╗(X,Yм34)м(Xм8,Yм38),╜*И
╓АI│1е З(P$(6))й2*╕
рIX│ К( Р(P$(6),I,1)):IY│ К( Р(P$(6),Iл1,1))*╒
ъЕIX┤60зIX│мIX :ДIX│IXм60*р
ЇIY│мIY*Ї
■╗м(XлIX,YлIY),╜*√ЛI+├(Xл2,Yм40),1,1+%Y│Yл( Д(5)м Д(5))+T&АK│1е3:╜(Xл( Д(7)м Д(7)),Yм32м Д(10),4):ЛK+c0ЕY┤86зY│86+r:ЕY▓91зY│91+СDX│Xл Д(8)л20:ЕX▓235зР:Д430+вNЕP│4зР:Д╟2е3+кXP│4+▒b┴4+╔l╗(0,0)м(255,93),╜,B+╪v├(2,2),2,4+▀А┴1+ЎК╗(2,91)м(108,30),╜,Ф╗(253,91)м(148,30),╜,*Ю┬(128,30),20,1,.2,0,.5,Aи╗(2,91)м(253,91),╜,S▓├(128,89),1,1,Z╝┴4,n╞Z$│P$(7):Бж3980,В╨Z$│P$(8):Бж3980,Ы┌╗(135,30)м(120,30),╜,нф├(128,28),4,4,│юР,└°╟2е3:P│3,╟┴4,▀╗(0,0)м(255,93),╜,B,ю├(2,2),2,4,ї ┴1-*╗(2,34)м(20,32),╜- 4АI│1е З(P$(5))й2-N>X│ К( Р(P$(5),I,1)):Y│ К( Р(P$(5),Iл1,1))-_HЕY┤90зY│Yм50-mR╗м(X,Y),╜-t\ЛI-Дf├(4,89),1,1-Лp┴2-╬z╗(108,32)м(148,32),╜:╗(112,34)м(144,34),╜:╗(116,36)м(140,36),╜-╒Д┴3-ёО╗(116,38)м(140,91),╜,BF-¤ШАI│1е10.'в╜(116, Д(50)л38,1):╜(140, Д(50)л38,1)..мЛI.<╢X│20:Y│56.C└┴4.c╩╗(Xл2,Yм20)м(Xл2,Yм32),╜,BF.j╘┴1.Е▐╗(X,Yм34)м(Xм8,Yм38),╜.ЪшАI│1е З(P$(6))й2.╩ЄIX│ К( Р(P$(6),I,1)):IY│ К( Р(P$(6),Iл1,1)).ч№ЕIX┤60зIX│мIX :ДIX│IXм60.ЄIY│мIY/╗м(XлIX,YлIY),╜/
ЛI/!$├(Xл2,Yм40),1,1/I.X│Xл Д(8)л20:ЕP│3░X▓108░X┤140зX│150/[8ЕX▓235зР:Д960/hB╟2е3:P│5/oL┴4/ЗV╗(0,0)м(255,93),╜,B/Ц`├(2,2),2,4/Эj┴1/│t╗(2,34)м(20,32),╜/╚~АI│1е З(P$(5))й2/ЎИX│ К( Р(P$(5),I,1)):Y│ К( Р(P$(5),Iл1,1))0ТЕY┤90зY│Yм500Ь╗м(X,Y),╜0жЛI0,░├(4,89),1,10F║┬(128,91),40,4,1,.5,10^─├(128,91),4,4:Бе9500i╬ЕP│6зР0Й╪╟2е3:┴4:╗(0,0)м(255,93),╜,B0атЕP│7зER│103:ДER│910▓ьАI│157еER йм60╦Ў┬(128,91),I,4,1,.5,10╥ЛI0▌
ЕP│7зР0ыY│85:R│791┬(128,Y),R,4,1,.5,11
(Y│Yм612R│Rм121,<ЕR▓0░P┤▓10з13101@FЕR▓60░P│10з13101LPЕP│10зР1dZ╗(37,91)м(128,49),╜1}d╗(219,91)м(130,49),╜1Пn├(128,80),4,41ХxР1еВP│10:Бж12301╝М╗(37,91)м(61,79),╜1╒Ц╗(219,91)м(195,79),╜1ча├(128,90),4,41юк┴12┤╗(59,77)м(195,77),╜2╛Р2#╚ЕP│7зР:ДP│7:Бж12302>╥┬(76,91),51,4,1.6,.5,12Z▄┬(180,91),51,4,1.6,.5,12kц├(128,4),4,42yЁY│85:R│392Т·┬(79,Y),R,4,1.6,.5,12м┬(180,Y),R,4,1.6,.5,12╜Y│Yм6:R│Rм122╦ЕR▓0з15302т"╗(25,91)м(76,67),╜2·,╗(127,91)м(80,67),╜36╗(129,91)м(180,67),╜3,@╗(231,91)м(184,67),╜3=J├(76,80),4,43OT├(180,80),4,43U^Р3`hБж14103irP│113p|┴23ЛЖ╗(108,76)м(148,39),╜,B3ЭР├(110,72),3,23╕Ъ╗(100,76)м(90,74),╜,BF3╥д╗(96,72)м(94,40),╜,BF3ьо╗(98,62)м(92,48),╜,BF4╕╗(100,58)м(90,46),╜,BF4!┬╗(98,42)м(92,40),╜,BF4=╠╗(166,76)м(156,74),╜,BF4Y╓╗(162,72)м(160,40),╜,BF4uр╗(164,62)м(158,48),╜,BF4Съ╗(166,58)м(156,46),╜,BF4нЇ╗(164,42)м(158,40),╜,BF4│■Р4сЕP│12зР:ДP│12:╟2е3:┴4:╗(0,0)м(255,93),╜,B4Ё├(2,2),2,44ў┴15&╗(2,2)м(50,20),╜5"0╗(2,91)м(50,73),╜5::╗(253,2)м(205,20),╜5SD╗(253,91)м(205,73),╜5mN╗(50,20)м(205,73),╜,B5ЕX╗(2,2)м(253,91),╜,B5Чb├(128,70),4,15иl├(128,4),4,15╕v├(5,40),4,15╩А├(250,40),4,15╤К┴25ьФ╗(108,71)м(148,31),╜,B5■Ю├(110,69),3,26и┴16▓Z$│P$(9):Бж39806+╝├(160,80),1,161╞Р6E╨P│14:╟2е3:Бж3506L┌┴36fф╗(68,89)м(188,59),╜,B6wю├(70,80),4,36О°╗(68,89)м(48,85),╜6Ю╗м(48,55),╜6о╗м(68,59),╜6┐├(66,60),4,36╪ ╗(188,59)м(168,55),╜6ш*╗м(48,55),╜6°4╗м(40,35),╜7	>╗м(160,35),╜7H╗м(168,55),╜7,R├(128,50),4,373\┴27HfZ$│P$(10):Бж39807Yp├(70,55),2,27fzАI│1е1007wДX│ Д(100)л637ЗОY│ Д(17)л397гШЕ а(X,Y)│2з╜(X,Y, Д(4))7квЛI7░мР7╗╢Бж41007╠└ZX│1:МP$(10)7╪╩АI│1е107▀╘НA7ъ▐АK│1еA8шНA:P$(I)│P$(I)л Л(A)8ЄЛK,I82№МB(16):X│ Д(3):ЕX│1зB( Д(5)л1)│м18I	ЕX│2зB( Д(2)л7)│м18a	ЕX│3зB( Д(6)л10)│м18n	МCV(8,8)8Г	$АI│1е7:X│ Д(6)л18│	.ЕCV(Xм1,I)│1зX│ Д(6)л1:Бе2350:ДCV(X,I)│1:ЛI8э	8D│ Д(6)л1:X│ Д(8):Y│ Д(8):ЕCV(X,Y)┤▓0з2360:ДCV(X,Y)│29	BCX│ Д(6)л1:CY│ Д(8):ЕCV(CX,CY)│2з23709 	LIN│196	V╚1,3:╝:┐1,0:Бж1009R	`АL│0е5:НC:НL$:Бж3720:ЛL9d	jЕ Т┤▓" "з24109В	tМS$(90):АI│1е90:НS$(I):ЛI9Л	~BL│19Ф	ИTR│09├	Ь╟2е4:Бж100:C│2:АL│0е4:L$│S$(Lл1):Бж3720:ЛL9╬	жБж40509ў	░╟2е4:C│2:АL│0е2:L$│S$(Lл6):Бж3720:ЛL:	║Бж4050:+	─╟2е4:C│3:АL│0е2:L$│S$(Lл9):Бж3720:ЛL:6	╬Бж3880:K	╪ЕQ│1зBL│2:Бе2940:Y	тЕQ│2з2590:h	ьЕQ┤▓0з2510:Я	Ў╟2е4:Бж270:C│2:АL│0е3:L$│S$(Lл12):Бж3720:ЛL:Бж4050:ё
╟2е3:╟2е4:C│2:L│0:L$│" PRESS SPACEBAR":Бж3720:L│1:L$│" TO PLAY AGAIN.":Бж3720;

Е Т┤▓" "з2570;
Бе2430;>
╟2е4:Бж270:C│2:АL│0е4:L$│S$(Lл16):Бж3720:ЛL;I
(Бж4050;s
2╟2е4:C│3:АL│0е2:L$│S$(Lл21):Бж3720:ЛL;~
<Бж3880;М
FЕQ│0з2460;Ъ
PЕQ│1з2620;й
ZЕQ┤▓2з2620;┤
dБе2550;ы
n╟2е4:Бж340:C│2:АL│0е1:L$│S$(Lл26):Бж3720:ЛL:Бж4050;Ў
xБж4090<
ВЕTR│1зL│4:L$│S$(88):Бж3720< 
МБж3880<F
ЦЕQ│0зBL│BLм4:ЕBL┤2зBL│BLл4:Бе2930<m
аЕQ│1зBL│BLл4:ЕBL▓16зBL│BLм4:Бе2930<д
кЕQ│2зBL│BLл1:ЕBL│5▒BL│9▒BL│13▒BL│17зBL│BLм1:Бе2930<┌
┤ЕQ│3зBL│BLм1:ЕBL│1▒BL│12▒BL│8▒BL│4зBL│BLл1:Бе2930<Ў
╛ЕQ│4░B(BL)│м1░TR│1з2790=	
╚ЕTR│0▒Q┤4з2940=
╥ЕQ│5з2700=Z
▄╟2е4:ЕB(BL)┤▓м1зC│2:АL│0е1:L$│S$(Lл89):Бж3720:ЛL:Бж4050:Бе2940=j
ц╟2е4:Бж2000=y
ЁC│2:АL│0е3=Р
·L$│S$(Lл56):Бж3720=вЕC│2зC│3:ДC│2=░ЛL:Бж4050=┐╟2е4:Бж100=ф"C│2:АL│0е2:L$│S$(Lл60):Бж3720:ЛL>(,L│4:L$│" PRESS SPACEBAR":Бж3720:L│5:L$│" TO PLAY AGAIN.":Бж3720>:6Е Т┤▓" "з2870>C@╟2е4>OJП:Х2000>^TМLL(14,14)>q^АI│1е203:НA:ЛI>|hБе2240>нr╟2е4:C│2:АL│0е1:L$│S$(Lл24):Бж3720:ЛL:Бж4050>╝|ЕBL│7з2990>╠ЖЕBL│10з3030>▐РЕB(BL)│0з2670>ЎЪЕB(BL)│м1░TR│0з3190?
дБе2670?о╟2е4:Бж760?<╕C│2:АL│0е1:L$│S$(Lл35):Бж3720:ЛL:Бж4050?G┬Бж4090?R╠Бе3070?В╓╟2е4:Бж590:C│2:АL│0е1:L$│S$(Lл28):Бж3720:ЛL?НрБж4050?ШъБж4090?▒ЇL$│S$(30):L│4:Бж3720?╝■Бж3880?╩ЕQ│5з3070?╪ЕQ│4з3110?уБе2710@
&╟2е4:C│2:АL│0е1:L$│S$(Lл31):Бж3720:ЛL@0Бж4050@B:╟2е4:C│3:АL│0е1:L$│S$(Lл33):Бж3720:ЛL@MDБж3880@[NЕQ│0з3030@jXЕQ┤▓1з3140@жb╟2е4:P│8:Бж1230:C│2:АL│0е1:L$│S$(Lл79):Бж3720:ЛL:Бж4050@┴lXC│CX:YC│CY:P│6:Бе3240@∙v╟2е4:Бж1090:C│2:АL│0е1:L$│S$(Lл37):Бж3720:ЛL:Бж4050AАБж4090:L│4:L$│S$(39):Бж3720A$КБж3880A3ФЕQ┤▓4з2710AAЮXC│D:YC│1AWиЕCV(XC,YC)│2з3540Ak▓ЕXC│1▒XC│8з3390AП╝XZ│0:ЕCV(XC,YCм1)│1зXZ│1:Бе3440Aе╞ЕCV(XC,YC)│0з3300A╗╨ЕCV(XC,YC)│1з3440A╤┌ЕCV(XC,YC)│2з3540Aфф╟2е4:ЕP┤▓6зP│8AєюБж1230:P│6B°C│2:АL│0е1:L$│S$(Lл81):Бж3720:ЛL:Бж4050B(
╟2е4B3
Бж4090B>
Бж3880BV
 ЕQ│2зXC│XCл1:Бе3240Bn
*ЕQ│3зXC│XCм1:Бе3240BА
4Бж3700:Бе3340B╕
>╟2е4:Бж1410:C│2:АL│0е2:L$│S$(Lл51):Бж3720:ЛL:Бж4050B╩
HБж4090:Бж3880Bч
RЕXC│1░Q│2зXC│XCл1:Бе3240C
\ЕXC│8░Q│3зXC│XCм1:Бе3240C
fБж3700:Бе3400CG
p╟2е4:Бж1480:C│2:АL│0е3:L$│S$(Lл40):Бж3720:ЛLCR
zБж4050C|
Д╟2е4:C│3:АL│0е1:L$│S$(Lл44):Бж3720:ЛLC▒
ОЕXZ│1зL│2:L$│S$(47):Бж3720:ДL│2:L$│S$(46):Бж3720C╝
ШБж3880C┘
вЕQ│2░XZ│0зYC│YCл1:Бе3240CЎ
мЕQ│2░XZ│1зYC│YCм1:Бе3240D
╢ЕQ│0зXC│XCл1:Бе3240D&
└ЕQ│1зXC│XCм1:Бе3240D1
╩Бе3480DA
╘╟2е4:Бж1640Df
▐C│2:АL│0е1:L$│S$(Lл72):Бж3720:ЛLDq
шБж4050DЫ
Є╟2е4:C│3:АL│0е1:L$│S$(Lл74):Бж3720:ЛLDж
№Бж3880D┤ЕQ▓1з3580D╨ЕQ│0зXC│CX:YC│CY:Бе3240Dр╟2е4:Бж1800E$C│2:АL│0е4:L$│S$(Lл64):Бж3720:ЛL:Бж4050E6.╟2е4:C│3:АL│0е2:L$│S$(Lл69):Бж3720:ЛLEA8Бж3880EOBЕQ▓2з3640E]LЕQ│0з3690EkVЕQ│1з3540E{`BL│2:Бе2940E╕j╟2е4:C│2:АL│0е4:L$│S$(Lл83):Бж3720:ЛL:Бж4050:TR│1:Бе3610Eыt╟2е4:C│2:АL│0е2:L$│S$(Lл76):Бж3720:ЛL:Бж4050:РE√ИАI│1е З(L$)FТЕ Р(L$,I,1)│" "з3860F,ЬX│ К( Р(L$,I,1))м64F<жЕX│м22зX│27FL░ЕX│м18зX│29F[║ЕX│м2зX│28Fj─YY│Lн16л96Fz╬XX│(Iм1)н16F╢╪ЕX┤17зZY│(Cм1)н16:ZX│(Xм1)н16:ДZY│(Cл2)н16:ZX│(Xм17)н16F┐т╚1,1F▀ь─(ZX,ZY)м(ZXл14,ZYл14),LL,GFшЎ╚1,3G┼(XX,YY)м(XXл14,YYл14),LL,╜G
╔"C"GЛIGРG&(Q│0GC2┴1:╗(0,96)м(12,191),╜,BFGa<L│Q:C│ Д(3):L$│">":Бж3720GwFI$│ Т:ЕI$│""з3910GЦPЕ К(I$)│94зQ│Qм1:ЕQ│м1зQ│5G┤ZЕ К(I$)│10зQ│Qл1:ЕQ│6зQ│0G┼dЕ К(I$)│13зРG╠n┴1Gцx╗(0,96)м(12,191),╜,BFGёВБе3900H=МX1│ К( Р(Z$,1,1)):Y1│ К( Р(Z$,2,1)):X2│ К( Р(Z$,3,1)):Y2│ К( Р(Z$,4,1))HTЦ╗(X1,Y1)м(X2,Y2),╜HfаАI│5е З(Z$)й2HОкX│ К( Р(Z$,I,1)):Y│ К( Р(Z$,Iл1,1))HЬ┤╗м(X,Y),╜Hг╛ЛIHй╚РH╞╥C│1:L│5:L$│S$(63):Бж3720Hщ▄Е Ж(65280)│254▒ Ж(65280)│126зРH√цЕ Т┤▓" "з4070I
ЁРI-·╟2е4:C│3:АL│0е3:L$│S$(Lл47):Бж3720:ЛL:РI=АI│0е255й16IKАK│0е13й2IXНA:B│128Ii"АJ│I еIл15й2Iв,Е В(AмB)│AмB з╜(J,K,2):╜(J,Kл16,3):╜(J,Kл32,4):A│AмBIм6B│Bо2I╖@ЛJ,K,II╟JАI│0е207й16I╓TАK│48е61й2Iу^НA:B│128IЇhАJ│I еIл15й2J-rЕ В(AмB)│AмB з╜(J,K,2):╜(J,Kл16,3):╜(J,Kл32,4):A│AмBJ7|B│Bо2JBЖЛJ,K,IJHРРJiЪЖ124,130,130,254,130,130,130JКдЖ252,130,130,252,130,130,252JлоЖ124,130,128,128,128,130,124J╠╕Ж248,132,130,130,130,132,248Jэ┬Ж254,128,128,252,128,128,254K╠Ж254,128,128,252,128,128,128K/╓Ж124,130,128,158,130,130,124KPрЖ130,130,130,254,130,130,130KlъЖ254,16,16,16,16,16,254KЕЇЖ2,2,2,2,130,130,124Kж■Ж130,132,136,240,136,132,130K╟Ж128,128,128,128,128,128,254KшЖ130,198,170,146,130,130,130L	Ж130,194,162,146,138,134,130L*&Ж124,130,130,130,130,130,124LK0Ж252,130,130,252,128,128,128Ll:Ж124,130,130,130,138,132,122LНDЖ252,130,130,252,136,132,130LмNЖ124,130,128,124,2,130,124L╟XЖ254,16,16,16,16,16,16LшbЖ130,130,130,130,130,130,124MlЖ130,130,68,68,40,40,16M%vЖ130,130,130,146,170,198,130MAАЖ130,68,40,16,40,68,130M\КЖ130,68,40,16,16,16,16MvФЖ254,4,8,16,32,64,254MСЮЖ16,84,56,254,56,84,16MииЖ16,8,4,254,4,8,16M╜▓Ж0,0,0,0,0,16,16Mы╝Ж12,40,76,60,70,70,60,80,55,100,50,110,40N╞Ж12,130,40,140,50,170,60,180,70,210,76,40,76NM╨Ж12,122,40,124,35,126,25,130,20,132,10,136,2Nw┌Ж10,118,40,116,30,118,20,120,10,122,2N╨фЖ26,2,84,20,82,40,86,60,84,90,84,120,86,140,82,180,86,220,86,253,82,253,91,2,91,2,84O>юЖ36,12,30,10,42,2,40,4,48,8,46,4,50,0,44,62,50,64,42,70,50,74,44,70,48,66,38,74,40,76,30,74,36,64,34,0,34Oh°Ж10,134,30,136,25,134,20,138,10,144,2OСЖ10,120,30,118,20,122,15,124,5,126,2O╝Ж10,150,80,160,76,170,80,160,86,150,80O Ж18,64,57,70,50,75,45,90,40,100,45,120,50,130,45,140,43,172,57Px Ж2,"  ************",2,"  * TREASURE *",2,"  *   HUNT   *",2,"  ************",3," BY MATT THOMAS",1," PRESS SPACEBAR"Qc*ЖYOU ARE AN,EXPLORER LOOKING,FOR THE LOST,TREASURE OF THE,ITHICAN EMPIRE.,IN YOUR BOAT,YOU COME UPON AN,ISLAND.," GO BACK HOME"," LAND ON ISLAND"," GO PAST",YOU END YOUR,EXPEDITION AND,HEAD FOR HOME.,"    THE END.",YOU PASS UP THERQ4ЖISLAND AND KEEP,SEARCHING FOR,THE TREASURE BUT,NEVER FIND IT.," GO BACK TO","  ISLAND"," GO BACK HOME",THE OCEAN IS IN,THAT DIRECTION.,YOU ARE IN THE,JUNGLE.,YOU ARE AT THE,VOLCANO.," CLIMB VOLCANO",YOU ARE AT THE,TOP.," CLIMB DOWN"SD>Ж" GO DOWN INSIDE",YOU ARE AT THE,WATERFALL.,YOU ARE AT THE,CAVE ENTRANCE.," ENTER CAVE",FROM HERE THE,TUNNEL BRANCHES,OFF IN TWO,DIRECTIONS.," GO EAST"," GO WEST"," GO SOUTH"," GO NORTH"," GO SOUTH"," GO EAST"," GO WEST",DOWN THIS TUNNELTHЖTHERE IS NOTHING,BUT A DEAD END.," GO BACK"," STAY HERE",*YOU FOUND THE *,*LOST TREASURE *,*OF THE ITHICAN*,*EMPIRE.       *,YOU SAIL AWAY,FROM THE ISLAND.,"    THE END."," PRESS SPACEBAR"T№RЖYOU ARE INSIDE,THE VAULT. THERE,IS NOTHING BUT A,NOTE. THERE IS,ANOTHER DOOR.," READ NOTE"," GO BACK"," MOVE OTHER DOOR",YOU FOUND THE,VAULT DOOR.," GO BACK"," MOVE DOOR",THERE IS NO,TUNNEL IN THAT,DIRECTION.,YOU HAVE FOUND A,CAVE ENTRANCE.U{\ЖYOU ARE IN THE,CAVES.,THE NOTE SAYS,THAT THE,TREASURE IS IN,THE JUNGLE.,THERE IS NO MAP.," DIG",YOU DO NOT FIND,ANYTHING. DOOR",YOU FOUND THE,VAULT DOOR.," GO BACK"," MOVE DOOR",THERE IS NO,TUNNEL IN THAT,DIRECTION.,YOU HAVE FOUND A,CAVE ENTRANCE.U{                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 &8:ГCOPYRIGHT (C) T&D SOFTWARE 1982         nflscore&F╚0:Бе9999&UХ3000:DN│1'(
Ю:З@64," WELCOME TO NFL 86 PREDICTIONS":З:З" THIS PROGRAM TAKES DATA FROM    THE 1985 PRO FOOTBALL SEASON    AND PREDICTS THE SCORES FOR     ALL 16 GAMES OF EACH OF THE 28  TEAMS.  THERE IS A SEPERATE"     '╬З" DATA FILE WHICH CAN BE LOADED   AND EDITED WHICH ALLOWS YOU TO  INPUT ANY CHANGES IN THE DE-    FENSE, OFFENSE, COACHING STAFF, INJURIES, OR ANY INTANGIBLES."(М N$(28), W(28), L(28), F(28), A(28), G$(16), Z$(28)(ОЖ"INDIANAPOLIS",5,11,320,386,"  BUFFALO",2,14,200,381,"NEW ENGLAND",11,5,362,290," N.Y. JETS",11,5,393,264,"   MIAMI",12,4,428,320(∙(Ж " CINCINNATI",7,9,441,437," CLEVELAND",8,8,287,294,"  HOUSTON",5,11,284,412,"PITTSBURGH",7,9,379,355)}2Ж "  DENVER",11,5,380,329,"KANSAS CITY",6,10,317,360,"LA RAIDERS",12,4,354,308," SAN DIEGO",8,8,467,435,"  SEATTLE",8,8,349,303*<Ж "  DALLAS",10,6,357,333,"N.Y. GIANTS",10,6,399,283,"PHILADEPHIA",7,9,286,310," ST. LOUIS",5,11,278,414,"WASHINGTON",10,6,297,312*ЗFЖ "  CHICAGO",15,1,456,198,"  DETROIT",7,9,307,366," GREEN BAY",8,8,337,355," MINNESOTA",7,9,346,359," TAMPA BAY",2,14,294,448*ЎPЖ "  ATLANTA",4,12,282,452,"  L.A. RAMS",11,5,340,277,"NEW ORLEANS",5,11,294,401," SAN FRANC",10,6,411,263+=ZЖ "09071719261807202824082221232527010304020914121005130611581615"+ЕdЖ"0911030464131612191720152123242826182522270105020607081114651009"+═nЖ"0918060771251510172421092327280504140326011802161219130811722022",xЖ"09282716141926172524222328050401110221072006090813120310791518",YВЖ"10051618232008210622242601281725192702040503070915101211661314",ЯМЖ"10121716191518242122232826250403020527011107200814121013630906",хЦЖ"10191819151720232126282524271205010222070806030916141311701004"-+аЖ"10261815131721202822072325262704050103020609120814102411771916"-qкЖ"11021113101204142209070108052503282702240621171823191516532620"-╖┤Ж"11091411131006080902030126270425182819222024232116171215600507"-¤╛Ж"11161513111007120809140605020104202503261623242221172718672819".E╚Ж"1120121373171401082306090702032528272621242220111815191016740405".Н╥Ж"1127222114158002110610171208071301250526040327242309201918511628".╙▄Ж"12071011081321090702060305270125042815262322242018171619581214"/цЖ"1213191009046414131112230807060201280327250526222417151816652021"/eЁЖ"121926287010147101120208110904061307272325211917241820152216720305"/Ф·А X│1 е 28:Н N$(X),W(X),L(X),F(X),A(X):Л X/п
А X│1 е 16:Н G$(X):Л X/╗
Бж 10000А
Ю:З@70,"main menu":З:З" 1. LOAD NFL DATA":З" 2. SAVE NFL DATA":З" 3. VIEW AND EDIT NFL DATA":З" 4. RUN PREDICTIONS":Е DN│м1 з З" 5. CHANGE I/O DEVICE - tape" :Д З" 5. CHANGE I/O DEVICE - disk"0Ф
З:З" enter 1-5"0┴
I$│ Т:Е  Й(I$)▓0 ░  Й(I$)┤6 з 276 :Д 2750╬
I│ Й(I$)0ё
И I Бе 1100,1200,1300,279,150013
Ю:З@128," WHAT WEEK OF PLAY DO YOU WISH   TO SEE (1-16)";:Й W1O
Е W┤1 ▒ W▓16 з Ю:Бе 2701Ш
З:З" ENTER 'Y' IF YOU WANT THE       SCORES PRINTED TO THE PRINTER";1─
I$│ Т:Е I$│""з283 :Д Е I$│"Y" з Q3$│"Y"1 
"Z│5:A$│G$(W):M│ Й( Р(A$,1,2)):DA│ Й( Р(A$,3,2)):Бж 8802q
$Е Q3$│"Y" з З#м2," ":З#м2," ":З#м2,д10)"WEEK";W;д34)"STARTING ";M$;DA:З#м2,д10)"VISITORS";д40)"HOME":З#м2," "2Б
,Е Z┤5 з Z│52Ш
6Е Z▓ З(A$) з Z│Zм42╘
@T1│ Й( Р(A$,Z,2)):Е T1▓28 з DA│T1м50:Бж 880:Z│Zл2:Бе3203
JЮ:З@162,N$(T1):З@175,"AT";:Z│Zл2:T2│ Й( Р(A$,Z,2)):З@180,N$(T2)3U
TЗ@9,"NFL PREDICTIONS";:З@65,M$;DA;"1986":З@86,"WEEK #";W3Б
^А V│64 е 95:З@Vл32,"*";:З@320лV,"*":Л V3Э
hЗ@234,"COMPUTER PICKS";3╢
kЕ  З(Z$(20))┤3 з 3704

lA│0:А Q│ З(Z$(T1)) е  З(Z$(T1))м5 й м1:A│Aл1:Q$│ Р(Z$(T1),Q,1):Z(A)│ К(Q$)м75:Л4_
mA│0:А Q│ З(Z$(T2)) е  З(Z$(T2))м5 й м1:A│Aл1:Q$│ Р(Z$(T2),Q,1):Z2(A)│ К(Q$)м75:Л4}
rP│ Б(F(T1)о(W(T1)лL(T1)))4Ь
|P2│ Б(F(T2)о(W(T2)лL(T2)))4▐
ЖX1│ Б((F(T1)лA(T1)лF(T2)лA(T2))о(W(T1)лL(T1)лW(T2)лL(T2)))н.54ь
РX1│ Б(X1)4Ў
ЪX2│X15
дV│W(T1)мL(T1)5*
оЕ V▓м5 ░V┤5 з X1│X1лV:X2│X2мV5D
│Е  З(Z$(20))┤3 з 440 5л
┤X1│X1л(Z(3)лZ(4)лZ(5))н.4 м(Z2(3)лZ2(4)лZ2(5))н.4:X2│X2л(Z2(3)лZ2(4)лZ2(5))н.4м(Z(3)лZ(4)лZ(5))н.45╚
╕Е V┤м4 з X1│X1м5:X2│X2л55ф
┬Е V▓4 з X1│X1л5:X2│X2м55Ў
╠U│W(T2)мL(T2)6
╓Е U▓м5 ░ U┤5 з X2│X2лU6,
рЕ U▓м5 ░ U┤5 з X1│X1мU6A
ъЕ U┤м4 з X2│X2м56V
ЇЕ U┤м4 з X1│X1л56j
■Е U▓4 з X2│X2л56~Е U▓4 з X1│X1м56═
Е  З(Z$(20))▓3 з F(T1)│F(T1)лZ(1)н4л(Z(2)н4):F(T2)│F(T2)лZ2(1)н4л(Z2(2)н4)6 C│ Б((F(T1)мA(T1))о40):D│ Б((F(T2)мA(T2))о40)7+X1│ Б(X1):X2│ Б(X2):X1│X1лCмD:X2│X2мCлD7?&X1│X1м3:X2│X2л37Q0Е X1┤6 з X1│37c:Е X1│8 з X1│77DЕ X1│10 ▒ X1│11 з X1│147УNЕ X1│12 з X1│147пXЕ X1│16 ▒ X1│15 з X1│147╦bЕ X1│22 ▒ X1│23 з X1│217▌lЕ X2┤6 з X2│37яvЕ X2│8 з X2│78АЕ X2│10 ▒ X2│11 з X2│148КЕ X2│12 з X2│148;ФЕ X2│22 ▒ X2│23 з X2│248WЮЕ X2│15 ▒ X2│16 з X2│148mиЕ X1▓X2 з A(Y)│X18Г▓Е X1▓X2 з B(Y)│X28Щ╝Е X1┤X2 з A(Y)│X28п╞Е X1┤X2 з B(Y)│X18╩╨Е X1▓X2 з Z$(Y)│N$(T1)8х┌Е X1▓X2 з W$(Y)│N$(T2)9фЕ X1┤X2 з Z$(Y)│N$(T2)9юЕ X1┤X2 з W$(Y)│N$(T1)9G°З@290,Z$(Y);:З@302,"OVER";:З@308,W$(Y);9lЗ@324,A(Y);"       TO     ";B(Y)9ДL$│N$(T1):R$│N$(T2)9╙H│ З(N$(T1)):А V│1 е 5:Е  Р(N$(T1),V,1)│" " з L$│ Р(N$(T1),Vл1,Hм(Vм1)):ЛV:'V│0:H│ З(N$(T2)):А V│1 е 5:Е  Р(N$(T2),V,1)│" " з R$│ Р(N$(T2),Vл1,Hм(Vм1)):Л V:XЕ Q3$│"Y" з З#м2,д10)L$;д23)X1;д40)R$;д53)X2:|З@452,"TYPE U/UP D/DOWN X/EXIT":оI$│ Т:Е I$│"U" ▒ I$│"D" ▒ I$│"X" з 800 :Д 790:╞ Е I$│"X" з Ю:Бе 271:т*Е I$│"U" з Z│Zл2:Бе 300:ў4Е I$│"D" з Z│Zм6;&9T1│ Й( Р(A$,Zл2,2)):Е T1▓28 з Z│Zм2 :Д 300;Z:А V│Z е 3 й м2:Е  Й( Р(A$,V,2))▓28 з 828 :Д Л V;~;DA│ Й( Р(A$,3,2)):Бж 880:Бе 300;л<ZZ│ Й( Р(A$,V,2)):DA│ZZм50:Бж 880:Бе 300;╡>║ T│Y;┼HА Y│1 е Tм1;┘RА N│1 е 600:Л N;ў\ЗZ$(Y);A(Y);" "W$(Y);B(Y); fЛ Y<
p:ГDATE<zЕ DA┤2 з M│Mл1<@ДM1│Mм8:И M1 Бе 910,920,930,940<UОM$│"SEPTEMBER":Р<hШM$│"OCTOBER":Р<|вM$│"NOVEMBER":Р<РмM$│"DECEMBER":Р<╢шЗ@483," hit any key to continue";<╘ЄI$│ Т:Е I$│"" з 1010 :Д Р=8LЮ:Е DN│1 з З@96," READY DISK AND PRESS ENTER";:Й O$ :Д З@96," READY TAPE AND PRESS ENTER";:Й O$=KQЩ"I",#DN,"NFL"=rRА V│1 е 28:Й#DN,Z$(V):Л:Ъ#DN:Бе271=╫░Ю:Е DN│1 з З @96," READY DISK AND PRESS ENTER";:Й O$ :Д З@96," READY TAPE AND PRESS ENTER";:Й O$=ъ┤Щ"O",#DN,"NFL">╡А V│1е28:З#DN,Z$(V):Л V:Ъ#DN:Бе271>-Е  З(Z$(20))┤3 з Бе 271>оЮ:А V│1 е 14:Z1$│ Р(Z$(V),1, З(Z$(V))м5):Z2$│ Р(Z$(Vл14),1, З(Z$(Vл14))м5):З@(32нV)м1,V;" ";Z1$;:З@(32нV)л16,Vл14;" ";Z2$:ЛV>█<Z1│1:З" ENTER 1-28 OR '0' FOR MENU";:Й T>№FЕ T│0 з 271 :Д Е T▓28 з 1310?|PA│0:Ю:З@115м( З(Z$(T)))о2, Р(Z$(T),1, З(Z$(T))м5):А Y│ З(Z$(T)) е  З(Z$(T))м5 й м1:A│Aл1:Q$│ Р(Z$(T),Y,1):Z(A)│ К(Q$)м75:ЛY?▄UЗ@194,"defense":З@226,"offense":З@258,"coaching staff":З@290,"injuries":З@322,"intangibles"@&WА V│1 е 5:Е Z(V)▓м1 з З@178л32нV,"+";Z(V) :Д З @178л32нV,"-"; В(Z(V))@.XЛ V@vZЗ:З" USE THE ARROW KEYS TO CHANGE    VALUES AND SPACEBAR TO RETURN"@п_I$│ Т:З@161лZ1н32,"<";:З@161лZ1н32," ";:ЕI$│""з 1375@╨aЕ I$│ Л(10) ░ Z1┤5 з Z1│Z1л1AbЕ I$│ Л(8)  ░ Z(Z1)▓м9 з Z(Z1)│Z(Z1)м1:Бе1367A2cЕ I$│ Л(9) ░ Z(Z1)┤9 з Z(Z1)│Z(Z1)л1:Бе1367AIdЕ I$│ Л(32) з 1390AjfЕ I$│ Л(94) ░ Z1▓1 з Z1│Z1м1AvkБе 1375A▐nI$│Z$(T):Z$(T)│ Р(I$,1, З(I$)м5)л Л(Z(5)л75)л Л(Z(4)л75)л Л(Z(3)л75)л Л(Z(2)л75)л Л(Z(1)л75):Бе1310AъwБе 1399B▄Е DN│м1 з DN│1 :Д DN│м1BсБе 271B'└1:Бе7(Z1)│Z(Z1)л1:Бе1367AIdЕ I$│ Л(32) з 1390AjfЕ I$│ Л(94) ░ Z1▓1 з Z1│Z1м1AvkБе 1375A▐nI$│Z$(T):Z$(T)│ Р(I$,1, З(I$)м5)л Л(Z(5)л75)л Л(Z(4)л75)л Л(Z(3)л75)л Л(Z(2)л75)л Л(Z(1)л75):Бе1310AъwБе 1399B▄Е DN│м1 з DN│1 :                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ├*°О╠  эБМ-∙╬1НцО
qжаБ`-Дз└0&ЄОМЖ╞юбяБZ&∙0ИJ&ёО│╬->ЖяБJ&√╞чДчИрчИ└Жd╖Ж2╖
О╞
НО▓╞НxО┐жДИ@зДзИрзИ└Нq╢ Д
'z
&╙Ж2╖
О╠╬<-ЖяГJ&√╞ччИ▀чИ┐О)╞Н6О┴╞
Н/жДИ@зДзИрзИ└Н+╢ Д
'
╤z
&╓Оц1Н
пЖюбяБJ&∙ uжЕИ@зЕZ&ў9╢╖ЎZ&¤J&ў9smash by mike moore        use the right joystick to steeryour car. try to avoid smashing into the oncoming cars which    always try to move to your lane.you can make double lane changesby pressing the fire button as  your car moves over.              your car goes clockwise, the  others go counter-clockwise.     use the fire button to restart,the space bar to quit. УУТРУУТ УЫУУУЫТ УЫТРУЫТ   	 .╞
Ц╝Ч║╫╢X╬Чл┼Ч╖Zж┼Ч╣│ЖЧ▓╠
╜ЦV╜ХB╠╜Хc╫▓╠
╜Хc╫│╜┐├┼╟╔╞ў	╫╛╫└P╫─╫╚╞└Ё	╫╞╫╩╜Ф ╓▓╜Хв╜ФЎ	╦┴B/╫╞╫╛╞X╫└╞ю╫─╫╚╞j╫╞╫╩╜Ф ╓│╜Хв╜Ф4╞v╫╛╞╫└╞И╫─╫╚╞╕╫╞╫╩╜Ф ╓│╜Хв╜Ф4╞R╫╛╫└╞о╫─╫╚╞n╫╞╫╩╜Ф ╓▓╜Хв╜Ф4╠
ў6]╜ХкO_╜ЦВ╠¤
A╞ў	╦4╞ў
Н:Ў
╦сф/Є2aЎ	╦┴V/▐╞Fў
└.4╞ў	НЎ	╦сф/Є2aЎ
╦┴Ж&▐ t╞А√
╫╛╞`√	╫└╜У╠╜Хc╜Хв╜Уt╞АЁ
╫╛╞`√	╫└╜У╠╜Хc╜Хв╜Уt╞А√
╫╛╞`Ё	╫└╜У╠╜Хc╜Хв╜Уt╞АЁ
╫╛╞`Ё	╫└╜У╠╜Хc╜Хв~Уt╞Аў╞▓ў╞	ў╞
ўО0╞jчА╞tчА╞чДО3╞▓чА╞чА╞RчДО*╞ чАч
╞
чД╞▄ў╞
ўЖ	ОчАJ&√╞	ЖО'чАJ&√Ж╞О!чАJ&√Ж╞
О╬-oАч└J&∙9╞ў╞tў	╫╛╞j╫└╜У╠╜Хc╜Хв╜Уt╞√	┴Ф&▀╞
ў╞ў
╦■ДЎЖ=О!0НнЕ	
щ
т
█О!Ж╖цЖ└*, &xz╢*ш
┼╢ 
Дў╖ 
╢ Дў╖ ╢ #К╖ #ЖP╖
Ж╖Н&Ж#╖
ЖP╖НЖF╖
Ж
╖НЖ╖
Жd╖Н (╛Ж№╞╖  НZ&°O╞╖  НZ&°1?&х9╛0&№9╜┐Ў
─╦`ўЎZ'< 
2
z*ъЎ─
'Ч R}'%ЖЎ=╦l╫╛╞j╫└╜У╠╜Хc╜Хв╜Уtz'■чЎ┴'Ў╦ў─
√ў чЎ ─
'■УнЯаА &я9O╖О!жЖБ"
' Z}&#╢L╖Б-▌╢J'Ю Ф}&}&┴9O╖О!жЖБ"'╠  	]}&▐╢L╖Б-╪╢J'Y O}&└}'╗╢Б'╡ ╖╞ўО!цЕZ&и Z&╡zЎ*хЎZ&╣ ╨9╞ч"╞
ч!╞
чд9Ў┴v'
+Ў}+╦ └╫╛Ў╦╫└	ЖЖ=0НnЕ	n&z╞╚╫М╠╜йQ├Ў┴'
чЎX√ўДEЎ}+└ў╫└Ў╦ў └ў╦╫└Ў╦ў╞ўX√╫╛	┴'pМx╢H╖	Ж╖6Ж@ЧМ╢Л░	Ч╛╖Л░╖Ч─Ч╚╢╗	Ч└╖
J╗╖Ч╞Ч╩ЇOЎ6╜йQМ╓М┴-'╢А╖Ч╛╢
А╖
Ч└╢Л╖Ч─Ч╚╢Л └z6& Нt╞
ўў6O~йQнЯа
Ў
[ў
┴5.o┴	-iЎ─
&■▓Ў√ўCЎ√
ў╦ў╫└Ў╦╫╛,┴'  ╞√╫╛Ў╫└┴' ╞√╫╛Ў╫└┴'■Ў|/Ў┴. Х┴&	Ў ─
& ИЎ
└ '+╞
 ╞ ўЖ=ў
Ў╢=ў√ў/┴
- gЁў■Ў┴X'y╞√╫╛Ў}*└ ╦╫└БZ'
Z'■sZ'■ЎX√ўъzЎ}+└ў╦╫╛Ў╦ў └ў╫╛Ў╦ў╦╫└╞
ў+┴'■[нЯа
Ў
Zў	┴	-o┴5.iЎ─
& dЎЁўЎ√
ў╦ў╫╛Ў╦╫└┘┴'¤═Ў╫╛Ў╦╫└─┴'¤╕Ў╫╛Ў╦╫└п┴'¤г|)Ў┴.Ч┴&Ў ─
&МЎ	└ '+╞
 ╞ ўЖ=ў
╢Ў=ўP√ў/┴
- j√ў■╣О0ЎжЕБv'
О*жЕ╞=╢О0ыЖ╦	╫╛О3цЖ╦╫└&ўZ'
Z'
╨Z'ТbО-╢цЖ─
'eцЖZ'QЎX√ўО*╞
рЖЖ	=О0╢ыЖ╫╛О3цЖ╦╫└╜УЎ╦ОцЕO╜Хc╜Хв╜УtО╢L0ЖцАчДцч ОЎX√╢зЕЎО*жеHО0лЕзЕО-жЕLДзЕ╔TО3О*ЎжЕ+жеАзеЛЧ└О0жЕЛзЕ жеАзеЧ└О0жЕЛзЕ╬!Жз┼ЖлЕЧ╛=┴'№1О-ЎЖ
зЕ╝╢ЎО'аЕ'+Ж
 Ж ╖&СОжЕJ'oЕ■╗О$жЕ'+Ж
 Ж О*цЕ=4ЎО'жЕлрзЕоЎО3жЕО$аезЕЛ╖Ч└О0жЕЛЧ╛4╢┴5'hжЕЛЧ╛╢Ч└4а┴5'RжЕЛЧ╛╢Ч└М┴'@ОЎlЕ┬ОЎжЕJ. jО*ЖцЕ*
@Ў=╢О$чЖО'цЖ√чЖЙ mО3Ў╢аЕ*
@Б.О0╢ЎаЕ*
@Б-√╞╚╫М╠
╜йQО!ЖЎзЕ╢А╖ЖdfЎО3жЕБX'
 О*жЕ╞=О3╢ыЖ╦	╫└О0цЖ╦╫╛╙ўZ'Z'
╙Z'Т cЎО-жЕЕ
'fJ'TЎX√ўО*╢╞
рЖЖ	=╢О3ыЖ╫└О0цЖ╦╫╛╜У╢ЛОцЖO╜Хc╜Хв╜Уt╢LО0ЖжАзДжз ОЎX√╢зЕЎО3О*жеHлЕзЕО-жЕLДзЕ
├О*Ў╬0О3жЕ+ж┼Аз┼Ч╛жеЛзеЛЧ└ ж┼Аз┼ЛЧ╛жеЛзеЛЧ└О!Ж
зЕы┴'∙▀О*Ў`ЕО-Ж
зЕ
О'Ў╢аЕ'+Ж
 Ж ╖&РОжЕJ'oЕ■╖О$жЕ'+Ж
 Ж О*цЕ=4ЎО'жЕлрзЕ
lО$ЎжЕО0лЕзЕЛ╖Ч╛О3жЕЛЧ└4`┴5'h╢Ч╛жЕЛЧ└4J┴5'R╢Ч╛жЕЛЧ└6┴'@ОЎlЕ╣ОЎжЕJ. kО*ЖцЕ*
@Ў=О$╢чЖО'цЖ√чЖЙ n┌ЎО0╢аЕ*
@Б.¤╝Ў3╢аЕ*
@Б-°─¤еЎ╫╛Ў╫└ ╢О0цЖ╫╛О3цЖ╫└╦	╫╞╫╩╓╛╦╫─╫╚╞
╫╪0Н
v▌╧├▌╤Ж
Ч╘╠ШФ▌┘╠ШЫ▌╒~Ч╩Ў╫╛Ў╫└ ╢О0цЖ╫╛О3цЖ╫└╦╫╞╫╩╓╛╦	╫─╫╚╞
╫╪0Н
9▌╧├▌╤Ж
Ч╘╠ШФ▌┘╠ШЫ▌╒~Ч╩ЎО0жЕЛЧ╛О3жЕЧ└ !ЎО0жЕЧ╛О3жЕЛЧ└ (Ў╦╫╛╢Ч└Л	Ч╞Ч╩Ц╛ЛЧ─Ч╚ Ў╫╛╢ЛЧ└ЛЧ╞Ч╩╓╛╦	╫─╫╚Ў6O╜Хc╫▓╜Ф ╓▓╜Хв~Ф4╠Г
&√9ООпБпБпД !╢ОлвБ
-А
 ЎздЦ'М
.цЮ║0ЙнО╞жа3Н3╞ж─зД0И 3JZ&Ї0Й aМ&р9VЪVVfVjVVVfZжжfjjжfffЪVVVVVжVVfЪjжжжfжfжVVVVжVVжVж@@U@@@U
EUD@╜У╜ТШЙЦ╢DфД$┴%TT °'_\X█┴TO9 *°╞Ч╩╓╛╦	╫─╫╚Ў6O╜Хc╫▓╜Ф ╓▓╜Хв~Ф4╠Г
&√9ООпБ