01630 BRANCH LOWER BLO 01640 BRANCH IF NOT BRN 01650 BRANCH ALWAYS BRA 01660 BRANCH IF CARRY CLEAR BCC 01670 BRANCH IF CARRY SET BCS 01680 BRANCH IF EQUAL BEQ 01690 BRANCH IF GREATER BGT 01700 BRANCH IF GREATER OR = BGE 01710 BRANCH IF HIGHER BHI 01720 BRANCH IF LESS OR = BLE 01730 BRANCH IF LOWER OR SAME BLS 01740 BRANCH IF LESS THEN BLT 01750 BRANCH IF MINUS BMI 01760 BRANCH IF NOT EQUAL BNE 01770 BRANCH IF OVERFLW CLEAR BVC 01780 BRANCH IF OVERFLOW SET BVS 01790 BRANCH IF PLUS BPL 01800 BRANCH TO SUBROUTINE BSR 01810 JUMP JMP 01820 JUMP TO SUBROUTINE JSR 01830 NO OPPERATION NOP 01840 RETURN FROM INTERRUPT RTI 01850 RETURN FROM SUBROUTINE RTS 01860 SOFTWARE INTERRUPT SWI 01870 WAIT FOR INTERRUPT WAI 01880 CONDITION CODES 01890 CLEAR CARRY CLC 01900 CLEAR INTERRUPT CLI 01910 CLEAR OVERFLOW CLV 01920 SET CARRY SEC 01930 SET INTERRUPT SEI 01940 SET OVERFLOW SEV 01950 ACCUM A TO CCR TAP 01960 CCR TO ACCUM A TPA 01970 END OF HELP. SNAIL. џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ00100 COMMANDS FOR EDITOR 00110 Z ZEBUG 00120 E EDITOR 00130 C CHANGE 00140 V CASSETTE SAVE 00150 N NUMBER 100,0 00160 M MOVE 00170 A ASSEMBLE TO DISK 00180 S START 00190 D DELETE LINE 00200 F FIND 00210 H PRINT 00220 K KILL 00230 R RETYPE LINE 00240 L LOAD FROM DISK 00250 P POINT TO SCREEN PRINT 00260 O ORGIN 00270 I INSERT LINE 00280 T PRINT TO PRINTER 00290 R RETYPE LINE 00300 W WRITE FILE AS TEXT 00310 UP & DOWN ARROWS & CLEAR 00320 Q QUIT 00330 ACCUMLATORS AND MEMORY 00340 ADD ADDA 00350 ADDB 00360 ABA 00370 ADCA 00380 ADCB 00390 AND ANDA 00400 ANDB 00410 BITTEST BITA 00420 BITB 00430 CLEAR CLR 00440 CLRA 00450 CLRB 00460 COMPARE CMPA 00470 CMPB 00480 CMPD 00490 CMPY 00500 CMPU 00510 CMPS 00520 CBA 00530 COPLIM COM 00540 COMA 00550 COMB 00560 COPLIM2 NEG 00570 NEGA 00580 NEGB 00590 DEC ADJ DAA 00600 DECREMT DEC 00610 DECA 00620 DECB 00630 EXCLU EORA 00640 EORB 00650 INCREMT INC 00660 INCA 00670 INCB 00680 LOAD AC LDA 00690 LDB 00700 LDD 00710 LDX 00720 LDU 00730 LDY 00740 LDS 00750 LEAX 00760 LEAY 00770 LEAS 00780 LEAU 00790 OR ORAA 00800 ORAB 00810 PUSH PSHA 00820 PSHB 00830 PSHS 00840 PSHU 00850 PULL PULA 00860 PULB 00870 PULS 00880 PULU 00890 ROTATEL ROL 00900 ROLA 00910 ROLB 00920 ROTATER ROR 00930 RORA 00940 RORB 00950 SHIFTLA ASL 00960 ASLA 00970 ASLB 00980 SHIFTRA ASR 00990 ASRA 01000 ASRB 01010 SHIFTRL LSR 01020 STX 01030 LSRA 01040 LSRB 01050 SHIFTLL LSL 01060 LSLA 01070 LSLB 01080 STOREAC STA 01090 STB 01100 STD 01110 STU 01120 STY 01130 STS 01140 SUBTRCT SUBA 01150 SUBB 01160 SUBC 01170 SUBD 01180 SBA 01190 SUBCARY SBCA 01200 SBCB 01210 TRANSFR TAB 01220 TBA 01230 TFR 01240 TEST 0- TST 01250 TSTA 01260 TSTB 01270 MLTIPLY MUL 01280 SIGNEXT SEX 01290 INDEX AND STACK REGISTERS 01300 CMPINDX CPX 01310 DECINDX DEX 01320 -STKPTR DES 01330 INCINDX INX 01340 +STKPTR INS 01350 LOADIDX LDX 01360 LOADSPT LDS 01370 STORIDX STX 01380 STORSTK STS 01390 IDX2STK TXS 01400 STK2IDX TSX 01410 ? ASR 01420 ? ABX 01430 REMEMBR RMB 01440 FLAGS 01450 SYNC 01460 FCB 01470 FDB 01480 FCC 01490 SET 01500 EQU 01510 ORIGIN ORG 01520 END 01530 TITLE 01540 PAGE 01550 MACRO 01560 ENDM 01570 INCLUDE 01580 OPT 01590 COND 01600 ENDC 01610 JUMP AND BRANCHING 01620 BRANCH HIGHER AND SET BHS щNеж~ѓЯНѕ‘4Нѕx4Нѕ‘,&ОыНѕu5@5+'-&—0~єдНѕ‘+'-'НѕђO4НѓНmр'P‚94 и'ОБžйІ€Ÿй и 'ю5=& 4`bНГщнг5рНі%Огд€0—змг4лз‰нг–ц.Ь? Ь“г-Оfмг и'Нѕ‘Ні$Я иžй0Ÿймг9XI4XIXIус90%€:€Ц9žй4Нѕ‘НГЂ%О+Нѕ‘;&љ5оІ4@ŸІНВ„5ŸІ9ц! Ф'НЗ С ' С('СP'*~ДJO—чНЉ(щО9†—ч†(Ц§ўЬ'€§ўщЁ9†—чђ†PЦ§ўЬ/ сŽ ! mПў† іўэМў%љŽ OЗўЗў95! M'+НЗ ]'%С"(Z1яДІЅЗџššїў† žŽ ПўП™9Ї ѕўЖцxЗџštСd':z’|Žї~ЙœMicroware Systems Corp. T.Harris & T.Earles @џWAŽїНЙœ40џБ†Ї€Ї„0џЮЇ€ŒїM%љ59 ч&НЉ(~Ѓџ| ј4 1шЯЇ#Ї,5 Pщ>9щЏ9НЁЫ'љ5” ”&Ц з”сОўІ…@'Жў ЖўŠ@ЇаŽ^~ЇгТ!LОў& Œ '  &]  %іўэ„0Мў%v˜5–4† іўэ„Ъ@э0ПўќўJ*ZїўЖўJЗў5†4† іўЪ@0э„ПўќўLБў%т\їўO л4† іўэ4ЖўLЗўБў5%юПўў|ў† іўЪ@э„5†4Ž Жў(&ьˆPэŒ'0%і5†ь‰ эŒ.`%ѕ яў†Зў† іў4эМў&љў5† іўЪ@э„Пў9 o& ч&НЃ_~Й_ўО}ў4ўМ5&Р–9 ч&НЅT~ЙЦN~ЌFжч!('ѓ4НчВ–,5С&( P$ЛYжРС$і4ўv§ўОўЖўЇЖўH=Ž 0‹5H‰:ЖўŠ@ЇПўўT9 ч!е' ўBОўь„нЫќўнЭў9НГWŸ;НВmЦНЕm–ЫНЕЇ„НЕLž;m*ЗѓžRЦІ Ї€Z&љž 0Ÿ НГWŸ;НВmOжЬНДєž;m+ЗЫНМ5НГWŸ;НВmOжЭНДєž;m+ЗВНМ5НГWŸ;OжЮНДєž;m+ЗœНМ59НЗ !@С$К„XXX4ЅНВmНЗ С$Кqъф2aФ?4Ѕ'!НВmB& 5Ъ€4Ÿ эU&КN5Ъ@4Ÿ н5їў98D@@@D8DDDDL48D|@8(8J'%~ДJНчїў Нч1џ~С$ПѓзшџsС?$Пшзщџh–гa –г a–гS W–гI O–гŽ H–г< ѕ–г –г2Ž 3НіЦНЌ3жиžй4~ѓИжщ'OЇт* НыЫ0DVDVmр*@P‚994к54д5žш4 mф'пjф є5 ЮгЧ+ŽгЩ+ƒ€%Ю–ц. ƒ@%Ю?ŒР%ŽПмЧнНмЩнПŸХпУ е&ŸЩпЧНъ ж&НфМ‰›К—КлЗзЗ5F—Мї [џ J–hL' “гІнІоŸ“"ІТЇ‚“&їŸo? ~ЌDоŸo?ІРЇ œ&їЮ (О J_ЏСo0‰\ё [#ђ~–Ы_\НЧI' І‘ы&4НЫ5ё [#ш9і ZЅ' НЗ НлЈзы9'гЙН•ЌНвV4Ѕ'ЦЅНВoНвV4НЅЧНмeoт†#_40щџlb0‰юœ$іjb'йІ_\jф'сb&їзцdH†џНг"цcBmф' OНг"цaлчa з2e~лY5@Ж \'Ž (Oo‘LБ [#јžoН­ \Ж ]' ]Н­nФ†Œ†нъІc—ьОŸю–ЦзэНжђ ю\С#є ьJ&э9цeсf&6 …џ@ †4НЉŽг_Ц Ір'ŽгlЦНЙЂŽг~ЦНЙЂНлYНлYНЁq &љ9INSERT SOURCEINSERT DESTINATION DISKETTE AND PRESS 'ENTER'5 Ц Ž WІ‚4Z&љ–ы4nЄІ€—ыЦ Ю L~ЅšНЩ5лoтЅ' cфЦЅНВoНо­ЩНЅЧНЪщoт0щџlф0‰џœ$іjф'иX0nННЦŒНЦхО tюЎ 4PНЧі vНЭ4JФ?4‰OНЧyыф‰Ž4_Ўф' \0'сj&їЏфчdP†џ@me'%0kНг­НоЩНЧНЧU0ІeЦDc„&J'c€Z&є~Чјc„Ўф' ьbыd‰эbO Ќ2ш$9mш~г&†џ0m O0ш—иНг­ЎhП WŽП |†Rі [\НФžёЬэˆцf')жифg' ьbыf‰НТцžёюdяцfо4Džёя НТъla5DZ&№žёЮ ‰я жифg' ogьjŠ€эˆ~Ы8+4'4ЦНеЮ€5Ю54PЦ€НЕ3„5ч„я5~ЅšНВmŽГW/~БFНЗ НлЈ4НЗ8С""4НЗ8зэZС"5—ьзы9~ДJНВmŽБVжыоь4D­„5Dзыпь9УчМžR4пНЖT4_Žo€Z&ћ5Ю€–5НЖYЮŒЦŽŸюзъ~жђ'а‚~йЭЦЅ' НЗ8С$о›НЅЧ4ŽЦo‚Z&ћO ыф\Р$ќЫm…&ѕLЇ…%ь2a0щџ4ž0‰ˆЌс"ж[НмeН•ЌъьНжђ …†РЗџHНзб'~жˆ%Ж †ŠЗџ@†PЗџHіхНзб&hНз№lŽџKPŽжOП ƒОЖџH†џЗ ‚ЦєїџHЖ †Š€Зџ@ц€чЄ њЖџHЏ„D—№&. ь–ь#&Є†—ъŽŸюЮO—ь_ІХ—эНжђ\С%є–ьL#%ъ~лY †џ@~зОЬ N)_4ЮцХзэЮждЦ–ьЇ€o€–эЇ€Ц 5\С%лЬШNч€J&ћ94ьСє5Z&ѕ9ѕўїN ѕћџїNnŸР 4Цї ˆ5b №' –№Ц<…@&Ц(~ЌF4–ъ5&*} ‡'%4V†—ъоюŽŸю3пю†—ъ–№& _І€ЁР&Z&ї5V95Vz ˆ&БЦH Н_Њ'Sˆ&лї ‡Ÿ~к.4 …жыŽиЖ †„ЈЊ…Š жьС%Š‰ŠЗ †Зџ@Х&ŒЇбНЇб=& №Žи•жъX­•5ж№' J'4 &ё Д†№З …5іНЧXo…†ЗџHѕ8$„—№9žŠ0'щ'…&ѕ9†аЗџHѕЖџH†€—№9Ž".0&ќ9†€Œ† 4НЧX:ц„їџIбь'–ьЗџKЇ„†ЗџHєтБ&Ь„'—№5‚–эЗџJŽи‹П ƒžюЖџHЖ †Š€5žŠЮџHs ‚PїџHєЋС€'ЦхФ& 1?&ј ‚Џ~зпц€їџKЗџ@ іЦхФ&1?&ј тіџKч€Зџ@ іЏЖџH„|—№9зИзазјзћABЖ ‚'О ƒЏj ‚;Жџ*њЖџЖ …'JЗ …& Ж †„АЗ †Зџ@~‰U?ЬнъНвRНЅЧЬ"ньЬ&нюНжђ э ю–э#ѓќ&ƒOS'MoŽ&o€Œ8&љН­Џ~й‡4Ь;ŽНжТ5–џџџџџџџџџџџџџџџџк”кšлYк.йџtŽпНЙœЬ ŽIНжТЬ§PЬџџнh†U—qўй;oCНз№ЇФЁФ&oФНкw №&љЦНм–НлY ыŽпjНЙœНм1Юџ†ЇBІФC„@&5жы4ЦŽпвўРНЅš5зы­ŸР №&Žп…НгБНЦŒ} s' О tь ƒ&№~ тНвVёN%ћЩНЅЧНмe–hL&!ŽпНЙœOжыННЬŽпНЙœНољ'Žп)~Йœ­Ÿ ŽŸюЬ"ньЬџНжТ†—ъНжђ э&љ†—э ь*ё~лY†~зc4v–ыБN%ђ4є–ьЦ=лэ‰ƒmф' Уv$ єjф ё2aѓй9$ єжєћй8Ž–ъ'€'J' !† †Œ†4vŒ† _ŽŒ†Œ† Œ4vC5і4—ѓ}O'Ъ зєŸѕŸї5„ЦŽўй;ІA…B' 0&іZ&ѓ†€—№5ЖQmФ&ьЇФЇBІA…'њ9бŽѓ8F…& žю…'AŒJT…&т…'Џ†_Ž‘Žѓ Žѓ4–ѓ—№9…'љ…&ѕІ€ЇФ №ІA…'њ9ї…&тІФЇ€ єы…&жІ€ЇФ єпІФ„—№зOЇФ–№94GP_НЉЂіџ Фїџ НЉvЦ Жџ ˆ€Зџ Z&ѓНЉt5Ч4Ц`Z&§5„–ч€'†Œ†ЗдЖдЗе~ЙXzе'ђ~ЙЌёP"Ъp94–ыЦŽЁ'0ˆJZ&іЦŽm„' 0ˆJZ&і~ХЇ5†—ы]'#ІР€0%& ""4–ыЦ =M&иVзы5›ы%иLZ&иБP"Ъ—ы9ˆ' Њ'‘'4'7œ'g#'IНЗ НЅЧёP~ЮЪ_ŒЦŸ' ]'НЗ \С"KНЅЧїN9Нк~ Ÿ'0НЅЧНкw №&M94НЪщ5–ŸНЗ С"НЅЧыOIZ*ќЗQ ŸНЗ С"зЙНЅЧЯїO†%_НкšŽѓŸю0ЬНжТНкл №&њTмѕГй9$ єнѕ–єАй8—єoтмѕƒv$ є' єнѕlф&эjф5їP9НвOЅ'ЦЅНВoНЗ НлЈбы%зNНЅЧ4–ыЁф'L'—ы ё5„;НЬЌЖдБе'+ŽпcНЙœOжыННЬŽп[НЙœНЧU0oтЦDІ€C&lфZ&іO5ННЬ~ЙX†—ъŽŸюMІ„'C'чІ€' ­Ÿ  іЬнь9žІ4~аЯ&ѕŸНвVНВmŽŸюЬџНжТН‡HНЅЧ]'оюНЅšoФЪ†—ъ~жђM&ьŒPНЯСџ@Џ~ЅE–o' џ&†ЗI~ХМ4ЎgŒЃ'5 №p}I'+)кIsIбвгНЁБ ']&sг _& sв}г'фвібŽк:І„&г б|б K['L 'b'  &|б З}в&% !}б'zб9' ' ' \&НЁБ б %}в&|б52b9oј†_­Ÿ НЙXЦчфŽнЏa џYIoј зŽнŽкц€ч &њ9žІ4НБVŽЉŸ 5ŸІ 'ѓ“Ž T~Щ8НЦŒ} s'/ІшЁm&~а\–hL&Žп1 ' 2ш&Žп)~Йœ­Ÿ ~ЦѕНЁБ„пY9 ERASE HARD DRIVE ARE YOU SURE? (Y/N) ABORTED FILE ALREADY EXISTS OVERWRITE IT? (Y/N) FREE=DRIVE=HARD DRIVE(S) NOT FOUND AUTOEXECBASHARD DISK BASIC - COPYRIGHT (C) 1986, 1989 RGB COMPUTER SYSTEMS oј иŽнŽкц€ч &њ9џџџџџџџџџџџџџџџџџџџџаSE HARD DRIVE ARE YOU SURE? (Y/N) ABORTED FILE ALREADY EXISTS OVERWRITE IT? (Y/N) FREE=DRIVE=HARD DRIVE(S) NOT FOUND AUTOEXECBASHARD DISK BASIC - COPYRIGHT (C) 1986, 1989 RGB COMPUTER SYSџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 0аPЖџўŒ'Ž€ЗџоІ„ЗџпЇ€Œр&ёŽ ЮРІ€ЇРŒ@&їНЉ(~РDK з_ъйиаŽo€Œ ‰&љŽС Ю4Ц НЅšЬВwэCэHoФoEЬЯ §-ЬЯ2§2Ю^†~З ЇРьэСŒС9&№ŽТВПЁŽШАП›Ž _ŸАЮДJЦ яZ&ћŽиЁП †~З ŽиЏП †З zJ”оŽ ‰П H0‰П J0П (o0‰П *o0‰П ,o†З [0‰]'L…'L‰ЫзН–ь–К‹—З­ŸРЏџјНЙœŽРчŸr~й=Нвв~€Р ‚ … †џ@†аЗџH ћЖџH9С’Т8ТТNФKШˆШ“ЬнПШHШKЪщЪљŽЭ5ШЉЦфЪфЩ ЮвЦфТeнЌDISK EXTENDED COLOR BASIC 1.1 COPYRIGHT (C) 1982 BY TANDY UNDER LICENSE FROM MICROSOFT DIвDRIVХFIELФFILEгKILЬLOAФLSEдMERGХRENAMХRSEдSAVХWRITХVERIFйUNLOAФDSKINЩBACKUаCOPйDSKIЄDSKOЄDOгЬЉЮХаМб\ЦяЪHбЪ9абЩраfзNв3е™вbгЙдэеbжьCVЮFREХLOУLOЦMKNЄAгЭєЮœЮЮ7ЮВwс"ŽСё€Ю~­дс#№-nŸAСN#nŸFРD4НВb5ŽТ,~ВЮ5 Н­3Нвв4$НЪщ5С6%Цv2bНЇщНЉtoНЙ\НЙЏŽТZ~Ќ`BRDFOBWPFNFSAEFOSEVFERBAS DATBIN4ЎcŒ—_&#'5‘2eНШ.ŸёoˆoˆoˆoˆoІ—ыЅ' НВmНЗ=žёэь'НЦ…ь Ў 40^НŸЕ4`Ір& 55Œd%Ц6~ЌFоёЌM'З4ІO'oOЦ3ьaНЧ„4НЧyPыc\чDцBНЧU3ІфL0Ф:J'7чфц„СР%ђцф и&Ц.~ЌF0ШзъŸю0ФНЧc~жђ4НЧП‰5BчФJ&ђ4НЧ52aоёчC†џЇMІ„Р%'„?ЁD$!–и'НІDŠРЇ„НХЉЎIŒ&ЌШ'†!O_эШЦЎIŒ& 2gЎK–и'Ц~УZНУW5ЏM4НЧU0цC:І„Р%+„?ЁD&%ьШ„4OцbуcЃс# и'џVƒ#ЬŠ€эШ50Ш:юb4†џуa$эa5P цboaob2a–и'НЅšяbоё–и'ЇOЏbЎM0_юф&ўН5–2bНБVНЖЄ4НЅЂ]/сІ54oНВmŽТЌНЩ8Ьџ§ WŽЅ'НВmНГцžRП |'яТНЅЧ54НЧI&с†ŸёНЧНЦŒ5†4СI&НЦхНШО tь § WuНЦ'НЧUlžё5Ї9hфСO&} s'НЦќЖ sЗ wО tП xНХgR гСR'СD&с$hфќ H4ѓ |%Г J#Ц:~ЌF4} s&U †џНШc l5F§ Hя ў |я Ž ў tюNяˆ9žёЦo€Z&ћžё–ыЇЖ vЇЇі sРXXX4ќ tƒ†=ЋрЇˆ9Ц8Ж w'цжЗ s—эЦзъНжђО xП t3„Ц o€Z&ћŽ LЦ НЅšќ Wэ@Ц!НЧПЗ vЇBЦзъНжђ4VНЧUlІБ z%НЧ5ж–o/Ч/2b4pŽ &жoXЎ…ц„С@&ьˆЃ $ УэˆЎ 0‹І5”цˆ'Іˆoˆ5”цˆ'p5”цljˆ':Іˆ5”4`O3‹ІШ4oІ—ы5b5”ІL4 #OЇц3„НЧU:ц0ФСР$ 5€ &ч мФ?С #Ц@~ЌFрр%!˜4#†—ъНЧc3ˆпюНжђoˆцр& ьˆ&_cˆчˆ9ю3Aя9 s wЬ—ьзъЦзэЮпюНжђџ t1ФІФ&()Ž LІ€ЁР&Œ W&ѕї sІBЗ v93Ј ƒ&е\С #Ц9C&зЖ w&ї wџ x9Ц4} s&ј~ЌFНЩ5НЅЧНЧ’щ†џНШО to„ЦзъНжђц D0:ц„†џЇ„СР%ёЮпюЬ—ьзъЦзэ%o0ЦDНЅšoРƒ&ј~жђ4жoŒ4XŽ &Ў…ц5„~лАŽ ~жыФ9цTзьС% ьXPыызэ94XIXIXIус9oтlфƒZ*љІфчфЦ =5Z‹ +ћO9Жm&љo3ŽŸюЬ—ьзъЦзэНжђЦD~Ѕš”0OФўoтc…'1c…LD$%\Х&№4Рcb& рр*цфca2a мырСD%іцфР юЦ8~ЌF2a˜:ЦРч„94і [\НЧI'–ыЁ&ў tІMЁ&ІЁф&нѓZ&с5‚НЅЅo]/ьНЧIІ'лК@'С~І†Œ† o/ЕЏфНЧD4І'л@'Ёф&п5–ЎdŒА &їНВm"& НВDНЖWЦ;НВoŽАЏd5–/%ё ["нŽ5 o/2b4nНЧDцOŽ~Ѓ| o/2b92bЏ2(Ш†’ &H2Н­ыžІŸ/І€':'%~ВwІ—&~Ўь€нhŸІ–Џ'†[НЂ‚–hННЬ†]НЂ‚ŸЉ˜&~ƒ—&~ƒšН­Ц І2b–o4НЅЎНЃэ o/мМНЧDцС@'мэ_Іˆ&цˆ~ЅфŽТЉoтЖ Z—ыЮ LЬ ЇРZ&ћЦНЅšН‡H3„ &=5VГ J%PŽ ‰VŽ L\Z& 2aŒ L&gЦ>~ЌFІР.'-/'):' Œ T'ш> кн]&н5‚cb'зІРM–ыБ "~лйСŽ W† Ї‚Œ T&љZ'кІР:'ЭŒ W'Ќ юЇ€'Є.' /'œL'™9M'‚KžŠП WЅ'!НВmЦAНВo&фs XO~Зd†OŒ†Iі [\зo~Ф№†џНЬ$м“НЬ$˜НЬ$žІ€НЬ$œ&ї~Є-ŽТІ~Щ8OЦџ "&ИX† M'sO_З Yї ^лЅ'НВmЦRНВoНЅЧ†З Y™Ж X' } ^&Н­~Ќ|Ж WК ^&лŽН­s ]НЭМНЭМ4НЭМ‰5гНЌ7žНХФжp&Ї€ ѕ ]ŸЦІ‚&Z&љžŸo€Z*љНЄ-Н­!Н‚œНЌяw Y%НЄ&w Y%тН~Ќs o.о9і [\4зo5Z&ѕ9 o/З‡2bНЧDoŸёІ'ь4oцзы &цˆ†€ЊэˆlцНЧUЇ:l~ЫУ@&љь Ў 1‹461фо“'ІA3B*(3E я5@“':0уB4ІA*яцDXЫO3ЫЃф'т3E ѕЎBМ H$Ќ"% Ќ$%ЃЄэB9oФoBoC9і [\4НЧIІ@& ь Ѓ$%ЃЄэ 5Z§ЃГ H'ІРЇ€ єП HНЧUjm'НЧžё5 '@&АІ' НЧc3ˆпю,Іˆ*цˆФ† =Юпю1ЫцˆTTTЫзэЬ—ь ьˆ„э.Цзъ~жђУ2b4Ž &жoXЎ…ц„С'6 &o %lС@&ьˆУЃ "zэˆЎ 0‹5Ї5”lˆцˆ':Їˆ5–4`Ї‰цзыlНЫп1„цНЧU:3І$ %j$l%НЧПo$o%Ї#ŒŠРЇФ0ЄНЦ…НХЉ5`5–~мфНЧНл‰Ь—ьзъЦзэŽŸюНжђ5@НЅI4@І„'8C'B4ЦНЙЂЦНЙЂ8Ўфц 5‰С $*OННЬНл  †.nŸ 45950ˆ Œ%Ежэ\С~нНЂ‚~ЙЌНЧU3OLD"љ(0Ф:ц„СР%№9 o/^ŽАiЏфŽнЦ,з–&Ц o 'њ"& С,&‰з "С"' & Œн'DІ &>† M'‘'4Ёр'Ї€Œж&F& @'Эo„Žм9"' &ђ.&ю 'ј,'ц &&о 'к ж'НЧDцС@&ѕ‡ЦJ~ЌFНЁv p94НЧDцС@& ьˆƒэˆ5”Їˆcˆ5”НЖTС%цM~МНБCЦНЕНМ5~Ж›ьнR~ˆ–o4НБCНЅЎ o/ц!НЧD5—om'еХ9рІ—ыц4НЭJФ?4‰OНЧyыр‰54І@5&Е4“Š'ƒЊжO'ЫзOНМ_Ўфьˆ„–b–\жOНЙХНМ_5ь „b–\жOНЛ‘~МюНБCНЗНлЈНн.~Дѓ4ЎfІ „‹.5ёP"з]9~м "зQї Z9Іd&ЎeŒЏš& ЎbŒБf&ŽЮьЏe~ˆF5FНБH'э=žRьƒ ‰%Г J%рЊ~ЏЄЪ'Ш&В(Ÿ,'Ч4НЗ С"х%–М~–.НЄ)Ÿ~ŒС4&В0НВb–o4НЅЎНЄ o/НЧDцС@& 5—oьˆ~ДєНЃ_5—oжl~ДѓŸOНƒlНƒlЌb%фвНƒlНЅЧЬ§ WНЪO+ьbЃdУьdЎdІ€НЬ$1?&ї†џ O_56~Є-НЬ$‰9ŽТЏ~Щ8ŸіНЪќ Wƒ&жDžŠЅ'НВmНЗ=ŸгНЅЧНЭМ4)%ггнІр&д3НХФжp'~УRЇ„Ё€'~з 1?&щ аНЭМ‰9~н|5–ы4*5‘ы&ф(5ŸІНЦŒНЦхŽ Lў tЦ НЅšЦзъ~жђЦЅНВo~Щ5НЦŒЦB} s&лс9'шюo9#&НЅЅНЄЅ'шйНВmНБV–&ННйНЕНЙŸЅ'шР†,НЃ_ n'†  иНЙŸ тНЃ_ n&З†"~Ђ‚НШ.O_4Ѕ&5–НЗ84Oуc%ЎeЃ #ЦD~ЌFюcэcь 3ЫяaЦџНВoЦЇНВoНГWНБF5Dч„я Т†O4НГWНБF4ЎŒ ‰%М J%ЦF~ЌFЦГНВoН‡H5 ІЄ'.4Ц ю"чРJ&ћцр'сЄ%цЄoфю"mр'4OP‚ыЄ‰3Ы5~Ѕš5‚Н•Ќќ Jƒ ‰4і [4Ѕ,'НЗ С"тЯчфЅ'НВmНГцэaНЪщцф4Ь ‰уb%qэbУ%jjф*ї]'L'`…'L'YЇфмМЋф%OL'J“!$EJ“гІџ Z&6d:ƒ**********************************************&kn:ƒ* COPYRIGHT (C) 1989 BY RGB COMPUTER SYSTEMS *& x:ƒ**********************************************&Ї‚:ƒ&­Œž&У–‡"PLEASE WAIT..."&е • 2048,&H7FFF'ЊŒ H(128),H$(128),C(128),C$(128),B(128),B$(128),F$(129)'ДШ 4,1'3ОМ :ƒ ERASE $E00 AREA']ШІ 4000 :ƒ POKE FORMATTER INTO MEMORY'ˆвІ 3000 :ƒ CHANGE PARAMETERS AS NEEDED'ЇмІ 5000 :ƒ GET DEFECT DATA'­цž(№‡:  100,5:‡"WARNING! THIS WILL ERASE THE":  100,5:‡"ENTIRE HARD DRIVE! CONTINUE? ";(њA$Гџ’:… A$Г"" Ї 250(0… A$Г"Y" Ї 280(6Š(^‡:‡:Л ‰"TYPE 'YES' TO CONFIRM :";A$(Œ"… A$Г"YES" Ї Ђ &HE00:‡:‡"FORMAT COMPLETE"(’,‡(˜6Š(ФшZ1Гџ(ZЎ256):Z2ГZЌ(Z1­256) :ƒ WPOKE X,Z(иђ’ X,Z1:’ XЋ1,Z2(оќ(єа’ X,Z :ƒ POKE X,Z(њк) Иž)' Т‡"(C) 1989 RGB COMPUTER SYSTEMS":‡)D Ь‰"NUMBER OF CYLINDERS";Z)X жXГ&HE10:І 1000)q р‰"NUMBER OF HEADS";Z)… ъXГ&HE12:І 2000)Ѓ є‰"REDUCE WRITE CURRENT";Z)З ўXГ&HE13:І 1000)ж ‰"WRITE PRECOMPENSATION";Z)ъ XГ&HE15:І 1000* ‰"LANDING ZONE";Z* &XГ&HE17:І 2000*' 0‰"STEP CODE";Z*- :‡*A DXГ&HE18:І 2000*G N*T MXГ&HE00*]Њ A$*pД… A$Г"END" Ї *…О’ MX,џ‰("&H"ЋA$)*‘ШMXГMXЋ1*вЅ 4010*Ѓˆž*О’‡:‡"ENTER DEFECT DATA"*пœ‡:‡"ENTER HEAD '999' TO END"*хІ‡*эАNГ0*ѓК‡+Ф‰"HEAD:";H(N)+Ю… H(N)В16 Ї 5210+,и‰"CYL :";C(N)+>т‰"BFI :";B(N)+QьC$(N)Гџˆ(C(N))+qіC$(N)Гџ(C$(N),џ‡(C$(N))Ќ1)+… џ‡(C$(N))Д4 Ї C$(N)Г"0"ЋC$(N):Ѕ 5120+А H$(N)Гџˆ(H(N))+аH$(N)Гџ(H$(N),џ‡(H$(N))Ќ1)+ќ… џ‡(H$(N))Д2 Ї H$(N)Г"0"ЋH$(N):Ѕ 5150,(B$(N)Гџˆ(B(N)),/2B$(N)Гџ(B$(N),џ‡(B$(N))Ќ1),[<… џ‡(B$(N))Д5 Ї B$(N)Г"0"ЋB$(N):Ѕ 5180,eFNГNЋ1,qPЅ 5050,Z€ XГ0 Ѕ NЌ1,dF$(X)ГC$(X)ЋH$(X)ЋB$(X),Ѕn‹ X,ЖxFLAG$Г"DONE",Ц‚€ XГ0 Ѕ NЌ1,тŒ… F$(X)ДГF$(XЋ1) Ї 5310,ђ–TEMP$ГF$(X)- F$(X)ГF$(XЋ1)-ЊF$(XЋ1)ГTEMP$-'ДFLAG$Г"MORE"-/О‹ X-IШ… FLAG$Г"MORE" Ї 5240-nвXГ&HF00 :ƒ DEFECT TABLE LOCATION-œмZГ0:І 1000:XГXЋ2 :ƒ WPOKE LIST HI BYTE 0-ЫцZГN­8:І 1000:XГXЋ2 :ƒ WPOKE LIST SIZE * 8-й№€ AГ1 Ѕ N-єњC(A)Гџ‰(џ(F$(A),1,4)).H(A)Гџ‰(џ(F$(A),5,2)).*B(A)Гџ‰(џ(F$(A),7,5)).[ZГ0:І 2000:XГXЋ1 :ƒ POKE CYLINDER HI BYTE 0.Ž"ZГC(A):І 1000:XГXЋ2 :ƒ WPOKE CYLINDER LO WORD.Й,ZГH(A):І 2000:XГXЋ1 :ƒ POKE HEAD BYTE.щ6ZГ0:І 1000:XГXЋ2 :ƒ WPOKE HI BYTE OF BFI 0/@ZГB(A):І 1000:XГXЋ2 :ƒ WPOKE BFI LOW WORD/ J‹ A/&T/5':ƒ FMT.BIN/k'† 16,00,16,00,00,00,08,00,00,00,00,00,00,01,00,01/Ё'$† 00,00,00,00,00,00,00,00,00,8D,17,8E,0F,00,9F,EE/з'.† 86,04,C6,1E,8E,FF,00,10,8E,0C,00,8D,1C,10,26,C80 '8† D8,39,8E,0E,03,9F,EE,86,15,C6,00,8E,00,00,10,8E0C'B† 16,00,8D,05,10,26,C8,C1,39,AD,9F,D9,32,AD,9F,D90Y'L† 30,0D,F0,39,END,00,00,01,00,01/Ё'$† 00,00,00,00,00,00,00,00,00,8D,17,8E,0F,00,9F,EE/з'.† 86,04,C6,1E,8E,FF,00,10,8E,0C,00,8D,1C,10,26,C80 '8† D8,39,8E,0E,03,9F,EE,86,15,C6,00,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџOR GO IF ERROR LEAX MSG1-1,PCR POINT TO COMPLETE MESSAGE PRINT JMP $B99C PRINT & RETURN ERROR LEAX MSG2-1,PCR POINT TO ERROR MESSAGE BSR PRINT PRINT IT CLRA ZERO TOP OF "D" LDB $F0 GET ERROR CODE ANDB #$FF-$80 MASK "ADDRESS VALID" JSR $BDCC PRINT NUMBER JMP $B958 SEND A C/R & RETURN ABORT LEAX ABT-1,PCR POINT TO MESSAGE BRA PRINT PRINT IT & RETURN DISKIO JSR [$D932] SETUP COMMAND PACKET JSR [$D930] GO DO IT TST $F0 ANY ERRORS? RTS RETURN GETKEY BSR PRINT PRINT MESSAGE JSR $A1B1 GET A KEY ANDA #$7F-$20 FORCE UPPER CASE JSR [$A002] PRINT THE LETTER CMPA #'Y "Y" FOR YES? RTS RETURN MSG1 FCB 13 FCB 13 FCC " FORMAT COMPLETE" FCB 13 FCB 13 FCB 0 MSG2 FCB 13 FCC " HARD DISK ERROR #" FCB 0 WARN1 FCC " (C) 1989 RGB COMPUTER SYSTEMS" FCB 13 FCB 13 FCC " WARNING! THIS WILL ERASE THE" FCB 13 FCC " HARD DRIVE! PROCEED?? (Y/N) " FCB 0 WARN2 FCB 13 FCB 13 FCC " ARE YOU SURE ???? (Y/N) " FCB 0 GOING FCB 13 FCB 13 FCC " FORMATTING, PLEASE WAIT..." FCB 13 FCB 0 ABT FCB 13 FCB 13 FCC " FORMAT ABORTED" FCB 13 FCB 13 FCB 0 END START FCB 13 FCC " FORMATTING, PLEASE WAIT..." FCB 13 FCB 0 ABT FCB 13 FCB 13 FCC " FORMAT ABORTED" FCB 13 FCB 13 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџб&4d:ƒ PROGRAM TO PATCH TELEWRITER-80 TO WORK WITH&hn:ƒ THE RGB HARD DISK. NOTE: TEXT FILES MAY ONLY&™x:ƒ BE ON HARD DISK DRIVES 0 THRU 3. MAKE THE&Ь‚:ƒ PATCHS ON A BACKUP COPY OF YOUR TW-80 DISK!&гŒ:ƒ&й–ž&с Р 8'Њ‡"INSERT A BACKUP TW-80 DISK"'"ДЛ ‰"AND PRESS ";A$'GОж"DISKMENU.BIN" Ѕ "DISKMENU.OLD"'\ШгM"DISKMENU.OLD"'tв€ XГ&H381C Ѕ &H385F'~м’ X,0'†ц‹ X'Œ№‡'Вњ‡"INSERT YOUR RGB UTILITIES DISK"'бЛ ‰"AND PRESS ";A$'хгM"TWPATCH.BIN"'ы‡("‡"NOW INSERT YOUR TW-80 DISK AGAIN"(2,Л ‰"AND PRESS ";A$(\6иM"DISKMENU.BIN",&H2000,&H385F,&H2000(@‡:‡"YOUR TW-80 IS NOW PATCHED"(ЄJ‡"FOR THE HARD DISK. STORE TEXT"(ЪT‡"FILES ON DRIVES 0 THRU 3 ONLY!"(а^ŠхгM"TWPATCH.BIN"'ы‡("‡"NOW INSERT YOџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџІQ SEAGATE 'N' SERIES FORMATTER ============================ OНЉ0ŒЗB0™a&N0эY&F0,0ŒŸю†ЦŽŽ 4&0Œ…Ÿю†ЦŽŽ &02~Йœ0@їOж№ФННЬ~ЙX0к ц­Ÿй2­Ÿй0 №9йНЁБ„_­Ÿ Y9 FORMAT COMPLETE HARD DISK ERROR # (C) 1989 RGB COMPUTER SYSTEMS WARNING! THIS WILL ERASE THE HARD DRIVE! PROCEED?? (Y/N) ARE YOU SURE ???? (Y/N) FORMATTING, PLEASE WAIT... FORMAT ABORTED џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ* SEAGATE SCSI DRIVE FORMATTER * UPDATED 07/07/89 ORG $E00 START LBRA FORMAT JUMP AROUND PARMS PARMS FCB 0 RESERVED FCB 0 MEDIUM TYPE = 0 FCB 0 RESERVED FCB 8 BLOCK LENGTH FCB 0 DENSITY CODE FCB 0 DRIVE SIZE HIGH BYTE FDB 0 DRIVE SIZE LOW WORD FCB 0 RESERVED FCB 0 BLOCK SIZE HIGH BYTE FDB 256 BLOCK SIZE LOW WORD NULL FCB 0 RESERVED FCB 0 RESERVED/STPF/DCRT/RSRV/FOV FDB 0 LIST LENGTH (0) * PROGRAM TITLE CUSTOM FCB 13 FCC " SEAGATE 'N' SERIES FORMATTER" FCB 13 FCC " ============================" FCB 13 FCB 13 FCB 0 * FORMAT BEGINS HERE FORMAT CLRA SET "Z" BIT JSR $A910 CLEAR SCREEN LEAX CUSTOM-1,PCR POINT TO CUSTOM MESSAGE BSR PRINT PRINT IT LEAX WARN1-1,PCR POINT TO MESSAGE BSR GETKEY CHECK FOR (Y)ES BNE ABORT NO, ABORT FORMAT LEAX WARN2-1,PCR POINT TO MESSAGE BSR GETKEY CHECK FOR (Y)ES BNE ABORT NO, ABORT FORMAT LEAX GOING-1,PCR POINT TO MESSAGE BSR PRINT PRINT IT * FORMATTING BEGINS HERE LEAX PARMS,PCR POINT TO PARMS STX $EE TELL DSKCON LDA #$15 MODE SELECT LDB #0 RESERVED LDX #0 RESERVED LDY #(12*256)+0 DATA BLOCK SIZE / RESERVED BSR DISKIO GO DO IT BNE ERROR GO IF ERROR LEAX NULL,PCR POINT TO NULL HEADER STX $EE TELL DSKCON LDA #4 FORMAT LDB #$18 FORMAT 'OPTIONAL' LDX #0 RESERVED / INTERLEAVE LDY #(16*256)+0 RLL INTERLEAVE / RESERVED BSR DISKIO GO FORMAT BNE ERR* RAM DISK PROGRAM FOR A 512K COCO-3 AND RGB-DOS(HD) ONLY * (C) 1987 BY RGB COMPUTER SYSTEMS ALL RIGHTS RESERVED * DSKCON EQUATES DCOPC EQU $EA DCDRV EQU $EB DCTRK EQU $EC DCSEC EQU $ED DCBUF EQU $EE DCSTAT EQU $F0 * MISC. EQUATES SKIP2 EQU $8C "CMPX #" SKIPS 2 BYTES * CODE STARTS HERE ORG $FE69 UNUSED RESERVED PAGE AREA * THESE DRIVE NUMBERS ARE "RAM" DISKS DRIVEA EQU 2 FIRST RAM DRIVE DRIVEB EQU 3 SECOND RAM DRIVE * DSKCON PATCH BEGINS HERE RAMDSK PSHS U,Y,X,D SAVE REGISTERS LDA DCDRV GET DRIVE NUMBER CMPA #DRIVEA IS IT A "RAM DISK"? BEQ RDISK YES, DO RAM DISK CMPA #DRIVEB IS IT A "RAM DISK"? BEQ RDISK YES, DO RAM DISK * NOT A RAM DISK, GO BACK TO DSKCON PULS D,X,Y,U RESTORE REGISTERS JMP [$D936] RE-ENTER DSKCON * RAM DISK I/O STARTS HERE RDISK CLR DCSTAT CLEAR STATUS = NO ERROR LDA DCTRK GET TRACK NUMBER LDB #18 18 SECTORS PER TRACK MUL MULTIPLY ADDB DCSEC ADD IN SECTORS ADCA #0 PROPAGATE CARRY SUBD #1 NORMALIZE SECTORS 0-17 PSHS D PUT SECTOR COUNT ON STACK LDA DCDRV GET DRIVE NUMBER CMPA #DRIVEA IS IT THE FIRST RAM DRIVE? BEQ NOFSET YES, DON'T ADD OFFSET LDD #18*35 ADD IN 1 DRIVE OFFSET ADDD ,S++ ADD IT TO SECTOR COUNT FCB SKIP2 SKIP THE FOLLOWING PULS NOFSET PULS D RESTORE SECTOR COUNT ASLB CALCULATE BLOCK NUMBER... ROLA ASLB ROLA ASLB ROLA LSRB ...AND BASE ADDRESS LSRB LSRB ORCC #$50 INTERRUPTS OFF STA $FFA4 SWAP IN RAM AT $8000 TFR B,A PUT BASE ADDRESS INTO TOP OF "D" CLRB ZERO BOTTOM OF "D" ADDA #$80 CONVERT BASE TO $8X00 TFR D,X PUT RAM ADDRESS INTO X LDU DCBUF GET DSKCON BUFFER POINTER LDA DCOPC GET DSKCON OPCODE SUBA #2 DSKCON READ? BEQ READ YES, GO READ DECA DSKCON WRITE? BEQ WRITE YES, GO WRITE BRA EXIT INVALID OPCODE, IGNORE READ FCB SKIP2 SKIP THE EXG BELOW WRITE EXG X,U SWAP SOURCE & DESTINATION LDA #32 MOVE 32 BLOCKS OF 8 BYTES PSHS A PUT COUNT ON STACK MOVE LDD ,X++ GET 2 BYTES STD ,U++ STORE 2 BYTES LDD ,X++ -DITTO- STD ,U++ -DITTO- LDD ,X++ -DITTO- STD ,U++ -DITTO- LDD ,X++ -DITTO- STD ,U++ -DITTO- DEC ,S DONE YET? BNE MOVE NO, MOVE MORE LEAS 1,S PURGE THE "PSHS A" ABOVE EXIT LDA #$3C GET ORIGINAL BLOCK NUMBER STA $FFA4 RESTORE MMU SLOT ANDCC #$AF INTERRUPTS BACK ON PULS D,X,Y,U,PC RESTORE REGISTERS & RETURN * PATCH IN THE RAM DISK TO DSKCON ORG $D75F DSKCON'S ADDRESS JMP RAMDSK GO TO RAM DISK NOP EXTRA BYTE FILLER * DO NOTHING IF EXEC'D (JUST GOES TO RTS) END $C108 EXEC TO RTS AM DISK TO DSKCON ORG $D75F DSKCON'S ADDRESS JMP RAMDSK GO TO RAM DISK NOP EXTRA BYTE FILLER * DO NOTHING IF EXEC'D (JUST GOES TO RTS) џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ* INQUIRE UTILITY * READS SEAGATE "N" SERIES DRIVE INFO * (C) 1989 BY RGB COMPUTER SYSTEMS * DATA AREA ASSIGNMENTS ORG 0 BEGIN RMB 16 UNUSED DATA IN BLOCK MODEL RMB 15 MODEL NUMBER MEND RMB 1 END OF MODEL NUMBER HWARE RMB 1 HARDWARE REV LEVEL FWARE RMB 1 FIRMWARE REV LEVEL ROM RMB 1 ROM REV LEVEL RES RMB 1 RESERVED DSIZE EQU *-BEGIN DATA AREA SIZE ORG $E00 START LDB #DSIZE DATA AREA SIZE LOOP CLR ,-S RESERVE A BYTE DECB NEXT BNE LOOP GO AGAIN TFR S,U NOW WE HAVE A DATA AREA STU $EE SETUP DSKCON BUFFER POINTER LDA #$12 INQUIRE COMMAND LDB #0 RESERVED LDX #0 RESERVED LDY #(36*256)+0 ALLOCATION SIZE/RESERVED JSR [$D932] SETUP COMMAND JSR [$D930] EXECUTE COMMAND TST $F0 ANY ERROR? BEQ CONT NO, CONTINUE LEAS DSIZE,S CLEAN UP STACK JMP $D709 REPORT IO ERROR CONT LEAX MSG1-1,PCR POINT TO MESSAGE BSR PRINT PRINT IT CLR MEND,U FLAG END OF IDENTIFIER LEAX MODEL-1,U POINT TO DRIVE NAME BSR PRINT PRINT IT LEAX MSG2-1,PCR POINT TO MESSAGE BSR PRINT PRINT IT LDB HWARE,U GET HARDWARE CODE BSR NUMBER PRINT IT LEAX MSG3-1,PCR POINT TO MESSAGE BSR PRINT PRINT IT LDB FWARE,U GET FIRMWARE CODE BSR NUMBER PRINT IT LEAX MSG4-1,PCR POINT TO MESSAGE BSR PRINT PRINT IT LDB ROM,U GET ROM REV CODE BSR NUMBER PRINT IT LEAS DSIZE,S REMOVE TEMP VARIABLES JMP $B958 SEND A C/R & RETURN PRINT PSHS D,X,Y,U SAVE REGISTERS JSR $B99C PRINT DATA PULS D,X,Y,U,PC RETURN NUMBER PSHS D,X,Y,U SAVE REGISTERS CLRA ZERO TOP OF D JSR $BDCC PRINT DECIMAL D PULS D,X,Y,U,PC RETURN MSG1 FCB 13 FCC /DRIVE MODEL : / FCB 0 MSG2 FCB 13 FCC /HARDWARE REV: / FCB 0 MSG3 FCB 13 FCC /FIRMWARE REV: / FCB 0 MSG4 FCB 13 FCC /ROM REVISION: / FCB 0 END START FCB 0 MSG2 FCB 13 FCC /HARDWARE REV: / FCB 0 MSG3 FCB 13 FCC /FIRMWARE REV: / FCB 0 MSG4 FCB 13 FCC /ROM REVISION: / FCB 0 END START џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџю&dž&n• 1024&)xF$ГџЁ(128,џ‹(255))&H‚‡"INSERT A BACKUP COPY OF"&fŒ‡"RGB UTILITIES DISK AND"&–Л ‰"PRESS ";A$&Ÿ ‡:‡"LOADING FORMATTER..."&ЇЊЯ Њ&МДгM"SERIES-N.BIN"&ФОЯ ˆ&фШ‡:‡"PRESS TO BEGIN"'вЛ ‰"FORMATTING HARD DRIVE ";A$' мЂ'$ц… џ†(&HF0)Г0 Ї 250'*№Š'Hњ‡"PRESS TO BEGIN"'hЛ ‰"CLEARING HARD DISK ";A$'rЯ œ 0'zк ˆ'"€ DГ0 Ѕ џ†(&H150)'Ј,‡"CLEARING DRIVE";D'З6€ SГ1 Ѕ 18'Ъ@р D,17,S,F$,F$'вJ‹ S'кT‹ D'э^‡:‡"FINISHED!"MATTING HARD DRџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџОР Œиа&ЋNOНЉŽ`НЙœ­Ÿй4НЁБ&O~ЉA%эF"щ­Ÿ €AHŽUЎ†­„ №& СŽ4НЙœOж№ФННЬНЙЌНЁБ ЋKN[`e‹ RGB HARD DRIVE UTILITIES ------------------------ RE-ZERO DRIVE PARK DRIVE RE-INITALIZE ECC DISABLED ECC ENABLED FIND PARAMETERS TO EXIT COMMAND? ?IO ERROR, CODE †Œ†ЦŽŽ Ž Žƒ Ž‡Ÿю†ЦŽŽ№­Ÿй2nŸй0`0eeOНЉ0њŸю†ЦŽŽЊ0Сьщ™0ўьо‹0цвO}0tьЦq0 hьМe0\цВOX0OцІOK†%ЦŽŽA05žю0ьУ&l„эЦІ€JZ&ј0ЦŽй8І€7Z&ј0 ~ЁБ~Йœ~НЬ­Ÿй2ЦŽѓo…\С #љ­Ÿй0 №'~з 9 CURRENT DRIVE PARAMETERS ------------------------ BLOCK SIZE = CYLINDERS = R/W HEADS = REDUCE WRT = PRECOMP = PARK ZONE = STEP CODE = TOTAL SECTORS: $ OS-9 OFFSET : $ PRESS ANY KEY: 0123456789ABCDEF45’4DDDD5„0ŒлІ†nŸ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ* ADAPTEC FORMAT UTILITY * COPYRIGHT (C) 1987 * BY RGB COMPUTER SYSTEMS * MODE SELECT PARAMETERS NUMCYL EQU 0 NUMBER OF CYLINDERS HEADS EQU 0 NUMBER OF HEADS REDUCE EQU 0 REDUCED WRITE CURRENT PRECMP EQU 0 WRITE PRECOMP BEGINS LZONE EQU 0 CYLINDERS PAST NUMCYL STEP EQU 0 STEPPING CODE ORG $E00 START LBRA FORMAT JUMP AROUND PARMS PARMS FCB 0 RESERVED FCB 0 RESERVED FCB 0 RESERVED FCB 08 LENGTH OF DESCRIPTER LIST FCB 0 DENSITY CODE (ALWAYS ZERO) FCB 0 RESERVED FCB 0 RESERVED FCB 0 RESERVED FCB 0 RESERVED FCB 0 SECTOR SIZE HIGH BYTE FDB 256 SECTOR SIZE, LOW WORD FCB 01 FIXED, SOFT SECTOR DISK FDB NUMCYL NUMBER OF CYLINDERS FCB HEADS NUMBER OF HEADS FDB REDUCE REDUCED WRITE CURRENT FDB PRECMP WRITE PRECOMP FCB LZONE LANDING ZONE FCB STEP DRIVE STEP PULSE * CUSTOM NAME FOR USER PROGRAM * MUST BE 32 CHARACTERS LONG TO MATCH BASIC PROGRAM CUSTOM FCB 13 FCC "*** WARNING! NOT CONFIGURED! ***" FCB 13 FCB 13 FCB 0 * FORMAT BEGINS HERE FORMAT LDX $C00A GET "DOS" COMMAND ADDRESS CMPX #$D8D0 IS THIS RGB-DOS? BEQ FMT2 YES, CONTINUE JMP $A619 NO, ?IO ERROR FMT2 CLRA SET "Z" BIT JSR $A910 CLEAR SCREEN LEAX CUSTOM-1,PCR POINT TO CUSTOM MESSAGE JSR $B99C PRINT IT LEAX WARN1-1,PCR POINT TO MESSAGE BSR GETKEY CHECK FOR (Y)ES BNE ABORT NO, ABORT FORMAT LEAX WARN2-1,PCR POINT TO MESSAGE BSR GETKEY CHECK FOR (Y)ES BNE ABORT NO, ABORT FORMAT LEAX GOING-1,PCR POINT TO MESSAGE JSR $B99C PRINT IT * FORMATTING BEGINS HERE LEAX PARMS,PCR POINT TO PARMS STX $EE TELL DSKCON LDA #$15 MODE SELECT LDB #0 RESERVED LDX #0 RESERVED LDY #(22*256)+0 DATA BLOCK SIZE / RESERVED BSR DISKIO GO DO IT BNE ERROR GO IF ERROR LDA #4 FORMAT COMMAND LDB #2 CUSTOM FILL CHARACTER USED LDX #($FF*256)+0 FILL / INTERLEAVE MSB LDY #(10*256)+0 INTERLEAVE LSB / RESERVED BSR DISKIO GO FORMAT BNE ERROR GO IF ERROR LEAX MSG1-1,PCR POINT TO COMPLETE MESSAGE JMP $B99C PRINT & RETURN ERROR LEAX MSG2-1,PCR POINT TO ERROR MESSAGE JMP $B99C PRINT & RETURN ABORT LEAX ABT-1,PCR POINT TO MESSAGE JMP $B99C PRINT IT & RETURN DISKIO JSR [$D932] SETUP COMMAND PACKET JSR [$D930] GO DO IT TST $F0 ANY ERRORS? RTS RETURN GETKEY JSR $B99C PRINT MESSAGE JSR $A1B1 GET A KEY ANDA #$FF-$20 FORCE UPPER CASE CMPA #'Y "Y" FOR YES? RTS RETURN MSG1 FCB 13 FCB 13 FCC "FORMAT COMPLETE" FCB 13 FCB 13 FCB 0 MSG2 FCB 13 FCC "HARD DISK ERROR!" FCB 13 FCB 13 FCB 0 WARN1 FCC "(C) 1987 RGB COMPUTER SYSTEMS" FCB 13 FCB 13 FCC "WARNING! THIS WILL ERASE THE" FCB 13 FCC "HARD DRIVE! PROCEED??? (Y/N) " FCB 0 WARN2 FCB 13 FCB 13 FCC "ARE YOU SURE ???? (Y/N) " FCB 0 GOING FCB 13 FCB 13 FCC "FORMATTING, PLEASE WAIT..." FCB 13 FCB 0 ABT FCB 13 FCB 13 FCC "FORMAT ABORTED BY USER" FCB 13 FCB 13 FCB 0 END START FCB How to fix Telewriter-128 to run on the RGB Hard Disk System Telewriter-128 is FULLY COMPATIBLE with RGB-DOS and the RGB Hard Disk with one exception: It, like most programs, does not allow the use of a drive number higher than 3. We must patch the program to cause it to accept ALL drive numbers, right up to the maximum provided by your Hard Disk drive's capacity. What we are doing to fix the program is change an "LDD #3" instruction to an "LBSR $xxxx" to allow all valid numbers to be accepted. Telewriter-128 also wisely incorporates a checksum testing routine which will not allow a "bad" or modified copy to run. This was done primarily for CASSETTE users, who are more likely to encounter an ?IO ERROR. Disk and Hard Drive users really have no need for that routine, however, the patch program does fix the checksum of Telewriter-128 to account for patchs. Now, on to patching TW-128! First, and MOST IMPORTANT!!! Get a Floppy disk and FORMAT (DSKINI) it so that it is TOTALLY NEW and EMPTY. A disk with all files KILLed is NO GOOD, you MUST DSKINI a FRESH DISK. THE PATCH PROGRAM WILL NOT WORK IF INSTRUCTIONS ARE NOT FOLLOWED Next, COPY your TW-128/BIN file from the master disk on to the newly formatted disk. We do this so that all the data will be in a KNOWN LOCATION on the disk. If it were saved to a disk with other files on it, BASIC would record the program on some other sectors and the patch program would not run, or worse, it would modify SOMETHING ELSE! Lastly, run the program called "FIX 128/BAS" on the RGB Utilities disk. After loading this program, remove the RGB Utilities disk and insert the NEWLY FORMATTED disk that contains ONLY TW-128. Then, just follow the prompts. Your TW-128 is now ready to access the ENTIRE Hard Drive! The "fixed" version will ALSO still run just fine on standard RS-DOS. NOTICE: The Telewriter-128 FIX program is provided for EXPERIMENTAL USE ONLY. RGB Computer Systems cannot, and will not be responsible for any incidental or consequential damages or inconviences caused by the use or mis-use of this program. For your own protection, ALWAYS patch and experiment on a BACKUP COPY of your Telewriter disk, NEVER the original. If you ruin your ORIGINAL DISK, don't blame us! or inconviences causedџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ& d:ƒ SUPER FILE COPY UTILITY&En:ƒ (C) 1987 RGB COMPUTER SYSTEMS&Lx:ƒ&}‚… џœ(џ†(&HC00A))Ћџœ(џ†(&HC00B))Г"D8D0" Ї 150&ЃŒ‡:‡"ERROR - FOR RGB DOS ONLY":‡:Š&Љ–ž&Е • 8­256&ТЊŒ F$(69)&ЯДŒ Q$(68)&сОMAXГџ†(&H150)'ШAFГ0 :ƒ COPY ALL FILES FLAG = OFF'в‰"SOURCE DRIVE";SD'Aм… SDВMAX Ї ‡"ERROR! ":‡:Ѕ 210'Gц‡'^№‰"DESTIN DRIVE";DD'њ… DDВMAX Ї ‡"ERROR! ":‡:Ѕ 240'‡‡'Љ… SDГDD Ї ‡"ERROR! ":‡:Ѕ 210'ШSD$Гџˆ(SD):џ(SD$,1,1)Г":"'ч"DD$Гџˆ(DD):џ(DD$,1,1)Г":"'я,NГ1'ў6€ SГ3 Ѕ 11(@п SD,17,S,A$,B$('JA$ГA$ЋџŽ(B$,127)(5T€ JГ0 Ѕ 7(P^F$(N)Гџ(A$,J­32Ћ1,11)(yh… џŽ(F$(N),1)Гџ‹(255) Ї NГNЌ1:Ѕ 420(—r… џŽ(F$(N),1)Гџ‹(0) Ї 390(Ё|NГNЋ1(Љ†‹ J(Б‹ S(еš:ƒ GOT ALL DIRECTORY ENTRYS NOW(лЄž(ќЎЛ ‰"SORT ENTRYS ? (Y/N) ";Q$)+И… џŽ(Q$,1)Г"Y" Б џŽ(Q$,1)Г"y" Ї 450 :„ 550)?Т‡:‡"SORTING...")PЬFLAG$Г"DONE")^ж€ AГ1 Ѕ N)yр… F$(A)ДГF$(AЋ1) Ї 530)‰ъTEMP$ГF$(A))›єF$(A)ГF$(AЋ1))­ўF$(AЋ1)ГTEMP$)ОFLAG$Г"MORE")Ц‹ A)п… FLAG$Г"MORE" Ї 460)х&ž* 0‡:‡"* = ALL, Y = YES, N = NO":‡*:€ XГ1 Ѕ N*?DF$(X)ГџŽ(F$(X),8)Ћ"/"Ћџ(F$(X),9,3)*tN‡"COPY "Ћџ‹(34)ЋF$(X)Ћџ‹(34)Ћ" ? (Y/N) ";:І 970*БX… Q$(X)Г"*" Ї Q$(X)Г"Y":AFГ1 :ƒ COPY ALL FILES FLAG = ON*яb… џŽ(Q$(X),1)Г"Y" Б џŽ(Q$(X),1)Г"y" Ї І 830 :„ Q$(X)Г"N"*їl‹ X*§v‡+%€Л ‰"COPY DISKNAME ? (Y/N) ";Q$(NЋ1)++Šž+9”€ XГ1 Ѕ N+jž… џŽ(Q$(X),1)Г"Y" Б џŽ(Q$(X),1)Г"y" Ї І 790+rЈ‹ X+ШВ… Q$(NЋ1)Г"Y" Б Q$(NЋ1)Г"y" Ї п SD,17,17,A$,B$:‡:‡"COPYING DISKNAME:":‡ :„ Ѕ 750+лМ€ XГ1 Ѕ џ‡(A$)+эЦC$Гџ(A$,X,1), а… C$Гџ‹(0) Ї 740 :„ ‡C$;,к‹ X,'фр DD,17,17,A$,B$,/ю‡:‡,;ј‡"DONE",A‡,W Р4:• 200,&H7FFF:–,l‡"COPY: "ЋF$(X);,ˆ о F$(X)ЋSD$ Ѕ F$(X)ЋDD$,ž*‡" FREE=";џЃ(DD),Є4,В>€ AГ1 Ѕ 8,ЪHCГџŠ(џ(F$(X),A,1)),мR’ &H94CЋAЌ1,C,ф\‹ A,ђf€ AГ1 Ѕ 3- pCГџŠ(џ(F$(X),9ЋA,1))-z’ &H954ЋAЌ1,C-&„‹ A-4Ž’ &HEB,DD-W˜Ђ &HC68C :ƒ SEE IF FILE EXISTS-mЂ… џ†(&H973)Г0 Ї -ЂЌ‡F$(X)Ћ" ";:Л ‰"EXISTS, REPLACE IT ? (Y/N) ";Q$-дЖ… џŽ(Q$,1)Г"Y" Б џŽ(Q$,1)Г"y" Ї в F$(X)ЋDD$:-фРQ$(X)Г"N":.Ъ… AFГ1 Ї Q$(X)Г"Y":‡"Y":.дЛ ‰ Q$(X).оAЌ1,C-&„‹ A-4Ž’ &HEB,DD-W˜Ђ &HC68C :ƒ SEE IF FILE EXISTS-mЂ… џ†(&H973)Г0 Ї -ЂЌ‡F$(X)Ћ" ";:Л ‰"EXISTS, REPLACE IT ? (Y/N) ";Q$-дЖ… џŽ(Q$,1)Г"Y" Б џŽ(Q$,1)Г"y" Ї в F$(X)ЋDD$:-фРQ$(X)Г"N":.Ъ… AFГ1 Ї Q$(X)Г"Y":‡"Yџ<&"d:ƒ FILE TYPE DISPLAY UTILITY&)n:ƒ&4x• 2048&A‚Œ F$(68)&GŒž&v–… џ†(&HC00A)Г&HD8 Ї MAXГџ†(&H150) :„ MAXГ3& ‰"DRIVE NUMBER";SD&ГЊ… SDВMAX Б SDД0 Ї ‡"ERROR":Ѕ 160&вДSD$Гџˆ(SD):џ(SD$,1,1)Г":"&иО‡'Ш‰"SEND TO CREEN OR

RINTER";A$'&в… A$Г"P" Б A$Г"p" Ї DNГЌ2 :„ DNГ0'iм… DNГЌ2 А (џ†(&HFF22) А 1)Г1 Ї ‡:‡"PRINTER IS OFF LINE":Ѕ 190'Žц… DNГ0 Ї Ю SD :„ ’ &H6F,254:Ю SD'—№‡#DN'Іњ€ SГ3 Ѕ 11'Кп SD,17,S,A$,B$'ЯA$ГA$ЋџŽ(B$,127)'н€ JГ0 Ѕ 7'ј"F$(N)Гџ(A$,J­32Ћ1,11)(!,… џŽ(F$(N),1)Гџ‹(255) Ї NГNЌ1:Ѕ 350(?6… џŽ(F$(N),1)Гџ‹(0) Ї 330(I@NГNЋ1(QJ‹ J(YT‹ S(^… NГЌ1 Ї ‡#DN,"NO FILES FOUND ON DRIVE";SD:‡#DN:Š(h€ XГ0 Ѕ N(УrF$(X)ГџŽ(F$(X),8)Ћ"/"Ћџ(F$(X),3)(й|™"I",#1,F$(X)ЋSD$(п†š)… џ†(&H957)Г0 Ї F$Г"A BASIC PROGRAM")-š… џ†(&H957)Г1 Ї F$Г"A DATA FILE")WЄ… џ†(&H957)Г2 Ї F$Г"MACHINE LANGUAGE")ƒЎ… џ†(&H957)Г3 Ї F$Г"A TEXT EDITOR FILE")ЧИ… џ†(&H958)Г0 А џ†(&H957)Г0 Ї T$Г"COMPRESSED" :„ T$Г"AS BINARY")ыТ… џ†(&H958)Г255 Ї T$Г"AS ASCII"*-Ь‡#DN,"FILE - ";џ‹(34);F$(X);SD$;џ‹(34);" IS ";F$;" SAVED ";T$*5ж‹ X*;р‡2 Ї F$Г"MACHINE LANGUAGE")ƒЎ… џ†(&H957)Г3 Ї F$Г"A TEXT EDITOR FILE")ЧИ… џ†(&H958)Г0 А џ†(&H957)Г0 Ї T$Г"COMPRESSED" :„ T$Г"AS BINARY")ыТ… џ†(&H958)Г255 Ї T$Г"AS ASCII"*-Ь‡#DN,"FILE - ";џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ SEND A FINAL C/R...8T":ƒEXIT PULS X,PC ...TO BASIC & RUN8[,:ƒ8l6:ƒ ENDECTOR7Ќ:ƒ STA RVEC4 RESTORE OLD VECTOR7ф:ƒ STX RVEC4+1 RESTORE OLD VECTOR8:ƒ LDA #CR џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџй4vО’ЏP0П’ŽДJŸ0žНЙœ5іС('С<' 04v–№€'„0%ц€&ќц„S'S4Ёр&№4НЙX5НЙœНЙXНЙX5v~NO INDEX OR SECTOR PULSENO SEEK COMPLETE SIGNALWRITE FAULT OR PROTECTEDHARD DRIVE IS NOT READYTRACK 00 SIGNAL NOT FOUNDCRC ERROR IN ID FIELDUNCORRECTABLE DATA ERRORID ADDRESS MARK NOT FOUNDREQUESTED SECTOR NOT FOUNDSEEK ERROR - ID NOT FOUNDDATA CHECK IN NO-RETRY MODEECC ERROR DURING VERIFYILLEGAL INTERLEAVE FOUNDNOT FORMATTED OR BAD FORMAT ILLEGAL COMMAND OPCODE!ILLEGAL SECTOR ADDRESS#VOLUME OVERFLOW$BAD ARGUMENT IN COMMAND%ILLEGAL UNIT NUMBER(CARTRIDGE CHANGED,ERROR COUNTER OVERFLOW@WRITE PROTECT, FLOPPY DISK€DRIVE NOT READY OR OFF LINEџNOT A VALID ERROR CODE DISK ERROR REPORTER INSTALLED џA VALID ERROR CODEџFDB Eџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџm&d:ƒ BOOT.BAS VERSION 1.6&:n:ƒ LAST UPDATE: 12-10-87&Ax:ƒ&^‚:ƒ COPYRIGHT (C) 1986 BY&zŒ:ƒ RGB COMPUTER SYSTEMS&•–:ƒ ALL RIGHTS RESERVED&œ :ƒ&ЙЊ:ƒ USE TO CREATE AN OS-9&дД:ƒ TYPE AUTO BOOT FILE&яО:ƒ THAT IS EXECUTED BY'Ш:ƒ "DOS" COMMAND.' в:ƒ'м• 1024:к ˆ'Kц… џ†(&HFFFE)Г&H8C Ї т 32 :ƒ ONLY FOR COCO-3'n№’ 282,255 :ƒ INSURE UPPER CASE'˜њMAXГџ†(&H150) :ƒ HIGHEST DRIVE NUMBER'Є  200,1'З‡@0,џЁ(21,175)'ѕ‡@32,џ‹(175)Ћ"AUTO START ON "Ћџ‹(34)Ћ"DOS"Ћџ‹(34)Ћџ‹(175)("‡@55,"DRIVE";џ†(&H95A);(%,‡@64,џЁ(21,175)(^6‡@320,џ‹(34)Ћ"NEW"Ћџ‹(34)Ћ" TO kill CURRENT COMMAND"(—@‡@352,џ‹(34)Ћ"CMD"Ћџ‹(34)Ћ" TO view CURRENT COMMAND"(аJ‡@384,џ‹(34)Ћ"BYE"Ћџ‹(34)Ћ" TO exit TO COLOR BASIC ")T‡@416,џ‹(34)Ћ"DRV"Ћџ‹(34)Ћ" TO change DRIVE NUMBER")&^DRГџ†(&H95A) :ƒ DRIVE NUM)Ch‡@128,"ENTER COMMAND TO")Rr‡"BOOT: ";)]|Л ‰ B$)r†… B$Г"NEW" Ї 830)‡… B$Г"CMD" Ї 910)š… B$Г"BYE" Ї 1030)ГЄ… B$Г"DRV" Ї 1040*5Ў… B$Г"" Б џ‡(B$)Д3 Ї € ECГ1 Ѕ 2:‡@128,"input error ":‡@160," ":  50,5:‡@128,"INPUT ERROR":  10,5:‹ EC:Ѕ 270*AИ  200,1*UТ‡@320,џЁ(30,32)*iЬ‡@352,џЁ(30,32)*}ж‡@384,џЁ(30,32)*‘р‡@416,џЁ(30,32)*ЌъB$ГB$ЋџЁ(255Ќџ‡(B$),0)*Еє N$*Ъў… N$Г"END" Ї 560*мNГџ‰("&H"ЋN$)*ьA$ГA$Ћџ‹(N)*јCKГCKЋN+&Ѕ 500+0… CKДВ6085 Ї 770+3:A$ГA$ЋџЁ(255Ќџ‡(A$),0)+VD‡@320,"INSERT TARGET DISK AND"+qN‡@352,"PRESS "+”XN$Гџ’:… N$Гџ‹(13) Ї 610 :„ 600+Рb‡@320,џЁ(30,32):  200,1:‡@352,"WORKING"+дlп DR,17,2,C$,D$+чvN$Гџ(C$,67,1)+џ€… N$ДВџ‹(255) Ї 790,ŠE$ГџЁ(66,201)Ћџ‹(255),,”F$ГџЁ(128,255),@žр DR,17,2,E$,F$,VЈ™"D",1,"BOOT.DOS",nВ‡#1,A$;џ‹(0);:Х#1,1,†М‡#1,B$;џ‹(0);:Х#1,2,žЦš:џ(C$,67)Гџ‹(201),Вар DR,17,2,C$,D$,Ок  200,1,мф‡@352,"FUNCTION COMPLETE",тю‡,эјЅ 220- ‡@320,"CHECKSUM ERROR --"- Š-?  200,1:‡@320,"TRACK 34 CURRENTLY IN USE"-] ‡"FUNCTION not COMPLETED"-c*‡-i4Š-…>  200,1:п DR,17,2,G$,H$-ЅH… џ(G$,67,1)Гџ‹(255) Ї 860-ЕRв"BOOT.DOS"-Ш\A$ГџЁ(128,255)-жf€ SГ1 Ѕ 2-ъpр DR,34,S,A$,A$-ђz‹ S-§„Ѕ 220. Žž:  200,1.˜‡@0,џЁ(21,175).MЂ‡@32,џ‹(175)Ћ"CURRENT COMMAND IS:"Ћџ‹(175).iЌ‡@55,"DRIVE";џ†(&H95A);.}Ж‡@64,џЁ(21,175).‘Рп DR,34,2,A$,B$.цЪ… џ(A$,1,1)Гџ‹(0) Б џ(A$,1,1)Гџ‹(255) Ї A$Г"no command currently exists":B$Г"".ід‡@128,A$;B$/о‡@352,"PRESS "/шW$Гџ’ /1ђ… W$Гџ‹(13) Ї 220/=ќЅ 1000/‡’ 113,0:’ &HFEED,0:’ &HFFD6,0:’ &HFFD8,0:Ђ(256­џ†(&HFFFE))Ћџ†(&HFFFF)/ЃЛ ‰"DRIVE NUMBER: ";DR$/ВDRГџ‰(DR$)/ъ$… DRД0 Б DRВMAX Ї DRГ0:‡@192,џЁ(30,32):B$Г"":Ѕ 430/ѓ.Я DR/ў8Ѕ 2200B:ƒ0FL:ƒ CODE MODIFIED 12-10-87 TO USE RAM AT $40 - $44 INSTEAD OF0†V:ƒ RAM AT $F3 - $F7 TO PREVENT CONFLICT WITH HARD DISK DOS.0`:ƒ0ѓj† 4F,53,B6,01,6A,BE,01,6B,97,40,9F,41,30,8D,00,14,BF,01,6B,CC,00,00,FD,26,00,FD,26,02,8E,27,00,9F1Yt† 43,7E,AC,7C,0F,70,AF,E4,9E,43,A6,80,9F,43,4D,26,0C,96,40,9E,41,B7,01,6A,BF,01,6B,86,0D,35,90,001d~†"END"1kˆ:ƒ1r’:ƒ1Šœ:ƒ ASSEMBLER SOURCE1‘І:ƒ1ЋА:ƒRVEC4 EQU $16A1ЦК:ƒGETINP EQU $AC7C1пФ:ƒTEMP4 EQU $401јЮ:ƒPOINTR EQU $432и:ƒCINBFL EQU $702*т:ƒCR EQU $0D2Eь:ƒDOSBUF EQU $26002`і:ƒCMDBUF EQU $27002g:ƒ2ƒ :ƒ ORG DOSBUF2Š:ƒ2Ч:ƒ FCC /OS/ REQUIRED "OS"(9) HEADER3(:ƒ LDA RVEC4 GET CONSOLE IN VECTOR3=2:ƒ LDX RVEC4+1 GET CONSOLE IN VECTOR3t<:ƒ STA TEMP4 SAVE IT FOR LATER3ЋF:ƒ STX TEMP4+1 SAVE IT FOR LATER3цP:ƒ LEAX READ,PCR POINT TO READ ROUTINE4&Z:ƒ STX RVEC4+1 STORE IN CONSOLE IN VECTOR4_d:ƒ LDD #0 PREPARE TO CLEAR...4–n:ƒ STD DOSBUF 2 BYTES OF BUFFER4Шx:ƒ STD DOSBUF+2 2 MORE BYTES5‚:ƒ LDX #CMDBUF POINT TO COMMAND STRING5<Œ:ƒ STX POINTR STORE FOR READING5w–:ƒ JMP GETINP FEED COMMAND TO BASIC5~ :ƒ5ДЊ:ƒREAD CLR CINBFL FLAG BUFFER FULL5яД:ƒ STX ,S SAVE X (WITHOUT LEAS)6'О:ƒ LDX POINTR GET BUFFER POINTER6_Ш:ƒ LDA ,X+ GET A COMMAND BYTE6•в:ƒ STX POINTR SAVE NEW POINTER6Щм:ƒ TSTA END OF BUFFER?7ц:ƒ BNE EXIT NO, FEED IT TO BASIC7@№:ƒ LDA TEMP4 YES, GET OLD RAM VECTOR7tњ:ƒ LDX TEMP4+1 GET OLD VECTOR7Ќ:ƒ STA RVEC4 RESTORE OLD VECTOR7ф:ƒ STX RVEC4+1 RESTORE OLD VECTOR8:ƒ LDA #CR DK з_ъй иаŽo€Œ ‰&љŽС Ю4Ц НЅšЬВwэCэHoФoEЬЯ §-ЬЯ2§2Ю^†~З ЇРьэСŒС9&№ŽТВПЁŽШАП›Ž _ŸАЮДJЦ яZ&ћŽиЁП †~З ŽиЏП †З zJ”оŽ ‰П H0‰П J0П (o0‰П *o0‰П ,o†З [0‰]'L…'L‰ЫзН–ь–К‹—З­ŸРЏџјНЙœŽРчŸr~й>Нвв~€Р ‚ … †џ@†аЗџH ќЖџH9С’Т8ТТNФKШˆШ“ЬпШHШKЪщЪљŽЭ5ШЉЦфЪфЩ ЮвЦфТeн€DISK EXTENDED COLOR BASIC 1.1 COPYRIGHT (C) 1982 BY TANDY UNDER LICENSE FROM MICROSOFT DIвDRIVХFIELФFILEгKILЬLOAФLSEдMERGХRENAMХRSEдSAVХWRITХVERIFйUNLOAФDSKINЩBACKUаCOPйDSKIЄDSKOЄDOгЬЉЮХаМб\ЦяЪHбЪ9абЩраfзNв3е™вbгЙдэеbжьCVЮFREХLOУLOЦMKNЄAгЭєЮœЮЮ7ЮВwс"ŽСё€Ю~­дс#№-nŸAСN#nŸFРD4НВb5ŽТ,~ВЮ5 Н­3Нвв4$НЪщ5С6%Цv2bНЇщНЉtoНЙ\НЙЏŽТZ~Ќ`BRDFOBWPFNFSAEFOSEVFERBAS DATBIN4ЎcŒ—_&#'5‘2eНШ.ŸёoˆoˆoˆoˆoІ—ыЅ' НВmНЗ=žёэь'НЦ…ь Ў 40^НŸЕ4`Ір& 55Œd%Ц6~ЌFоёЌM'З4ІO'oOЦ3ьaНЧ„4НЧyPыc\чDцBНЧU3ІфL0Ф:J'7чфц„СР%ђцф и&Ц.~ЌF0ШзъŸю0ФНЧc~жђ4НЧП‰5BчФJ&ђ4НЧ52aоёчC†џЇMІ„Р%'„?ЁD$!–и'НІDŠРЇ„НХЉЎIŒ&ЌШ'†!O_эШЦЎIŒ& 2gЎK–и'Ц~УZНУW5ЏM4НЧU0цC:І„Р%+„?ЁD&%ьШ„4OцbуcЃс# и'џVƒ#ЬŠ€эШ50Ш:юb4†џуa$эa5P цboaob2a–и'НЅšяbоё–и'ЇOЏbЎM0_юф&ўН5–2bНБVНЖЄ4НЅЂ]/сІ54oНВmŽТЌНЩ8Ьџ§ WŽЅ'НВmНГцžRП |'яТНЅЧ54НЧI&с†ŸёНЧНЦŒ5†4СI&НЦхНШО tь § WuНЦ'НЧUlžё5Ї9hфСO&} s'НЦќЖ sЗ wО tП xНХgR гСR'СD&с$hфќ H4ѓ |%Г J#Ц:~ЌF4} s&U †џНШc l5F§ Hя ў |я Ž ў tюNяˆ9žёЦo€Z&ћžё–ыЇЖ vЇЇі sРXXX4ќ tƒ†=ЋрЇˆ9Ц8Ж w'цжЗ s—эЦзъНжђО xП t3„Ц o€Z&ћŽ LЦ НЅšќ Wэ@Ц!НЧПЗ vЇBЦзъНжђ4VНЧUlІБ z%НЧ5ж–o/Ч/2b4pŽ &жoXЎ…ц„С@&ьˆЃ $ УэˆЎ 0‹І5”цˆ'Іˆoˆ5”цˆ'p5”цljˆ':Іˆ5”4`O3‹ІШ4oІ—ы5b5”ІL4 #OЇц3„НЧU:ц0ФСР$ 5€ &ч мФ?С #Ц@~ЌFрр%!˜4#†—ъНЧc3ˆпюНжђoˆцр& ьˆ&_cˆчˆ9ю3Aя9 s wЬ—ьзъЦзэЮпюНжђџ t1ФІФ&()Ž LІ€ЁР&Œ W&ѕї sІBЗ v93Ј ƒ&е\С #Ц9C&зЖ w&ї wџ x9Ц4} s&ј~ЌFНЩ5НЅЧНЧ’щ†џНШО to„ЦзъНжђц D0:ц„†џЇ„СР%ёЮпюЬ—ьзъЦзэ%o0ЦDНЅšoРƒ&ј~жђ4жoŒ4XŽ &Ў…ц5„~лЪŽ ~жыФ9цTзьС% ьXPыызэ94XIXIXIус9oтlфƒZ*љІфчфЦ =5Z‹ +ћO9Жm&љo3ŽŸюЬ—ьзъЦзэНжђЦD~Ѕš”0OФўoтc…'1c…LD$%\Х&№4Рcb& рр*цфca2a мырСD%іцфР юЦ8~ЌF2a˜:ЦРч„94і [\НЧI'–ыЁ&ў tІMЁ&ІЁф&нѓZ&с5‚НЅЅo]/ьНЧIІ'лК@'С~І†Œ† o/ЕЏфНЧD4І'л@'Ёф&п5–ЎdŒА &їНВm"& НВDНЖWЦ;НВoŽАЏd5–/%ё ["нŽ5 o/2b4nНЧDцOŽ~Ѓ| o/2b92bЏ2(Ш†’ &H2Н­ыžІŸ/І€':'%~ВwІ—&~Ўь€нhŸІ–Џ'†[НЂ‚–hННЬ†]НЂ‚ŸЉ˜&~ƒ—&~ƒšН­Ц І2b–o4НЅЎНЃэ o/мМНЧDцС@'мэ_Іˆ&цˆ~ЅфŽТЉoтЖ Z—ыЮ LЬ ЇРZ&ћЦНЅšН‡H3„ &=5VГ J%PŽ ‰VŽ L\Z& 2aŒ L&gЦ>~ЌFІР.'-/'):' Œ T'ш> кн]&н5‚cb'зыM–ыБP"мp9СŽ W† Ї‚Œ T&љZ'кІР:'ЭŒ W'Ќ юЇ€'Є.' /'œL'™9M'‚KžŠП WЅ'!НВmЦAНВo&фs XO~Зd†OŒ†Iі [\зo~Ф№†џНЬ$м“НЬ$˜НЬ$žІ€НЬ$œ&ї~Є-ŽТІ~Щ8OЦџ "&ИX† M'sO_З Yї ^лЅ'НВmЦRНВoНЅЧ†З Y™Ж X' } ^&Н­~Ќ|Ж WК ^&лŽН­s ]НЭМНЭМ4НЭМ‰5гНЌ7žНХФжp&Ї€ ѕ ]ŸЦІ‚&Z&љžŸo€Z*љНЄ-Н­!Н‚œНЌяw Y%НЄ&w Y%тН~Ќs o.о9і [\4зo5Z&ѕ9 o/З‡2bНЧDoŸёІ'ь4oцзы &цˆ†€ЊэˆlцНЧUЇ:l~ЫУ@&љь Ў 1‹461фо“'ІA3B*(3E я5@“':0уB4ІA*яцDXЫO3ЫЃф'т3E ѕЎBМ H$Ќ"% Ќ$%ЃЄэB9oФoBoC9і [\4НЧIІ@& ь Ѓ$%ЃЄэ 5Z§ЃГ H'ІРЇ€ єП HНЧUjm'НЧžё5 '@&АІ' НЧc3ˆпю,Іˆ*цˆФ† =Юпю1ЫцˆTTTЫзэЬ—ь ьˆ„э.Цзъ~жђУ2b4Ž &жoXЎ…ц„С'6 &o %lС@&ьˆУЃ "zэˆЎ 0‹5Ї5”lˆцˆ':Їˆ5–4`Ї‰цзыlНЫп1„цНЧU:3І$ %j$l%НЧПo$o%Ї#ŒŠРЇФ0ЄНЦ…НХЉ5`5–НмнНЧНлЋЬ—ьзъЦзэŽŸюНжђ5@НЅI4@І„'8C'B4ЦНЙЂЦНЙЂ8Ўфц 5‰С $*OННЬНлТ НЮЏnŸ 4š50ˆ Œ%Ежэ\С~нНЂ‚~ЙЌНЧU3OLD"љ(0Ф:ц„СР%№9 o/^ŽАiЏфŽнЦ,з–&Ц o 'њ"& С,&‰з "С"' & Œн'DІ &>† M'‘'4Ёр'Ї€Œж&F& @'Эo„Žм9"' &ђ.&ю 'ј,'ц &&о 'к ж'НЧDцС@&ѕ‡ЦJ~ЌFНЁv p94НЧDцС@& ьˆƒэˆ5”Їˆcˆ5”НЖTС%цM~МНБCЦНЕНМ5~Ж›ьнR~ˆ–o4НБCНЅЎ o/ц!НЧD5—om'еХ9рІ—ыц4НЭJФ?4‰OНЧyыр‰54І@5&Е4“Š'ƒЊжO'ЫзOНМ_Ўфьˆ„–b–\жOНЙХНМ_5ь „b–\жOНЛ‘~МюНБCНЗзыНЧНн.~Дѓ4ЎfІ „‹.5ёP"з]9~м"зQї Z9Іd&ЎeŒЏš& ЎbŒБf&ŽЮьЏe~ˆF5FНБH'э=žRьƒ ‰%Г J%рЊ~ЏЄЪ'Ш&В(Ÿ,'Ч4НЗ С"х%–М~–.НЄ)Ÿ~ŒС4&В0НВb–o4НЅЎНЄ o/НЧDцС@& 5—oьˆ~ДєНЃ_5—oжl~ДѓŸOНƒlНƒlЌb%фвНƒlНЅЧЬ§ WНЪO+ьbЃdУьdЎdІ€НЬ$1?&ї†џ O_56~Є-НЬ$‰9ŽТЏ~Щ8ŸіНЪќ Wƒ&жDžŠЅ'НВmНЗ=ŸгНЅЧНЭМ4)%ггнІр&д3НХФжp'~УRЇ„Ё€'~з 1?&щ аНЭМ‰9~нI5–ы4*5‘ы&ф(5ŸІНЦŒНЦхŽ Lў tЦ НЅšЦзъ~жђЦЅНВo~Щ5НЦŒЦB} s&лс9'шюo9#&НЅЅНЄЅ'шйНВmНБV–&ННйНЕНЙŸЅ'шР†,НЃ_ n'†  иНЙŸ тНЃ_ n&З†"~Ђ‚НШ.O_4Ѕ&5–НЗ84Oуc%ЎeЃ #ЦD~ЌFюcэcь 3ЫяaЦџНВoЦЇНВoНГWНБF5Dч„я Т†O4НГWНБF4ЎŒ ‰%М J%ЦF~ЌFЦГНВoН‡H5 ІЄ'.4Ц ю"чРJ&ћцр'сЄ%цЄoфю"mр'4OP‚ыЄ‰3Ы5~Ѕš5‚Н•Ќќ Jƒ ‰4і [4Ѕ,'НЗ С"тЯчфЅ'НВmНГцэaНЪщцф4Ь ‰уb%qэbУ%jjф*ї]'L'`…'L'YЇфмМЋф%OL'J“!$EJ“гІфМ‰›К—КлЗзЗ5F—Мї [џ J–hL' “гІнІоŸ“"ІТЇџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџЦ  ТШУТ ЧУТФЩСЩХСУ!"#ЦФЩ'ЩХ*Ч,У.ЦСЦС3С5ССЩ9:;ЦСџџџЦBЦџRSDOS BIN DOS-BOOTBASpDOSPATCHBAS$DSK2DSK BAS%7ERRMSG BINуERRMSG SRCџ&тFILECOPYBASFILETYPEBAS?FINDFILEBAS(FIX 128 BAS)}FIX 128 DOCџфFORMAT BAS+BFORMAT SRCџњFORMAT+ BAS-vFORMAT-NBASёHD-UTILSBIN—INQUIRE BIN/КINQUIRE SRCџOFFSET-9BAS0‘RAMDISK BIN1‹RAMDISK SRCџ+RGB-DOS KEN2‰SERIES-NBINАSERIES-NSRCџ$SYSTEM BAS4™TWPATCH BAS дTWPATCH BIN6WTWPATCH SRCџ7†USE LISTBAS ]EPROM DOS8 RGB-DOS BIN:DDUG LIBDATџ<S12 BIN=ВNAIL SRCџˆNAIL BINxARM BIN"ARM SRCџ›DISKERR BIN@“DISKERR SRCџAYSTEM2 BASCHELPFILESRCџФ ФEPROM BINџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRGB DISTRIBUTION DISK KENTON INC (1990) RGB DISTRIBUTION DISK KEN-TON INC (1990)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚“&їŸo? ~ЌDоŸo?ІРЇ œ&їЮ (О J_ЏСo0‰\ё [#ђ~–Ы_\НЧI' І‘ы&4НЫ5ё [#ш9і ZЅ' НЗ НЮЛзы9'гЙН•ЌНвV4Ѕ'ЦЅНВoНвV4НЅЧНмooт†#_40щџlb0‰юœ$іjb'йІ 5 Н_\jф'сb&їзцdH†џНг"цcBmф' OНг"цaлчa з2e~л‚5@Ж \'Ž (Oo‘LБ [#јžoН­ \Ж ]' ]Н­nФ†Œ†нъІc—ьОŸю–ЦзэНжђ ю\С#є ьJ&э9цeсf&6 …џ@ †4НЉŽг_Ц Ір'ŽгlЦНЙЂŽг~ЦНЙЂНл‚Нл‚НЁq &љ9INSERT SOURCEINSERT DESTINATION DISKETTE AND PRESS 'ENTER'5 Ц Ž WІ‚4Z&љ–ы4nЄІ€—ыЦ Ю L~ЅšНЩ5лoтЅ' cфЦЅНВoНн—ЩНЅЧНЪщoт0щџlф0‰џœ$іjф'иX0nННЦŒНЦхО tюЎ 4PНЧі vНЭ4JФ?4‰OНЧyыф‰Ž4_Ўф' \0'сj&їЏфчdP†џ@me'%0kНг­НнГНЧНЧU0ІeЦDc„&J'c€Z&є~Чјc„Ўф' ьbыd‰эbO Ќ2ш$9mш~г&†џ0m O0ш—иНг­ЎhП WŽП |†Rі [\НФžёЬэˆцf')жифg' ьbыf‰НТцžёюdяцfо4Džёя НТъla5DZ&№žёЮ ‰я жифg' ogьjŠ€эˆ~Ы8+4'4ЦНеЮ€5Ю54PЦ€НЕ3„5ч„я5~ЅšНВmŽГW/~БFНЗ НЮЛ4НЗ8С""4НЗ8зэZС"5—ьзы9~ДJНВmŽБVжыоь4D­„5Dзыпь9УчМžR4пНЖT4_Žo€Z&ћ5Ю€–5НЖYЮŒЦŽŸюзъ~жђ'а‚~йгЦЅ' НЗ8С$о›НЅЧ4ŽЦo‚Z&ћO ыф\Р$ќЫm…&ѕLЇ…%ь2a0щџ4ž0‰ˆЌс"ж[НмoН•ЌъьНжђ …†РЗџHНзб'~жˆ%Ж †ŠЗџ@†PЗџHіцНзб&hНз№lŽџKPŽжOП ƒОЖџH†џЗ ‚ЦєїџHЖ †Š€Зџ@ц€чЄ њЖџHЏ„D—№&. ь–ь#&Є†—ъŽŸюЮO—ь_ІХ—эНжђ\С%є–ьL#%ъ~л‚ †џ@~зОЬ N)_4ЮцХзэЮждЦ–ьЇ€o€–эЇ€Ц 5\С%лЬШNч€J&ћ94ьСє5Z&ѕ9ѕўїN ѕћџїNnŸР 4Цї ˆ5b №' –№Ц<…@&Ц(~ЌF4–ъ5&*} ‡'%4V†—ъоюŽŸю3пю†—ъ–№& _І€ЁР&Z&ї5V95Vz ˆ&БЦH Н_Њ'Sˆ&лї ‡Ÿ~к14 …жыŽиЖ †„ЈЊ…Š жьС%Š‰ŠЗ †Зџ@Х&ŒЇбНЇб=& №Žи•жъX­•5ж№' J'4 &ё Д†№З …5іНЧXo…†ЗџHѕ9$„—№9žŠ0'щ'…&ѕ9†аЗџHѕЖџH†€—№9Ž".0&ќ9†€Œ† 4НЧX:ц„їџIбь'–ьЗџKЇ„†ЗџHєуБ&Ь„'—№5‚–эЗџJŽи‹П ƒžюЖџHЖ †Š€5žŠЮџHs ‚PїџHєЌС€'ЦхФ& 1?&ј ‚Џ~зпц€їџKЗџ@ іЦхФ&1?&ј тіџKч€Зџ@ іЏЖџH„|—№9зИзазјзћABЖ ‚'О ƒЏj ‚;Жџ*њЖџЖ …'JЗ …& Ж †„АЗ †Зџ@~‰U?ЬнъНвRНЅЧЬ"ньЬнюНжђќƒOS'~йŒЬ&нюЦНжђ э юZ&і~&4Ь;ŽНжТ5–џџџџџџџџџџџџџџџџџџџџџџџџџкšк л‚к1нъџt ŽоxМЬ ŽIНжТŽ т4ЬџџнhЬU—qїPўй;oCНз№ЇФЁФ&oФНк} №&љЦНм„Нл‚ ыŽоSyЦНмO†ŽџЇІ„C„@&8жы4ЦŽомўРНЅš5зы­ŸР №&ŽоnНгБНЦŒ} s'О tь ƒ'2b~Ъg9НвVёN%ћУНЅЧНмo–hL&ŽнщOжыННЬŽнќНнт'Žо~ЙœНЬ§†—ъЬ"ньЬџŽŸюНжТНжђ э&љ†—э ь*ё~낆~зc4v–ыБN%ђŽѓЮй8ЇЄo!–ьЦ=лэ‰ƒmЄ' Уv$l!jЄ&ѕуA$l!ц!ыФŽ–ъ'€'J' !† †Œ†4vŒ† _ŽŒ†Œ† Œ4vK5і4FЮѓЇРЖO…'Ъ чРЏСЏФ5Ц†€—№Žўй;ІA…B'0&і OіOTФIZ*ќЇФЇBІA…'њ9Жй=4Щ'ŽѓHV…& žю…'UŒ^h…&р…5'*J&е '#†_ŽџzŽѓŽѓ*@–ѓ„p&–ѕ—№9…'љ…&ѕІ€ЇФ №ІA… &њ…'і9ѓ…&оІФЇ€ єч…&вІ€ЇФ єлІФ„—№гOЇФ–№94WP_НЉЂНЉvЦ Žџ І„ˆ€Ї„Z&ѕНЉt5з4Ц`Z&§5„–ч€'†Œ†ЗдЖдЗе~ЙXzе'ђ~ЙЌ4–ыЦŽЁ'0ˆJZ&іЦŽm„' 0ˆJZ&і~ХЇ5†С'!Z'ІР€0% "4–ыЦ =ыфзы‰5'т~ДJ9ˆ'Њ'‘'0'3#'IНЗ НЅЧёP~ЮЪ_ŒЦŸ' ]'НЗ \С"ЩНЅЧїN9Нк„ Ÿ'НЅЧНк} №&394vНЪщ5іŸНЗ С"–НЅЧыїO†%_ўŽѓŸю0ЬНжТўL №'~з žюЮй8ьУ$lЃA$jэІ ФЇoтьƒv$m'jэlф&эjф5їP9НвOНЅЧ^†—ъŽŸюНжђІ„'чC'ф1І€'оНЬ§ ї'%яВЖдБе'ŽоLНЙœOжыННЬŽоDНЙœOННЬ~ЙXНЧU0oтЦDІ€C&lфZ&і5„Ьнь9Я&,ŸНвVНВmЬџŽŸюНжТН‡HНЅЧ]'оюНЅšoФб†—ъ~жђžІ4~аM&ьИ4PŽЅEЏaНЯСџ@5žІ4НБVŽЉŸ 5ŸІ 'єЉŽ T~Щ8НЦŒ} s'.ІшЁm&~а\–hL&Žо ' 2ш&Žо~ЙœНЬ§~ЦѕНЁБ„пY9 ERASE HARD DRIVE ARE YOU SURE? (Y/N) ABORTED FILE ALREADY EXISTS OVERWRITE IT? (Y/N) FREE=DRIVE=HARD DRIVE(S) NOT FOUND AUTOEXECBASHARD DISK BASIC - COPYRIGHT (C) 1986, 1990 RGB COMPUTER SYSTEMS ** CUSTOM MESSAGE GOES HERE! **  o'-~Ь"&Нл‚ &4wOНЉ5w~‚s–o' џ&@ЗI~ХМ4ЎgŒЃ'5 №p}I'+)кIsIбвгНЁБ ']&sг _& sв}г'фвібŽк:І„&г б|б K['L 'a'  &|б З}в&% !}б'zб9' ' ' \&НЁБ б %}в&|б52b9oј†_НЬ§НЙXЦчфŽнЏa џZIoј иŽнŽкц€ч &њ9џџџџџџџџџџџџџџџџџџџџ 'џ&@ЗI~ХМ4ЎgŒЃ'5 №p}I'+)кIsIбвгНЁБ ']&sг _& sв}г'фвібŽк:І„&г б|б K['L 'a'  &|б З}в&% !}б'zб9' ' ' \&НЁБ б %}в&|б52b9oј†_НЬ§НЙXЦчфŽнЏa џZIoј иŽнŽкц€ч &њ9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ&dž&3n‡"** PROGRAM TO PATCH COLOR TRS-DOS **"&_x‡"** TO RUN WITH THE RGB HARD DRIVE **"&e‚‡&‹Œ‡"INSERT DISK WITH TRS-DOS, THEN"&І–Л ‰"PRESS ";A$&И … A$Г"" Ї 180&УЊЅ 100&пД… џЃ(џ†(&H95A))В3 Ї 210&іО‡:‡"DISK TOO FULL"'ШЅ 290'вгM"DOS.BIN"')м€ XГ&H1F64 Ѕ &H1F68':цA$Гџœ(џ†(X))'U№… џ‡(A$)Д2 Ї A$Г"0"ЋA$'bњB$ГB$ЋA$'j‹ X'†… B$Г"3476B60622" Ї 310'Ћ‡:‡:‡"WRONG VERSION OF TRS-DOS!"'Х"‡:‡"DOS NOT PATCHED."'Я,‡:‡:Š'ъ6ж"DOS.BIN" Ѕ "DOS.OLD"'њ@гM"DOS.OLD"(J€ XГ&H1F64 Ѕ &H1F6D(T A$(/^’ X,џ‰("&H"ЋA$)(7h‹ X([rиM"DOS.BIN",&HEA4,&H20EB,&H10A2({|‡:‡"TRS-DOS IS NOW PATCHED"(ƒ†‡:‡(‰Š(­š† 6E,9F,C0,04,12,12,12,12,12,12(ДЄ:ƒ(оЎ:ƒ THIS PROGRAM SIMPLY POKES THE CODE)И:ƒ FOR JMP [$C004] INTO TRS-DOS64 Ѕ &H1F6D(T A$(/^’ X,џ‰("&H"ЋA$)(7h‹ X([rиM"DOS.BIN",&HEA4,&H20EB,&H10A2({|‡:‡"TRS-DOS IS NOW PATCHED"(ƒ†‡:‡(‰Š(­š† 6E,9F,C0,04,12,12,12,12,12,12(ДЄ:ƒ(оЎ:ƒ THIS PROGRAM SIMPLY POKES THE CODE)И:ƒ FOR JMP [$C004] INTO TRџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ4&:d:ƒ HARD DRIVE TO FLOPPY OR FLOPPY TO HARD DRIVE COPY&wn:ƒ FOR 512K COCO-3 ONLY. WILL NOT WORK ON 128K OR COCO-2&~x:ƒ&–‚у 0,1:у 8,63:т80:ž1&ЅŒ’ &HFFD8,0&­–к ˆ&Ы OPCГ&HEA :ƒ DSKCON OPCODE&шЊDRVГ&HEB :ƒ DSKCON DRIVE'ДTRKГ&HEC :ƒ DSKCON TRACK'#ОSECГ&HED :ƒ DSKCON SECTOR'IШBUFГ&HEE :ƒ DSKCON BUFFER POINTER'nвDSKГ&HD6F2 :ƒ DSKCON WITH VERIFY'˜мMMUГ&HFFA2 :ƒ MMU SLOT $4000 TO $5FFF'ЗцINГ2 :ƒ DSKCON READ OPCODE'и№OUTГ3 :ƒ DSKCON WRITE OPCODE(њ’ BUFЋ1,0 :ƒ INSURE BUFFER LSB = $00(1‰"SOURCE DRIVE, (H)ARD OR (F)LOPPY ";SD,SD$(O… SD$Г"H" Б SD$Г"F" Ї 290(ZЅ 260(†"‡:… SD$Г"F" А SDВ3 Ї ‡"ERROR!":‡:Ѕ 260(Ж,‰"DESTIN DRIVE, (H)ARD OR (F)LOPPY ";DD,DD$(д6… DD$Г"H" Б DD$Г"F" Ї 330(п@Ѕ 300) J‡:… DD$Г"F" А DDВ3 Ї ‡"ERROR!":‡:Ѕ 300),TІ 10000 :ƒ SET SOURCE DRIVE)O^’ OPC,IN :ƒ SET DSKCON TO READ)zh’ DRV,SD :ƒ SET DSKCON TO SOURCE DRIVE)Їr‡"Reading Disk into RAM, Please wait...")Э|І 1000 :ƒ GO READ IN SOURCE DISK)ѓ†І 20000 :ƒ SET DESTINATION DRIVE*’ OPC,OUT :ƒ SET DSKCON TO WRITE*Hš’ DRV,DD :ƒ SET DSKCON TO DESTINATION DRIVE*uЄ‡"Writing Disk from RAM, Please wait..."*žЎІ 1000 :ƒ GO WRITE DESTINATION DISK*ЪИІ 10000 :ƒ SET TO SOURCE DRIVE TO EXIT*нТ‡:‡"Finished!"+Ь‡:‡"Press (W) to Write another destination disk"+@ж‡"Press (C) to Copy another disk to disk"+Yр‡"Press (Q) to Quit"+_ъ‡+uє‡"Your choice? ";+ўA$Гџ’:… A$Г"" Ї 510+Њ… A$Г"W" Ї І 560:Ѕ 390+Н… A$Г"C" Ї 130+в… A$Г"Q" Ї ‡:‡:Š+н&Ѕ 510,0‡:Л ‰"Insert Destination Disk, press ";A$,:,>ш€ TГ0 Ѕ 34 :ƒ DO TRACKS 0 THRU 34,gђ’ TRK,T :ƒ SET DSKCON TO RIGHT TRACK,“ќ’ MMU,T :ƒ SET MMU SLOT TO TRACK NUMBER,О€ SГ1 Ѕ 18 :ƒ DO ALL SECTORS 1 THRU 18,ш’ SEC,S :ƒ SET DSKCON TO RIGHT SECTOR-"’ BUF,&H40Ћ(SЌ1) :ƒ DSKCON BUFFER WHERE TO READ/WRITE-R$Ђ DSK :ƒ EXECUTE DSKCON READ/WRITE A SECTOR-i.‹ S :ƒ NEXT SECTOR-8‹ T :ƒ NEXT TRACK-…B-­'… SD$Г"F" Ї Я Њ:’ &HFFD8,0:Ѕ 10020-ж'… SD$Г"H" Ї Я ˆ :’ &HFFD9,0:Ѕ 10020-м'$.N … DD$Г"F" Ї Я Њ:’ &HFFD8,0:Ѕ 20020.-N*… DD$Г"H" Ї Я ˆ :’ &HFFD9,0:Ѕ 20020.3N4E DSKCON READ/WRITE A SECTOR-i.‹ S :ƒ NEXT SECTOR-8‹ T :ƒ NEXT TRACK-…B-­'… SD$Г"F" Ї Я Њ:’ &HFFD8,0:Ѕ 10020-ж'… SD$Г"H" Ї Я ˆ :’ &HFFD9,0:Ѕ 10020-м'$.N … DD$Г"F" Ї Я Њ:’ &HFFD8,0:Ѕ * DIAGNOSTIC AID FOR DETERMINING WHERE * DISK I/O ERRORS CAME FROM. * COPYRIGHT (C) 1987 BY RGB COMPUTER SYSTEMS * ALL RIGHTS RESERVED * THIS SOFTWARE MAY NOT BE REPRODUCED IN ANY * FORM OTHER THAN BACKUPS FOR PERSONAL USE ONLY ORG $E00 RE-LOCATABLE CODE START PSHS D,X,Y,U SAVE REGISTERS LDX $192 GET ERROR HOOK STX OUT+1,PCR SAVE IT IN OUR HOOK LEAX ERRDRV,PCR POINT TO OUR ERROR CODE STX $192 PATCH IT INTO BASIC LDX #$B44A ?FC ERROR ADDRESS STX $9D DON'T ALLOW RE-EXEC LEAX SIGNON-1,PCR POINT TO SIGN-ON JSR $B99C PRINT STRING PULS D,X,Y,U,PC RESTORE REGISTERS & RETURN * THIS IS THE ERROR DRIVER ERRDRV CMPB #20*2 IO ERROR? BEQ EDRV2 YES, REPORT IT CMPB #30*2 WP ERROR? BEQ EDRV2 YES, REPORT IT BRA OUT NO, JUST EXIT EDRV2 PSHS D,X,Y,U YES, SAVE REGISTERS LDA $F0 GET DSKCON ERROR CODE CMPA #$80 "NOT READY" CODE? BEQ OK YES, DON'T STRIP BIT 7 ANDA #$FF-$80 STRIP "ADDRESS VALID" BIT OK LEAX TABLE,PCR POINT TO ERRORS LOOP LDB ,X+ GET A BYTE BNE LOOP SKIP OVER TEXT LOOP2 LDB ,X GET CODE HEADER COMB INVERT B BEQ LAST WAS INVALID CODE, EXIT COMB FIX B PSHS B PUT ON STACK CMPA ,S+ IS IT OUR ERROR? BNE LOOP NO, LOOK AGAIN * AT THIS POINT WE HAVE ERROR * "X" POINTS TO TEXT-1 WHICH $B99C ROUTINE NEEDS! LAST PSHS X SAVE X (TEXT POINTER) JSR $B958 SEND A C/R (INSURE LEFT COLUMN) PULS X RESTORE X JSR $B99C PRINT ERROR STRING JSR $B958 SEND A C/R JSR $B958 SEND A C/R * WE ARE DONE NOW PULS D,X,Y,U RESTORE REGISTERS OUT JMP >0 GO TO OLD VECTOR * ERROR NUMBER AND STRING TABLE * TABLE FORMAT IS: * FCB ERROR NUMBER * FCC "ERROR TEXT" * FCB ZERO TERMINATOR TABLE FCB $00 MARK BEGINNING OF DATA FCB $01 ERR01 FCC "NO INDEX OR SECTOR PULSE" FCB 0 FCB $02 ERR02 FCC "NO SEEK COMPLETE SIGNAL" FCB 0 FCB $03 ERR03 FCC "WRITE FAULT OR PROTECTED" FCB 0 FCB $04 ERR04 FCC "HARD DRIVE IS NOT READY" FCB 0 FCB $06 ERR06 FCC "TRACK 00 SIGNAL NOT FOUND" FCB 0 FCB $10 ERR10 FCC "CRC ERROR IN ID FIELD" FCB 0 FCB $11 ERR11 FCC "UNCORRECTABLE DATA ERROR" FCB 0 FCB $12 ERR12 FCC "ID ADDRESS MARK NOT FOUND" FCB 0 FCB $14 ERR14 FCC "REQUESTED SECTOR NOT FOUND" FCB 0 FCB $15 ERR15 FCC "SEEK ERROR - ID NOT FOUND" FCB 0 FCB $18 ERR18 FCC "DATA CHECK IN NO-RETRY MODE" FCB 0 FCB $19 ERR19 FCC "ECC ERROR DURING VERIFY" FCB 0 FCB $1A ERR1A FCC "ILLEGAL INTERLEAVE FOUND" FCB 0 FCB $1C ERR1C FCC "NOT FORMATTED OR BAD FORMAT" FCB 0 FCB $20 ERR20 FCC "ILLEGAL COMMAND OPCODE" FCB 0 FCB $21 ERR21 FCC "ILLEGAL SECTOR ADDRESS" FCB 0 FCB $23 ERR23 FCC "VOLUME OVERFLOW" FCB 0 FCB $24 ERR24 FCC "BAD ARGUMENT IN COMMAND" FCB 0 FCB $25 ERR25 FCC "ILLEGAL UNIT NUMBER" FCB 0 FCB $28 ERR28 FCC "CARTRIDGE CHANGED" FCB 0 FCB $2C ERR2C FCC "ERROR COUNTER OVERFLOW" FCB 0 FCB $40 ERR40 FCC "WRITE PROTECT, FLOPPY DISK" FCB 0 FCB $80 ERR80 FCC "DRIVE NOT READY OR OFF LINE" FCB 0 FCB $FF ERRFF FCC "NOT A VALID ERROR CODE" FCB 0 SIGNON FCB 13 FCC "DISK ERROR REPORTER INSTALLED" FCB 13 FCB 13 FCB 0 END START FF LINE" FCB 0 џ&!d:ƒ THIS IS A QUICK & DIRTY &Bn:ƒ PROGRAM FOR SEARCHING THE&ax:ƒ HARD DISK FOR A CERTAIN&‚:ƒ FILENAME. ALL OR PART OF& Œ:ƒ THE NAME MAY BE ENTERED&П–:ƒ IN THE SEARCH, EXAMPLE:&о :ƒ THE SEARCH STRING "TES"&ќЊ:ƒ WILL MATCH UP TO FILES'Д:ƒ "TESTING.BAS", "TEST.BAS",';О:ƒ "PROGRAM.TES" ETC....'BШ:ƒ'OвЯˆ:ž:т32'Zм• 2048'†цŒ F$(68) :ƒ COULD BE UP TO 68 FILENAMES'Ђ№FLAGГ0 :ƒ NO MATCHS YET'ЬњMAXГџ†(&H150) :ƒ HIGHEST DRIVE NUMBER'пЛ ‰"FIND: ";S$'я… S$Г"" Ї Š'ѕ‡("‡"SEARCHING FOR ";џ‹(34);S$;џ‹(34)(",‡(26€ DГ0 Ѕ MAX(:@NГ0(IJ€ SГ3 Ѕ 11(dTп D,17,S,A$,B$:‡@28,D;(y^A$ГA$ЋџŽ(B$,127)(‡h€ JГ0 Ѕ 7(ЂrF$(N)Гџ(A$,J­32Ћ1,11)(Ш|F$(N)ГџŽ(F$(N),8)Ћ"."Ћџ(F$(N),3)(ё†… џŽ(F$(N),1)Гџ‹(255) Ї NГNЌ1:Ѕ 440)… џŽ(F$(N),1)Гџ‹(0) Ї 420)šNГNЋ1)!Є‹ J))Ў‹ S)SИ… NГЌ1 Ї 500 :ƒ NO FILES ON THIS DIR!)aТ€ XГ0 Ѕ N)|Ь… џž(F$(X),S$)Г0 Ї 490)˜жFLAGГ1:‡"FOUND ";F$(X);)Ћр‡" ON DRIVE";D)Гъ‹ X)Лє‹ D)ѓў… FLAGГ0 Ї ‡"STRING ";џ‹(34);S$;џ‹(34);" NOT FOUND")љ‡)џŠ)Гџ‹(0) Ї 420)šNГNЋ1)!Є‹ J))Ў‹ S)SИ… NГЌ1 Ї 500 :ƒ NO FILES ON THIS DIR!)aТ€ XГ0 Ѕ N)|Ь… џž(F$(X),S$)Г0 Ї 490)˜жFLAGГ1:‡"FOUND ";F$(X);)Ћр‡" ON DRIVE";D)Гъ‹ X)Лє‹ D)ѓў… FLAGГ0 Ї ‡"STRING ";џ‹(34);S$;џ‹(34);" NOT FOUND")љ‡)џŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџz&*d:ƒ TELEWRITER-128 CONVERSION PROGRAM&Sn:ƒ TO FIX TW128 TO ACCESS ALL DRIVES&vx:ƒ ON THE RGB HARD DISK SYSTEM& ‚:ƒ COPYRIGHT (C) 1988 BY RGB COMPUTER&ФŒ:ƒ SYSTEMS ALL RIGHTS RESERVED.&Ы–:ƒ&б ž&ѕЊ‡"THIS PROGRAM FIXES TW128.BIN"'Д‡"TO RUN ON THE RGB HARD DISK."'О‡'EШ‡"TO USE, COPY ONLY TW128.BIN ON"'iв‡"TO A FRESHLY FORMATTED DISK,"'м‡"THEN RUN THIS PROGRAM. IT WILL"'Дц‡"PATCH ALL THE NECESSARY BYTES"'ṇ"DIRECTLY ON THE DISK!"'зњ‡'ћЛ ‰"PRESS TO BEGIN ";A$(• 1024( ž(!"‰"WHICH DRIVE";D(',‡(I6‡"INSERT TW-128 BACKUP, THEN"(d@Л ‰"PRESS ";A$(|J T$,S$,O$,N$,L$,F$( TTГџ‰("&H"ЋT$) :ƒ TRACK TO PATCH(Х^SГџ‰("&H"ЋS$) :ƒ SECTOR TO PATCH(їhOГџ‰("&H"ЋO$) :ƒ ORIGINAL DATA (VERIFICATION))rNГџ‰("&H"ЋN$) :ƒ NEW (PATCH) DATA)P|LГџ‰("&H"ЋL$) :ƒ LOCATION IN STRING 1 THRU 128)ƒ†FГџ‰("&H"ЋF$) :ƒ FLAG STRING 1 OR 2 (A$ OR B$))Д… TГ&HFF Ї 460 :ƒ SECTOR "$FF" IS END MARKER)дšп D,T,S,A$,B$ :ƒ GET SECTOR*Є… FГ1 Ї … џŠ(џ(A$,L,1))ГO Ї џ(A$,L,1)Гџ‹(N) :„ ‡"ERROR!":Š*VЎ… FГ2 Ї … џŠ(џ(B$,L,1))ГO Ї џ(B$,L,1)Гџ‹(N) :„ ‡"ERROR!":Š*Ир D,T,S,A$,B$ :ƒ SAVE PATCHED SECTOR*ŠТЅ 330*Ь‡*Ћж‡"TW128 IS NOW FIXED!"*БрŠ*Щш† 10,02,60,50,2C,02*сђ† 10,02,60,41,2D,02*љќ† 10,02,60,54,2E,02+† 10,02,60,43,2F,02+)† 10,02,60,48,30,02+A† 10,02,60,45,31,02+Y$† 10,02,60,44,32,02+q.† 10,02,60,46,34,02+‰8† 10,02,41,4F,35,02+ЁB† 10,02,4E,52,36,02+ЙL† 10,02,44,60,37,02+бV† 10,02,60,48,38,02+щ`† 10,02,60,41,39,02,j† 10,02,60,52,3A,02,t† 10,02,60,44,3B,02,1~† 10,02,60,44,3D,02,Iˆ† 10,02,60,49,3E,02,a’† 10,02,60,53,3F,02,yœ† 10,02,60,4B,40,02,‘І† 11,03,20,2D,06,01,ЉА† 11,03,20,48,07,01,СК† 11,03,20,44,08,01,йФ† 12,09,53,51,3C,02,ёЮ† 12,09,72,69,3E,02- и† 12,09,65,74,3F,02-!т† 12,09,20,2C,40,02-9ь† 12,09,79,20,41,02-Qі† 12,09,6F,61,42,02-i† 12,09,75,72,43,02- † 12,09,20,65,44,02-™† 12,09,77,20,45,02-Б† 12,09,61,79,46,02-Щ(† 12,09,6E,6F,47,02-с2† 12,09,74,75,48,02-љ<† 12,09,74,53,4A,02.F† 12,09,6F,55,4B,02.)P† 12,09,20,52,4C,02.AZ† 12,09,65,45,4D,02.Yd† 12,09,78,20,4E,02.qn† 12,09,69,3F,4F,02.‰x† 12,09,74,3F,50,02.Ё‚† 12,09,3F,20,51,02.ЙŒ† 12,0D,CC,17,37,02.б–† 12,0D,00,01,38,02.щ † 12,0D,03,0B,39,02/Њ† 12,0E,8B,B7,42,02/Д† 12,0E,30,09,43,02/1О† 12,0E,A7,5A,44,02/IШ† 12,0E,01,17,45,02/aв† 12,0E,A7,02,46,02/yм† 12,0E,8D,16,47,02/‘ц† 12,0E,02,20,48,02/Љ№† 12,0E,03,0A,49,02/Сњ† 12,0E,17,4F,4A,02/й† 12,0E,02,F6,4B,02/ё† 12,0E,11,01,4C,020 † 12,0E,30,50,4D,020!"† 12,0E,8D,39,4E,0209,† 12,0E,01,12,4F,020Q6† 12,0E,E0,12,50,020i@† 12,0E,17,12,51,020J† 12,0E,02,12,52,020™T† 12,0E,0A,12,53,020Б^† 12,10,87,12,3B,020Щh† 12,10,22,12,3C,020сr† 12,10,20,12,3D,020љ|† 12,10,2A,12,3E,021†† 12,10,2A,12,3F,021)† 12,10,2A,12,40,021Aš† 12,10,20,12,41,021YЄ† 12,10,20,12,42,021qЎ† 12,10,46,12,43,021‰И† 12,10,72,12,44,021ЁТ† 12,10,65,12,45,021ЙЬ† 12,10,65,12,46,021бж† 12,10,20,12,47,021щр† 12,10,67,12,48,022ъ† 12,10,72,12,49,022є† 12,10,61,12,4A,0221ў† 12,10,6E,12,4B,022I† 12,10,75,12,4C,022a† 12,10,6C,12,4D,022y† 12,10,65,12,4E,022‘&† 12,10,73,12,4F,022Љ0† 12,10,3A,12,50,022С:† 12,10,20,12,51,022йD† 12,10,22,12,52,022ёN† 12,10,3B,12,53,023 X† 12,10,FF,12,54,023!b† 12,10,A3,12,55,0239l† 12,10,28,12,56,023Qv† 12,10,20,12,57,023i€† 12,10,29,78,58,023Š† 12,10,00,39,59,023™”† 14,11,66,50,6B,013Бž† 14,11,6F,72,6C,013ЩЈ† 14,11,72,69,6D,013сВ† 14,11,6D,6E,6E,013љМ† 14,11,61,74,6F,014Ц† 14,11,74,20,70,014)а† 14,11,20,4D,71,014Aк† 14,11,6D,65,72,014Yф† 14,11,65,6E,73,014qю† 14,11,6E,75,74,014‰ј† 14,11,75,20,75,014Ё† 15,07,E6,9D,73,024Й † 15,07,00,40,74,024б† 15,07,00,83,75,024щ † 15,07,20,00,7B,025*† 15,07,EC,00,7C,0254† 15,07,C4,00,7D,0251>† 15,07,ED,45,7E,025IH† 15,07,81,4E,7F,025aR† 15,07,CC,44,80,025y\† FF,00,00,00,00,001,75,20,75,014Ё† 15,07,E6,9D,73,024Й † 15,07,00,40,74,024б† 15,07,00,83,75,024щ † 15,07,20,00,7B,025*† 15,07,EC,00,7C,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ?&1d:ƒ LOW LEVEL FORMATTER FOR ADAPTEC ACB-4000&`n:ƒ SERIES SYSTEMS COPYRIGHT (C) 1986, 1987&“x:ƒ BY RGB COMPUTER SYSTEMS ALL RIGHTS RESERVED&š‚:ƒ& Œž&М–… џ†(&HC00A)Г&HD8 Ї 170&а ‡"WRONG DOS!":Š&шЊ‡:‡"PLEASE WAIT..."' ДMГ&HE00 :ƒ DO NOT CHANGE THIS!'О D$')Ш… D$Г"END" Ї 230'Cв’ M,џ‰("&H"ЋD$):MГMЋ1'NмЅ 190'bцXГ&HFFFE:І 740'x№… ZДВ&H8C1B Ї 290'‚њу 0,0'у 8,63'•т40'œž1'Ђ"ž'Щ,‡"(C) 1987 RGB COMPUTER SYSTEMS":‡'ц6‰"NUMBER OF CYLINDERS";Z'ь@‡'џJXГ&HE10:І 840(T‰"NUMBER OF HEADS";Z(^‡(1hXГ&HE12:І 900(Or‰"REDUCE WRITE CURRENT";Z(U|‡(h†XГ&HE13:І 840(‡‰"WRITE PRECOMPENSATION";Z(š‡( ЄXГ&HE15:І 840(ЖЎ‰"LANDING ZONE";Z(МИ‡(ЯТXГ&HE17:І 900(тЬ‰"STEP CODE";Z(шж‡(ћрXГ&HE18:І 900)#ъ‡"[ ENTER A TITLE (32 CHARS MAX) ]").єЛ ‰ T$)Dў… џ‡(T$)В32 Ї 490)q… џ‡(T$)Д32 Ї T$ГT$ЋџЁ(32Ќџ‡(T$),џ‹(32)))„€ XГ1 Ѕ џ‡(T$))™NГџŠ(џ(T$,X,1)))Љ&’ &HE19ЋX,N)Б0‹ X)З:‡)иD‰"SAVE CUSTOM FORMATTER ";A$*N… џŽ(A$,1)Г"Y" Ї ‡:Л ‰"FILENAME/EXT:DRV ";A$ :„ 620*"X… A$Г"" Ї 580*>bиM""ЋA$,&HE00,MЌ1,&HE00*Dlž*fv‡"DRIVE PARAMETERS ARE SETUP"*l€‡*ˆŠ‰"FORMAT NOW (Y/N) ";A$*Ё”… џŽ(A$,1)Г"Y" Ї 680*ЇžŠ*ГЈЂ &HE00*ШВ… џ†(&HF0)Г0 Ї Š*ЮМ‡*яЦЛ ‰"RE-TRY FORMAT (Y/N) ";A$+а… џŽ(A$,1)Г"Y" Ї 680+кŠ+ф:ƒ+'ю:ƒ Z=WPEEK(X)+.ј:ƒ+HZГ(256­џ†(X))Ћџ†(XЋ1)+N +U:ƒ+f :ƒ Z=PEEK(X)+m*:ƒ+y4ZГџ†(X)+>+†H:ƒ+—R:ƒ WPOKE X,Z+ž\:ƒ+НfZ1Гџ(ZЎ256):Z2ГZЌ(Z1­256)+бp’ X,Z1:’ XЋ1,Z2+зz+о„:ƒ+юŽ:ƒ POKE X,Z+ѕ˜:ƒ+џЂ’ X,Z,Ќ,kш† 16,00,3A,00,00,00,08,00,00,00,00,00,00,01,00,01,00,00,00,00,00,00,00,00,00,0D,2A,2A,2A,20,57,41,бђ† 52,4E,49,4E,47,21,20,4E,4F,54,20,43,4F,4E,46,49,47,55,52,45,44,21,20,2A,2A,2A,0D,0D,00,BE,C0,0A-7ќ† 8C,D8,D0,27,03,7E,A6,19,4F,BD,A9,10,30,8C,C9,BD,B9,9C,30,8D,00,88,8D,54,26,40,30,8D,00,DA,8D,4C-† 26,38,30,8D,00,ED,BD,B9,9C,30,8C,97,9F,EE,86,15,C6,00,8E,00,00,10,8E,16,00,8D,26,26,16,86,04,C6.† 02,8E,FF,00,10,8E,0A,00,8D,17,26,07,30,8D,00,26,7E,B9,9C,30,8D,00,33,7E,B9,9C,30,8D,00,D3,7E,B9.i† 9C,AD,9F,D9,32,AD,9F,D9,30,0D,F0,39,BD,B9,9C,BD,A1,B1,84,DF,81,59,39,0D,0D,46,4F,52,4D,41,54,20.Я$† 43,4F,4D,50,4C,45,54,45,0D,0D,00,0D,48,41,52,44,20,44,49,53,4B,20,45,52,52,4F,52,21,0D,0D,00,28/5.† 43,29,20,31,39,38,37,20,52,47,42,20,43,4F,4D,50,55,54,45,52,20,53,59,53,54,45,4D,53,0D,0D,57,41/›8† 52,4E,49,4E,47,21,20,54,48,49,53,20,57,49,4C,4C,20,45,52,41,53,45,20,54,48,45,0D,48,41,52,44,200B† 44,52,49,56,45,21,20,50,52,4F,43,45,45,44,3F,3F,3F,20,28,59,2F,4E,29,20,00,0D,0D,41,52,45,20,590gL† 4F,55,20,53,55,52,45,20,3F,3F,3F,3F,20,28,59,2F,4E,29,20,00,0D,0D,46,4F,52,4D,41,54,54,49,4E,470ЭV† 2C,20,50,4C,45,41,53,45,20,57,41,49,54,2E,2E,2E,0D,00,0D,0D,46,4F,52,4D,41,54,20,41,42,4F,52,5413`† 45,44,20,42,59,20,55,53,45,52,0D,0D,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,001>j†"END"00,0D,0D,46,4F,52,4D,41,54,54,49,4E,470ЭV† 2C,20,50,4C,45,41,53,45,20,57,41,49,54,2E,2E,2E,0D,00,0D,0D,46,4F,52,4D,41,54,20,41,42,4F,52,5413`† 45,44,20,42,59,20,55,53,45,52,0D,0D,00,00,0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџs&+d:ƒ UNIVERSAL HARD DISK FORMAT PROGRAM&Tn:ƒ FOR ADAPTEC SCSI CONTROLLERS ONLY&†x:ƒ COPYRIGHT (C) 1989 BY RGB COMPUTER SYSTEMS&Ё‚:ƒ ALL RIGHTS RESERVED&ЈŒ:ƒ&Щ–:ƒ FOR COLOR COMPUTER 3 ONLY&а :ƒ&іЊDNГЌ2 :ƒ REPORT ERRORS TO PRINTER'Д’ 150,41 :ƒ 2400 BAUD FAST CLOCK'?О’ &HFFD9,0 :ƒ FAST CLOCK COCO 3'cШRTГ10 :ƒ READ EACH SECTOR COUNT'|вDSГ0 :ƒ DRIVE SET DS'žмRFГ0 :ƒ RLL FLAG 0=MFM, 1=RLL'Ѕц:ƒ'­№Я ˆ'ИњЯ œ DS'Ю€ DГ&HF00 Ѕ &HF10'и’ D,0'р‹ D'ј"€ DГ&HD938 Ѕ &HD93A(,’ D,0( 6‹ D(0@ECOUNTГ&HF00Ћ2 :ƒ ERROR*8 COUNTER(SJMГ&HF00Ћ4 :ƒ ERROR MAP ADDRESS(_TІ 9000(k^І 8000(whXГ&HE12(ƒrІ 4000(Œ|HDГZ(А†Л ‰"READY TO FORMAT? (Y/N) ";A$(Т… A$ДВ"Y" Ї Š(ЮšЂ &HE00(мЄ€ DГ0 Ѕ 7(ёЎV(D)Гџ†(&HE10ЋD)(љИ‹ D)ТІ 9000)Ь€ DГ0 Ѕ 7)&ж’ &HE10ЋD,V(D)).р‹ D)9ъЯ œ DS)jє’ &HEA,2:’ &HEE,6:’ &HEF,0 :ƒ READ INTO $600)‡ў‡"LOOKING FOR ERRORS...")Ÿ€ DГ0 Ѕ џ†(&H150)Ћ1)М’ &HEB,D :ƒ DSKCON DRIVE)ж‡"WORKING ON DRIVE";D)х&€ TГ0 Ѕ 34*0’ &HEC,T :ƒ DSKCON TRACK*:€ SГ1 Ѕ 18*/D’ &HED,S :ƒ DSKCON SECTOR*;NІ 7000*dX… џ†(&HF0)Г0 Ї 620 :ƒ GO IF NO ERROR*„bІ 1000 :ƒ ADD ERROR TO MAP*Œl‹ S*”v‹ T*œ€‹ D*АŠ‡"FINAL FORMAT"*б”:ƒ FMT2.BIN IS EXECUTED HERE*нžЂ &HE00*хЈЯ ‘*ђВ‡"DONE!"+М  100,5:Ѕ 700+ш  100,5+$ђAГ630­џ†(&HEB)+6ќBГџ†(&HEC)­18+GBГBЋџ†(&HED)+rAГAЋ(BЌ1) :ƒ A=SECTOR ADDRESS OF ERROR+—:ƒ M POINTS TO DEFECT DATA TABLE+М$€ JГM Ѕ MЋ7:’ J,0:‹ :ƒ CLEAR RAM+х.І 2010 :ƒ CALCULATE HEAD, CYL & BFI,8XГMЋ1:ZГCYL:І 5000 :ƒ WPOKE CYLINDER #,9BXГMЋ3:ZГHEAD:І 6000 :ƒ POKE HEAD #,kLXГMЋ6:ZГBFI:І 5000 :ƒ WPOKE BYTES FROM INDEX,VMГMЋ8 :ƒ READY FOR NEXT ENTRY,я`‡#DN,"REMOVED DEFECT: DRIVE";D;"TRACK";T;"SECTOR";S;"HEAD";HEAD;"CYL";CYL;"BFI";BFI;"HIT";IЋ1-jXГECOUNT:І 3000 :ƒ WPEEK TABLE SIZE-6tZГZЋ8 :ƒ ADD IN ONE ENTRY-a~XГECOUNT:І 5000 :ƒ WPOKE TABLE SIZE+8-gˆ-™а:ƒ CONVERT SECTOR TO HEAD/CYLINDER/BFI FORMAT-КкSECГ0:XГ0:CYLГ0:HEADГ0:BFIГ0-эф… RFГ0 Ї BCГ32 :„ … RFГ1 Ї BCГ46 :„ ‡"ERROR":Š."ю… AВ ((BC­HD)Ќ1) Ї CYLГCYLЋ1:AГAЌ(BC­HD):Ѕ 2030.Vј… RFГ0 Ї BFIГ(SEC­320)Ћ150 :„ BFIГ(SEC­333)Ћ150.d… XГA Ї .x SECГSECЋ1:XГXЋ1.™… SECГBC Ї SECГ0:HEADГHEADЋ1.К … HEADГHD Ї HEADГ0:CYLГCYLЋ1.Ц*Ѕ 2040.Э И:ƒ.п Т:ƒ Z=WPEEK(X).ц Ь:ƒ/ жZГ(256­џ†(X))Ћџ†(XЋ1)/ р/  :ƒ/Њ:ƒ Z=PEEK(X)/%Д:ƒ/1ОZГџ†(X)/7Ш/>ˆ:ƒ/O’:ƒ WPOKE X,Z/Vœ:ƒ/uІZ1Гџ(ZЎ256):Z2ГZЌ(Z1­256)/‰А’ X,Z1:’ XЋ1,Z2/К/–p:ƒ/Іz:ƒ POKE X,Z/­„:ƒ/ЗŽ’ X,Z/Н˜/ХXIГ0/вbЂ &HD75F/ъl… џ†(&HF0)Г0 Ї 70500v… (џ†(&HF0) А &H7F)Г&H21 Ї ’ &HF0,00€0"ŠIГIЋ101”… IГRT Ї 0=žЅ 70100C@ž0jJ‡"(C) 1989 RGB COMPUTER SYSTEMS":‡0‡T‰"NUMBER OF CYLINDERS";Z0›^XГ&HE10:І 50000Дh‰"NUMBER OF HEADS";Z0ШrXГ&HE12:І 60000ц|‰"REDUCE WRITE CURRENT";Z0њ†XГ&HE13:І 50001‰"WRITE PRECOMPENSATION";Z1-šXГ&HE15:І 50001CЄ‰"LANDING ZONE";Z1WЎXГ&HE17:І 60001jИ‰"STEP CODE";Z1pТ‡1„ЬXГ&HE18:І 60001Šж1—#(MXГ&HE001 #2 A$1Г#<… A$Г"END" Ї 1Ш#F’ MX,џ‰("&H"ЋA$)1д#PMXГMXЋ11р#ZЅ 90101№':ƒ FMT1.BIN2V'† 16,00,16,00,00,00,08,00,00,00,00,00,00,01,00,01,03,34,06,00,00,00,00,01,02,8D,17,8E,0E,68,9F,EE2М'$† 86,1D,C6,00,8E,00,00,10,8E,04,00,8D,30,10,26,C8,D8,39,8D,12,86,04,C6,02,8E,FF,00,10,8E,01,00,8D3"'.† 1C,10,26,C8,C4,39,8E,0E,03,9F,EE,86,15,C6,00,8E,00,00,10,8E,16,00,8D,05,10,26,C8,AD,39,AD,9F,D93P'8† 32,AD,9F,D9,30,0D,F0,39,65,00,01,00,END3`N :ƒ FMT2.BIN3ЦN*† 16,00,16,00,00,00,08,00,00,00,00,00,00,01,00,01,03,34,06,00,00,00,00,01,02,8D,17,8E,0F,00,9F,EE4,N4† 86,04,C6,1E,8E,FF,00,10,8E,0C,00,8D,1C,10,26,C8,D8,39,8E,0E,03,9F,EE,86,15,C6,00,8E,00,00,10,8E4rN>† 16,00,8D,05,10,26,C8,C1,39,AD,9F,D9,32,AD,9F,D9,30,0D,F0,39,END,00,08,00,00,00,00,00,00,01,00,01,03,34,06,00,00,00,00,01,02,8D,17,8E,0F,00,9F,EE4,N4† 86,04,C6,1E,8E,FF,00,10,8E,0C,00,8D,1C,10,26,C8,D8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€Ц$oтZ&ћCпю†ЦŽŽ$­Ÿй2­Ÿй0 №'2ш$~з 0>.oШ0O'0A!цШ #0FцШ!0K цШ" 2ш$~ЙX4vНЙœ5і4vOННЬ5і DRIVE MODEL : HARD+€WARE REV: FIRMWARE REV: ROM REVISION: џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџŽ dР 1nž+x‰"HOW MANY CYLINDERS";CP‚… CГ0 Ї ‡"ERROR!":  100,5:Ѕ 120lŒ‰"HOW MANY HEADS ";H‘–… HГ0 Ї ‡"ERROR!":  100,5:Ѕ 140В ‰"FM, LL OR CSI";A$жЊ… A$Г"M" Б A$Г"m" Ї SГ33:Ѕ 210њД… A$Г"R" Б A$Г"r" Ї SГ47:Ѕ 210 О… A$Г"S" Б A$Г"s" Ї SГ43.5:Ѕ 210=Ш‡"ERROR!":  100,5:Ѕ 160TвTDГџ((C­H­S)Ў630)Z쇄ц‡"THIS DRIVE PROVIDES";TD;"RS DRIVES"Š№‡Ѕњ‰"RS DRIVES DESIRED";Dл… DВTD Б DВ256 Б DГ0 Ї ‡:‡"ERROR!":  100,5:Ѕ 220OFSГ(CЌ(џ((630­D)Ў(H­S))Ћ1))­H­SLSN(0)Гџ(OFSЎ65536)8"LSN(1)ГOFSЌ(LSN(0)­65536)O,LSN$(0)Гџœ(LSN(0))€6… џ‡(LSN$(0))Д2 Ї LSN$(0)Г"0"ЋLSN$(0):Ѕ 310—@LSN$(1)Гџœ(LSN(1))ШJ… џ‡(LSN$(1))Д4 Ї LSN$(1)Г"0"ЋLSN$(1):Ѕ 330сTLSN$ГLSN$(0)ЋLSN$(1)ч^žэh‡ r‡"OS-9 OFFSET IS: $"ЋLSN$|‡K†‡"PROVIDING";(џ(OFS­.00256)Ў10);"MEGABYTES FOR OS-9"Q‡Њš‡"DMODE PARAMETERS: CYL=";џœ(OFSЎ(H­S));", SID=";џœ(H);", SCT=";џœ(S);", TOS=";џœ(S)АЄ‡аЎЛ ‰"TRY ANOTHER VALUE? ";A$јИ… џŽ(A$,1)Г"Y" Б џŽ(A$,1)Г"y" Ї 220ўТ‡ЬЛ ‰"CONFIGURE RGB-DOS? ";A$Fж… џŽ(A$,1)Г"Y" Б џŽ(A$,1)Г"y" Ї 490QрЅ 590mъ‡:‡"LOADING RGB-DOS..."}єгM"RGB-DOS"‹ў€ XГ0 Ѕ 2И’ &H3938ЋX,џ‰("&H"Ћџ(LSN$,((X­2)Ћ1),2))Р‹ Xш‡:‡"SAVING LOADM COMPATIBLE DOS..." &иM"RGB-DOS",&H1FD0,&H3FFF,&H1FD050‡:‡"SAVING EPROM COMPATIBLE DOS..."\:иM"EPROM.DOS",&H2000,&H3FFF,&H2000D‡:‡"FINISHED! OS-9 OFFSET SETUP"‡N‡XŠ’ &H3938ЋX,џ‰("&H"Ћџ(LSN$,((X­2)Ћ1),2))Р‹ Xш‡:‡"SAVING LOADM COMPATIBLE DOS..." &иM"RGB-DOS",&H1FD0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxўi4v–ы' '5vnŸй6№–ьЦ=лэ‰ƒ4–ы'ЬvусŒ5XIXIXITTTPЗџЄ˜_‹€ою–ъ€'J' Œ† 4ьэСьэСьэСьэСjф&ь2a†<ЗџЄЏ5із_~ўiџСџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€й0к”кšлYк.џtŽпНЙœЬ ŽIНжТЬ§PЬџџнh†U—qўй;oCНз№ЇФЁФ&oФНкw №&љЦНм–НлY ыŽпjНЙœНм1Юџ†ЇBІФC„@&5жы4ЦŽпвўРНЅš5зы­ŸР №&€йАŽп…НгБНЦŒ} s' О tь ƒ&№~ тНвVёN%ћЩНЅЧНмe–hL&!ŽпНЙœOжыННЬŽпНЙœНољ'Žп)~Йœ­Ÿ ŽŸюЬ"ньЬџНжТ†—ъНжђ э&љ†—э ь*ё~лY†~зc4v€к0–ыБN%ђ4є–ьЦ=лэ‰ƒmф' Уv$ єjф ё2aѓй9$ єжєћй8Ž–ъ'€'J' !† †Œ†4vŒ† _ŽŒ†Œ† Œ4vC5і4—ѓ}O'Ъ зєŸѕŸї5„Ц€кАŽўй;ІA…B' 0&іZ&ѓ†€—№5ЖQmФ&ьЇФЇBІA…'њ9бŽѓ8F…& žю…'AŒJT…&т…'Џ†_Ž‘Žѓ Žѓ4–ѓ—№9…'љ…&ѕІ€ЇФ №ІA…'њ€л09ї…&тІФЇ€ єы…&жІ€ЇФ єпІФ„—№зOЇФ–№94GP_НЉЂіџ Фїџ НЉvЦ Жџ ˆ€Зџ Z&ѓНЉt5Ч4Ц`Z&§5„–ч€'†Œ†ЗдЖдЗе~ЙXzе'ђ~ЙЌёP"Ъp9€лА4–ыЦŽЁ'0ˆJZ&іЦŽm„' 0ˆJZ&і~ХЇ5†—ы]'#ІР€0%& ""4–ыЦ =M&иVзы5›ы%иLZ&иБP"Ъ—ы9ˆ' Њ'‘'4'7œ'g#'IНЗ НЅЧёP~ЮЪ_€м0ŒЦŸ' ]'НЗ \С"KНЅЧїN9Нк~ Ÿ'0НЅЧНкw №&M94НЪщ5–ŸНЗ С"НЅЧыOIZ*ќЗQ ŸНЗ С"зЙНЅЧЯїO†%_НкšŽѓŸю0ЬНжТНкл €мА№&њTмѕГй9$ єнѕ–єАй8—єoтмѕƒv$ є' єнѕlф&эjф5їP9НвOЅ'ЦЅНВoНЗ НлЈбы%зNНЅЧ4–ыЁф'L'—ы ё5„;НЬЌЖдБе'+ŽпcНЙœOжыННЬŽп[€н0НЙœНЧU0oтЦDІ€C&lфZ&іO5ННЬ~ЙX†—ъŽŸюMІ„'C'чІ€' ­Ÿ  іЬнь9žІ4~аЯ&ѕŸНвVНВmŽŸюЬџНжТН‡HНЅЧ]'оюНЅšoФЪ†—ъ~жђM&€нАьŒPНЯСџ@Џ~ЅE–o' џ&†ЗI~ХМ4ЎgŒЃ'5 №p}I'+)кIsIбвгНЁБ ']&sг _& sв}г'фвібŽк:І„&г б|б K['L€о0 'b'  &|б З}в&% !}б'zб9' ' ' \&НЁБ б %}в&|б52b9oј†_­Ÿ НЙXЦчфŽнЏa џYIoј зŽнŽкц€ч &њ9žІ4€оАНБVŽЉŸ 5ŸІ 'ѓ“Ž T~Щ8НЦŒ} s'/ІшЁm&~а\–hL&Žп1 ' 2ш&Žп)~Йœ­Ÿ ~ЦѕНЁБ„пY9 ERASE HARD DRIVE ARE YOU SURE? (Y/N) ABORTE€п0D FILE ALREADY EXISTS OVERWRITE IT? (Y/N) FREE=DRIVE=HARD DRIVE(S) NOT FOUND AUTOEXECBASHARD DISK BASIC - COPYRIGHT (C) (пА1986, 1989 RGB COMPUTER SYSTEMS ЮЂНлЈвYНлЈе*НлЈжьРйиаЮХ~м а~н|г3НЉгOНлYНлYгЫНо­д?НоЩззщ'зŒŒзБ†№зП†и†ж†PиABЩЁІРЩЉ Щ­~лйз_~к.ЧU~лАŽ ~жыФ9зИНЧXзџНЧXе~йЭРф~й=ЬЉ~мфЬЏНл‰СнПС7нЌС ћжіхзФѕ8зфѕиєтиQєЋвl4)в{4НЅЧНмeoт†#_40щџlb0‰юœ$іjb'йІвЭ2e~лYгОез0щџ4ž0‰ˆЌс"ж[НмeН•Ќъж1Ож…~лYж‘О%ЬсЬк$Ьс8Ўфц 5‰С $*OННЬНл  †.nŸ 459ЫА§ЃЩT &=5VГ J%PŽ ‰VPиа?ЬнъНвRНЅЧЬ"ньЬ&нюНжђ э ю–э#ѓќ&ƒOS'MoŽ&o€Œ8&љН­Џ~й‡4Ь;ŽНжТ5–џ27);џ‹(69);&ХО‡#DN,S$Ћ"Arthur Krupski Arthur Krupski"&љШ‡#DN,S$Ћ"310 River Street 310 River Street"',в‡џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ –& dР 1&nž&+x… џ†(&HC004)Г&HD7 Ї 160&N‚‡"YOU MUST HAVE DISK EXTENDED"&qŒ‡"COLOR BASIC VERSION 1.1 !!!"&w–Š&} ž&ЁЊ‡"FIRST, WE WILL BUILD RGB-DOS"&ЧД‡"FROM A COPY OF YOUR RS-DOS 1.1"&ыО‡"ROM. THE PROGRAM WILL SAVE A"'Ш‡"COPY OF THE ROM TO DISK, THEN"'7в‡"ADD IN THE RGB-DOS ENHANCEMENT."'=м‡'cц‡"BE SURE TO RUN THIS PROGRAM ON"'‰№‡"A BACKUP COPY OF THE RGB DISK!"'њ‡'›І 1220'Ёž'Г‡"WORKING..."'е"‡"SAVING YOUR ROM TO DISK..."'ј,иM"RSDOS",&HC000,&HDFFF,&HC002(6‡"OFFSET LOADING TO $2000..."(/@гM"RSDOS",&H6000(AJ’ &H20D9,&H8E(ST’ &H20DA,&HC1(s^’ &H20DB,&H38 :ƒ LDX #$C138(…h’ &H28B4,&H7F(—r’ &H28B5,&HFF(Ж|’ &H28B6,&H02 :ƒ CLR $FF02(Ш†’ &H28B7,&HB6(к’ &H28B8,&HFF(љš’ &H28B9,&H00 :ƒ LDA $FF00)Є’ &H28BA,&H43 :ƒ COMA)%Ў’ &H28BB,&H84)DИ’ &H28BC,&H7F :ƒ ANDA #$7F)VТ’ &H28BD,&H27)uЬ’ &H28BE,&H03 :ƒ BEQ $C8C2)|ж:ƒ)Žр’ &H3938,&H00) ъ’ &H3939,&H00)Сє’ &H393A,&H00 :ƒ OS-9 OFFSET)Шў:ƒ)ъ‡"SAVING OFFSET PROGRAM....."* иM"RSDOS",&H2000,&H3FFF,&HA027*‡*&І 1220*B0‡"NOW, WE WILL CUSTOMIZE YOUR"*e:‡"DOS. FIRST, SELECT THE TYPE"*ˆD‡"OF H.D. INTERFACE YOU HAVE."*ŽN‡*™žA$Г"5"*фа… A$Г"5" Ї ‡"LOADING KEN-TON OVERLAY...":гM"RGB-DOS.KEN",&H6000:Ѕ 750*ёфž:Ѕ 560*їю‡+јІ 1220+&‡"NOW, WE WILL CUSTOMIZE YOUR"+C ‡"FLOPPY DISK STEP RATE"+I‡+d ‡"PRESS: (1) 6 MSEC."+*‡" (2) 12 MSEC."+š4‡" (3) 20 MSEC."+Е>‡" (4) 30 MSEC."+аH‡" (5) NOT SURE"+жR‡+ъ\Л ‰"WHICH? ";A$, f… A$Г"1" Ї AГ0:І 1180:Ѕ 930,.p… A$Г"2" Ї AГ1:І 1180:Ѕ 930,Pz… A$Г"3" Ї AГ2:І 1180:Ѕ 930,r„… A$Г"4" Ї AГ3:І 1180:Ѕ 930,”Ž… A$Г"5" Ї AГ3:І 1180:Ѕ 930,Ё˜ž:Ѕ 770,ЇЂ‡,ГЌІ 1220,жЖ‡"NOW, WE WILL SAVE THE FINAL",љР‡"CUSTOMIZED VERSION TO DISK.",џЪ‡- дІ 1220-1о‡"SAVING EPROM COMPATIBLE DOS..."-XшиM"EPROM.DOS",&H2000,&H3FFF,&H2000-eђMГ&H1FD0-nќ A$-„… A$Г"END" Ї 1070-˜’ M,џ‰("&H"ЋA$)-ЂMГMЋ1-Ў$Ѕ 1020-д.‡"SAVING LOADM COMPATIBLE DOS..."-љ8иM"RGB-DOS",&H1FD0,&H3FFF,&H1FD0-џB‡.L‡"ALL FINISHED!".V‡.<`‡"TO USE RGB-DOS, JUST TYPE:".Bj‡.ot‡"LOADM"Ћџ‹(34)Ћ"RGB-DOS"Ћџ‹(34)Ћ":EXEC".u~‡.{ˆ‡.’Š.•œ’ &H3613,&H50ЋA.ЉІ’ &H37C0,&H00ЋA.НА’ &H3816,&H14ЋA.УК.мФ‡"PRESS ANY KEY...";.ѕЮA$Гџ’:… A$Г"" Ї 1230.ћиž/т/•ь† 1A,50,B6,FF,FE,81,8C,27,12,8E,80,0,B7,FF,DE,A6,84,B7,FF,DF,A7,80,8C,E0,0,26,F1,8E,20,0,CE,C0,0,A6,80,A7,C0,8C,40,0,26,F7,BD,A9,28,7E,C0,2,ENDІ’ &H37C0,&H00ЋA.НА’ &H3816,&H14ЋA.УК.мФ‡"PRESS ANY KEY...";.ѕЮA$Гџ’:… A$Г"" Ї 1230.ћиž/џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ1Є~8#D8†4~1Ј–ыБN%ђ!џќЦ ŽѓЮ8R­ŸРЦ Ž8RЮѓ!ў5іІ€ЇРZ&љ9џ #MAXTIM 00980 STX IRQVEC+1 00990 01000 CLR TIMER 01010 CLR TIMER+1 01020 01030 01040 * BAUD RATES 01050 01060 B300 EQU џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ* PROGRAM TO PATCH TELEWRITER-80 TO WORK ON * THE RGB HARD DISK. CAUSES DISKMENU.BIN TO * CALL RGB-DOS FOR HARD DISK ACCESS OR THE * TELEWRITER'S OWN DSKCON FOR FLOPPY ACCESS * NOTE: BECAUSE OF THE WAY TELEWRITER WAS * WRITTEN, YOUR TEXT FILES MAY ONLY RESIDE * ON DRIVE NUMBERS 0 THRU 3 ON HARD DISK * OR ON FLOPPY DISK. * SAVE DISKMENU.BIN AT $2000 TO $385F AFTER PATCH DCDRV EQU $EB DSKCON DRIVE NUMBER HDFLAG EQU $14E RGB-DOS HARD DRIVE FLAG VCMD EQU $F3 COMMAND BUFFER ORG $31A4 ADDRESS OF TW-80 DSKCON JMP DISK JUMP TO OUR PATCH NOP FILL UNUSED BYTE ORG $381C TACK ON THE END OF DISKMENU.BIN FLOPPY LDA #3 3 RE-TRYS BEFORE ?IO ERROR PSHS A ORIGINAL CODE... JMP $31A8 ...JUMP BACK TO OLD CODE DISK LDA DCDRV GET REQUESTED DRIVE NUMBER CMPA HDFLAG GOING TO HARD DISK? BLO FLOPPY NO, JUMP TO OLD CODE LBRN * 4 BYTES NOW UNUSED LDB #12 SAVE AWAY 12 BYTES LDX #VCMD POINT TO RGB-DOS RAM LDU #END POINT TO END OF THIS PROG. BSR MOVE SAVE AWAY 12 BYTES WE USE JSR [$C004] CALL DSKCON (DO DISK I/O) LDB #12 RESTORE 12 BYTES LDX #END POINT TO END OF THIS PROG. LDU #VCMD POINT TO RGB-DOS RAM BSR MOVE RESTORE ORIGINAL 12 BYTES BRN * NOP 2 BYTES PULS D,X,Y,U,PC RESTORE REGISTERS & RETURN MOVE LDA ,X+ GET A BYTE FROM "X" STA ,U+ STORE IT AT "U" DECB DECREMENT COUNTER BNE MOVE GO AGAIN IF NOT DONE RTS RETURN END FDB 0 TEMP SAVE DATA HERE FDB 0 FDB 0 FDB 0 FDB 0 FDB 0 FDB 0 ZLAST EQU *-1 END GO AGAIN IF NOT DONE RTS RETURN END FDB 0 TEMP SAVE DATA HERE F DK з_ъйиаŽo€Œ ‰&љŽС Ю4Ц НЅšЬВwэCэHoФoEЬЯ §-ЬЯ2§2Ю^†~З ЇРьэСŒС9&№ŽТВПЁŽШАП›Ž _ŸАЮДJЦ яZ&ћŽиЁП †~З ŽиЏП †З zJ”оŽ ‰П H0‰П J0П (o0‰П *o0‰П ,o†З [0‰]'L…'L‰ЫзН–ь–К‹—З­ŸРЏџјНЙœŽРчŸr~й=Нвв~€Р ‚ … †џ@†аЗџH ћЖџH9С’Т8ТТNФKШˆШ“ЬнПШHШKЪщЪљŽЭ5ШЉЦфЪфЩ ЮвЦфТeнЌDISK EXTENDED COLOR BASIC 1.1 COPYRIGHT (C) 1982 BY TANDY UNDER LICENSE FROM MICROSOFT DIвDRIVХFIELФFILEгKILЬLOAФLSEдMERGХRENAMХRSEдSAVХWRITХVERIFйUNLOAФDSKINЩBACKUаCOPйDSKIЄDSKOЄDOгЬЉЮХаМб\ЦяЪHбЪ9абЩраfзNв3е™вbгЙдэеbжьCVЮFREХLOУLOЦMKNЄAгЭєЮœЮЮ7ЮВwс"ŽСё€Ю~­дс#№-nŸAСN#nŸFРD4НВb5ŽТ,~ВЮ5 Н­3Нвв4$НЪщ5С6%Цv2bНЇщНЉtoНЙ\НЙЏŽТZ~Ќ`BRDFOBWPFNFSAEFOSEVFERBAS DATBIN4ЎcŒ—_&#'5‘2eНШ.ŸёoˆoˆoˆoˆoІ—ыЅ' НВmНЗ=žёэь'НЦ…ь Ў 40^НŸЕ4`Ір& 55Œd%Ц6~ЌFоёЌM'З4ІO'oOЦ3ьaНЧ„4НЧyPыc\чDцBНЧU3ІфL0Ф:J'7чфц„СР%ђцф и&Ц.~ЌF0ШзъŸю0ФНЧc~жђ4НЧП‰5BчФJ&ђ4НЧ52aоёчC†џЇMІ„Р%'„?ЁD$!–и'НІDŠРЇ„НХЉЎIŒ&ЌШ'†!O_эШЦЎIŒ& 2gЎK–и'Ц~УZНУW5ЏM4НЧU0цC:І„Р%+„?ЁD&%ьШ„4OцbуcЃс# и'џVƒ#ЬŠ€эШ50Ш:юb4†џуa$эa5P цboaob2a–и'НЅšяbоё–и'ЇOЏbЎM0_юф&ўН5–2bНБVНЖЄ4НЅЂ]/сІ54oНВmŽТЌНЩ8Ьџ§ WŽЅ'НВmНГцžRП |'яТНЅЧ54НЧI&с†ŸёНЧНЦŒ5†4СI&НЦхНШО tь § WuНЦ'НЧUlžё5Ї9hфСO&} s'НЦќЖ sЗ wО tП xНХgR гСR'СD&с$hфќ H4ѓ |%Г J#Ц:~ЌF4} s&U †џНШc l5F§ Hя ў |я Ž ў tюNяˆ9žёЦo€Z&ћžё–ыЇЖ vЇЇі sРXXX4ќ tƒ†=ЋрЇˆ9Ц8Ж w'цжЗ s—эЦзъНжђО xП t3„Ц o€Z&ћŽ LЦ НЅšќ Wэ@Ц!НЧПЗ vЇBЦзъНжђ4VНЧUlІБ z%НЧ5ж–o/Ч/2b4pŽ &жoXЎ…ц„С@&ьˆЃ $ УэˆЎ 0‹І5”цˆ'Іˆoˆ5”цˆ'p5”цljˆ':Іˆ5”4`O3‹ІШ4oІ—ы5b5”ІL4 #OЇц3„НЧU:ц0ФСР$ 5€ &ч мФ?С #Ц@~ЌFрр%!˜4#†—ъНЧc3ˆпюНжђoˆцр& ьˆ&_cˆчˆ9ю3Aя9 s wЬ—ьзъЦзэЮпюНжђџ t1ФІФ&()Ž LІ€ЁР&Œ W&ѕї sІBЗ v93Ј ƒ&е\С #Ц9C&зЖ w&ї wџ x9Ц4} s&ј~ЌFНЩ5НЅЧНЧ’щ†џНШО to„ЦзъНжђц D0:ц„†џЇ„СР%ёЮпюЬ—ьзъЦзэ%o0ЦDНЅšoРƒ&ј~жђ4жoŒ4XŽ &Ў…ц5„~лАŽ ~жыФ9цTзьС% ьXPыызэ94XIXIXIус9oтlфƒZ*љІфчфЦ =5Z‹ +ћO9Жm&љo3ŽŸюЬ—ьзъЦзэНжђЦD~Ѕš”0OФўoтc…'1c…LD$%\Х&№4Рcb& рр*цфca2a мырСD%іцфР юЦ8~ЌF2a˜:ЦРч„94і [\НЧI'–ыЁ&ў tІMЁ&ІЁф&нѓZ&с5‚НЅЅo]/ьНЧIІ'лК@'С~І†Œ† o/ЕЏфНЧD4І'л@'Ёф&п5–ЎdŒА &їНВm"& НВDНЖWЦ;НВoŽАЏd5–/%ё ["нŽ5 o/2b4nНЧDцOŽ~Ѓ| o/2b92bЏ2(Ш†’ &H2Н­ыžІŸ/І€':'%~ВwІ—&~Ўь€нhŸІ–Џ'†[НЂ‚–hННЬ†]НЂ‚ŸЉ˜&~ƒ—&~ƒšН­Ц І2b–o4НЅЎНЃэ o/мМНЧDцС@'мэ_Іˆ&цˆ~ЅфŽТЉoтЖ Z—ыЮ LЬ ЇРZ&ћЦНЅšН‡H3„ &=5VГ J%PŽ ‰VŽ L\Z& 2aŒ L&gЦ>~ЌFІР.'-/'):' Œ T'ш> кн]&н5‚cb'зІРM–ыБ "~лйСŽ W† Ї‚Œ T&љZ'кІР:'ЭŒ W'Ќ юЇ€'Є.' /'œL'™9M'‚KžŠП WЅ'!НВmЦAНВo&фs XO~Зd†OŒ†Iі [\зo~Ф№†џНЬ$м“НЬ$˜НЬ$žІ€НЬ$œ&ї~Є-ŽТІ~Щ8OЦџ "&ИX† M'sO_З Yї ^лЅ'НВmЦRНВoНЅЧ†З Y™Ж X' } ^&Н­~Ќ|Ж WК ^&лŽН­s ]НЭМНЭМ4НЭМ‰5гНЌ7žНХФжp&Ї€ ѕ ]ŸЦІ‚&Z&љžŸo€Z*љНЄ-Н­!Н‚œНЌяw Y%НЄ&w Y%тН~Ќs o.о9і [\4зo5Z&ѕ9 o/З‡2bНЧDoŸёІ'ь4oцзы &цˆ†€ЊэˆlцНЧUЇ:l~ЫУ@&љь Ў 1‹461фо“'ІA3B*(3E я5@“':0уB4ІA*яцDXЫO3ЫЃф'т3E ѕЎBМ H$Ќ"% Ќ$%ЃЄэB9oФoBoC9і [\4НЧIІ@& ь Ѓ$%ЃЄэ 5Z§ЃГ H'ІРЇ€ єП HНЧUjm'НЧžё5 '@&АІ' НЧc3ˆпю,Іˆ*цˆФ† =Юпю1ЫцˆTTTЫзэЬ—ь ьˆ„э.Цзъ~жђУ2b4Ž &жoXЎ…ц„С'6 &o %lС@&ьˆУЃ "zэˆЎ 0‹5Ї5”lˆцˆ':Їˆ5–4`Ї‰цзыlНЫп1„цНЧU:3І$ %j$l%НЧПo$o%Ї#ŒŠРЇФ0ЄНЦ…НХЉ5`5–~мфНЧНл‰Ь—ьзъЦзэŽŸюНжђ5@НЅI4@І„'8C'B4ЦНЙЂЦНЙЂ8Ўфц 5‰С $*OННЬНл  †.nŸ 45950ˆ Œ%Ежэ\С~нНЂ‚~ЙЌНЧU3OLD"љ(0Ф:ц„СР%№9 o/^ŽАiЏфŽнЦ,з–&Ц o 'њ"& С,&‰з "С"' & Œн'DІ &>† M'‘'4Ёр'Ї€Œж&F& @'Эo„Žм9"' &ђ.&ю 'ј,'ц &&о 'к ж'НЧDцС@&ѕ‡ЦJ~ЌFНЁv p94НЧDцС@& ьˆƒэˆ5”Їˆcˆ5”НЖTС%цM~МНБCЦНЕНМ5~Ж›ьнR~ˆ–o4НБCНЅЎ o/ц!НЧD5—om'еХ9рІ—ыц4НЭJФ?4‰OНЧyыр‰54І@5&Е4“Š'ƒЊжO'ЫзOНМ_Ўфьˆ„–b–\жOНЙХНМ_5ь „b–\жOНЛ‘~МюНБCНЗНлЈНн.~Дѓ4ЎfІ „‹.5ёP"з]9~м "зQї Z9Іd&ЎeŒЏš& ЎbŒБf&ŽЮьЏe~ˆF5FНБH'э=žRьƒ ‰%Г J%рЊ~ЏЄЪ'Ш&В(Ÿ,'Ч4НЗ С"х%–М~–.НЄ)Ÿ~ŒС4&В0НВb–o4НЅЎНЄ o/НЧDцС@& 5—oьˆ~ДєНЃ_5—oжl~ДѓŸOНƒlНƒlЌb%фвНƒlНЅЧЬ§ WНЪO+ьbЃdУьdЎdІ€НЬ$1?&ї†џ O_56~Є-НЬ$‰9ŽТЏ~Щ8ŸіНЪќ Wƒ&жDžŠЅ'НВmНЗ=ŸгНЅЧНЭМ4)%ггнІр&д3НХФжp'~УRЇ„Ё€'~з 1?&щ аНЭМ‰9~н|5–ы4*5‘ы&ф(5ŸІНЦŒНЦхŽ Lў tЦ НЅšЦзъ~жђЦЅНВo~Щ5НЦŒЦB} s&лс9'шюo9#&НЅЅНЄЅ'шйНВmНБV–&ННйНЕНЙŸЅ'шР†,НЃ_ n'†  иНЙŸ тНЃ_ n&З†"~Ђ‚НШ.O_4Ѕ&5–НЗ84Oуc%ЎeЃ #ЦD~ЌFюcэcь 3ЫяaЦџНВoЦЇНВoНГWНБF5Dч„я Т†O4НГWНБF4ЎŒ ‰%М J%ЦF~ЌFЦГНВoН‡H5 ІЄ'.4Ц ю"чРJ&ћцр'сЄ%цЄoфю"mр'4OP‚ыЄ‰3Ы5~Ѕš5‚Н•Ќќ Jƒ ‰4і [4Ѕ,'НЗ С"тЯчфЅ'НВmНГцэaНЪщцф4Ь ‰уb%qэbУ%jjф*ї]'L'`…'L'YЇфмМЋф%OL'J“!$EJ“гІфМ‰›К—КлЗзЗ5F—Мї [џ J–hL' “гІнІоŸ“"ІТЇ‚“&їŸo? ~ЌDоŸo?ІРЇ œ&їЮ (О J_ЏСo0‰\ё [#ђ~–Ы_\НЧI' І‘ы&4НЫ5ё [#ш9і ZЅ' НЗ НлЈзы9'гЙН•ЌНвV4Ѕ'ЦЅНВoНвV4НЅЧНмeoт†#_40щџlb0‰юœ$іjb'йІ_\jф'сb&їзцdH†џНг"цcBmф' OНг"цaлчa з2e~лY5@Ж \'Ž (Oo‘LБ [#јžoН­ \Ж ]' ]Н­nФ†Œ†нъІc—ьОŸю–ЦзэНжђ ю\С#є ьJ&э9цeсf&6 …џ@ †4НЉŽг_Ц Ір'ŽгlЦНЙЂŽг~ЦНЙЂНлYНлYНЁq &љ9INSERT SOURCEINSERT DESTINATION DISKETTE AND PRESS 'ENTER'5 Ц Ž WІ‚4Z&љ–ы4nЄІ€—ыЦ Ю L~ЅšНЩ5лoтЅ' cфЦЅНВoНо­ЩНЅЧНЪщoт0щџlф0‰џœ$іjф'иX0nННЦŒНЦхО tюЎ 4PНЧі vНЭ4JФ?4‰OНЧyыф‰Ž4_Ўф' \0'сj&їЏфчdP†џ@me'%0kНг­НоЩНЧНЧU0ІeЦDc„&J'c€Z&є~Чјc„Ўф' ьbыd‰эbO Ќ2ш$9mш~г&†џ0m O0ш—иНг­ЎhП WŽП |†Rі [\НФžёЬэˆцf')жифg' ьbыf‰НТцžёюdяцfо4Džёя НТъla5DZ&№žёЮ ‰я жифg' ogьjŠ€эˆ~Ы8+4'4ЦНеЮ€5Ю54PЦ€НЕ3„5ч„я5~ЅšНВmŽГW/~БFНЗ НлЈ4НЗ8С""4НЗ8зэZС"5—ьзы9~ДJНВmŽБVжыоь4D­„5Dзыпь9УчМžR4пНЖT4_Žo€Z&ћ5Ю€–5НЖYЮŒЦŽŸюзъ~жђ'а‚~йЭЦЅ' НЗ8С$о›НЅЧ4ŽЦo‚Z&ћO ыф\Р$ќЫm…&ѕLЇ…%ь2a0щџ4ž0‰ˆЌс"ж[НмeН•ЌъьНжђ …†РЗџHНзб'~жˆ%Ж †ŠЗџ@†PЗџHіхНзб&hНз№lŽџKPŽжOП ƒОЖџH†џЗ ‚ЦєїџHЖ †Š€Зџ@ц€чЄ њЖџHЏ„D—№&. ь–ь#&Є†—ъŽŸюЮO—ь_ІХ—эНжђ\С%є–ьL#%ъ~лY †џ@~зОЬ N)_4ЮцХзэЮждЦ–ьЇ€o€–эЇ€Ц 5\С%лЬШNч€J&ћ94ьСє5Z&ѕ9ѕўїN ѕћџїNnŸР 4Цї ˆ5b №' –№Ц<…@&Ц(~ЌF4–ъ5&*} ‡'%4V†—ъоюŽŸю3пю†—ъ–№& _І€ЁР&Z&ї5V95Vz ˆ&БЦH Н_Њ'Sˆ&лї ‡Ÿ~к.4 …жыŽиЖ †„ЈЊ…Š жьС%Š‰ŠЗ †Зџ@Х&ŒЇбНЇб=& №Žи•жъX­•5ж№' J'4 &ё Д†№З …5іНЧXo…†ЗџHѕ8$„—№9žŠ0'щ'…&ѕ9†аЗџHѕЖџH†€—№9Ž".0&ќ9†€Œ† 4НЧX:ц„їџIбь'–ьЗџKЇ„†ЗџHєтБ&Ь„'—№5‚–эЗџJŽи‹П ƒžюЖџHЖ †Š€5žŠЮџHs ‚PїџHєЋС€'ЦхФ& 1?&ј ‚Џ~зпц€їџKЗџ@ іЦхФ&1?&ј тіџKч€Зџ@ іЏЖџH„|—№9зИзазјзћABЖ ‚'О ƒЏj ‚;Жџ*њЖџЖ …'JЗ …& Ж †„АЗ †Зџ@~‰U?ЬнъНвRНЅЧЬ"ньЬ&нюНжђ э ю–э#ѓќ&ƒOS'MoŽ&o€Œ8&љН­Џ~й‡4Ь;ŽНжТ5–џџџџџџџџџџџџџџџџк”кšлYк.йџtŽпНЙœЬ ŽIНжТЬ§PЬџџнh†U—qўй;oCНз№ЇФЁФ&oФНкw №&љЦНм–НлY ыŽпjНЙœНм1Юџ†ЇBІФC„@&5жы4ЦŽпвўРНЅš5зы­ŸР №&Žп…НгБНЦŒ} s' О tь ƒ&№~ тНвVёN%ћЩНЅЧНмe–hL&!ŽпНЙœOжыННЬŽпНЙœНољ'Žп)~Йœ­Ÿ ŽŸюЬ"ньЬџНжТ†—ъНжђ э&љ†—э ь*ё~лY†~зc4v–ыБN%ђ4є–ьЦ=лэ‰ƒmф' Уv$ єjф ё2aѓй9$ єжєћй8Ž–ъ'€'J' !† †Œ†4vŒ† _ŽŒ†Œ† Œ4vC5і4—ѓ}O'Ъ зєŸѕŸї5„ЦŽўй;ІA…B' 0&іZ&ѓ†€—№5ЖQmФ&ьЇФЇBІA…'њ9бŽѓ8F…& žю…'AŒJT…&т…'Џ†_Ž‘Žѓ Žѓ4–ѓ—№9…'љ…&ѕІ€ЇФ №ІA…'њ9ї…&тІФЇ€ єы…&жІ€ЇФ єпІФ„—№зOЇФ–№94GP_НЉЂіџ Фїџ НЉvЦ Жџ ˆ€Зџ Z&ѓНЉt5Ч4Ц`Z&§5„–ч€'†Œ†ЗдЖдЗе~ЙXzе'ђ~ЙЌёP"Ъp94–ыЦŽЁ'0ˆJZ&іЦŽm„' 0ˆJZ&і~ХЇ5†—ы]'#ІР€0%& ""4–ыЦ =M&иVзы5›ы%иLZ&иБP"Ъ—ы9ˆ' Њ'‘'4'7œ'g#'IНЗ НЅЧёP~ЮЪ_ŒЦŸ' ]'НЗ \С"KНЅЧїN9Нк~ Ÿ'0НЅЧНкw №&M94НЪщ5–ŸНЗ С"НЅЧыOIZ*ќЗQ ŸНЗ С"зЙНЅЧЯїO†%_НкšŽѓŸю0ЬНжТНкл №&њTмѕГй9$ єнѕ–єАй8—єoтмѕƒv$ є' єнѕlф&эjф5їP9НвOЅ'ЦЅНВoНЗ НлЈбы%зNНЅЧ4–ыЁф'L'—ы ё5„;НЬЌЖдБе'+ŽпcНЙœOжыННЬŽп[НЙœНЧU0oтЦDІ€C&lфZ&іO5ННЬ~ЙX†—ъŽŸюMІ„'C'чІ€' ­Ÿ  іЬнь9žІ4~аЯ&ѕŸНвVНВmŽŸюЬџНжТН‡HНЅЧ]'оюНЅšoФЪ†—ъ~жђM&ьŒPНЯСџ@Џ~ЅE–o' џ&†ЗI~ХМ4ЎgŒЃ'5 №p}I'+)кIsIбвгНЁБ ']&sг _& sв}г'фвібŽк:І„&г б|б K['L 'b'  &|б З}в&% !}б'zб9' ' ' \&НЁБ б %}в&|б52b9oј†_­Ÿ НЙXЦчфŽнЏa џYIoј зŽнŽкц€ч &њ9žІ4НБVŽЉŸ 5ŸІ 'ѓ“Ž T~Щ8НЦŒ} s'/ІшЁm&~а\–hL&Žп1 ' 2ш&Žп)~Йœ­Ÿ ~ЦѕНЁБ„пY9 ERASE HARD DRIVE ARE YOU SURE? (Y/N) ABORTED FILE ALREADY EXISTS OVERWRITE IT? (Y/N) FREE=DRIVE=HARD DRIVE(S) NOT FOUND AUTOEXECBASHARD DISK BASIC - COPYRIGHT (C) 1986, 1989 RGB COMPUTER SYSTEMS oј иŽнŽкц€ч &њ9џџџџџџџџџџџџџџџџџџџџ SE HARD DRIVE ARE YOU SURE? (Y/N) ABORTED FILE ALREADY EXISTS OVERWRITE IT? (Y/N) FREE=DRIVE=HARD DRIVE(S) NOT FOUND AUTOEXECBASHARD DISK BASIC - COPYRIGHT (C) 1986, 1989 RGB COMPUTER SYSTEMS oј иŽнŽкц€ч &њ9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•ЄjПџ•џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[•фj@џџ[џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Ј?HЖ€§2'~?šP†zЗџІ†{ЗџЇ†pЗџЂ†qЗџЃ~РqPŽ€І„ЗџпЇ€ЗџоŒР&ёЗџп†~З QЬ r§ RЬŽŸ§ „Ьў~§ †Ь “§ ˆ€q†~З ЫЬ?у§ Ь~ 'ЬР—EЬпџнAЬ@нGЬ_џнCНЌ Џ~РSDK з_ъпLпŽo€Œ ‰&љŽС Ю4Ц НЅšЬВwэCэHoФoEЬЯ §-ЬЯ2§2Ю^†~З ЇРьэСŒС9&№ŽТВПЁŽШАП›Ž _ŸАЮДJЦ яZ&ћŽиЁП †~З ŽиЏП †З zJ”оŽ ‰П H0‰П J0П (o0‰П *o0‰П ,o†З [0‰]'L…'L‰ЫзН–ь–К‹—З­ŸРЏ~тНЙœŽРчŸr~ тНвв~€Р ‚ … †џ@†аЗџHˆˆЖџH9С’Т8ТТNФKШˆШ“ЬХМШHШKЪщЪљŽЭ5ШЉЦфЪфЩ ЮвЦфТeЪ>DISK EXTENDED COLOR BASIC 1.1 COPYRIGHT (C) 1982 BY TANDY UNDER LICENSE FROM MICROSOFT DIвDRIVХFIELФFILEгKILЬLOAФLSEдMERGХRENAMХRSEдSAVХWRITХVERIFйUNLOAФDSKINЩBACKUаCOPйDSKIЄDSKOЄDOгЬЉЮХаМб\ЦяЪHбЪ9абЩраfзNв3е™вbгЙдэеbжьCVЮFREХLOУLOЦMKNЄAгЭєЮœЮЮ7ЮВwс"ŽСё€Ю~­дс#№-nŸAСN#nŸFРD4НВb5ŽТ,~ВЮ5 Н­3Нвв4$НЪщ5С6%Цv2bНЇщНЉtoНЙ\НЙЏŽТZ~Ќ`BRDFOBWPFNFSAEFOSEVFERBAS DATBIN4ЎcŒ—_&#'5‘2eНШ.ŸёoˆoˆoˆoˆoІ—ыЅ' НВmНЗ=žёэь'НЦ…ь Ў 40^НŸЕ4`Ір& 55Œd%Ц6~ЌFоёЌM'З4ІO'oOЦ3ьaНЧ„4НЧyPыc\чDцBНЧU3ІфL0Ф:J'7чфц„СР%ђцф и&Ц.~ЌF0ШзъŸю0ФНЧc~жђ4НЧП‰5BчФJ&ђ4НЧ52aоёчC†џЇMІ„Р%'„?ЁD$!–и'НІDŠРЇ„НХЉЎIŒ&ЌШ'†!O_эШЦЎIŒ& 2gЎK–и'Ц~УZНУW5ЏM4НЧU0цC:І„Р%+„?ЁD&%ьШ„4OцbуcЃс# и'џVƒ#ЬŠ€эШ50Ш:юb4†џуa$эa5P цboaob2a–и'НЅšяbоё–и'ЇOЏbЎM0_юф&ўН5–2bНБVНЖЄ4НЅЂ]/сІ54oНВmŽТЌНЩ8Ьџ§ WŽЅ'НВmНГцžRП |'яТНЅЧ54НЧI&с†ŸёНЧНЦŒ5†4СI&НЦхНШО tь § WuНЦ'НЧUlžё5Ї9hфСO&} s'НЦќЖ sЗ wО tП xНХgR гСR'СD&с$hфќ H4ѓ |%Г J#Ц:~ЌF4} s&U †џНШc l5F§ Hя ў |я Ž ў tюNяˆ9žёЦo€Z&ћžё–ыЇЖ vЇЇі sРXXX4ќ tƒ†=ЋрЇˆ9Ц8Ж w'цжЗ s—эЦзъНжђО xП t3„Ц o€Z&ћŽ LЦ НЅšќ Wэ@Ц!НЧПЗ vЇBЦзъНжђ4VНЧUlІБ z%НЧ5ж–o/Ч/2b4pŽ &жoXЎ…ц„С@&ьˆЃ $ УэˆЎ 0‹І5”цˆ'Іˆoˆ5”цˆ'p5”цljˆ':Іˆ5”4`O3‹ІШ4oІ—ы5b5”ІL4 #OЇц3„НЧU:ц0ФСР$ 5€ &ч мФ?С #Ц@~ЌFрр%!˜4#†—ъНЧc3ˆпюНжђoˆцр& ьˆ&_cˆчˆ9ю3Aя9 s wЬ—ьзъЦзэЮпюНжђџ t1ФІФ&()Ž LІ€ЁР&Œ W&ѕї sІBЗ v93Ј ƒ&е\С #Ц9C&зЖ w&ї wџ x9Ц4} s&ј~ЌFНЩ5НЅЧНЧ’щ†џНШО to„ЦзъНжђц D0:ц„†џЇ„СР%ёЮпюЬ—ьзъЦзэ%o0ЦDНЅšoРƒ&ј~жђ4жoŒ4XŽ &Ў…ц5„4–ыЦJ=Ž0‹5†цTзьС% ьXPыызэ94XIXIXIус9oтlфƒZ*љІфчфЦ =5Z‹ +ћO9Жm&љo3ŽŸюЬ—ьзъЦзэНжђЦD~Ѕš”0OФўoтc…'1c…LD$%\Х&№4Рcb& рр*цфca2a мырСD%іцфР юЦ8~ЌF2a˜:ЦРч„94і [\НЧI'–ыЁ&ў tІMЁ&ІЁф&нѓZ&с5‚НЅЅo]/ьНЧIІ'лК@'С~І†Œ† o/ЕЏфНЧD4І'л@'Ёф&п5–ЎdŒА &їНВm"& НВDНЖWЦ;НВoŽАЏd5–/%ё ["нŽ5 o/2b4nНЧDцOŽ~Ѓ| o/2b92bЏН­ыžІŸ/І€':'%~ВwІ—&~Ўь€нhŸІ–Џ'†[НЂ‚–hННЬ†]НЂ‚ŸЉ˜&~ƒ—&~ƒšН­Ц І2b–o4НЅЎНЃэ o/мМНЧDцС@'мэ_Іˆ&цˆ~ЅфŽТЉoтЖ Z—ыЮ LЬ ЇРZ&ћЦНЅšН‡H3„С%ІA:& ІФ0%3"3Ž L\Z& 2aŒ L&gЦ>~ЌFІР.'-/'):' Œ T'ш> кн]&н5‚cb'зІСР€0%Я"Ы—ы9СŽ W† Ї‚Œ T&љZ'кІР:'ЭŒ W'Ќ юЇ€'Є.' /'œL'™9M'‚KžŠП WЅ'!НВmЦAНВo&фs XO~Зd†OŒ†Iі [\зo~Ф№†џНЬ$м“НЬ$˜НЬ$žІ€НЬ$œ&ї~Є-ŽТІ~Щ8OЦџ "&ИX† M'sO_З Yї ^лЅ'НВmЦRНВoНЅЧ†З Y™Ж X' } ^&Н­~Ќ|Ж WК ^&лŽН­s ]НЭМНЭМ4НЭМ‰5гНЌ7žНХФжp&Ї€ ѕ ]ŸЦІ‚&Z&љžŸo€Z*љНЄ-Н­!Н‚œНЌяw Y%НЄ&w Y%тН~Ќs o.о9і [\4зo5Z&ѕ9 o/З‡2bНЧDoŸёІ'ь4oцзы &цˆ†€ЊэˆlцНЧUЇ:l~ЫУ@&љь Ў 1‹461фо“'ІA3B*(3E я5@“':0уB4ІA*яцDXЫO3ЫЃф'т3E ѕЎBМ H$Ќ"% Ќ$%ЃЄэB9oФoBoC9і [\4НЧIІ@& ь Ѓ$%ЃЄэ 5Z&х5VГ H'ІРЇ€ єП HНЧUjm'НЧžё5 '@&АІ' НЧc3ˆпю,Іˆ*цˆФ† =Юпю1ЫцˆTTTЫзэЬ—ь ьˆ„э.Цзъ~жђ o/ЖQ2b4Ž &жoXЎ…ц„С'6 &o %lС@&ьˆУЃ "zэˆЎ 0‹5Ї5”lˆцˆ':Їˆ5–4`Ї‰цзыlНЫп1„цНЧU:3І$ %j$l%НЧПo$o%Ї#ŒŠРЇФ0ЄНЦ…НХЉ5`5–НвOНЧНЙXЬ—ьзъЦзэŽŸюНжђ5@НЅI4@І„'8C'D4ЦНЙЂ?ЦНЙЂ8цС $0OННЬ*Ўф†BЋ ц !‰OННЬНЙX50ˆ Œ%Ежэ\С#Є9НЂ‚~ЙЌНЧU3OLD"љ(0Ф:ц„СР%№9 o/^ŽАiЏфŽнЦ,з–&Ц o 'њ"& С,&‰з "С"' & Œн'DІ &>† M'‘'4Ёр'Ї€Œж&F& @'Эo„Žм9"' &ђ.&ю 'ј,'ц &&о 'к ж'НЧDцС@&ѕ‡ЦJ~ЌFНЁv p94НЧDцС@& ьˆƒэˆ5”Їˆcˆ5”НЖTС%цM~МНБCЦНЕНМ5~Ж›ьнR~ˆ–o4НБCНЅЎ o/ц!НЧD5—om'еХ9рІ—ыц4НЭJФ?4‰OНЧyыр‰54І@5&Е4“Š'ƒЊжO'ЫзOНМ_Ўфьˆ„–b–\жOНЙХНМ_5ь „b–\жOНЛ‘~МюНБCНЗС"зwзыНЧНЧU0oтЦDІ€C&lфZ&і5~ДѓНЗ С"зQї Z9Іd&ЎeŒЏš& ЎbŒБf&ŽЮьЏe~ˆF5FНБH'э=žRьƒ ‰%Г J%рЊ~ЏЄЪ'Ш&В(Ÿ,'Ч4НЗ С"х%–М~–.НЄ)Ÿ~ŒС4&В0НВb–o4НЅЎНЄ o/НЧDцС@& 5—oьˆ~ДєНЃ_5—oжl~ДѓŸOНƒlНƒlЌb%фвНƒlНЅЧЬ§ WНЪO+ьbЃdУьdЎdІ€НЬ$1?&ї†џ O_56~Є-НЬ$‰9ŽТЏ~Щ8ŸіНЪќ Wƒ&жDžŠЅ'НВmНЗ=ŸгНЅЧНЭМ4)%ггнІр&д3НХФжp'~УRЇ„Ё€'~з 1?&щ аНЭМ‰9žІ45–ы4*5‘ы&ф(5ŸІНЦŒНЦхŽ Lў tЦ НЅšЦзъ~жђЦЅНВo~Щ5НЦŒЦB} s&лс9'шюo9#&НЅЅНЄЅ'шйНВmНБV–&ННйНЕНЙŸЅ'шР†,НЃ_ n'†  иНЙŸ тНЃ_ n&З†"~Ђ‚НШ.O_4Ѕ&5–НЗ84Oуc%ЎeЃ #ЦD~ЌFюcэcь 3ЫяaЦџНВoЦЇНВoНГWНБF5Dч„я Т†O4НГWНБF4ЎŒ ‰%М J%ЦF~ЌFЦГНВoН‡H5 ІЄ'.4Ц ю"чРJ&ћцр'сЄ%цЄoфю"mр'4OP‚ыЄ‰3Ы5~Ѕš5‚Н•Ќќ Jƒ ‰4і [4Ѕ,'НЗ С"тЯчфЅ'НВmНГцэaНЪщцф4Ь ‰уb%qэbУ%jjф*ї]'L'`…'L'YЇфмМЋф%OL'J“!$EJ“гІфМ‰›К—КлЗзЗ5F—Мї [џ J–hL' “гІнІоŸ“"ІТЇ‚“&їŸo? ~ЌDоŸo?ІРЇ œ&їЮ (О J_ЏСo0‰\ё [#ђ~–Ы_\НЧI' І‘ы&4НЫ5ё [#ш9і ZЅ' НЗ С"гРзы9'гЙН•ЌНвVїџЅ'ЦЅНВoНвVЮџ4НЅЧНЪщoтŽ ˆlф0‰œ'#іjф'йЈ†#_4s \_\jф'сb&їзцdH†џНг"цcBmф' OНг"цaлчa з~Ќs5@Ж \'Ž (Oo‘LБ [#јžoН­ \Ж ]' ]Н­nФ†Œ†нъІc—ьŽ ‰Ÿю–ЦзэНжђ ю\С#є ьJ&э9цeсf&6 …џ@ †4НЉ(Žг_Ц Ір'ŽгlЦНЙЂŽг~ЦНЙЂЬd—ŒНЉQНЁq &љ9INSERT SOURCEINSERT DESTINATION DISKETTE AND PRESS 'ENTER'5 Ц Ž WІ‚4Z&љ–ы4nЄІ€—ыЦ Ю L~ЅšНЩ5лoтЅ' cфЦЅНВoНЩ5ЩНЅЧНЪщoт0щџlф0‰џœ$іjф'иX0nННЦŒНЦхО tюЎ 4PНЧі vНЭ4JФ?4‰OНЧyыф‰Ž4_Ўф' \0'сj&їЏфчdP†џ@me'%0kНг­НаYНЧНЧU0ІeЦDc„&J'c€Z&є~Чјc„Ўф' ьbыd‰эbO Ќ2ш$9mш~г&†џ0m O0ш—иНг­ЎhП WŽП |†Rі [\НФžёЬэˆцf')жифg' ьbыf‰НТцžёюdяцfо4Džёя НТъla5DZ&№žёЮ ‰я жифg' ogьjŠ€эˆ~Ы8+4'4ЦНеЮ€5Ю54PЦ€НЕ3„5ч„я5~ЅšНВmŽГW/~БFНЗ С"4НЗ8С""4НЗ8зэZС"5—ьзы9~ДJНВmŽБVжыоь4D­„5Dзыпь9УчМžR4пНЖT4_Žo€Z&ћ5Ю€–5НЖYЮŒЦŽŸюзъ~жђ'а‚НвVЦЅ' НЗ8С$о›НЅЧ4ŽЦo‚Z&ћO ыф\Р$ќЫm…&ѕLЇ…%ь2aŽ"œ'"жdНЪщs \ЮН•Ќ†—ъьНжђ …†РЗџHНзб'~жˆ%Ж †ŠЗџ@†SЗџHˆˆНзб&hНз№lŽџKPŽжOП ƒŽ ‰ЖџH†џЗ ‚ЦєїџHЖ †Š€Зџ@ц€чЄ њЖџHЏ„D—№&. ь–ь#&Є†—ъŽŸюЮO—ь_ІХ—эНжђ\С%є–ьL#%ъ~вЭ †џ@~зŽ ‰Ь N)_4ЮцХзэЮждЦ–ьЇ€o€–эЇ€Ц 5\С%лЬШNч€J&ћ94ьСє5Z&ѕ9ѕўїN ѕћџїN&TnŸР 4Цї ˆ5b №' –№Ц<…@&Ц(~ЌF4–ъ5&*} ‡'%4V†—ъоюŽŸю3пю†—ъ–№& _І€ЁР&Z&ї5V95Vz ˆ&БЦH Н_Њ'Sˆ&лї ‡Ÿ4v†4 …жыŽиЖ †„ЈЊ…Š жьС%Š‰ŠЗ †Зџ@Х&НЇбНЇб=& №Žи•жъX­•5ж№' J'4 &ё Д†xЗ …5іŽ ~жыo…†ЗџHˆˆ$„—№9žŠ0'ЖџH…&ѕ9†аЗџHˆˆЖџH†€—№9Ž".0&ќ9†€Œ† 4Ž ~жы:ц„їџIбь'–ьЗџKЇ„†ЗџHˆˆБ&Ь„'—№5‚–эЗџJŽи‹П ƒžюЖџHЖ †Š€5žŠЮџHs ‚PїџHˆˆС€'ЦхФ& 1?&ј ‚Џ~зпц€їџKЗџ@ іЦхФ&1?&ј тіџKч€Зџ@ іЏЖџH„|—№9зИзазјзћABЖ ‚'О ƒЏj ‚;Жџ*њЖџЖ …'JЗ …& Ж †„АЗ †Зџ@~‰U4Ѕ'Н•–Е—и5нДO4VН•"Н’пйН™п'Н™Ы†—зН™КзН™Кпм л&ом5Vлпм0ŸНпб—з'Ÿ+\бж#_]'нZзРН™п'ƒ%08Н™ЫLCSгбнб/Н•Нš&Ьџџ эН•>^ рН•0‹ŸНCSƒ/~™4нЫ5 мН4–з@жР44 ЦНЌ3мЫ9нЫ5 мУ4–з цžНŸУ9нЭžУєŸНžЭ0‹У9Н™ЦŽ• Ž•­ЄоŠžН+œг"4`' Н“w5`3A­Є щ5`0“Š9­Ÿй‰ди4Є„Ёa5†žŠЦ4НБV_НЉЂНЉvНЖT 5зи'њŸй'1‰4vО’ЏP0П’ŽДJŸ0ЧНЙœ5іС('С<' 04v–№€'„0%ц€&ќц„S'S4Ёр&№4НЙX5НЙœНЙXНЙX5v~NO INDEX OR SECTOR PULSE, SYNTAX ERRORSEEK INCOMPLETEWRITE ERROR OR PROTECTEDHARD DRIVE NOT READY OR DIR NOT FOUNDOVERFLOW ERRORTRACK 0 NOT FOUND OR MEMORY OVERFLOWUNDEFINED LINEBAD SUBSCRIPT BAD ARRAY ZERO ERROR DIRECT STATEMENT MISMATCHED STRUCTURE OUT OF STRING SPACELENGTH OF ARRAY WRONGFORMULA TOO COMPLEXCYCLIC REDUNDANCY CHECK ERRORDATA ERRORID ADDRESS MARD NOT FOUNDDATA NOT FOUNDSECTOR NOT FOUND, I/O ERRORSEEK ERRORFILE NOT OPENBAD FILE DATADATA CHECK NO RETRY MODE, VERIFYOFFECC ERROR DURING VERIFY, BAD VERIFYBAD INTERLEAVE OR NAME ERRORBAD FILE MODENOT FORMATTED, BAD FORMAT, DISK FULLINPUT PAST END OF FILEFILE NAME BAD BAD OP CODE!BAD SECTOR ADDRESS#VOLUME OVERFLOW, OUT OF ROOM$BAD COMMAND%BAD UNIT NUMBER(CARTRIDGE CHANGED,COUNTER OVERFLOW ERROR@FLOPPY WRITE PROTECTED€DRIVE NOT READY OR OFF LINEџUNDEFINABLE ERROR CODE DRIVE CONDITION REPORTER BY SNAILSOFT SOFTWARE 1993 ЊџўъЋџџѓЛПћПџџџџџџџџџџџџџџџџџџџЛПџЛПџџіююџўююџџџџџ€џј?џџўююџўюяџџїЛПџџџџџџџџ№џџџџЛПџЛџџџїЊћЛЛПџџџџџџ€џ№?џџЛЛЎЛОЏЛџџїЛПџџџџџџџџџџџџџџџџџџџџџЛџџЛџџџіююџџџџўџџџџ€џр?џџўяюџюяяџџїЛџџџџџџџџџ№џџџџћџџЛџџџїЊЛЛћЛџПџџџџ€ Р?џџџЛџџПыЛџџїЛџџџџџџџџџџџџџџџџџџџџџџџџџџџџџіюяџяџџџџџџџ€?€?џџўџџўююџџџїЛџџџџџџџџџ№џџџџџџџџџџџѓъЛПџџџџџџ№?џџЛЛЎЛОЏЛџџїЛПџџџџџџџџџџџџџџџџџџџџџЛџџЛџџџіююџџџџўџџџџ€џр?џџўяюџюяяџџїЛџџџџџџџџџ№џџџџћџрЖџџ№э€џџ№,џџ№ А€џџ№pџџџ№x@џ€џџ№@џРџџ№џ€џџ№џ€џџ№џ€џџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџ<џѓ?џЯŸџџџџЬџџѓџџјўџџџџџїџџџѓ?џЯџџџџЯџЬџџџџџўўџЯџџџџїџџџѓ1žIсџџЯџЬЦ#џўў|`Ьpџџџїџџ$џ№<РУ’OџџЯџРђ8ђџўў#Щ'џџџїџџ<џѓ0РЧ’cџџЯџЬТyѓџўў|'Ш1џџџїџџ<џѓ$сУ’yџџЯџЬ’yѓЯџўўy'Щќџџџїџџ<Ÿѓ0сЩ’CџџЮЬТyђџўsў 'Ьaџџџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџїџџџџџ00100 ORG $E00 00110 START PSHS D,X,Y,U 00120 LDX $192 00130 STX OUT+1,PCR 00140 LEAX ERRDRV,PCR 00150 STX $192 00160 LDX #$B44A 00170 STX $9D 00180 LEAX SIGNON-1,PCR 00190 JSR $B99C 00200 PULS D,X,Y,U,PC 00210 ERRDRV CMPB #20*2 00220 BEQ EDRV2 00230 CMPB #30*2 00240 BEQ EDRV2 00250 BRA OUT 00260 EDRV2 PSHS D,X,Y,U 00270 LDA $F0 00280 CMPA #$80 00290 BEQ OK 00300 ANDA #$FF-$80 00310 OK LEAX TABLE,PCR 00320 LOOP LDB ,X+ 00330 BNE LOOP 00340 LOOP2 LDB ,X 00350 COMB 00360 BEQ LAST 00370 COMB 00380 PSHS B 00390 CMPA ,S+ 00400 BNE LOOP 00410 LAST PSHS X 00420 JSR $B958 00430 PULS X 00440 JSR $B99C 00450 JSR $B958 00460 JSR $B958 00470 PULS D,X,Y,U 00480 OUT JMP >0 00490 TABLE FCB $00 00500 FCB $01 00510 ERR01 FCC "NO INDEX OR SECTOR PULSE, SYNTAX ERROR" 00520 FCB 0 00530 FCB $02 00540 ERR02 FCC "SEEK INCOMPLETE" 00550 FCB 0 00560 FCB $03 00570 ERR03 FCC "WRITE ERROR OR PROTECTED" 00580 FCB 0 00590 FCB $04 00600 ERR04 FCC "HARD DRIVE NOT READY OR DIR NOT FOUND" 00610 FCB 0 00620 FCB $05 00630 ERR05 FCC "OVERFLOW ERROR" 00640 FCB 0 00650 FCB $06 00660 ERR06 FCC "TRACK 0 NOT FOUND OR MEMORY OVERFLOW" 00670 FCB 0 00680 FCB $07 00690 ERR07 FCC "UNDEFINED LINE" 00700 FCB 0 00710 FCB $08 00720 ERR08 FCC "BAD SUBSCRIPT" 00730 FCB 0 00740 FCB $09 00750 ERR09 FCC "BAD ARRAY" 00760 FCB 0 00770 FCB $0A 00780 ERR0A FCC "ZERO ERROR" 00790 FCB 0 00800 FCB $0B 00810 ERR0B FCC "DIRECT STATEMENT" 00820 FCB 0 00830 FCB $0C 00840 ERR0C FCC "MISMATCHED STRUCTURE" 00850 FCB 0 00860 FCB $0D 00870 ERR0D FCC "OUT OF STRING SPACE" 00880 FCB 0 00890 FCB $0E 00900 ERR0E FCC "LENGTH OF ARRAY WRONG" 00910 FCB 0 00920 FCB $0F 00930 ERR0F FCC "FORMULA TOO COMPLEX" 00940 FCB 0 00950 FCB $10 00960 ERR10 FCC "CYCLIC REDUNDANCY CHECK ERROR" 00970 FCB 0 00980 FCB $11 00990 ERR11 FCC "DATA ERROR" 01000 FCB 0 01010 FCB $12 01020 ERR12 FCC "ID ADDRESS MARD NOT FOUND" 01030 FCB 0 01040 FCB $13 01050 ERR13 FCC "DATA NOT FOUND" 01060 FCB 0 01070 FCB $14 01080 ERR14 FCC "SECTOR NOT FOUND, I/O ERROR" 01090 FCB 0 01100 FCB $15 01110 ERR15 FCC "SEEK ERROR" 01120 FCB 0 01130 FCB $16 01140 ERR16 FCC "FILE NOT OPEN" 01150 FCB 0 01160 FCB $17 01170 ERR17 FCC "BAD FILE DATA" 01180 FCB 0 01190 FCB $18 01200 ERR18 FCC "DATA CHECK NO RETRY MODE, VERIFYOFF" 01210 FCB 0 01220 FCB $19 01230 ERR19 FCC "ECC ERROR DURING VERIFY, BAD VERIFY" 01240 FCB 0 01250 FCB $1A 01260 ERR1A FCC "BAD INTERLEAVE OR NAME ERROR" 01270 FCB 0 01280 FCB $1B 01290 ERR1B FCC "BAD FILE MODE" 01300 FCB 0 01310 FCB $1C 01320 ERR1C FCC "NOT FORMATTED, BAD FORMAT, DISK FULL" 01330 FCB 0 01340 FCB $1D 01350 ERR1D FCC "INPUT PAST END OF FILE" 01360 FCB 0 01370 FCB $1F 01380 ERR1F FCC "FILE NAME BAD" 01390 FCB 0 01400 FCB $20 01410 ERR20 FCC "BAD OP CODE" 01420 FCB 0 01430 FCB $21 01440 ERR21 FCC "BAD SECTOR ADDRESS" 01450 FCB 0 01460 FCB $23 01470 ERR23 FCC "VOLUME OVERFLOW, OUT OF ROOM" 01480 FCB 0 01490 FCB $24 01500 ERR24 FCC "BAD COMMAND" 01510 FCB 0 01520 FCB $25 01530 ERR25 FCC "BAD UNIT NUMBER" 01540 FCB 0 01550 FCB $28 01560 ERR28 FCC "CARTRIDGE CHANGED" 01570 FCB 0 01580 FCB $2C 01590 ERR2C FCC "COUNTER OVERFLOW ERROR" 01600 FCB 0 01610 FCB $40 01620 ERR40 FCC "FLOPPY WRITE PROTECTED" 01630 FCB 0 01640 FCB $80 01650 ERR80 FCC "DRIVE NOT READY OR OFF LINE" 01660 FCB 0 01670 FCB $FF 01680 ERRFF FCC "UNDEFINABLE ERROR CODE" 01690 FCB 0 01700 SIGNON FCB 13 01710 FCC "DRIVE CONDITION REPORTER " 01720 FCB 13 01730 FCC "BY SNAILSOFT SOFTWARE 1993" 01740 FCB 13 01750 FCB 13 01760 FCB 0 01770 END START RE 1993" 01760 FCB 13 01770 FCB 13 01780 FCB 0 01790 END START ќ(440Ь€§(­Ÿ(ܘ§(50­Ÿ(5§(9–љHHH˜љH ќ ћ њ љмљ& мћ&Ьџџнљнћ–ќ9ŽdšцІч*Pч‹@цІч„*Pч9мЯбYI“г%“г ббYI“г%“г ббYI“г%“г ббYI“г%“г ббYI“г%“г ббYI“г%“г ббYI“г%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ и'№Н›˜;'ѕ''ёX'В чO& жо\[ZС"cзо9V&жпTTРGС"PXX4Ь~~Ћфррнп9L&#жс-]'7зсх$ќ9 и' Н›˜.'Н›тC9 х9T& жт]'зт9~›ЌP&$НœЫ]&~ДJ–хžп4†~—п—рх5—хŸп9oт @N&Н›˜A%G#Н›О #€AŽœ[ц† и'Н›˜#'+&\ -&Z Н›тZС "І4жс–т=не3a–о",ŽœbЦ=:5X:1„Eну –п –р ђ†~Зџ ЎЄ0&ќ9ŽœzЦ =:5:ну –п –р ђ†~Зџ І„J&§9Цџ–х'‹=DV94 и'MžйІ€Ÿй и '№5ъ+'<-'<>'B<'9='?НЊ%$_€0—з† =M&лз% и'Н›˜НЊ$ц иžй0Ÿй9~ДJ\'њ9]'іZ9]'ёT9]+ьX94`НЗ5рНœЦНЌ3жиžй4~š2žй4Н›˜НГЂ%ФН›˜;&љ5оІ4@ŸІНВ„5ŸІ9O‹му' t“ену" уф5юg„4; ЈzdP=+ ћэпгЧЛБІ”‹ƒ|unІœ“‹ƒ{tmga[VQLGC?;741.+(&#!žŠЦ4зТŸеН•šНБVНЖT Н›˜~›О5зи'њŸй'ъ и'№Н›˜;'ѕ''ёN&е щB&ж сX'–M'*4Ц и'Н›˜НГЂ4Н›т5$Њ5C'(A'.S'2U'\D'UL'LR'C€E'/J''J'2J'~ДJН•]зВН•š „С$язш іС?$чзщ юOX!O YOM POD IOžŠ DO: їO O2žŠ 3НœЦНЌ3жиžй4~œЦжщ'OЇт* НŸЕ0DVDVmр*@P‚994к54д5žш4 mф'пjф є5 оŠгЧ+žŠгЩ+ƒ%ЮџŒР%ŽПмЧнНмЩнПŸХпУ е&ŸЩпЧН” ж&Н”Ёеж~œнН›˜4Нž^4Н›˜,&џНž[5@5+'-&І0~ЫН›˜+'-'Н›тO4НœЫ5M'OP‚9ўХћ1ђєћJQь„aљсЧxЎдмŽ;ХхЂiЕЕ@&ŸН•"Н“ВН“ЎФŸЫЎBŸЭНВmНЗ=ЮЯЏФН“ †—ТН•ŽЅ'НВmНБA–O‹—OНЗ@–Ж…'0‹ŸбЦзТзиНŸт4НŸтнй54ž?Ь&4ОР –""ЇЬЇ„†"Ї5э‹4­ŸРm'к5Ц(~ЌF5ќ&ƒOS'FП&&~ шЬ;;§§§9“г%мгнУІф% мЭ“Х$O_ мЭгХ%“е%менХ и&P5и%“й' \С&L_„~ž§9žЯьФ'ƒ!94vodІc=эfьa=ыf‰эeцфІc=уeэe$ldІфцb=уdэd5і~”Ё_Ѕ'НВmНБA–O‹—OНЗФ?˜ФDDD9цррMр—рЕрЁрџс~ ^42!сŽр2–ч'\Žр;'UŽрD PЬрLиLи42!­ŽрpŽрl–ц#Žрy€ІІЇ~р‚L€РL€РІ€ЗџŽџ˜І€Ї Œџ %і5В460DR5Ж460:4ч„DЦ85ч„5Ж460&4Ц6ч.5Ц9ч5Ж4604Ц4ч5Ц5ч5Ж89:;<=>?80123=5?Žџ ЦІ€Ї Z&љ9н@ьфнBьbнD_їџ‘оDмB4м@Џ9Pн@5нBпDЦїџ‘ЮпџмD4мB4м@9 A&–Bb#Ю~Из†bЮсX—B~И–B)#~Из†)Юс] ысХс’тdсІ3JmФ&ж0І€„b%€bЮсX ч€)Юс] рт%ј#nŸ7€тŽт6~­дСR%СZ#nŸ<РRС$4НВb5Žт~~ВЮWIDTШPALETTХHSCREEЮLPOKХHCLгHCOLOвHPAINдHCIRCLХHLINХHGEдHPUдHBUFЦHPRINдERвBRЫLOCATХHSTAдHSEдHRESEдHDRAзCMаRGТATTві6х№цˆхEцЯцєыѕъIш‚эхэээXя?удуцјвљ%чaчeѓцvцtљЙLPEEЫBUTTOЮHPOINдERNЯERLIЮхsхБш\фщф§Ž€чНЙœŽтїНЙœ~€ИŽтЂ~РЩŽу~РмDISK EXTENDED COLOR BASIC 2.0 COPR. 1981, 1986 BY TANDY UNDER LICENSE FROM MICROSOFT AND MICROWARE SYSTEMS CORP. DISK EXTENDED COLOR BASIC 2.1 COPR. 1982, 198