@@@рЁ  ■`SА O  ЄHKАKБ└H╛HВHВHPВHPВHPВHPHPHPHH■HHЁHO  ЄS  ╩`  ■А└рАА└└№Ї └д шр0=^`ГаА @гта^=@╛>Аcу`ААА└┴┴Аcc>>$$$$$$$$$$~~┬CА@р■р  @А└р  А@№@№@№@№@№@№@@@@@@@@@@@@@@@  А    А┐  БаБа<СаBйаБСб$АБбАБбАСаЩйаBСа$БаBБаББаББ┐  БА    АЁ @┐·└┴╛·АБИ"G─ ?Ё@А А%I I№IIIЕЕ№ № №ВВЁ|В■ А А А А А А А А А.А.А?А?АА0└T$:B$│"N":Бе570A>ьТ65497,0:SW$│"":АX│1е128:SW$│SW$л Л(255):ЛXAЬЎЕP$│"A"зАE│1еMм1:Бж970:ЕAZ│0зGB$│"BAS":ДЕAZ│1зGB$│"DAT":ДЕAZ│2зGB$│"BIN":ДЕAZ│3зGB$│"TXT"A╛ЕP$│"A"з Р(AZ$(E),9,3)│GB$:ЛEB ЕP$┤▓"A"зБж970:ЕAZ│0зGB$│"BAS":ДЕAZ│1зGB$│"DAT":ДЕAZ│2зGB$│"BIN":ДЕAZ│3зGB$│"TXT"B4ЕP$┤▓"A"з Р(AZ$(E),9,3)│GB$BPHI│1:IH│3:TR$│"":RT$│""Bx(Т65496,0:АX│3е11:рA,17,X,SW$,SW$:ЛXBп2АX│HI е HIл3:ЕAZ$(X)┤▓""зTR$│TR$лAZ$(X):ЛX :Д 1350C$Е B$│"U" з ё0,4:°2,1:ЗJ$:ё0,4:╗Й"ARE YOU SURE YOU WANT TO UNLOCK FILE:";P$:Е P$│"N" з Бж860:Бе560 :Д 12607PHёS,T:°2,3:ЗX$(O);:Е X$(E)┤▓"" з ёC,D:°6,4:ЗF$;:ёC,D:ЗX$(E);:Бе560 :Д Е X$(E)│"" з ёC,D:°2,3:ЗF$:Бе5607КRТ65496,0:Ъ:а150,2:Е  м│33 ▒  м│20 з 50 :Д Бж860:Бе5608/\Т65497,0:ё0,4:°2,1:З"CURRENT DRIVE:";A:ё20,4:З"FREE GRANS:";L:ё38,4:З"FILES:";Mм1:BY│0:АTV│1еMм1:BY│BYлMZ(TV):ЛTV:ё50,4:З"BU:";BY:ё65,4:З"BF:";Lн2304:Т65496,0:Р8Lfё0,6:°2,3:АX│6е19:З:ЛX:Р8╧pт40:у0,0:Ю1:°7,0:Бж970:P$│"BLANK":Бж1400:Х100:И я Бе 850:CP│ Ж(28672):PC│28673:АVD│PC е PCлCPм1:H$│H$л Л( Ж(VD)):ЛVD:▐ H$:Бе508▐zАXX│1е10008ЁДЕ  М(1) з 9309ОЕ KK│24 з в44539:KK│1:KK│1:U│Uл1:Ю9;Ш╗Й#1,N$(XX):KK│KKл1:ЗN$(XX):ЛXX9QвЪ#1:а135,5:в445399ШмЮ:ё10,0:З"PAGES:";U:ё30,0:╗Й"PRINT THIS OUT:";OO$:ЕOO$│"Y"з950:Д509╝╢АZZ│1 е XX:З#м2,N$(ZZ):ЛZZ:Бе509°└З#м2,"DISK NAME: ";V$;" FREE GRANS:";L;" FILES:";Mм1:Р:&╩AZ│ К( Р(X$(E),13,1)):H$│ Р(X$(E),1,12):Р:Ж╘Е AZ│0 з AZ$│"BASIC" :Д Е AZ│1 з AZ$│"DATA" :Д Е AZ│2 з AZ$│"BINARY" :Д Е AZ│3 з AZ$│"TEXT":У▐Т65497,0;;шBL│MZ(E)о2304:Е Р( И(BL),2,1)│"."зBL│BLл1:BL$│ Р( И(BL),2,1):ДЕ Р( И(BL),3,1)│"."зBL│BLл1:BL$│ Р( И(BL),2,1):ДЕ Р( И(BL),4,1)│"."зBL│BLл1:BL$│ Р( И(BL),2,2):Д 1010;sЄЕBL┤│9зBL$│ Р( И(BL),2,1):ДЕBL▓9зBL$│ Р( И(BL),2,2);Х№Е BL▓9 з BL$│ Р( И(BL),2,2):Р;ЫРi`HI│HIл4:АX│HI е HIл3:ЕAZ$(X)┤▓""зRT$│RT$лAZ$(X):ЛX:рA,17,IH,TR$,RT$:HI│HIл4:IH│IHл1:TR$│"":RT$│"":Бе1110 :Д 1130>ЕjЕ TR$│"" з Бж1160:Бе560>╝tЕ TR$┤▓"" ░ RT$│"" з рA,17,IH,TR$,SW$:Бж1160:Бе560>Ї~Е TR$┤▓"" ░ RT$┤▓"" з рA,17,IH,TR$,RT$:Бж1160:Бе560?Иё5,2:°5,0:З" ";:Р?KТТ65497,0:SW$│"":АX│1е128:SW$│SW$л Л(255):ЛX?УЬЕ P$│"A" з АX│1еMм1: Р(AZ$(X),9,3)│"///":ЛX :Д  Р(AZ$(E),9,3)│"///"?╗жТ65496,0:АX│3е11:рA,17,X,SW$,SW$:ЛX?╫░HI│1:IH│3:TR$│"":RT$│""@║АX│HI е HIл3:ЕAZ$(X)┤▓""зTR$│TR$лAZ$(X):ЛX :Д 1230@Г─HI│HIл4:АX│HI е HIл3:ЕAZ$(X)┤▓""зRT$│RT$лAZ$(X):ЛX:рA,17,IH,TR$,RT$:HI│HIл4:IH│IHл1:TR$│"":RT$│"":Бе1210 :Д 1230@Я╬Е TR$│"" з B$│"N":Бе570@╓╪Е TR$┤▓"" ░ RT$│"" з рA,17,IH,TR$,SW$:B$│"N":Бе570AтЕ TR$┤▓"" ░ RT$┤▓"" з рA,17,IH,TR$,R )&&:ГCOPYRIGHT (C) 1992 BY T&D S.S.&>:ГBY JEFF STEINPORT&DЮ&Q З"LOTTO"&tЗ"I CHOOSE YOUR LOTTO NUMBERS"&БA│ Д(44)&О(B│ Д(44)&Ы2C│ Д(44)&иФЕ ST┤32 з ST│63 :Д Е ST▓63 з ST│32-PЮЗ@ST, Л(223);-`и╔"O5;BCB":Р-l▓Э(H,31)-╝Е J┤15 з H│Hм1-Т╞Е J▓47 з H│Hл1-│╨Е H┤0 з H│0 :Д Е H▓63 з H│63-┴┌Ь(H,31,5)-╟фР. юЖ 142,4,64,230,132,166,1,167,132,48,1,140,4,223,38,245,231,132,57.V°╔"L100O1CDEFBAGO2V10CDEFBAGO3V31CDEFBAGO4V10CDEFGABO5V31CDEFBAGL255".Т¤АX│1 е 25:З@ST, Л( Д(200)л55);:╔"O1BC":ЛX:З@ST, Л(128);.еАX│1 е 1000:ЛX.∙ АX│1 е 5:З@238,"bonus";:АPA│1 е 250:ЛPA:З@238, б(5, Л(128));:АPA│1 е 250:ЛPA:ЛX/ А ╜ьP @╬ 1Н;БЖО  О  ╬  03_1?&°J+ щ╜ь1НЪ^нЯаС'°Б1-ЇБ4.ЁА1A MEMORY TEST PROGRAM BY COCOSOFT 1987 COPYRIGHT (c) FOR COCO I & II 16 - 64K RAM DIAGNOSTICS MENU 1. LOW RAM TE  ST 2. HIGH RAM TEST 3. LOOP TEST LOW RAM 4. LOOP TEST HIGH RAM ENTER SELECTION DESIRED > RAM TEST IN PROGRESS ' J'J'Н №╜ ╜ 9Н ■╖ ▀ЖU╖■■▒■■&мC╖■■▒■■&бО пН90НcьДэН┘Н cО■■пН"╖ ▐╜ь1МНп1Н┐╜Ф╖ ▀О╠UUоНН  ■эДгБ'▐М )-мНш-щ мНр&с9╖ ▐1Не╜Ф╖ ▀╠ккоН╦Н╩9╖ ▐1Н ╜Ф╖ ▀оН╖╠ААэДгД'УGW$Є0М )-мНЧ-р мНП&╪QоНЙ╖ ▐1Н ╜Ф╖ ▀╠  эДгД'НYIY%є0М )-мН]-с мНU&┘оНQ╖ ▐1Н│╜Ф╖ ▀╠эДгД'Н!IY$є0М )-мН%-с мН&┘1Н╡ ZН М&9~@чН 0бД&0 ¤жД╖ ▐╞CдНї+└H+ ┴' ї0О91Н жезН╝1!жезН╡1!жезН╖╜1НХ9╖ ▐╜ьKЖО  01?3_&°J&ю9 ▐О пНХ╖■▒■&0Н╡ьДэН-О■■U0НгьДэНО?■■EнЯажа&°9 ##K RAM TEST GOOD PUSH RESET TO END UXX BAD BIT X HE №X ADDRESS $XXXX PUSH RESET TO END163264200211222233244255266277 FILL BYTE RIGHT TO LEFT WITH 1 WALKING ONES IN FIELD OF ZEROS WALKING ZEROS IN FIELD OF ONES WORST CASE TEST %01010101 ($55) WORST CASE TEST %10101010 ($AA) ╞`ОЯИчАМ #∙9'Ж461Н■ ╞hcibiaZ&ўжaДЛ0Б9#Лзаjф&у5╢ Н ■Н №9В~ 277 FILL BYTE RIGHT TO LEFT WITH 1 WALKING ONES IN FIELD OF ZEROS WALKING ZEROS IN FIELD OF ONES WORST CASE TEST %01010101 ($55) WORST CASE TEST %10101010 ($Л(13) з Р5`Е BL│50 з 10805'jБе 1090 THE RIGHT JOYSTICK. HIGH SCORES ARE CALCULATED AND KEPT.":Бж 10804u$Ю4ж.З@139,"satellite":З@328,"BY DEAN HUIZENGA":Р4┼8BL│0:З@457,"PRESS "4╧BK$│ Т4ЇLBL│BLл1:Е BL│25 з З@464,"enter>"5VЕ K$│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  Ъ&':ГCOPYRIGHT (C) T&D SOFTWARE 1992&9 Т 359,57:┐0,1&u╛Ю:Х2048:╚0:└4:З@229,"READING DISK DIRECTORY";:Т&HFF22,8&о╚А X│512 е 541:НA$:ТX, Й("&H"лA$):ЛX:╣ Г0│512:F│ г(0)&╬╥МA$(68):Y│1:P1│1:PO│4:T│247&·▄А X│3е11:▀0,17,X,A$,B$:C$│A$л О(B$,127)'4цА N│0е7:A$(Y)│ Р(C$,Nн32л1,8)л"."л Р(C$,Nн32л9,3)л" "'[ЁR│ К(A$(Y)):Е R│255зA$(Y)│"":Бе300'Д·A$(Y)│A$(Y)л Л( Ж(1547лNн32)л48)л" "'┐Е  Ж(1548лNн32)│0 з A$(Y)│A$(Y)л"B" :Д A$(Y)│A$(Y)л"A"(Е R│0 ▒  П(A$(Y),1)┤▓"B" ▒ ( Р(A$(Y),10,3)┤▓"BAS" ░  Р(A$(Y),10,3)┤▓"BIN") з A$(Y)│"":Бе290(<A$(Y)│ О(A$(Y),12):Y│Yл1(F"Л N,X(q,P2│ Б((Yм1)о10):Е P2┤(Yм1)о10 зP2│P2л1(Т6Ю:Зд6)"COLOR DISK DIRECTORY"(ц@A$│ И(68мF)л" USED -"л И(F)л" FREE":Зд(32м З(A$))о2)A$:Зд10)"PAGE";P1;"OF";P2:З(°JH│(P1м1)н10л1)TА X│H е Hл9) ^Е A$(X)│"" зЗ:Бе370)/hЗд9);A$(X))5rЛ)C|Т&HFF22,8)ДЖАI│338 е 345:ТI,255:Л:K│POн32л8:Т529,&H80:A│ Г0(K):Т529,&H8B)ЩРE│(P1м1)н10лPOм3*ЪK$│ Т:ЕK$│"^" ░ PO│4 ░ P1▓1 з P1│P1м1:PO│13:A│ Г0(K):Бе310 :Д Е K$│"^" ░ PO▓4 з A│ Г0(K):PO│POм1:Бе390*yдЕ K$│ Л(10) ░ PO┤13 ░ E┤Yм1 з A│ Г0(K):PO│POл1:Бе390 :Д Е K$│ Л(10)░ P1┤P2 ░ PO│13 з P1│P1л1:PO│4:A│ Г0(K):Бе310*ОоЕ K$│ Л(13) з450*Ш╕Бе410*╛┬ Р(A$(E),9,1)│".":T$│ О(A$(E),12)*ъ╠Z$│ Т : Ю : З @233,"LOADING "л О(T$,8);+╓Е  Ю(A$(E),"BIN") з Т 359,126:╙MT$:в+:рЕ  Ю(A$(E),"BAS") з Т359,126:╙T$,R+DъБе410+ЩЇЖ BD,B3,ED,C3,4,0,1F,1,C3,0,E,ED,8D,0,D,A6,84,8B,40,A7,80,AC,8D,0,3,26,F4,39,0,0┬ Р(A$(E),9,1)│".":T$│ О(A$(E),12)*ъ╠Z$│ Т : Ю : З @233,"LOADING "л О(T$,8);+╓Е  Ю(A$(E),"BIN"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 &C:ГCOPYRIGHT (C) T&D SOFTWARE 1992 cover program ISSUE #119&MХ 200&Е Е Ж(14000)│188 ░  Ж(14001)│188 ░  Ж(14002)│188 з 22&╡Е  Ж(186)│14 з ╙M "CVR-MOD" :Д ЧM "CVR-MOD"&╤IS$│" COCO ISSUE #119 "&ьDT$│" MAY 1992 "'2A│ Э(IS$):A│ Ж(Aл2)н256л Ж(Aл3):АI│0е16:G│ Ж(AлI):Е G┤64 з G│Gл64'CТ14500лI,G:Л'ЙA│ Э(DT$):A│ Ж(Aл2)н256л Ж(Aл3):АI│0е16:G│ Ж(AлI):Е G┤64 з G│Gл64'ЪТ14700лI,G:Л'╢S1│1024:S2│1200:S3│1100(Т 3584,S1о256:Т3585,S1 ░ 255:Т3586,S2о256:Т3587,S2 ░ 255:Т3588,S3о256:Т 3589,S3 ░ 255( Бж 4000(B-Т3600,14000о256:Т3601,14000 ░ 255(h/Т3602, Д(7)н16:Т3603,( Д(17)м1)н2(Й0Т 3604,SPо256:Т3605,SP ░ 255(Х2в 15000(б7Бж 4000(╟<Т3600,14192о256:Т3601,14192 ░ 255)>Т3602, Д(7)н16:Т3603,( Д(17)м1)н2:Е  Д(3)│1 з Т3603,0)!@Т3604,SPо256:Т3605,SP ░ 255)-Fв 15000)EKЕ  Д(5)│1 з Бж 5000)вPSC│SCл1:Е SC│3 з SC│0:Бе28 :Д S1│1024л Д(8)н32:S2│1024л Д(12)н32:S3│1024л Д(10)н32:Бе 30*VаP│ Д(5):ЕP│1зТ3590,5:Т3591,1:Т3592,1 :ДЕP│2 зТ3590,5:Т3591,1:Т3592,7 :ДЕP│3зТ3590,7:Т3591,6:Т3592,4 :ДЕP│4 зТ3590,0:Т3591,7:Т3592,5 :ДТ3590, Д(8)м1:Т3591, Д(8)м1:Т3592, Д(8)м1*iSP│ Д(20)н50:Р+И┐0:Ю:З@40,"T & D SOFTWARE";:З@71,"HOLLAND MICHIGAN";:З@130,"REPRODUCTION OF ANY OF THE FOLLOWING IS PROHIBITED.":З@194,"T & D SOFTWARE SHALL HAVE"+дТЗ@226,"NO LIABILITY OR RESPONSIB- ILITY TO CUSTOMER WITH RE- SPECT TO ERROR, LOSS, OR DAMAGES CAUSED BY THESE PROGRAMS."+сЬЗ@421,"COCO CASSETTE NO. 119 MAY 1992 +ўбЕ  Д(2)│1 з ┐ 0,1,жАTD│0е2000:Л,oР"NO LIABILITY OR RESPONSIB- ILITY TO CUSTOMER WITH RE- SPECT TO ERROR, LOSS, OR DAMAGES CAUSED BY THESE PROGRAMS."+сЬЗ@421,"COCO CASSETTE NO. 119 MAY 1992 +ўбЕ  Д(2)│1 з ┐ 0,1,жАTD                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                g3'c3333'c33LLLLGdLLLLчl╠╠╠╠чl╠╠11117e1113'c3333'c33────╟d────чl╠╠╠╠чl╠╠g'c3333'c33LLLLGdLLLLglLLLLglLL11117e1111'a1111'a11────╟d────чd────чd──g'c'cLLLLGdLLLLglLLLLglLL11117e1111'a1111'a11────╟d────чd────чd──g'c'cLLLLGdLLLLglLLLLglLL11117e1111'a1111'a11────╟d────чd────чd──g'c'cLLLLGdLLLLglLLLLglLL11117e1111'a1111'a11────╟d────чd────чd──g'c'cLLLLGdLLLLglLLLLglLL11117e1111'a1111'a11@№ └? Ё└/  №А┴Yq└@  Э@&А АТГ @у у @ч°уПА╟╨у,dNd8╚╚╚>p╚■ °Єp~Є4 ├АP■╧├ёР¤√├┐Рўє├┐ЁяГ└П└╛ПЁ╢7ЙЁ|├Аx|З├А08├├0 C 0ц0 0╦░0 ├m░└╦oА└╪l3cєуmГxnМ єЁ▐Ё╞1°└!ррр`∙р└ЁА? └ЗА 0  0                                                                                                                                                                                                                                                                                                 P╛hпНЩ0НР┐hЖ╖ЖЧ╢ЖЧ┴О╢└БD&ОпНa╘╛#1Н┐#╞sжАзаZ&∙0Нї0И<1Н0пД╛ пН 0Н┐ oН╙oН╨п9жН╚LзН├Б'~oН╕жН╡LБ&OзНлзНд] т o'~2b44PБ&ЮИМ'ЧЎчН~7ЮИ0ЯИДБ &0ЎчНg ╓Й─чН[╞ рНUЮИ:ЯИМ&YОрЯИНW PБ -LА Д╞ =1Нп1л╢╞ чН%O╞└HHхд'║ ║TT&юзД0И 1!jН&▐▄И├▌ИГ-╠р▌ИНп549оНы1ЙАпНрьЙАэБмН╓-ЇоН╥1Й оН╚пН├ЎчН╕ (P' ╜╖ ─чНй ЎчНаОЯИоНЭ1Й пНТН эБмНК/°9O╞HHкНzZ&ўЙ9▄ИГ4─чНf5DVDVDVDVDVЖ└=эНXуНTуНRцНE:9Н┐4Н╩╞ 5зД0И Z&°9╢ "Д╓╢┴'Кр КЁЪ┴╖ "╖ └╖ ├╖ ┼╖ ╟╖ ╔╢└БD&╖ ╦9G G G G G G G G G G G W fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffFfffffffffFfffffffffF 33333 33 3 ? COCO DIRECTORY MANAGER <";:°5,0'РЦё28,2:°3,2:З"press to load file";:°5,0'╢аё60,0:°3,2:З"(M)atch files ";'▄кё60,1:°3,2:З"(S)uper print dir ";(┤ё60,2:°3,2:З"(A)lphabetize disk";(&╛ё5,0:°3,2:З"(L)ock file ";(K╚ё5,1:°3,2:З"(U)nlock file ";(k╥°3,0:АX│28е53:ёX,1:З"=";:ЛX(К▄°3,0:ё0,3:АX│1е80:З"-";:ЛX(┬ц°2,1:З"CURRENT DRIVE:";A:ё0,5:°3,0:АX│1е80:З"-";:ЛX(тЁё0,20:°3,0:АX│1е80:З"-";:ЛX)?·°3,2:З"(D)elete (C)hange dir (R)ename (K)opy (N)ew dir (V)iew (P)rint dir (E)xit (I)nfo")_ё0,22:°3,0:АX│1е80:З"-";:ЛX)lТ65496,0)|Бж860:Бж870*"ё8,2:°4,7:З"READING DIR";:а25,1:АX│1еM:X$(X)│"":AZ$(X)│"":MZ(X)│0:ЛX:M│1:L│ г(A):G│0:GG│6:M│1:АV│3е11:▀A,17,V,Z$,ZZ$:АVV│1е8:ЕVV┤5 зOP│(VVм1)н32:ДOP│(VVм5)н32*0,ЕVV│5зZ$│ZZ$*Ы6AZ$(M)│ Р(Z$,OPл1,32):RR$│ Р(Z$,OPл1,8)л"."л Р(Z$,OPл9,4):Е К( О(RR$,1))│255з340:ДЕ К( О(RR$,1))│0з330*п@X$(M)│RR$:M│Mл1*╣JЛVV,V+'TЕ M│1 з Т65497,0:ё4,2:°4,7:З" * BLANK DISK * ";:а115,35:ё4,2:°5,0:З" ";:Т65496,0:Бе530+Q^ё5,2:°4,7:З"ALPHABETIZING DIR";:а25,1+lhТ65497,0:JP│0:АX│1еMм1+ЛrЕ Р(X$(X),1,8)┤X$(Xл1)з390+р|ST$│AZ$(X):SS$│X$(X):AZ$(X)│AZ$(Xл1):X$(X)│X$(Xл1):AZ$(Xл1)│ST$:X$(Xл1)│SS$:JP│1+√ЖЛX:Е JP│1 з 360 :Д 400, Рё4,2:°5,0:З" ";,-ЪАX│1еMм1,eдAZ$(X)│AZ$(Xл1):X$(X)│X$(Xл1):ЛX:AZ$(X)│"":X$(X)│"",ШоТ65496,0:ё5,2:°4,7:З"CALCULATING BYTES";:а25,1,е╕АE│1еMм1,с┬Бж970:Е  Р(H$,10,3)│"///"з ЛE:Ъ#1:Бе480 :Д Щ"D",#1,H$,1,ї╠MZ(E)│ е(1):Ъ#1,№╓ЛE-*рё4,2:°5,0:З" ";:Т65497,0-7ъАX│1еMм1-fЇёG,GG:°2,3:ЗX$(X):G│Gл17:ЕG▓68зG│0:GG│GGл1-m■ЛX-zТ65496,0-КC│0:D│6:E│1-╝F$│" ":ёC,D:°6,4:ЗF$;:ёC,D:ЗX$(E);.U&Т65497,0:CC│1:ё20,4:°2,1:З"FREE GRANS:";L:ё38,4:°2,1:З"FILES:";Mм1:BY│0:АTV│1еMм1:BY│BYлMZ(TV):ЛTV:ё50,4:З"BU:";BY:ё65,4:З"BF:";Lн2304:°6,4:Т65496,0.j0B$│ Т:ЕB$│""з560.z:И Ё Бе 1390.ОD╔"T255O3ABCDFG".ЮNS│C:T│D:O│E.─XЕ B$│ Л(8) з C│Cм17:E│Eм1:CC│CCм1.ъbЕ B$│ Л(9) з C│Cл17:E│Eл1:CC│CCл1/lЕ B$│ Л(94) з D│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  \└  @@@рЁ  ■`SА O  ЄHKАKБ└H╛HВHВHPВHPВHPВHPHPHPHH■HHЁHO  ЄS  ╩`  ■А└рАА└└№Ї └д шр0=^`ГаА @гта^=@╛>Аcу`ААА└┴┴Аcc>>$$$$$$$$$$~~┬CА@р■р  @А└р  А@№@№@№@№@№@№@@@@@@@@@@@@@@@  А    А┐  БаБа<СаBйаБСб$АБбАБбАСаЩйаBСа$БаBБаББаББ┐  БА    АЁ @┐·└┴╛·АБИ"G─ ?Ё@А А%I I№IIIЕЕ№ № №ВВЁ|В■ А А А А А А А А А.А.А?А?АА0└:Q│Qм328^Е A$(Q,Z)│""з 15908@hЕ  З(A$(Q,Z))│12 з C│2:Бе 16608crЕ  З(A$(Q,Z))│18 з C│3:Бе 17208m|T│TлC8ЖЕ T▓32 з 18408█РA$│A$л Л( В(Gм( Й( Р(A$(Q,Z),1,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),3,2))))л128лH(H))97ЪB$│B$л Л( В(Gм( Й( Р(A$(Q,Z),5,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),7,2))))л128лH(H))9ФдC$│C$л Л( В(Gм( Й( Р(A$(Q,Z),9,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),11,2))))л128лH(H))9аоБе 17709к╕T│TлC9╝┬Е T▓32 з 1840:A╠A$│A$л Л( В(Gм( Й( Р(A$(Q,Z),1,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),3,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),5,2))))л128лH(H)):╟╓B$│B$л Л( В(Gм( Й( Р(A$(Q,Z),7,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),9,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),11,2))))л128лH(H));OрC$│C$л Л( В(Gм( Й( Р(A$(Q,Z),13,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),15,2))))л128лH(H))л Л( В(Gм( Й( Р(A$(Q,Z),17,2))))л128лH(H));fъЕ Z│1 з Z│2 :Д Z│1;╡ЇЕ Q$│"M" ▒ Q$│"N" ▒ Q$│"V" ▒ Q$│"W" ▒ Q$│"X" ▒ Q$│"Y" з Е Z│1 з Z│2 :Д Z│1;┼■CC│(32мT)о2;╫З@CCл32лW,A$;;щЗ@CCл64лW,B$;;√З@CCл96лW,C$;<&Бе 1590<:0W│Wл96:T│0:Z│1:A$│"":B$│"":C$│"":H│Hл1:Бе 164017,2))))л128лH(H));fъЕ Z│1 з Z│2 :Д Z│1;╡ЇЕ Q$│"M" ▒ Q$│"N" ▒ Q$│"V" ▒ Q$│"W" ▒ Q$│"X" ▒ Q$│"Y" з Е Z│1 з Z│2 :Д Z│1;┼■CC│(32мT)о2;╫З@CCл32лW,A$;;щЗ@CCл64лW,B$;;√З@CCл96лW,C$;<                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 [2 :Г ZOOM2':Г COPYRIGHT (C) 19892=:Г BY BRAD RENFRO2ЕЮ:Зд14)"ZOOM":З:Зд7)"COPYRIGHT (C) 1989":З:Зд9)"BY BRAD RENFRO":З:З2ЪЗ д12)"CONTROLS"3З:З д2)"I=INCREASES ZOOM OF PICTURE":Зд2)"O=SHOWS ALL OF THE PICTURE":З д2)"M=BRINGS YOU BACK HERE":Зд2)"ARROWS MOVES PICTURE"3LЗ:Зд2)"PRESS ANY KEY TO CONTINUE.";:в445393` A$│ Т:A$│"":F│03l RE│35843vRF│123Й╚4,1:┐1,1:Бе703┼(B│REо512:A│1:АI│65478е65490й2:Т Iм((B ░ A)│A),0:A│Aн2:Л3╬2B│RF4A$(14,2)│"000000000000000800".╡HA$(15,2)│"".╫RA$(16,2)│"011202050010001200".∙\A$(17,2)│"011300000500001208"/fA$(18,2)│"011202000600041208"/=pA$(19,2)│"041202001202041200"/_zA$(20,2)│"011210041210000008"/БДA$(21,2)│"051208041202041200"/гОA$(22,2)│"011200051202001200"/┼ШA$(23,2)│"041210000600040000"/чвA$(24,2)│"011202011202001200"0 мA$(25,2)│"011202001210001200"0+╢A$(26,2)│"000000000800000800"0M└A$(27,2)│"000000000800041000"0i╩A$(28,2)│"010809000008"0Е╘A$(29,2)│"030203020000"0б▐A$(30,2)│"090001080800"0╜шA$(31,2)│"060201080100"0┘ЄA$(32,2)│"030303030303"0√№A$(33,2)│"011202051210040008"1A$(34,2)│"051202051202041200"1?A$(35,2)│"011208050000001208"1aA$(36,2)│"051202050010041200"1Г$A$(37,2)│"051208051200041208"1е.A$(38,2)│"051208051200040000"1╟8A$(39,2)│"011208050410001208"1щBA$(40,2)│"050010051210040008"2 LA$(41,2)│"041400001000041200"2-VA$(42,2)│"000010010010001200"2O`A$(43,2)│"050108050900040008"2qjA$(44,2)│"050000050000041208"2УtA$(45,2)│"050913050005040004"2╡~A$(46,2)│"050205050407040004"2╫ИA$(47,2)│"011202050010001200"2∙ТA$(48,2)│"051202051200040000"3ЬA$(49,2)│"011202050108001208"3=жA$(50,2)│"051202051202040008"3_░A$(51,2)│"011208001202041200"3Б║A$(52,2)│"041400001000000800"3г─A$(53,2)│"050010050010001200"3┼╬A$(54,2)│"050005040206000400"3ч╪A$(55,2)│"050005050105040812"4 тA$(56,2)│"040206000602040004"4+ьA$(57,2)│"040206000500000400"4MЎA$(58,2)│"041210011200041208"4iA$(59,2)│"050805000408"4Е A$(60,2)│"060606060606"4бA$(61,2)│"041000100408"4╜A$(62,2)│"060606060606"4┘(A$(63,2)│"060606060606"4ї2A$(64,2)│"060606060606"5R│13йHА X│1024 е 15353╝RЕ X│1152 з R│23╧\Е X│1280 з R│33тfЕ X│1408 з R│43єpТ X,H(R)л1433√zЛ X4ДH│14ОQ$│ Т:Е Q$│""з 9104`ШЕ A│▓29 з W│Wл128:C│16лW:A│0:H│Hл1:A$│"":B$│"":C$│"":D$│"":Бе 9504ОвЕ Q$│ Л(12)з ╪M"TITLEL",1024,1535,40999:К4╫мЕ Q$│ Л(13)з W│Wл128:C│16лW:A│0:H│Hл1:A$│"":B$│"":C$│"":D$│"":Бе 9104ы╢Q│ К(Q$):Q│Qм324√└C│Cм2:A│Aл45б╩A$│A$л Л( В(Tм( Й( Р(A$(Q),1,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),3,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),5,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),7,2))))л128лH(H))6J╘B$│B$л Л( В(Tм( Й( Р(A$(Q),9,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),11,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),13,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),15,2))))л128лH(H))6Ї▐C$│C$л Л( В(Tм( Й( Р(A$(Q),17,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),19,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),21,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),23,2))))л128лH(H))7ЮшD$│D$л Л( В(Tм( Й( Р(A$(Q),25,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),27,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),29,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),31,2))))л128лH(H))7кЄЗ@C,A$;7╣№З@Cл32,B$;7╚З@Cл64,C$;7╫З@Cл96,D$;7тБе 9102))))л128лH(H))7ЮшD$│D$л                                                                                                                                                                                                                                                                        ╞├ ┬╞╞╟╔╔ ╞┼─!╔#╟─&'()╟+,┬./╞123┴╚6┬8╞:;╔        DIR BASЭCOVER BASCVR-MOD BIN4wLARGE BAS цMEDIUM BAS"SSMALL BAS>TITLE TXT $БPM2 BAS%╒ZOOM BAS^PICTURESPIC SQUARE BAS0╡DISK BAS*ПDISK BIN?HINTS BAS5▐LOTTO BAS ,POCKBALLBAS7┌RAMTEST BIN [CDM BASАCDM DOC 9MUTANT BAS-нMUTE BIN│TITLEL BIN ICTURESCNT                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  P& Х 1200&М A$(65):C│15&CA$(0)│"000000000000000000000000"&h(A$(1)│"001500001500001200001200"&Н2A$(2)│"000000000000000000000000"&▓:A$(54)│"150510150510130508000800".dDA$(55)│"150510150510151310080008".КNA$(56)│"150510041400071302120408".░XA$(57)│"150510130708001000000800".╓bA$(58)│"121310011400070800121208".№lA$(59)│"141208121210141208121208"/"vA$(60)│"090108000800010900080008"/HАA$(61)│"121210141208121210121208"/nКA$(62)│"141010101010101010081208"/ФФA$(63)│"101410101010101010120808"/║ЮA$(64)│"000000000000000000000000"/риA$(65)│"010900080008090108000800"/ч▓Ю00╝З@320,"DO YOU WANT TO INVERSE THE SCREEN Y/N "06╞Q$│ Т:Е Q$│""з 7100Q╨Е Q$│"Y" з T│0 :Д T│150X┌Ю01 фЗ@320,"1=" Л(143); Л(128);"2="; Л(159); Л(128);"3="; Л(175); Л(128);"4="; Л(191); Л(128);"5="; Л(207); Л(128);"6="; Л(223); Л(128);"7="; Л(239); Л(128);"8="; Л(255); Л(128);1юА X│1 е 41;°З@256,"ENTER COLOR OF"X"LINE."1RQ$│ Т:Е Q$│""з 7701_ H│ Й(Q$)1qH(X)│(Hм1)н161y Л X1А*Ю01Ш4Е T│15 з 830 :Д 9001а>R│11┤HА X│1024 е 15351╟RЕ X│1152 з R│21┌\Е X│1280 з R│31эfЕ X│1408 з R│41■pТ X,H(R)л1432zЛ X2ДH│12%ОQ$│ Т:Е Q$│""з 9102kШЕ A│▓28 з W│Wл128:C│15лW:A│0:A$│"":B$│"":C$│"":D$│"":H│Hл1:Бе 9502ЩвЕ Q$│ Л(12)з ╪M"TITLEM",1024,1535,40999:К2тмЕ Q$│ Л(13)з W│Wл128:C│15лW:A│0:A$│"":B$│"":C$│"":D$│"":H│Hл1:Бе 9102Ў╢Q│ К(Q$):Q│Qм323└C│Cм1.5:A│Aл33З╩A$│A$л Л( В(Tм( Й( Р(A$(Q),1,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),3,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),5,2))))л128лH(H))4╘B$│B$л Л( В(Tм( Й( Р(A$(Q),7,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),9,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),11,2))))л128лH(H))4Й▐C$│C$л Л( В(Tм( Й( Р(A$(Q),13,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),15,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),17,2))))л128лH(H))5 шD$│D$л Л( В(Tм( Й( Р(A$(Q),19,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),21,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),23,2))))л128лH(H))5ЄЗ@C,A$;5&№З@Cл32,B$;55З@Cл64,C$;5DЗ@Cл96,D$;5OБе 9102))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),17,2))))л128лH(H))5 шD$│D$л Л( В(Tм( Й( Р(A$(Q),19,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),21,2))))л128лH(H))л Л( В(Tм( Й( Р(A$(Q),23,2))                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                LARGE MEDIUM SMALL TITLE: These three utilities will do the work of making a title screen which will introduce your program while the main program is loading. The utility will ask if you want to inverse the screen. A yes response will give you a black screen with colored letters. A no response will give black letters on a colored screen. You will be asked for the colors you want to use for each line of text. Use the keys 1 to 8 to choose the colors. Of course, if you enter the same color for each line, the screen will be one solid color. Type slowly and the text will apear on the screen. Press the [ENTER] key to move to the next line of text. Press the [CLEAR] key when you are ready to save the screen to disk. Program LARGE has 4 lines of 8 characters. Program MEDIUM has 4 lines of 10 characters. Program SMALL has 5 lines of 12 characters. Bill Link Lone Star, SC 29077 l Link Lone Star, SC 29077 7 s. SMALL has space for 5 lines of 12 characthers. 8,1)="141214080800" 52 A$(39,1)="06121013                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 *╥&:ГPICTURE MAKER&':ГVERSION 2.0&O:ГCOPYRIGHT (C) 1992 T&D SOFT- WARE&d:ГBY BRAD RENFRO&~:ГFOR THE COCO 3 ONLY&ЇЪ:т40:Ю5:°0,4:ё 13,2:З"PICTURE MAKER":ё 11,3:З"Copyright (C) 1991":ё 13,4:З"By Brad Renfro":ё 14,5:З"Version 2.0"'Sё3,20:З"Insert Picture Disk into Drive and":ё 6,21:З"Press Any Key to Continue...";:в44539'▐ :ГTHIS PROGRAM WILL LET YOU DESIGN, LOAD, AND SAVE PICTURES FOR COCO GRAPHICS DESIGNER PLUS AND LABEL DESIGNER FROM ZEBRA SYSTEMS INC.(( Ъ:Т65497,0:└6:Х200,30000:Х2000:М D$(33):Е  Ж(&H7530)┤▓&H10 з Бж 10200(8И Ё Бе 1390(HИ я Бе 1400([#Бж 860:Бе 2000(╓Т65497,0:Ъ:╚4,1:╝:┐1,1:Е LF$│"Y" з Y│8:X│56:ZZ$│ И(ZW):X$│"LOADING PICTURE "л Р(ZZ$,2, З(ZZ$)):X│48:Бж1360:Бж520:Бж620)JЕ UJ$│"N" зX│150:Y│90:X$│"USE ARROWS":Бж1360:X│150:Y│102:X$│"TO MOVE.":Бж1360:X│150:Y│114:X$│"PRESS -C-":Бж1360*Е UJ$│"N" зX│150:Y│126:X$│"TO COLOR.":Бж1360:X│150:Y│138:X$│"PRESS -E-":Бж1360:X│150:Y│150:X$│"TO ERASE.":Бж1360:X│150:Y│162:X$│"PRESS - -":Бж1360:X│150:Y│174:X$│"TO STOP BOTH.":Бж1360*Й"X│3:Y│90:X$│"PRESS -L-":Бж1360:X│3:Y│102:X$│"TO SAVE.":Бж1360:X│3:Y│114:X$│"PRESS CLR":Бж1360:X│3:Y│126:X$│"TO CLEAR.":Бж1360+_,Е UJ$│"Y" зX│150:Y│90:X$│"HOLD RED":Бж1360:X│150:Y│102:X$│"BUTTON FOR":Бж1360:X│150:Y│114:X$│"COLOR.":Бж1360:X│150:Y│126:X$│"HOLD BLACK":Бж1360:X│150:Y│138:X$│"BUTTON FOR":Бж1360:X│150:Y│150:X$│"ERASE.":Бж1360+│6X│50:Y│8:X$│"DESIGN/MODIFY PICTURE":Бж1360:X│76:Y│62:C│2:╗(75,61)м(140,174),╜,B+┌@Е VS$│"N" з ┌ к :Д Е VS$│"Y" з ┌ И+фJA$│ Т,nTЕ UJ$│"Y" з J│ Н(0):J1│ Н(1):J2│ Н(2):J3│ Н(3):Е J2┤20 з A$│ Л(8) :Д Е J2▓50 з A$│ Л(9) :Д Е J3┤20 з A$│ Л(94) :Д Е J3▓50 з A$│ Л(10),░^Е UJ$│"Y" з B│ к(2):F│ к(3):Е F│0 з ЕB│1 з C│1::Д Е B│0 з C│2,ыhЕ UJ$│"Y" з Е B│0 з Е F│1 з C│0::Д Е B│0 з Е F│0 з C│2-3rЕ  а(X,Y)│5 з ╗(X,Y)м(Xл1,Yл1),╛,BF:АI│1е30:Л:╗(X,Y)м(Xл1,Yл1),╜,BF-{|Е  а(X,Y)│0 з ╗(X,Y)м(Xл1,Yл1),╜,BF:АI│1е30:Л:╗(X,Y)м(Xл1,Yл1),╛,BF-╣ЖЕ  а(X,Y)│5 з ╛(Xо2м30,Yо2м30):АI│1е40:Л:╜(Xо2м30,Yо2м30)-ўРЕ  а(X,Y)│0 з ╜(Xо2м30,Yо2м30):АI│1е40:Л:╛(Xо2м30,Yо2м30).ЪАI│338е345:ТI,255:Л.#дЕ UJ$│"Y" з 440.5оЕ A$│"" з 330.Р╕Е A$│ Л(94) з Y│Yм2 :Д Е A$│ Л(10) з Y│Yл2 :Д Е A$│ Л(8) з X│Xм2 :Д Е A$│ Л(9) з X│Xл2.г┬Е A$│"C" з C│1.╚╠Е A$│"E" з C│0 :Д Е A$│" " з C│2.щ╤Е A$│ Л(12) з LF$│"N":Бе 260.№╓Е A$│"L" з 670/EрЕ X┤76 з X│76 :Д Е X▓138 з X│138 :Д Е Y┤62 з Y│62 :Д Е Y▓172 з Y│172/xъЕ C│1 з ╗(X,Y)м(Xл1,Yл1),╜,BF:╜(Xо2м30,Yо2м30)/лЇЕ C│0 з ╗(X,Y)м(Xл1,Yл1),╛,BF:╛(Xо2м30,Yо2м30)/╢■Бе 330/┘:ГLOAD RECORD NUMBER FROM DISK/цТ65496,002Щ"D",#1,F$л".PIC":╨#1,128 зS1$,128 зS2$:S│ Э(S1$)л2:X│ Ж(S)н256л Ж(Sл1)0K&─ #1,ZW:Ъ:Т&HFF40,0:0Y0Т 65497,00d:A│36160|DА I│Xл4 е Xл224 й 40ЬNА N│Iл1 е Iл4:Т NмIлA, Ж(N)0пXЛN:A│Aл32:ЛI:█0╜bБж 1380:Р0╙l:ГENLARGE PICTURE0■vY│8:X│56:X$│"ENLARGING PICTURE":Бж13601А╗(75,61)м(140,174),╜,B1gКА Q│8 е 40:А W│1 е 56:Е  а(Q,W)│5 з ╗(Qн2л60,Wн2л60)м(Qн2л61,Wн2л61),╜,BF1zФЛ W,Q:Бж1380:Р1оЮБж 1380:X│56:Y│8:X$│"CONVERTING PICTURE":Бж13601┐иK$│"":A│35841╤▓А I│Aл1 е Aл41х╝K$│K$л Л( Ж(I))2╞ЛI:A│Aл32:Е A│5600 з 7302 ╨Бе 6902W┌Е PS$│"Y" з Бж1380:X│50:Y│8:X$│"PRESS ANY KEY TO SAVE.":Бж1360:в445392Тф┐0:Ю:З@329,"Saving Picture":З@329л41,"Please Hold...";2╡юS│ Э(K$)л2:X│ Ж(S)н256л Ж(Sл1)2┬°Т65496,03A│3584:╝:╙M F$л".PIC:"л Р( И(SD),2, З( И(SD))),3584м23744л655363 F│3584л(ZWм1)н2563@А I│X е Xл255:Т F, Ж(I):F│Fл1:Л3s Т65496,0:╪M F$л".CNT",3584,3584л8191,0:Бж 41003У*└4:Х200,32767:Х 200:Бж 42003╚4╙M F$л".CNT:"л Р( И(SD),2, З( И(SD))),23744м35844>╪M F$л".PIC:"л Р( И(SD),2, З( И(SD))),23744,31935,045H╥ F$л".CNT:"л Р( И(SD),2, З( И(SD))):A$│ Т:A$│""4;RО4L\М CHAR$(100)4gfCHAR$(73)│"R4L2U8L2R4"4ЖpCHAR$(65)│"U3R4D3U6H2G2D3"4пzCHAR$(66)│"U4R3L3U4R3F1D2G1F1D2G1L3"4╥ДCHAR$(67)│"R3E1G1L3H1U6E1R3F1"4эОCHAR$(58)│"BU1U1BU3U1"5 ШCHAR$(68)│"U8R3F1D6G1L3"5)вCHAR$(69)│"R4L4U4R2L2U4R4"5DмCHAR$(70)│"U4R3L3U4R4"5o╢CHAR$(71)│"R3E1U2L1R1D2G1L3H1U6E1R3F1"5К└CHAR$(72)│"U8D4R4D4U8"5н╩CHAR$(74)│"H1U2D2F1R2E1U7L2R4"5╬╘CHAR$(75)│"U4R1F4H4E4G4L1U4"5х▐CHAR$(76)│"R4L4U8"5■шCHAR$(77)│"U8F2E2D8"6ЄCHAR$(78)│"U8D1F4D3U8"6:№CHAR$(79)│"R3E1U6H1L3G1D6F1"6WCHAR$(80)│"U8R3F1D3G1L3"6|CHAR$(81)│"R2F1H1R1E1U6H1L3G1D6"6ЭCHAR$(82)│"U8R3F1D3G1L3R2F3"6╠$CHAR$(83)│"H1U1D1F1R3E1U2H1L3H1U2E1R3F1D1"6ц.CHAR$(84)│"BR2U8L2R4"78CHAR$(85)│"H1U7D7F1R2E1U7"7%BCHAR$(86)│"BR2H2U6D6F2E2U6"7@LCHAR$(87)│"U8D8E2F2U8"7gVCHAR$(88)│"U2E2H2U2D2F4D2U2H2E2U2"7Й`CHAR$(89)│"BR2U4H2U2D2F2E2U2"7жjCHAR$(90)│"R4L4U2E4U2L4"7╦tCHAR$(48)│"H2U4E2R1F2G4E4D4G2L1"7ш~CHAR$(49)│"R2U8G2E2D8R2"8 ИCHAR$(50)│"R4L4U2E1R2E1U3H1L2G1"88ТCHAR$(51)│"H1F1R2E1U2H1L1R1E1U2H1L2G1"8WЬCHAR$(52)│"U4L2U4D4R5L3U3"8~жCHAR$(53)│"H1U1D1F1R2E1U2H1L3U4R4"8л░CHAR$(54)│"H1U2D2F1R2E1U2H1L2G1U4E1R2F1"8╞║CHAR$(55)│"U2E4U2L4D1"8ў─CHAR$(56)│"H1U2E1R2L2H1U2E1R2F1D2G1F1D2G1L2"9╬X│0:Y│309(╪CHAR$(57)│"BU4R4L4U4R4D7G1L2H1"9QтCHAR$(63)│"BR2U1BU2U1R1E1U2H1L3G1D2"9jьCHAR$(46)│"R1U1L1D1"9ЗЎCHAR$(44)│"R1D2L1R1U2L1"9вCHAR$(39)│"BR1BU5U2H1"9╘ CHAR$(36)│"H1F1R3E1U2H1L3H1U2E1R3F1H1L1U1D10"9ьCHAR$(42)│"E5BD5H5": CHAR$(61)│"BU2R5BU2L5R5":$(CHAR$(34)│"BU6U2BR2D2"::2CHAR$(47)│"BU1E5":U S│1:SC│6:А I│1 е N:Е S│1 з ё 5,SC:S│Sл1 :Д Е S│2 з ё 16,SC:S│Sл1 :Д Е S│3 з ё 27,SC:S│1:SC│SCл1>░*З D$(I);:Л:ё 0,17:°0,3:З  б(40," ");:Бж2192:ё4,18:З"ARROWS, JOYSTICK : SELECTS FILE":ё 4,19:З"ENTER, RED BUTTON: VIEW FILE":ё 4,20:З"ALTERNATE : SELECTS DRIVE"?/ё 4,21:З"CLEAR : NEW DISK";:ё 4,23:З"DRIVE # :"; Ж(2394);:ё 23,23:З"FREE :";FE;?┴4Е N│0 зё11,7:°0,4:З"No Pictures Found!":ё0,4:ё6,9:З"Do you want to make a file?":ё17,11:╗Й"(Y/N)?";QW$:Е QW$│"N"зQW$│"":АI│8е11:ё4,I:З б(30," ");:ЛI:QW$│"" :Д Е QW$│"Y"з4000?№>SC│5:S│6:A$│ Т:A$│"":B$│D$(1):ё SC,S:°2,7:ЗB$;:A│1:B│1@HA$│ Т@йID1│ Н(0):D2│ Н(1):D3│ Н(2):D4│ Н(3):Е D3│0 ░ D4│0 ▒ D3│1 ░ D4│1 з 2123 :Д Е D3▓58 з A$│ Л(9) :Д Е D3┤6 з A$│ Л(8) :Д Е D4┤6 з A$│ Л(94) :Д Е D4▓58 з A$│ Л(10)@├JЕ  к(2)│1 з A$│ Л(13)A>KЕ A$│ Л(64) з SD│SDл1:Е SD▓3 з SD│0:╧ SD:ё 4,23:°2,0:З"DRIVE # :"; Ж(2394); :Д ё 4,23:°2,0:╧ SD:З"DRIVE # :"; Ж(2394);AULЕ A$│ Л(12) з О 11A}MЕ A$│"" з 2120 :Д ё SC,S:°0,4:З B$;AмRЕ A$│ Л(10) з A│Aл3:Е A▓N з A│Aм3 :Д S│Sл1A█\Е A$│ Л(94) з A│Aм3:Е A┤1 з A│Aл3 :Д S│Sм1B*fЕ A$│ Л(9) з A│Aл1:Е A▓N з A│Aм1 :Д Е B┤3 з B│Bл1:Бж 2190 :Д Е B│3 з A│Aм1BypЕ A$│ Л(8) з A│Aм1:Е A┤1 з A│Aл1 :Д Е B▓1 з B│Bм1:Бж 2190 :Д Е B│1 з A│Aл1BеzЕ A$│ Л(13) з F$│D$(A):SC│0:S│0:Бе 2300B╠Дё SC,S:°2,7:B$│D$(A):З B$;:Бе 2120B ОЕ B│1 з SC│5 :Д Е B│2 з SC│16 :Д Е B│3 з SC│27CПРCHРё 0,18:А I│18 е 22:° 2,0:З  б(39," "):Л:ё 0,23:З  б(39," ");:РCTШБе 2200C[№:ГC{ Е F$│"MAKEFILE" з Ъ:Бе 4000Cж т32:╚4,1:┐1,1:╝:╗(20,30)м(235,161),╜,BC╚ Q│1:R│1:R1│1:L│12:X1│35:X2│35D0 X$│"CHOOSE PICTURE":X│72:Y│8:Бж1360:╗(0,10)м(255,10),╜:X$│"PRESS 'CTRL' FOR HELP":X│48:Y│182:Бж1360DЕ .Т65496,0:Щ"D",#1,F$л".PIC":╨#1,128 зS1$,128 зS2$:S│ Э(S1$)л2:X│ Ж(S)н256л Ж(Sл1)Dр 3Бж 1385:Z1│X:Z2│Y:X$│"LOADING PICTURES"л И(Lм11)л"-"л И(L):X│48:Y│24:Бж 1360:X│Z1:Y│Z2E# 8A│4772:B│A:SS│1:А Y│Lм11 е L:Е Y┤33 з Т65496,0:─ #1,Y:Т65497,0EФ VD1│ Б(Xо256):D2│Xм Б(D1н256):D3│ Б(Bо256):D4│Bм Б(D3н256):Т 31000,D1:Т 31001,D2:Т 31002,D3:Т 31003,D4:в30000E├ [B│Bл8:Е SS▓2 з SS│1:A│Aл992:B│A :Д SS│SSл1F+ ╕Л Y:Бж 1385:Z1│X:Z2│Y:X$│"PICTURES"л И(Lм11)л"-"л И(L):X│ В(128м( З(X$)о2)н8):Y│24:Бж1360:X│Z1:Y│Z2Fa ╠╗(X1,X2)м(X1л55,X2л30),╜,B:╗(20,30)м(235,161),╜,BFk ╓A$│ ТG рD1│ Н(0):D2│ Н(1):D3│ Н(2):D4│ Н(3):Е D3│0 ░ D4│0 ▒ D3│1 ░ D4│1 з 3042 :Д Е D3▓58 з A$│ Л(9) :Д Е D3┤6 з A$│ Л(8) :Д Е D4┤6 з A$│ Л(94) :Д Е D4▓58 з A$│ Л(10)G( сЕ  к(2)│1 з A$│ Л(13)GG тЕ A$│ Л(189) з ┐0,0:Бж3140Gx хЕ A$│"" з 3030 :Д ╗(X1,X2)м(X1л55,X2л30),╛,BG╕ ъЕ A$│ Л(94) з X2│X2м30:Е X2┤30 з X2│X2л30:Бж 3130 :Д R│Rм3G∙ ЇЕ A$│ Л(10) з X2│X2л30:Е X2▓125 з X2│X2м30:Бж 3132 :Д R│Rл3HN ■Е A$│ Л(9) з R│Rл1:Е R▓12 з R│Rм1 :Д Е R1┤3 з R1│R1л1:X1│X1л65 :Д Е R1│3 з R│Rм1Hв Е A$│ Л(8) з R│Rм1:Е R┤1 з R│Rл1 :Д Е R1▓1 з R1│R1м1:X1│X1м65 :Д Е R1│1 з R│Rл1H╛ Е A$│ Л(13) з Ъ:Бе 3400Hх ╗(X1,X2)м(X1л55,X2л30),╜,B:Бе 3030I :Е L▓12 з L│Lм12:Бж 3134:R│1:R1│1:X1│35:X2│35:Бе 2355I$ ;РI\ <Е L┤32 з L│Lл12:Бж 3134:R│1:R1│1:X1│35:X2│35:Бе2355Ib =РIt >Е L┤12 з L│12IЖ ?Е L▓32 з L│32IМ @РI┐ D┐0,0:т40:Зд5)"CONTROLS FOR CHOOSING A PICTURE"Iё NЗ:З:З:З"Use the Arrows/Joystick to move the "J XЗ"box to the desired picture and press"JK bЗ". To move to another choice of "Jz lЗ"pictures besides the ones showing, just"Jй vЗ"move the box all the way up or down and"J╓ АЗ"press the up or down arrows/Joystick "K КЗ"until the computers chooses another"K- ФЗ"set. If the box blinks then the com-"KV ЮЗ"puter can not choose another set."KВ иЗ"For example if the computer is show-"Kн ▓З"ing pictures 1-12 then all you have"K█ ╝З"to do is keep pressing the down arrow/"L ╞З"Joystick until the box is at the "L) ╨З"bottom of the screen and the "LP ┌З"computer loads the next set in."LН фЗ:Зд6):З"Press Any Key to Continue...":в44539:т32:┐1,1:РL├ HLF$│"Y":ZW│ Б(Lм12)лR:SD│ Ж(2394):VS$│"N":PS$│"N"M RD1│ Н(0):D2│ Н(1):D3│ Н(2):D4│ Н(3):Е D3│0 ░ D4│0 ▒ D3│1 ░ D4│1 з UJ$│"N" :Д UJ$│"Y"M' \Бе 260M?а:ГMAKE PICTURE FILEM┤еАI│6е11:ё4,I:З б(33," ");:ЛI:QW$│"":ё9,9:З"Making a Picture File":ё13,11:З"Please Hold...":F$│"TEST":SD│ Ж(2394)M▌к╚4,1:╝:А I│9728 е 3584л8191:Т I,0:Л Mш┤Бе 800N0Т1024, Ж(2394):Т 1025, З(F$):АI│1е З(F$):ТIл1025, К( Р(F$,I,1)):Л:РNmhF$│"":SD│ Ж(1024):АI│1е Ж(1025):F$│F$л Л( Ж(Iл1025)):Л:РNС'Ж 16,255,117,135,16,206,117,177N▓'$Ж 182,121,24,249,121,25,31,1N╙'.Ж 182,121,26,246,121,27,31,2Nє'8Ж 198,0,166,128,52,20,31,33O'BЖ 95,198,1,58,31,18,53,20O7'LЖ 166,128,167,160,166,128,167,160O]'VЖ 166,128,167,160,166,132,167,164Oy'`Ж 52,4,95,203,4,58,53,4OШ'jЖ 203,4,52,20,95,198,28,31O╕'tЖ 33,58,31,18,53,20,193,100O█'~Ж 35,200,16,254,117,135,57,109Oє'ИЖ 56,57,0,0,0,0,0,0P 'ТЖ 0,0,0,0,0,0,0,0P/'ЬЖ 255,255,255,255,255,255,255,255PT'жЖ 255,255,255,255,164,136,137,40Pq'░Ж 0,10,5,16,132,0,104,10PЦ'║Ж 89,255,255,255,255,255,255,255Pм'─Ж 0,0,0,0,0,0,0,0P╤'╪А I│30000 е 30139:Н B:Т I,B:ЛI:Р,57,109Oє'ИЖ 56,57,0,0,0,0,0,0P 'ТЖ 0,0,0                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 М&):Г *COPYWRITE *T&D SOFTWARE 1992&< :ГDISK CHECKER&Q:ГBY BRAD RENFRO&j:ГCOPYRIGHT (C) 1990&|#:ГVERSION 1.3'%:ГTHIS IMPROVED VERSION CHECKS TO SEE IF THE BAD GRANULE IS ALL READY LOCKED OUT. AND YOU ALSO HAVE THE OPTION OF LOCKING OUT A BAD GRANULE IF DATA IS ON IT.'Q(Ў:х&H68000,255:х&H68001,255:э10,5197:Т 65497,0'h-Х 200,30000:Х 1000'З.Е  Ж(30000)┤▓16 з ╙M"DISK"'Щ2ф3:у1,0:у0,63'и<И Ё Бе 370'╕AИ я Бе 1000'ьPю(34,0),"Disk Checker":ю(33,1),"By Brad Renfro"(Zщ(320,90),40,,1:щ(320,90),30,,1:ш(320,73)(_dТ &HD762,2::ГMAKES THE COMPUTER TRY TWICE BEFORE GIVING AN ERROR(on:ГDRAW DISK(жxъ(120,20)м(505,160),╜,B:щ(380,100),7,,1:ш(380,100)(ыВщ(318,135),25,,1.7,.25,.75:щ(319,135),25,,1.7,.75,.25:ш(320,140))Мъ(130,23)м(263,59),╜,B)6Цъ(480,49)м(505,59),╜,B:ъ(505,49)м(505,59),╛)vаB$│ Т:ю(19,3),"Current":T│ Ж(65353):ю(17,4),"Track :"л И(T))ЮкS│ Ж(65354):ю(17,5),"Sector:"л И(S))╣пю(34,21),"Version 1.3")ё░ю(20,23),"Does not work with 40 or 80 track disks!")■┤э 1,2256* ╣Бж 600*#╛ы(229,84)м(427,106),1*@╚ъ(229,84)м(427,106),╛,BF*\╥ъ(230,85)м(426,105),╜,B*Я▄ю(30,11),"Please Insert Disk":ю(30,12),"And Press Any Key...."*╣цв44539::ГWAIT FOR KEY*╙Ёь(229,84)м(427,106),1+g·ы(218,84)м(410,106),1:ъ(218,84)м(410,106),╛,BF:ъ(219,85)м(409,105),╜,B:ю(28,11),"Do You Want to Lock Out":ю(28,12),"Bad Granules? (Y/N)":Бж 480,  ы(218,84)м(410,106),1:ъ(218,84)м(410,106),╛,BF:ъ(219,85)м(409,105),╜,B:ю(28,11),"Do You Want to run the":ю(28,12),"Fast Version?(Y/N)":в44539:A$│ Л( Ж(135)):Е A$│"Y" з FV│1 :Д FV│0,╛Бж 500:Т 235,DD:Е FV│1 з ы(218,84)м(410,106),1:ъ(218,84)м(410,106),╛,BF:ъ(219,85)м(409,105),╜,B:ю(33,11),"Checking Disk":ю(33,12),"Please Hold...":в30000,╙Е FV│1 з Бе 2000-ZТ 238,6:Т 234,2::ГPOKE 234,2 SETS THE COMUTER TO READ A SECTOR AND POKE 238,6 TELLS IT WHERE THE INFORMATION IS GOING TO BE STORED-qТ 239,0:А T│0 е 34-~Т 235,DD-НА S│1 е 18-╜"Т 236,T:Т 237,S:в  Ж(&HC004)н256л Ж(&HC005).,ъ(191,31)м(250,48),╛,BF:ч0:щ(380,100),5,,1:ш(380,100):ч1:щ(380,100),5,,1:ш(380,100).k6B$│ Т:T1│ Ж(65353):ю(17,4),"Track :"л И(T1):S1│ Ж(65354):ю(17,5),"Sector:"л И(S1)/@Е  Ж(240)┤▓0 з ъ(290,155мT)м(350,155мT),╛:A│ Ж(240):A$│"":Е A│128 з A$│"Drive Not Ready!" :Д Е A│16 з A$│"Seek Error!" :Д Е A│8 з A$│"CRC Error!" :Д Е A│2 з A$│"Lost Data!"/▐JЕ  Ж(240)┤▓0 з Бж380:ы(229,84)м(440,106),1:ъ(229,84)м(440,106),╛,BF:ъ(230,85)м(439,105),╜,B:ю(30,11),"Error Found!!":ю(30,12),"Press Any Key to Continue.":в44539:ь(229,84)м(440,106),1:Бж390/шTA$│""/Є^Л S,T02hТ &HD762,5::ГRESTORE NUMBER OF TRIES BEFORE GIVING AN ERROR0╤mъ(229,84)м(427,106),╛,BF:ъ(230,85)м(426,105),╜,B:ю(30,11),"Do You Want to Check":ю(30,12),"Another(Y/N)?":Т 65496,0:в44539:Е  Л( Ж(135))│"Y" з О :Д Бе 3701=n:ГCHANGE THE "ELSE GOTO 370" IN LINE 365 TO "ELSE POKE113,0:DLOAD" TO SETUP UP WITHOUT PERSONAL DESKTOP1_rТ 65496,0:З"PROGRAM ENDED!":К1И|ъ(135,47)м(259,58),╛,BF:ю(17,6),A$:Р1дЖъ(135,47)м(259,58),╛,BF2;РВ LOCK OUT GRANULES. MAKE TRACK AND SECTOR INTO CORRESPONDING GRANULE AND THEN CHANGE BYTE TO 255 IN FAT. THIS WILL LOCK 9 SECTORS OR ONE GRANULE.2hЪЕ LO│0 з Р :ГRETURN IF YOU CHOOSE NOT TO2ЙдЕ T┤17 з G│Tн2:Е S▓9 з G│Gл12моЕ T▓17 з G│Tн2м2:Е S▓9 з G│Gл12╢╕G│Gл12╩┬▀ DD,17,2,A$,B$2ъ╠C│ К( Р(A$л О(B$,127),G,1))3)╤Е  Р(A$,G,1)│ Л(0) з 800 :Д Е  Р(A$,G,1)┤▓ Л(255) з Бе 9003S╓ Р(A$,G,1)│ б(1,0):р DD,17,2,A$,B$:Р3Мрв44539:A$│ Л( Ж(135)):Е A$│"Y" ▒ A$│"N" з 490 :Д 4803аъЕ A$│"Y" з LO│13╝Їь(218,84)м(410,106),1:Р3тX:ГENTER DRIVE NUMBER FOR CHECKING4rbы(229,84)м(427,106),1:ъ(229,84)м(427,106),╛,BF:ъ(230,85)м(426,105),╜,B:ю(30,11),"Please Enter the Drive":ю(30,12),"you want checked? (0-3)"4╗lв44539:DD│ Б( Ж(135)м48):Е DD┤0 з DD│0:Бе620 :Д Е DD▓3 з DD│0:Бе 6204╒vь(229,84)м(427,106),14█АР5I ы(229,84)м(427,106),1:ъ(229,84)м(427,106),╛,BF:ъ(230,85)м(426,105),╜,B:ю(30,11),"Granule all ready lock-"5а*ю(30,12),"ed out. Press Any Key...":в44539:ь(229,84)м(427,106),1,╜:DD$│ Т:DD$│"":Р6/Ды(229,84)м(427,106),1:ъ(229,84)м(427,106),╛,BF:ъ(230,85)м(426,105),╜,B:ю(30,11),"Granule Contains Data!":ю(30,12),"Lock out Granule?(Y/N)"6╗Йв 44539:DD$│ Л( Ж(135)):Е DD$│"N" з ь(229,84)м(427,106),1,╜:DD$│ Т:DD$│"":Р :Д Е DD$│"Y" з DD$│ Т:DD$│"":ь(229,84)м(427,106),1,╜:Бе 4706╞ОБе 9057^шЕ  м│20 з A$│"IO ERROR" :Д Е  м│6 з A$│"OUT OF MEMORY" :Д Е  м│1 з A$│"SYNTAX ERROR!" :Д Е  м│7 з A$│"UL ERROR!" :Д Е  м│30 з A$│"WRITE PROTECTED!"7уЄБж 380:ъ(229,84)м(440,106),╛,BF:ъ(230,85)м(439,105),╜,B:ю(30,11),"ERROR! ERROR!":ю(30,12),"PRESS ANY KEY TO END .":в44539:Бе 3708╨Бж 500:E│ Ж(32000)н256л Ж(32001)8╒Е E│31000 з 204083┌А V│31000 е E й 28N█Е V│E ░  Ж(E)│0 з 20308╟фT│ Ж(V):S│ Ж(Vл1):ъ(191,31)м(250,48),╛,BF:ю(17,4),"Track :"л И(T):ю(17,5),"Sector:"л И(S):ъ(290,155мT)м(350,155мT),╛9mхы(229,84)м(440,106),1:ъ(229,84)м(440,106),╛,BF:ъ(230,85)м(439,105),╜,B:ю(30,11),"Error Found!":ю(30,12),"Press Any Key to Continue.":в44539:ь(229,84)м(440,106),19xщБж 4009АюЛ V9Л°Бе 360л И(T):ю(17,5),"Sector:"л И(S):ъ(290,155мT)м(350,155мT),╛9mхы(229,84)м(440,106),1:ъ(229,84)м(440,106),╛,BF:ъ(23                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 к& В ****************&/В MUTANT ATTACK!!!&DВ BY MARTY CRON.&V(В VERSION 3.1&c2В 7-2-91&z<В ****************&вFВ DEDICATED TO: TG,TC,JB,FZ,HB & TH&мP╚ 4,1&№Z╔"V31T255L255":Х200,18999:Е Ж(19000)│127 ░  Ж(19001)│1 ░  Ж(19002)│21 з 130'(dЕ Ж(&HC000)│68 з╙M"MUTE":в :ДЧM"MUTE":в'6nТ 65495,0'Dx└ 4:Х 400'KВЮ2'^МЕ  Т┤▓"" з 150'yЦЗ@137,"MUTANT ATTACK!"'ФаЗ@265,"By Marty Cron";'╣кЗ@261л96,"Instructions (Y or N)"'├┤A$│ Т'╒╛Е A$│"" з 180'ь╚Е A$│"Y" з Бж 1830'Є╥Ю(▄М A(10,15)(цМ D(10,11)(ЁЗ@0," ";(2·┬(5,17),5,5,1.1(B├(5,17),5,5(W╗(5,12)м(5,13),╜(n╗( 9,16)м(10,25),╜(Г"╗(1,16)м(0,25),╜(Ш,╗(5,12)м(5,25),╜(н6╗(5,17)м(5,25),╜(╗@╜(5,16,0)(╔J╜(5,15,0)(▐T╗(4,19)м(6,19),╛(ь^╜(5,18,5))hЕ  а(2,12)│5 з Ю:Бе 240)r╗(0,10)м(0,18),╛)4|╗(10,10)м(10,18),╛)LЖ─(0,10)м(10,25),A,G)RРЮ)\ЪЗ@256)oд╗(0,0)м(5,6),╜)Го╗(0,0)м(11,0),╜)Ч╕╗(10,0)м(5,6),╜)л┬╗(5,6)м(5,12),╜)║╠├(5,2),5,5)╬╓╗(2,0)м(5,12),╜)тр╗(8,0)м(5,12),╜)їъ╗(5,0)м(5,6),╛* Ї╗(10,0)м(5,2),╛*■╗(0,0)м(5,2),╛*7Е  а(2,3)│5 з Ю:Бе 410*N─(0,0)м(10,11),D,G*TП*{&R│0:L│3:C│124:BL│3:L│3:H│0:Q│0:G│0*Б0Ю*С:Е H│515 з П*ЩDН X*йNЕ X│515 з П*▒XН Z*┴bЕ Z│515 з П*╙lЕ R┤130 з Н H*хvЕ R▓800 з Н H*їАЕ H│515 з П*¤КН U+ ФЕ U│515 з П+ЮЕ R┤160 з Н H+1иЕ R▓800 з Н H+N▓A$│ Т:Е A$┤▓"" з Бж 1500+Y╝W│Zм17+c╞D│Xл6+t╨Е W┤0 з W│12+И┌Е D▓255 з D│230+Чф╜(D,150,5)+│ю┼(X,128)м(Xл10,143),A,╜+╨°A$│ Т:Е A$┤▓"" з Бж 1500+ь┼(Z,128)м(Zл10,143),A,╜, Е R▓730 з З@480:┼(Cм5,0)м(Cл5,12),D,╜,2┼(U,128)м(Uл10,143),A,╜,M Е  а(C,13)│5 з Бж 1020,s*Е R▓800 з ┼(H,128)м(Hл10,143),A,╜,╧4Е R│390 з З@480м32,"YOU HAVE ONE EXTRA SHIELD":З"PRESS A KEY TO CONTINUE":Бж 1640:L│Lл1-+>Е R│700 з З@480м32,"YOU HAVE ONE EXTRA SHIELD":З"PRESS A KEY TO CONTUNYE":Бж 1640:L│Lл1-:H╜(W,100,5)-WRA$│ Т:Е A$┤▓"" з Бж 1500-a\З@480-ЗfЕ R▓700 з ┼(Cм4,90)м(Cл6,111),A,╜-ЫpЕ R▓697 з З@480-╢zЕ  а(C,13)│5 з Бж 1020-╦ДЕ R▓696 з R│Rл.5-╒ОR│Rл1-ЄШA$│ Т:Е A$┤▓"" з Бж 1500-№вB│Bл1.мЕ B│50 з B│40.?╢Е R│426 з З@480,"YOU NOW HAVE THE LAZER":G│1.S└Е R│1500 з 1820.Т╩Е R│776 з З @ 480,"YOU HAVE A MORE POWERFUL LAZER":B│1:G│1.м╘┼(Cм5,0)м(Cл5,12),D,╜.╟▐Е  а(C,13)│5 з Бж 1020.фшA$│ Т:Е A$┤▓"" з Бж 1500.яЄБе 580/?№╔"O1AB":Ю5:╔"ABC": Ю3:╔"DEFGED":Ю0:Ю5:╔"ABGEFDCEDF":Ю3:Ю0:З@480,"COLLISION"/W╔"O1ACCAEACECAACAC"/aL│Lм1/iB│0/~$Е L│м1 з Бе 1160/╕.Е L│0 з З@480,"YOU HAVE NO MORE SHIELDS LEFT":Бе 1120/╔8Е L│1 з 1110/їBЗ" YOU HAVE ";:ЗL;:З" SHIELDS LEFT"0LБе 11200&VЗ@480,"YOU HAVE ONE SHIELD LEFT"0G`З"PRESS ANY KEY TO CONTINUE"0ZjЕ  Т│"" з 11300`tЮ0f~Р0АИЮ:З@64,"You are dead"0ФТА X│1 е 250:Л X0╟ЬЗ@256,"You have traveled";:ЗRо10;:З "parsecs."0фжЗ@320,"YOUR SCORE";:ЗQлR0√░З@128,"I am sorry"1║З@480,"Play again(Y or N)"13─A$│ Т:Е A$│"" з 12201I╬Е A$│"Y" з Бе 1201\╪Е A$│"N" з Ю:К1hтБе 12201tьВ BLAST1ГЎЕ BL│0 з Р1ПBL│BLм11и Ю5:╔"O5CDADCADCA":Ю01оР1╣В FIRE1ё(Е B┤0 з З@480м32,"LAZER RECHARGING":Бе 1330 :Д 13502 2╗(0,165)м(255,191),╛,BF2<Р2FB│Bм3022PЕ G│2 з Бе 14402EZЕ G│0 з B│90:Р2_dЕ  а(C,23)│5 з Q│Qл202znЕ  а(C,55)│5 з Q│Qл1002Хx╗(Cм1,16)м(Cл1,60),╜,B2▒В╗(Cм2,16)м(Cл2,60),╛,BF2╗МQ│Qл52┴ЦР2╪а╗(C,16)м(Cм5,90),╜2як╗(C,16)м(Cл5,90),╜3 ┤Е  а(Cм2,85)│5 з Q│Qл653'╛╗(Cм5,16)м(Cл5,90),╛,BF32╚B│Bм1038╥Р3P▄В UPDATE SUBROUTINE3lцЕ A$│ Л(8) з C│Cм10:T│13ИЁЕ A$│ Л(9) з C│Cл10:T│23Я·Е A$│" " з Бе 13203╢Е A$│"P" з Бе 16003╤Е A$│ Л(10) з Бе 12703хЕ C▓245 з C│2433ї"Е C┤5 з C│63√,Р46В PAUSE40@З@384,"DISTANCE=";Rо10;"/SCORE=";QлR4VJЗ"SHIELDS=";L;"/BLASTS LEFT="; BL4jTЕ G│0 з Бе 16404е^Е B┤0 з З"LAZER IS CHARGING" :Д З"LAZER READY TO FIRE"4╕hЕ  Т│"" з 16404╘r╗(0,145)м(255,191),╛,BF4┌|Р5ПЖЖ 30,100,240,10,40,170,60,120,200,40,150,220,20,80,180,60,140,100,0,120,240,20,130,210,110,140,220,110,150,210,100,150,220,100,160,200,90,170,190,80,180,220,70,150,236,60,130,06\РЖ 120,180,200,50,100,170,0,10,20,30,40,50,60,70,80,90,100,110,120,130,40,150,160,170,180,190,200,210,220,230,,240,10,50,140,70,0,180,90,120,230,240,10,0,80,70,60,50,40,30,20,230,220,210,200,180,150,906╦ЪЖ 80,183,240,145,12,170,50,144,145,180,50,80,145,234,240,11,42,1,24,50,129,41,191,41,201,230,12,128,80,1457дЖ 10,40,500,120,230,40,80,180,0,80,150,180,210,0,3,40,120,110,70,140,240,50,607▄оЖ 10,30,20,40,30,50,40,60,50,70,60,80,70,90,80,100,90,110,100,120,110,130,120,140,130,150,140,130,150,160,140,150,160,170,150,160,180,170,190,180,200,190,170,210,200,190,210,220,230,24086╕Ж 10,240,50,90,120,50,80,40,60,100,180,140,210,230,0,40,50,70,80,20,40,140,180,160,908Я┬Ж 240,10,230,20,220,30,210,40,200,50,190,60,180,70,170,80,160,90,150,100,140,110,130,120,120,130,1109╠Ж 40,50,90,120,210,30,0,240,20,180,150,210,240,0,50,20,30,70,80,200,100,110,190,180,140,150,30,09`╓Ж 125,120,110,130,100,140,90,150,80,160,70,170,60,180,50,190,40,200,210,220,230,240,2459╣рЖ 0,10,0,10,200,40,190,50,180,60,170,70,160,80,150,90,140,100,130,110,120,120,240,10:9ъЖ 10,0,0,10,20,30,40,50,60,70,80,110,90,100,120,130,140,150,160,150,140,130,120,110,100,140,150,160,170,180,190,200,210,230:eЇЖ 170,180,0,230,170,120,128,34,80,1,170:═■Ж 0,140,50,70,80,90,20,30,230,240,10,0,50,70,80,30,140,130,20,170,80,50,180,190,230,220,0,10,40,110;8Ж 0,240,10,230,20,220,30,210,40,200,50,190,60,180,70,170,80,160,90,150,100,140,0,0,0,0,10,20,50,90,515;вЖ 145,150,120,230,10,140,150,230,220,210,200,190,180,170,160,150,140,130,120,100,80,60,30,40,20,30,10;шЮ2:Ю0:З:З:З:З"You win!! All the mutants have been DESTROYED!!":КMP OR GB?"&╟I$│ Т:ЕI$│""з20&цЕI$│"C"з40:ДЕI$│"R"з50:Д20'((уЎ:у0,0:у1,17:у2,38:у3,60:у4,53:у5,63:у10,40:у15,0:у6,41:Бе54'б2уў:у0,0:у1,16:у2,38:у3,29:у4,55:у5,63:у10,57:у15,0:у6,45::Г0=BLACK:1=GREEN:2=ORANGE:3=BLUE:4=YELLOW:5=WHITE:6=PURPLE'з6ц(O7ї"BM60,60S8U6L8U4R8U6L16D16R16BR19 U16L16D16R6BU6R4U4L4D4BD6R10BR19 U6L8U10L8D16R16BR19 U16L16D16R6BU6R4U4L4D4BD6R10BR19 U6H2R2U8L16D16R8U6BH2R4U4L4D4BF2F2D4R6BR19(Ш8ї"U4L8U2R7U4L7U2R8U4L16D16R16BR19 U16L16D4R2BR4D8R4U8L4BL4D8L2D4R16")]9ї"BM60,100U10L8U2R8U4L16D10R8D2L8D4R16BR19 U16L16D16R6BU6R4U4L4D4BD6R6F2R2EHBR19 U16L6D10L4U10L6D16R16BR19 U13H3L10G3D13R6U6BU4R4U2L4D2BD4R4D6R6BR19 U6H2R2U8L16D16R8U6BH2R4U4L4D4BF2F2D4R6BR19")б:ї"U4L8U2R7U4L7U2R8U4L16D16R16BR19 U10L8U2R8U4L16D10R8D2L8D4R16"*<ш(52,52),2,5:ш(88,52),3,5:ш(123,52),4,5:ш(158,52),1,5:ш(193,52),5,5:ш(228,52),6,5:ш(262,58),2,5*i=ш(52,72),3,5:ш(88,72),1,5:ш(114,72),5,5:ш(158,72),4,5:ш(193,72),3,5:ш(228,72),2,5:ш(262,72),4,5*С>:ГFORP=1TO7:HPAINT(X,52),P,5:X=X+36*ЇNАVO│30е1йм4:╔"V=VO;":АZO│3е1йм1:АZN│8е1йм2:╔"L255O=ZO;=ZN;":ЛZN,ZO,VO:╔"V15":АQQ│10е63:у5,QQ:Л+8Oч2:ю(19,14),"BY":ю(13,16),"GEORGE & ELLEN":ю(15,17),"AFTAMONOW"+JPАZZ│1е600:ЛZZ+wQц3:ч5:ю(6,2),"DO YOU NEED INSTRUCTIONS?"+ШRI$│ Т:ЕI$│""з82:ДЕI$│"N"з100+оTЕI$│"Y"зБж700:Д82+╜dф2:ц5:ч0,5+╫iъ(18,8)м(182,140),╜,B,nї"BM20,10S8R20ND64R20ND64R20ND64R20D16NL80D16NL80D16NL80D16L80U64",Фxю(30,2),"COLORS":ю(31,3),"LEFT":ю(27,5),"B":ю(27,6),"G":ю(27,7),"P":ю(27,8),"Y":ю(27,9),"O":ю(27,11),"R = REMOVE",░|ъ(206,10)м(316,104),╜,B-Вч3:ъ(240,40)м(250,44),╜,BF:ъ(260,40)м(270,44),╜,BF:ъ(280,40)м(290,44),╜,BF:ъ(300,40)м(310,44),╜,BF-fДч1:ъ(240,49)м(250,53),╜,BF:ъ(260,49)м(270,53),╜,BF:ъ(280,49)м(290,53),╜,BF-╡Жч6:ъ(240,58)м(250,62),╜,BF:ъ(260,58)м(270,62),╜,BF:ъ(280,58)м(290,62),╜,BF.Ич4:ъ(240,66)м(250,70),╜,BF:ъ(260,66)м(270,70),╜,BF:ъ(280,66)м(290,70),╜,BF.SКч2:ъ(240,74)м(250,78),╜,BF:ъ(260,74)м(270,78),╜,BF:ъ(280,74)м(290,78),╜,BF.rМч0:ъ(0,150)м(320,152),╜,BF/Цю(2,20),"MOVE BLINKING SQUARE TO DESIRED SPOT":ю(2,21),"PRESS FIRST LETTER OF COLOR YOU WISH":ю(2,22),"TO ENTER.ie: (B)LUE, (G)REEN, ETC..."/1+МA(16):X│20:Y│10:Z│1:B│4:G│3:P│3:YE│3:O│3/P,ч15:ъ(X,Y)м(Xл40,Yл32),╜,B/~0I$│ Т:Е I$┤▓"" з 306:Д у15,63:у15,0:Бе304/Ь2ч0:ъ(X,Y)м(Xл40,Yл32),╜,B/╒6ЕI$│"B" ▒I$│"R" ▒I$│"G" ▒I$│"Y" ▒I$│"O" ▒I$│"P" з400/ц;ЕI$│"Q" з6750"@ЕI$│ Л(9) ░Z┤▓4 ░Z┤▓8 ░Z┤▓12 ░Z┤▓16 зZ│Zл1:X│Xл40:Бе3000]JЕI$│ Л(8) ░Z┤▓1 ░Z┤▓5 ░Z┤▓9 ░Z┤▓13 зZ│Zм1:X│Xм40:Бе3000ЖTЕI$│ Л(10) ░Z┤13 зZ│Zл4:Y│Yл32:Бе3000о^ЕI$│ Л(94) ░Z▓4 зZ│Zм4:Y│Yм32:Бе3000╕hБе3000шРИ  Ю("RBGPYO",I$) Бе410,430,440,450,460,4701&ЪЕA(Z)│0 з300:Дш(Xл6,Yл6),5,5:И A(Z) Бе420,422,424,426,4281^дч3:XX│240л20нB:ъ(XX,40)м(XXл10,44),╜,BF:B│Bл1:Бе4291Цжч1:XX│240л20нG:ъ(XX,49)м(XXл10,53),╜,BF:G│Gл1:Бе4291╬ич6:XX│240л20нP:ъ(XX,58)м(XXл10,62),╜,BF:P│Pл1:Бе4292 кч4:XX│240л20нYE:ъ(XX,66)м(XXл10,70),╜,BF:YE│YEл1:Бе4292Aмч2:XX│240л20нO:ъ(XX,74)м(XXл10,78),╜,BF:O│Oл1:Бе4292RнA(Z)│0:Бе3002╥оЕA(Z)┤▓0 з300 :ДЕB│0 з300 :ДБж500:ч5:B│Bм1:XX│240л20нB:ъ(XX,40)м(XXл10,44),╜,BF:ч3:ъ(Xл5,Yл5)м(Xл36,Yл28),╜,BF:A(Z)│1:Бе6003R╕ЕA(Z)┤▓0 з300 :ДЕG│0 з300 :ДБж500:ч5:G│Gм1:XX│240л20нG:ъ(XX,48)м(XXл10,53),╜,BF:ч1:ъ(Xл5,Yл5)м(Xл36,Yл28),╜,BF:A(Z)│2:Бе6003╥┬ЕA(Z)┤▓0 з300 :ДЕP│0 з300 :ДБж500:ч5:P│Pм1:XX│240л20нP:ъ(XX,58)м(XXл10,62),╜,BF:ч6:ъ(Xл5,Yл5)м(Xл36,Yл28),╜,BF:A(Z)│3:Бе6004V╠ЕA(Z)┤▓0 з300 :ДЕYE│0 з300 :ДБж500:ч5:YE│YEм1:XX│240л20нYE:ъ(XX,66)м(XXл20,70),╜,BF:ч4:ъ(Xл5,Yл5)м(Xл36,Yл28),╜,BF:A(Z)│4:Бе6004╓╓ЕA(Z)┤▓0 з300 :ДЕO│0 з300 :ДБж500:ч5:O│Oм1:XX│240л20нO:ъ(XX,74)м(XXл20,80),╜,BF:ч2:ъ(Xл5,Yл5)м(Xл36,Yл28),╜,BF:A(Z)│5:Бе6005)ЇЕI$│"B" зC│1 :ДЕI$│"G" зC│2 :ДЕI$│"P" зC│3 :ДЕI$│"Y" зC│4 :ДЕI$│"O" зC│5 :Д3005s■И Z Бе515,520,525,530,535,540,545,550,555,560,565,570,575,580,585,5905╥ЕA(2)│C ▒A(3)│C ▒A(4)│C ▒A(5)│C ▒A(9)│C ▒A(13)│C A(6)│C ▒A(6)│C ▒A(11)│C ▒A(16)│C з595 :ДР6*ЕA(1)│C ▒A(3)│C ▒A(4)│C ▒A(6)│C ▒A(10)│C ▒A(14)│C ▒A(5)│C ▒A(7)│C ▒A(12)│C з595 :ДР6Б ЕA(1)│C ▒A(2)│C ▒A(4)│C ▒A(7)│C ▒A(11)│C ▒A(15)│C ▒A(6)│C ▒A(9)│C ▒A(8)│C з595 :ДР6┌ЕA(1)│C ▒A(2)│C ▒A(3)│C ▒A(8)│C ▒A(12)│C ▒A(16)│C ▒A(7)│C ▒A(10)│C ▒A(13)│C з595 :ДР71ЕA(1)│C ▒A(9)│C ▒A(13)│C ▒A(6)│C ▒A(7)│C ▒A(8)│C ▒A(2)│C ▒A(10)│C ▒A(15)│C з595:ДР7ЪЕA(5)│C ▒A(7)│C ▒A(8)│C ▒A(2)│C ▒A(10)│C ▒A(14)│C ▒A(1)│C ▒A(11)│C ▒A(16)│C ▒A(3)│C ▒A(9)│C з595 :ДР8!ЕA(5)│C ▒A(6)│C ▒A(8)│C ▒A(3)│C ▒A(11)│C ▒A(15)│C ▒A(2)│C ▒A(12)│C ▒A(4)│C ▒A(10)│C ▒A(13)│C з595 :ДР8\&ЕA(4)│C ▒A(12)│C ▒A(16)│C ▒A(5)│C ▒A(6)│C ▒A(7)│C ▒A(3)│C ▒A(11)│C ▒A(14)│C з595:ДР8╢+ЕA(1)│C ▒A(5)│C ▒A(13)│C ▒A(10)│C ▒A(11)│C ▒A(12)│C ▒A(3)│C ▒A(6)│C ▒A(14)│C з595 :ДР9 0ЕA(9)│C ▒A(11)│C ▒A(12)│C ▒A(2)│C ▒A(6)│C ▒A(14)│C ▒A(4)│C ▒A(7)│C ▒A(13)│C ▒A(5)│C ▒A(15)│C з595 :ДР9К5ЕA(9)│C ▒A(10)│C ▒A(12)│C ▒A(3)│C ▒A(7)│C ▒A(15)│C ▒A(1)│C ▒A(6)│C ▒A(16)│C ▒A(8)│C ▒A(14)│C з595 :ДР9у:ЕA(9)│C ▒A(10)│C ▒A(11)│C ▒A(4)│C ▒A(8)│C ▒A(16)│C ▒A(2)│C ▒A(7)│C ▒A(15)│C з595 :ДР:<?ЕA(14)│C ▒A(15)│C ▒A(16)│C ▒A(1)│C ▒A(5)│C ▒A(9)│C ▒A(4)│C ▒A(7)│C ▒A(10)│C з595 :ДР:ЦDЕA(13)│C ▒A(15)│C ▒A(16)│C ▒A(2)│C ▒A(6)│C ▒A(10)│C ▒A(9)│C ▒A(8)│C ▒A(11)│C з595 :ДР:ёIЕA(13)│C ▒A(14)│C ▒A(16)│C ▒A(3)│C ▒A(7)│C ▒A(11)│C ▒A(5)│C ▒A(10)│C ▒A(12)│C з595 :ДР;KNЕA(13)│C ▒A(14)│C ▒A(15)│C ▒A(4)│C ▒A(8)│C ▒A(12)│C ▒A(1)│C ▒A(6)│C ▒A(11)│C з595 :ДР;ЭSч3:ю(30,17),"ILLEGAL":╔"T200O1BADBAD":АQQ│1е100:Л:ч5:ю(30,17),"ILLEGAL":Бе300;╣XАW│1е16:ЕA(W)│0 з300:ДЛ;ъФАQQ│1е3:╔"T200V30O1GAEAV5O3EEEGGGO5AAAV15":Л<Юч2:ю(29,15),"PERFECT"<"гч3:ю(27,17),"PLAY AGAIN?"<7иI$│ Т:ЕI$│""з680<[▓ЕI$│"N"з900:ДЕI$│"Y" зО100:Д680<}╝ц3:ч0:ю(12,2),"COLOR SQUARES"=╜ч5:ю(1,4),"THE OBJECT IS TO PLACE A COLOR INTO":ю(1,5),"EACH BOX, SO THAT NO TWO OF THE SAME":ю(1,6),"COLORS ARE IN LINE, VERTICALLY..."=7╛ю(1,7),"HORIZONTALLY OR DIAGONALLY."=е┐ч0:ю(14,12),"MOVEMENT":ч5:ю(2,14),"USE ARROW KEYS TO POSITION BLINKING":ю(2,15),"SQUARE TO DESIRED SPOT."=╛ю:ГIFINKEY$=""THEN750>°:ГHCLS3:HPRINT(14,4),"MOVEMENT":HPRINT(11,7),"USE ARROW KEYS TO":HPRINT(4,8),"PLACE MARKER BY POSITIONING THE":HPRINT(4,9),"BLINKING SQUARE ON DESIRED SPOT":HPRINT(4,10),"AND PRESS ENTER.">г ю(8,24),"Press ENTER to begin.">╕ I$│ Т:ЕI$│""з800>╛*Р>ўДф2:ц8:ч3:X│50:Y│20:N│15:Бж1000:X│65:Y│25:N│18:Бж1020?@ОX│118:Y│20:N│20:Бж1020:X│158:Y│20:N│20:Бж1020:X│125:Y│40:N│10:Бж1000?аШX│200:Y│20:N│20:Бж1020:X│200:Y│20:N│15:Бж1000:X│200:Y│40:N│10:Бж1000:X│200:Y│60:N│15:Бж1000@вX│50:Y│100:N│20:Бж1020:X│50:Y│100:N│15:Бж1000:X│50:Y│120:N│10:Бж1000:X│50:Y│140:N│15:Бж1000@LмX│115:Y│100:N│20:Бж1020:X│155:Y│100:N│20:Бж1020:X│115:Y│100:N│20:Бж1050@░╢X│200:Y│100:N│20:Бж1020:X│190:Y│100:N│22:Бж1000:X│240:Y│100:N│20:Бж1020:X│190:Y│140:N│22:Бж1000@═╗ъ(30,160)м(270,162),╜,BFA╘╔"T255O2GEAO3AEGV30DEADO1V20DEADO2V10DEADDEADO5V5DDDDDDCCCCC"A▐ў:О"BOOT"A?шАZ│1е N:щ(X,Y),10,3:X│Xл2:Л:РAa№АZ│1е N:щ(X,Y),10,3:Y│Yл2:Л:РAЙАZ│1е N:щ(X,Y),10,3:X│Xл2:Y│Yл2:Л:РA▒$АZ│1е N:щ(X,Y),10,3:X│Xм2:Y│Yл2:Л:Р╗ъ(30,160)м(270,162),╜,BFA╘╔"T255O2GEAO3AEGV30DEADO1V20DEADO2V10DEADDEAD                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                m6░╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╛╕░╡╝╣░╢╝░╢╝▓╛╝╕╝╛╕║░║▒╣░╛╝╣╡╝╝░║╢▓╡А╡░╣│░║А║╗▓А░║А║║║╗│║╗│╢╡│░░║╢▓╡░╡░░░║║░║║░░░║░╡╡░║░║║┤▓╡░░░╕┤┤┤╝╕░┤╝А┤╝А╕ААА╕А┤┤А╕А╕╕А┤┤╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╛╕░╡╝╣░╢╝░░░░▒╝▓▒░░░░░░░░░░░АА░А║╢▓╡А╡А╣│░▒│░╖▓░╖▓▒АА▒░│▓▓│░│░░А║╢▓╡А╡ААА║║░║╡АА╡░▓╣╣╕╡░║╛░╡│╕░А╕┤┤┤╝╕А┤╝░┤╝░┤АА░╝░┤┤░░╝╕╕А░╝╕░╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝╝░ААААААААААААААААААААААААААААААА░ААААААААААААААААААААААААААААААА░ААААААААААААААААААААААААААААААА░ААААААААААААААААААААААААААААААА                                                                                                                                                                                                                                `ОЖАзАМ&∙Ж зНДзНБзН~╛пН{╛пНv╛пНq╢зНc╢зН]╢зНW0НZ╞└ЖАзАZ&√оНGmН=' 1НCdоН64цН-╡'5чН" 5 пН╛@mН 'оН М' М 'М@' oНё┤оНЄmНч' 1НьоНс4цН╫u'5чН╠ 5 пН╚О8д▀mН╢'оН╖М('МH' oНаbоНвmНЦ' 1НЪ▒оНС4цНЖ#'5чН{ 5 пНxО9lНmНe'оНgМш'М╚' oНO &ОжДM*ДpЛДpзН5жДДкН-КАзД0М&▐9■3_Г&Ў╢╗Дp╖mН&■╜mН &■╡mН°&■н╞FОd4Нб5О░0Z&ю9╞жазАZ&∙9╬`ьбДП║─П·эБ3_Г&ъ9]'┴'┴'┴'┴'┴'┴' !0 "0Ис 0Ир 0И▀ 0 0И 0И 0И! 9Н║4Г-"Г<.5OM9Нг4Г- Гю.5OM95╦─Ж M9ОО2Н94╢ #К╖ #╢  Д╖  оф0&№╢  ДК№╖  оф0&№1?&▐59                                                                                                        *                           :Ш0&№1?&▐59                                                                                                                                                                                                                                                                                                                                        █&$:Г COPYWRITE T&D SOFTWARE 1992&; Х 1000:Ю:R│ Д(м Я)&FБж 440&ЛАX│1 е 62:Ь(X,0,3):Ь(63,(Xо2),3):Ь(63мX,31,3):Ь(0,31м(Xо2),3):ЛX&Ю(З@141,"hints";&╝2З@328,"BY DEAN HUIZENGA";'f";A$(яЦЕ A$│"MALE" ▒ A$│"FEMALE" з 160 :Д S$│"IF YOU DOANT NO WHAT U R THEN SHUT THE COMPUTER OFF,,,,,,NOW":Бж 470:Бе130),аЕ A$│"FEMALE" з A$│"FEE MAIL" :Д Е A$│"MALE" з A$│"MAIL")IкS$│"HOW OLD R U.":Бж 470)d┤Ю:З@230,;:╗ Й"==>";A1$)r╛A│ Й(A1$))г╚Е A┤20 з S$│"WAWW, A SPRING CHICKIN.":Бж 470)╒╥Е A┤40 ░ A▓│20 з S$│"YER GETTIN VERE.":Бж 470* ▄Е A┤80 ░ A▓│40 з S$│"YER OVER THE HILL.":Бж 470*@цЕ A▓80 з S$│"YER ABOUT TO KICK THE BUCKIT.":Бж 470*hЁЮ0:S$│"THANK YOU VERY MUCH.":Бж 470*▀·S$│"NOW,,I WILL PERFORM SOME TESTS ON YOU,,,PLEEZE FOLLOW MY INSTRUCTIONS EXACTLY,,,,,,READY,,,HERE WE GO.":Бж 470+rS$│"SIT STRAIT ON YOUR CHAIR,,,LOOK CAREFULLY AT THE MIDDLE OF THE SCREEN,,,WHEN MY SCANNER UPPEARS,,,WATCH IT VARIE, VARIE CAREFULLY.":Бж 470+ААP│1 е 25+жАX│26 е 36:Ь(X,15,5):Э(Xм1,15):ЛX+╨"АX│36 е 26 йм1:Ь(X,15,5):Э(Xл1,15):ЛX+╫,ЛP+▐6Ю0,F@Е  Д(2)│1 з S$│"YOU DID NOT LISSEN TO MY INSTRUCTIONS,,,NOW WE WILL TRY IT AGAIN,,,,":Бж 470:Бе 260,сJS$│"MY SCANNER HAS SCANNED YORE I BALLS, HAIRCOLOR, AND OVERALL APPEARANCE, AS WELL AS YOUR BRAIN WAIVS, NNERV CAIPEBILITEES, AND BRETH OADAR.":Бж 470-TS$│"THIS IS WHAT I HAVE GATHERED.":Бж 470-E^Е  Д(2)│1 з S$│"YOUR PUPILS ARE DYLAITED.":Бж 470-}hЕ  Д(2)│1 з S$│"YOUR HAIR IS A TOATAL MESS.":Бж 470-─rЕ  Д(2)│1 з S$│"YOUR OVERALL APPEARANCE IS TOATALLY AWFUL.":Бж 470.|Е  Д(2)│1 з S$│"YOUR BRAIN WAIVS ARE, IRRATIC AND UNORGANIZED":Бж 470.YЖЕ  Д(2)│1 з S$│"YOU CANNOT HANDLE VERY MUCH STRESS,,,,,IF ANY.":Бж 470.НРS$│"AND YOUR BRETH OWE DER IS ATROASHUS":Бж 470/ЪS$│"I HOAP YOU ARE MUCHER, ENOUGH TO EXCEPT MY CONSTRUCTIV CRITICISM,,AND WILL TRY TO IMPRUVE YOURSELF.":Бж 470/чдS$│"WELL,,I HOAP YOU LIV THE REST OF YOUR,"лA$л",LIFE ACCORDING TO MY HHINTS,,,,,,AND KEEP ONE THING IN MIND,,,,,,NEVER GET A SEX CHANGE,,,,,,,,,THIS IS YOUR FAITHFUL,,TANDY COLOR COMPUTER,,SIGNING OFF,,,,,,,,GOOD BY.":Бж 470/яоЮ:К0╕A│&HFF00:B│&HFF7E0%┬Т Aл1,52:Т Aл3,63:Т Aл35,600+╠Р0=╓АX│1 е  З(S$)0WрЕ  Ж(B) ░ 128│0 з 4800zъЕ  Р(S$,X,1)│" " з Т B, К(",")0СЇТ B, К( Р(S$,X,1))0Ш■ЛX0гТ B,130┬Е ( Ж (B) ░ 64)│0 з Бе 5300╘АP│1 е 250:ЛP0┌&РY.":Бж 470/яоЮ:К0╕A│&HFF00:B│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ╫&#:ГCOPYWRITE T&D SOFTWARE 1992&z:Гnote: IF YOU HAVE A COCO 2, CHANGE THE VALUE OF 'PK' IN LINE 2 TO 65495.&ТХ200,16000:PK│65497&бТ (PKм1),0&▒╔"V31;L255"&╖Ю'АX│0 е 62:Ь(X,0,6):Ь(63,(Xо2),6):Ь((63мX),31,6):Ь(0,(31м(Xо2)),6):Л X')З@136,"color pocketball";:Т 1165,32'=а 200,1:а 250,1'c З@228,"16K EXTENDED COLOR BASIC";'w а 150,1:а 200,1'й З@328,"by dean huizenga";:Т 1354,32:Т 1359,32'╜ а 100,1:а 150,1'▌ АX│16000 е 16165:НY:ТX,Y:ЛX'ы╣ Г│16000(З@228, б(24," ");($X│0:З@231,"HIGH SPEED (Y/N)?";(AA$│ Т:Е A$│"" з 18 :Д 21(MA│ Д(0)(pX│Xл1:Е X│25 з З@242,"(y/n)?";(ЖЕ X│50 з 16 :Д 17(▄Е A$│"Y" з Т PK,0:а 100,1::Д Е A$│"N" з Т (PKм1),0:а 100,1:Бе 23::Д а 100,1:Бе 17(ЄЗ@231, б(17," ");)X│0:З@230,"INSTRUCTIONS (Y/N)?";)4A$│ Т:Е A$│"" з 25 :Д 27)VX│Xл1:Е X│25 з З@243,"(y/n)";)lЕ X│50 з 23 :Д 24)Ьа100,1:Е A$│"Y" з 96 :Д Е A$│"N" з 28 :Д 24)еBA│3)╪Ю0:X│ Г(0):З@453,"score:"SC;:З@466,"balls:"BA;)щJ│399:J1│399* H│ Д(60)л2:V│2:V1│1:R│ Д(2)*# Е R│1 з H1│м1 :Д H1│1*0!JK│ Н(0)*]"ЕB│0 з P│ Ж(65280):Е P│126 ▒ P│254 з B│1*Д#Е JK┤10 з J│Jм1 :Д Е JK▓53 з J│Jл1*к$Е J┤385 зJ│385 :Д Е J▓413 з J│413*┴%З@J, б(2, Л(156));*╨&Е B│0 з 54*█'Э(H,V)+ (V│VлV1:Е V▓25 з 58 :Д Е V┤2 з V1│1:а 150,1+D)H│HлH1:Е H▓61 з H1│м1:а 150,1::Д Е H┤2 з H1│1:а 150,1+P*X│ Г(0)+x+З@453,"score:"SC;:З@466,"balls:"BA;+┬,Е  С(H,V)│3 ▒  С(H,V)│4 ▒  С(H,V)│5 з H1│H1н(м1):H│HлH1:а 150,1:Бе 49+▌-Е  С(H,V)│2 з 46 :Д 49+щ.R│ Д(2),/Е R│1 з H1│1 :Д H1│м1,0V1│V1нм1:а 200,1,S1Е  С(H,V)│3 ▒  С(H,V)│4 ▒  С(H,V)│5 з V1│V1н(м1):Бе 40,`2Ь(H,V,5),З3Е ((H│30) ▒ (H│31)) ░ ((V│6)) з 64,└4Е ((H│10) ▒ (H│11) ▒ (H│52) ▒ (H│53)) ░ ((V│8)) з 65,·5Е ((H│20) ▒ (H│21) ▒ (H│42) ▒ (H│43)) ░ ((V│16)) з 66- 6Е J1│J з 57-"7З@J1, б(2, Л(128));-+8J1│J-59Бе 33-<:Ю4-};АV│1 е 31:V$│ И(V):A$│"V"лV$л"O1;L255;BAGFEDC":╔A$:A$│"":Л V-Н<Е BA│0 з 67-Щ=BA│BAм1-б>B│0-л?Бе 29-╥@╔"CDEFGABCDECDE":BA│BAл1:B│0:Бе 29-єA╔"CDEFGAB":SC│SCл2:B│0:Бе 29.B╔"CDEF":SC│SCл1:B│0:Бе 29.CЮ.4DЗ@7,"*** scoreboard ***".JEЗ@139,"SCORE:";SC.gFЕ SC│0 з A$│"NO COMMENT".КGЕ SC▓0 ░ SC┤│3 з A$│"NICE TRY".мHЕ SC▓3 ░ SC┤│8 з A$│"LUCKY!!".╤IЕ SC▓8 ░ SC┤│12 з A$│"GOOD JOB!".√JЕ SC▓12 ░ SC┤│25 з A$│"ALMOST EXPERT"/KЕ SC▓25 ░ SC┤│35 з A$│"EXPERT"/ELЕ SC▓35 з A$│"TRY SOMETHING ELSE!"/ZMC$│"rating: "лA$/qNP│ З(C$)о2:P│240мP/}OЗ@P,C$;/ЯPX│0:З@327,"PLAY AGAIN (Y/N)?"/╝QA$│ Т:Е A$│"" з 82 :Д 84/▐RX│Xл1:Е X│25 з З@338,"(y/n)?"/ЇSЕ X│50 з 80 :Д 810TЕ A$│"Y" з 2 :Д Е A$│"N" з 85 :Д 810VUАX│1 е 25:┐ 0,1:АP│1 е 25:Л P:┐ 0,0:АP│1 е 25:Л P:Л X0tVТ (PKм1),0:Т 113,0:в409990ЦWЖ 142,4,0,134,220,167,128,1400уXЖ 4,31,38,249,134,213,48,136,32,167,132,140,5,255,38,246,134,211,167,1301/YЖ 140,5,224,38,249,134,218,48,136,224,167,132,140,4,32,38,246,142,5,1601|ZЖ 134,220,167,128,140,5,191,38,249,134,222,183,4,0,183,5,160,134,221,1831╟[Ж 4,31,183,5,191,134,215,183,5,255,134,219,183,5,224,198,64,16,142,1172\Ж 226,142,4,78,231,164,141,37,142,4,100,198,48,231,164,141,28,142,4,1212`]Ж 198,48,231,164,141,19,142,4,233,198,32,231,164,141,10,142,4,244,198,322▒^Ж 231,164,141,1,57,198,133,235,164,231,132,48,136,32,231,132,198,131,235,1642ў_Ж 48,1,231,132,198,138,235,164,48,1,231,132,48,136,224,231,132,572¤`Ю3шaЗ:З" THE OBJECT OF pocketball IS TOGET AS MANY POINTS AS POSSIBLE BEFORE RUNNING OUT OF BALLS. USE THE RIGHT JOYSTICK TO MOVE YOUR PADDLE. TO GAIN POINTS, YOU MUST LAND YOUR BALL IN ONE OF THE POCKETS ON THE SCREEN. ";4ЫbЗ"THE AMOUNT OF POINTS YOU GAIN DEPENDS ON THE COLOR OF THE POCKET YOU BALL LANDS IN:":Зд8) Л(175)" = 1 PT.":Зд8) Л(191)" = 2 PTS.":Зд8) Л(207)" = (NO PTS.)--GAIN BALL"4╕cЗ@489,"PRESS ";4╓dA$│ Т:Е A$│"" з 100 :Д 28HE SCREEN. ";4ЫbЗ"THE AMOUNT OF PO                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 COCO DIRECTORY MANAGER By John A. Saya The COCO DIRECTORY MANAGER program is a powerful disk management system for the Color Computer. It requires a disk drive, monitor or t.v. and a printer is optional. The program was designed on a 128k CoCo so it might not work on any less memory. When you first load the program, before you run it, put in the disk you want to 'organize' and then type 'RUN'. The main screen will appear and in the left hand corner it will say 'READING DIR'. This means it's reading all of the file names on your disk. (The COCO DIRECTORY MANAGER was designed for 35 track drives only). Next, the computer will say 'ALPHABET- IZING DIR'. What this means is it's alphabetizing the directory it read, not the disk! Next, it will say 'CALCULATING BYTES'. This will read each file on your disk and calculate the length of it in bytes. After this is done, your directory will appear in the middle of the screen in alphabetical order. The COCO DIRECTORY MANAGER is so sophisticated, that it will even tell you how many bytes have been used (BU) and how many bytes are free on the disk (BF)! Also, at the beginning of the program there are two poke commands that speed up the step rate of the drive, if your drive can't handle it, delete the line. ALL OF THE OPTIONS YOU CAN USE - When you press enter, the computer will automatically load the highlighted file and will detect if the file is BASIC, BINARY, DATA, or TEXT. If the file is DATA or TEXT, then a beep will sound alerting that you must view the file by pressing 'V'. (D)elete - When you use this option, the computer will first ask you if you're sure. If you are, then press 'Y'. The computer will delete whatever file was highlighted. Or, if you want to erase ALL of the files on a disk, when it says are you sure, then press 'A'. This will delete every file on that disk. (NOTE: this is NOT a process of formatting a disk). (C)hange dir - With this option, you can choose from any drive ranging from 0 to 3. (R)ename - With this option, you just highlight a file you want to rename, and then press 'R'. The type in a new file name and extension and you renamed a file! This takes much less time than typing RENAME 'FILENAME/EXT' TO 'FILENAME /EXT'. You'll see when you use it. It's especiall nice if you're not such a fast typer! (K)opy - With this option just hightlight a file you want copied and press 'K'. Then, the computer will ask for a new file name. In this mode, it will copy from whatever drive it's on and you can make one drive copies or two! For a one drive copy, when it asks for a new file name, just press 'ENTER'. For a two drive copy, when it asks for a new file name, type in a new file name and ext- ension. Then, after the extension put a colon (:), and specify another drive. For example, just type COCO/DAT:1. Then, it will make a two drive copy. Which, again, is much faster than typing out the whole copy command. (N)ew dir - With this option, you can check another disk. So, before you press 'N', put in a new disk, then press 'N'. (V)iew - With this option, you can view any data file and print it out. (P)rint dir - With this option, you can print out yout disk directory just like the screen and also the amount of free grans, the number of files, the bytes that have been used, and the bytes that are free! Also, you can name the disk for better organization of print-outs. (E)xit - When you press 'E' the computer will ask if you're sure. If you are, just press 'Y' and you will exit the program and it will be erased from mem- ory. Otherwise, press 'N' and you won't exit the program. (I)nfo - With this option, you can find out the length of the highlighted file in bytes, if it's a BASIC, DATA, BINARY, or TEXT file, and how many granules the highlighted file uses. (M)atch files - With this option, you can find any file that has the extension that you specify. It will print all of the files that have that extension and in the right hand corner on the top, it will say the number of files that were matched. (S)uper print dir - With this option, you can name your disk,. Then, in a neat and orderly way, you will get a print-out of the number of free grans, the number of files, and the disk name. Then, all of your files will be printed along with the amount of bytes each file contains and if it's a BASIC, DATA, BINARY, or a TEXT file. All by pressing one key! (A)lphabetize disk - With this option you can actually alphabetize your disk drive directory. All you have to do is press 'A'. Other alphabetizing utilities require typing in various things like 'EXEC' or 'PCLEAR' or 'RUN' and some are even longer than that! (L)ock file - With this option, you can seal it so that it cannot be deleted, renamed, copied, view, or loaded. The only thing that can be done with a locked file is you can press 'I' and ONLY find out if it's a BASIC, DATA, BINARY, or TEXT file. When you use this option, you will be asked if you're sure, if you are, then press 'Y' and the file that is highlighted will be locked. Otherwise press 'N' or 'A'. 'A' will lock all of the files on that disk. (NOTE: When you lock files, the disk will be alphabetized too). You will know when a file is locked because its extension will be '///'. (U)nlock file - With this option, you can make a file so that it can now be deleted, renamed, copied, view, and loaded. So, your file will be restored to normal. Again, you can press 'Y', 'N', or 'A'. This option works exactly like locking files. (NOTE: When you unlock a file, the computer will detect if it's a BASIC, DATA, BINARY, or TEXT file. So, its extension will be one of four. The extensions are BAS, DAT, BIN, and TXT. Also, for example, if you decide to unlock all of the files on that disk, and you have two BASIC files that have the same name, but different extensions, then make sure which file is which so when the file is unlocked, you can rename them with their correct exten- sions.) I know that you'll get ALOT of use out of this program and I'm sure that it will help you as it helped me. Just think, all of your disk drive commands and more with the touch of one key! I would appreciate any comments on the COCO DIRECTORY MANAGER, suggestions of what might be changed, added, etc., donations, or just to be pen pals! You may write to me at any time at: John A. Saya 618 N. Townsend St. Syracuse,New York 13203 t might be changed, added, etc., donations, or just to be pen pals! You may write to me at any time at: John A. Saya 618 N. Townsend St. Syracuse,New York 13203