NTRY BELOW"AС4Ю:З@2,"rainbow checkbook version 1.0":З@47,"BY":З@73,"RICHARD WHITE":Зд7)"COPYRIGHT (C) 1984":З:З:Зд8)"lOAD FILE":З:Зд8)"nEW FILE"A╗>Бж1:ЕI$│"L"Бж950:Бе100:ДЕI$┤▓"N"з2110BCЮ:З@96," enter account name":╗ЙAN$:З:З" enter bank name":╗ЙBA$:З:З" enter account #":╗ЙAC$B╪HЮ:Бж50:З:З:З"ENTER LAST BANK STATEMENT BALANCE ";:╗ЙI$:BB│ Й(I$):З@128, б(64,32):З@128,"note: REPORTED CHECKBOOK BALANCE WILL NOT MATCH YOUR BALANCE UNTIL OUTSTANDING"CTMЗ"CHECKS, CHARGES, DEPOSITS AND CREDITS AT STATEMENT TIME ARE ENTERED.";:Бж1:CB│BB:Бж52:Бж54:Бж56:З@128, б(192,32)CПRЗ@320,"ENTER OUTSTANDING ITEMS ";: PO│224:PS│POC╬\З@PO,"";:Бж1:VI│ Й(I$):ЕFG│0░(VI▓0▒ I$│ Л(13))Бж60:Бе2140 D8fJ│ Ю(1,"DAVES"л Л(94)л Л(10),I$):ЕFG│0зИJ Бж62,64,66,200,900,68,18:ДИJ Бж2160,2160,2160,200,900,17,18DHkЕJ│5 зБе100D_mЕCR│LR з2130:Д2140DepРDt'╪"RNBWCKBKDВ't└1:Бе2000D┤N АX│0е64:З@X, Л(32лX):З@Xл96, Л( Ж(1024лX));:Л0,23,9,53,55,42,53,43,52,49E1юЖ 50,54,13,52,45,44,49,4D,45,4E,53,49,4F                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                INE 605 BP=PEEK(150):BU=INSTR(1,"16*18**41******87**************180",RIGHT$(STR$(BP),LEN(STR$(BP))-1)):BU=9600/BU8ш]Т65494,0:BP│ Ж(150):BU│ Ю(1,"16*18**41******87**************180", П( И(BP), З( И(BP))м1)):BU│9600оBU9[bЮ:З@137,"PRINT ROUTINES",,," CURRENT BAUD RATE ="BU,д6)"RESET BAUD RATE",,," PRINT",,,," RETURN":CT│1:gCT$│ П( И(CT),1):LP│ Ю(1," 1 2 3",CT$):LP│LPн32л2:З@LP,">";:Бж1:З@LP," ";:ЕI$│ Л(10)░CT┤3зCT│CTTл1:Бе615:ДЕI$│ Л(94)░CT▓1зCT│CTм1:Бе615:ДЕI$┤▓ Л(13)з615:ДИCT Бе620,630,100:АlЗ" ";:Й"ENTER NEW BAUD RATE";BU$:BU$│ О(BU$,1):BL│ Ю(1,"361249",BU$):ЕBL│0зЗ"baud rate error":а100,50:Бе605:╤qBU(1)│180:BU(2)│87:BU(3)│41:BU(4)│18:BU(5)│6:BU(6)│1:BU│BU(BL):Т150,BU:Бе605;wvЮ:З@96,"SET PRINTER AND PAPER AND PRESS any key.":Бж1:АX│1е3:З#м2," ":Л:З#м2,д8)"ACCOUNT NAME: "AN$:З#м2,д8)"BANK NAME: "BA$:З#м2,д8)"ACCOUNT NUMBER: "AC$AОБж985:Щ"O",D,NM$:З#D,LR:З#D,BB:З#D,CB:З#D,AN$:З#D,BA$:З#D,AC$:З#D,DA$:АX│1еLRм1:З#D,A$(X):З#D,A(X,0):З#D,A(X,1):Л:Ъ:Р>Э╢Ю:З@8,RC$,д11)"LOAD DATA",,,,,д8)"tAPE",,,,д8)"dISK":Бж1:ЕI$│"D"зD│1:ДЕI$│"T"зD│м1:Д950?└Бж985:Щ"I",D,NM$:Й#D,LR,BB,CB:╗Й#D,AN$:╗Й#D,BA$:╗Й#D,AC$:╗Й#D,DA$:Бж970:АX│1еLRм1:Й#D,A$(X):Й#D,A(X,0):Й#D,A(X,1):Л:Ъ?[┬CR│1:Бж16:Е Й(CC$)│0зA(0,1)│A(1,1)мA(1,0):ДA(0,1)│A(1,1)лA(1,0)?Е┼З:З"PRESS ANY KEY TO CONTINUE ":Бж1:Р?¤╩Ю:З@98,"FILENAME= "NM$:З:З" ACCOUNT INFORMATION":З:З"NAME: "AN$:З"BANK: "BA$:З"ACCT #: "AC$:З"FILE UPDATED: "DA$:Р@$┘З:ЕD│м1зЗ"TAPE FILE":ДЗ"DISK FILE"@^▐З:З"FILENAME";:ЕD│1зЗ" AND EXTENSION: ",NM$:ДЗ": "NM$@{у╗ЙI$:ЕI$┤▓""зNM$│I$:Р:ДР@Ч╨Х3500:МA$(100),A(100,1)A RC$│"RAINBOW CHECKBOOK":SS$│"##,###.##":SN$│"% %":CR│1:LR│1:S4$│"% %":CS$│"O":A$(0)│" $ $ $FIRST E/ЦЕCR│LR з110:Д120/lаЕCS$│"O"зCS$│"C":Бж15:Бж38:Е О(CC$,4)┤▓"CORR"зЕ Й(CC$)│0зBB│BBлCA :ДBB│BBмCA :Д:Д170/РеЗ@371,"";:З═SS$;BB;:З@343,"";:Р/╪кCS$│"O":Бж15:Бж38:Е О(CC$,4)┤▓"CORR"зЕ Й(CC$)│0зBB│BBмCA :ДBB│BBлCA/№пЗ@371,"";:З═SS$;BB;:З@343,"";:Р0А╚Ю:Бж50:З@72,"UNEDITED ENTRY":З@201,"EDITED ENTRY":З@321,"TYPE FIELD ENTRY CORRECTION"," FOR NEXT FIELD":ЕFG│1зTF│1:FG│01╥I$│ Т:PS│96:Бж16:Бж15:З@224, б(95,32);:З@416,"nEW #, dEP, aDJ, -=DELETE, +=ADDUP/DOWN ARROWS, rETURN ";:PS│224:CT$│CC$:TA│CA1m╫Бж1:ЕI$│ Л(13)зЗ@224,CC$;:Бе240:ДJ│ Ю(1,"NDA-+R"л Л(94)л Л(10),I$):ИJ Бж220,26,28,225,230,217,235,2371Ъ╪ЕFG│1зFG│0:Бе210:ДЕI$┤▓"R"з:Бе240:ДFG│TF1а┘Р1▌▄З@224,"";:Бж1:VI│ Й(I$):ЕI$│"A"зБж28:ДЕI$│"C"зБж29:ДБж221у▌Р2VсАX│CR еLRм2:A$(X)│A$(Xл1):A(X,0)│A(Xл1,0):Е Й(CC$)▓0зA(X,1)│A(Xл1,1)лCA:CB│CBлCA :ДA(X,1)│A(Xл1,1)мCA:CB│CBмCA2▒уЛ:З@96, б(95,32);:CC$│"":CD$│""::CA│0:CS$│"":CN$│"ITEM DELETED":CR│CRм1:LR│LRм1:FG│1:Р3IцCC$│" ":CD$│" ":CS$│" ":CA│0:TA│0:CN$│"MAKE NEW ENTRY":FG│1:АX│LR еCRл1йм1:A$(X)│A$(Xм1):A(X,0)│A(Xм1,0):A(X,1)│A(Xм1,1):Л:CB│A(Xм1,1):LR│LRл1:Бж383└шPS│96:Бж16:Бж15:З@416,"nEW #, dEP, aDJ, -=DELETE":З б(28,32);:PS│224:Бж1:FG│0:J│ Ю(1,"NDA-",I$):ИJ Бж220,26,28,2253╥ъЕJ▓0з240:Д2324ыFG│1:ЕCR▓1зCR│CRм1:Бж16:PS│96:Бж15:PS│224:Р:ДР4;эFG│1:ЕCR┤LRм1зCR│CRл1:Бж16:PS│96:Бж15:PS│224:Р:ДР4КЁЗ@416, б(45,32):Бж30:Е Й(CT$)│0зЕ Й(CC$)│0зTA│CAмTA:Бе242:ДTA│мTAмCA:Бе2424нёЕ Й(CC$)│0зTA│TAлCA :ДTA│TAмCA5ЄЗ"TA"TA,"CA"CA;:АX│1е2000:Л: АX│CR еLRм1:A(X,1)│A(X,1)лTA:Л:CB│A(CR,1):З@247,═SS$;CB;:╗ЙI$:ЕI$┤▓""зCS$│I$5CЇЗ@256,═SN$;CS$;:╗ЙI$:ЕI$┤▓""зCN$│I$5\ЎЗ@259,CN$:Бж38:Бе2105╩РЮ:З@8,RC$," STRIP & SAVE CLEARED ITEMS",,,,,д8)"tAPE",,,,д8)"dISK",,:Бж1:ЕI$│"D"зD│1:ДЕI$│"T"зD│м1:Д4005ўЪЗ:З:ЕD│м1зЗ" TAPE FILE":ДЗ" DISK FILE"6!ЯЗ:З"FILENAME";:ЕD│1зЗ" AND EXTENSION"6Zд╗ЙCF$:Бж4:CT│0:АCR│1еLRм1:Бж16:ЕCS$│"C"зCT│CTл1:Л:ДЛ6лйЩ"O",D,CF$:З#D,CTл1:З#D,BB:З#D,CB:З#D,AN$:З#D,BA$:З#D,AC$:З#D,DA$:АCR│1еLRм16хоБж16:ЕCS$│"C"зЗ#D,A$(CR):З#D,A(CR,0):З#D,A(CR,1):Л:ДЛ7e│Ъ:CT│0:Щ"O",D,NM$л"/BAK":З#D,LR:З#D,BB:З#D,CB:З#D,AN$:З#D,BA$:З#D,AC$:З#D,DA$:АX│1еLRм1:З#D,A$(X):З#D,A(X,0):З#D,A(X,1):Л:Ъ7─╕Ъ:CT│0:АCR│1еLRм1:Бж16:ЕCS$│"O"зCT│CTл1:A$(CT)│A$(CR):A(CT,0)│A(CR,0):A(CT,1)│A(CR,1):Л:ДЛ7Ё╜АX│CTл1еLRм1:A$(X)│"":Л:LR│CTл1:CR│CT:Р8X:ГTARGET L ╡& Бе10100&HЗ Л(191);:I$│ Т:ЕI$│""зАX│0е5:Л:З Л(8);:Бе1:ДЗ Л(8);:Р&bF│ Ю(F1,A$(V),"$"):Р &~З:З"current date: ";DA$&Ы╗ЙI$:ЕI$┤▓""зDA$│I$:Р:ДР&╦ LC$│CC$:LD$│CD$:LA│CA:LB│CB:LS$│CS$:LN$│CN$'' З@96,═S4$;LC$;:З" "LD$:З@108,═SS$;LA:З@119,═SS$;LB;:З б(63,32);:З@128,═SN$;LS$;:ЗLN$:Р'╝ F1│1:V│CRм1:Бж2:LC$│ Р(A$(V),F1,FмF1):F1│Fл1:Бж2:LD$│ Р(A$(V),F1,FмF1):LS$│ Р(A$(V),Fл1,1):LN$│ Р(A$(V),Fл3, З(A$(V))мFл3):LA│A(V,0):LB│A(V,1):Р'ЇCC$│LC$:CD$│LD$:CA│LA:CB│LB:CS$│LS$:CN$│LN$:ЕF1│2зР(VЗ@PS,═S4$;CC$;:З" "CD$:З@PSл12,═SS$;CA:З@PSл23,═SS$;CB;:З б(63,32);:З@PSл32,═SN$;CS$;:ЗCN$:Р(щF1│1:V│CR:Бж2:CC$│ Р(A$(V),F1,FмF1):F1│Fл1:Бж2:CD$│ Р(A$(V),F1,FмF1):CS$│ Р(A$(V),Fл1,1):CN$│ Р(A$(V),Fл3, З(A$(V))мFл3):CA│A(V,0):CB│A(V,1):Р)ЕCR▓1зCR│CRм1:Бж14:Бж12:Бж11:Р:ДР)eЕCR┤LRм1зCR│CRл1:Бж10:Бж16:Бж15:Р:ДБж10:З@224, б(95,32):FG│0:ЕCR┤LR зCR│CRл1:Р:ДР)▒ЕI$│ Л(13)зCC│CCл1:CC$│ И(CC): CC$│ П(CC$, З(CC$)м1):З@224,═S4$;CC$:Р)√ЕVI▓0зЗ═"#";VI;:╗ЙI$:CC$│ И(VI)лI$:CC$│ П(CC$, З(CC$)м1):CC│ Й(CC$):Р*CC$│"DEP":З@224,CC$;:Р *5CC$│"ADJ":З@224,CC$;:Р *QCC$│"CORR":З@224,CC$;:Р*uЗ@229,"";:╗ЙI$:ЕI$┤▓""зCD$│I$ *ОЗ@229,═"% %";CD$ *┼ З@236,"";:ЕFG┤▓1з╗ЙI$:I│ Й(I$):ЕI┤▓0зCA│I :Д:ДCA│0*┌"З@236,═SS$;CA;:Р*¤$Е Й(CC$)│0зCB│CBлCA :ДCB│CBмCA+8%З@247,═SS$;CB;:З═SN$;CS$;:╗ЙI$:ЕI$┤▓""зCN$│I$:ДCN$│" "+~&A$(CR)│CC$л"$"лCD$л"$"л О(CS$,1)л"$"лCN$:A(CR,0)│CA:A(CR,1)│CB:Р +м(CR│CRл1:LR│CR:Бж10:З@224, б(95,32):FG│0:Р+▀2З@8,RC$,"ITEM DATE AMOUNT BALANCE":Р , 4З@352,"LAST BANK BALANCE ";:З═SS$;BB:Р,Q6З@384," =NEXT CHECK #","1ST DIGIT STARTS NEW # SERIES":Р ,е8З@448,"dEPOSIT aDJUSTMENT vOID cLEARED eDIT sAVE lOAD nEW MONTH " Л(94)"'S";:Р ,т:З@448,"dEPOSIT aDJUSTMENT vOID","eDIT sAVE" Л(94)"'S";:Р,¤<Бж22:Бж30:Бж36:Бж40:Р ->Бж26:Бж30:Бж36:Бж40:Р-1@Бж28:Бж30:Бж36:Бж40:Р-bBI$│ Л(13):Бж22:FG│1:Бж30:Бж36:FG│0:Бж40:Р -ЪDЗ@320,"REVIEW ENTRIES ";:PO│335:FG│1:Бж17:Р-ЎdЮ:PS│224:Бж50:Бж52:Бж54:Бж56:З@128, б(192,32):CR│LR:Бж12:Бж11:F1│2:Бж14:F1│0:CC│ Й(CC$).*nЗ@320,"ENTER OUTSTANDING ITEMS ";:PO│224.gxЗ@PO,"";:Бж1:VI│ Й(I$):ЕFG│0░(VI▓0▒ I$│ Л(13))Бж60:Бе120.ьВJ│ Ю(1,"DAVCESLN"л Л(94)л Л(10),I$):ЕFG│0зИJ Бж62,64,66,160,200,900,950,400,68,18:ДИJ Бж2160,2160,2160,160,200,900,950,400,17,18.■МЕJ▓4 ░J┤9з100╢0╞А╜й*O_В╞Н~LБ@&єOНvЖ?НrZ*ЎО0▒О ╠ эБ1?&·№0▒НnО0│ьДэ4НO50М0┼&яьэ4нЯа ьД5Б "j&l lжБ>#j┴ "j&l lц┴#j10АОP╜з╙╜б┴'в94О0Ш44~и╫жДЪЖзД5Ж4О0м44~и╫╜и╡5Ж 0│CS$:LN$│CN$'' З@96,═S4$;LC$;:З" "LD$:З@108,═SS$;LA:З@119,═SS                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                0,4E,41,4D,45,9,44,49,52,45,43,54,4F,52,59,B,46,49,4C,45,20JЩ Ж 45,58,49,53,54,53,E,46,49,45,4C,44,20,4F,56,45,52,46,4C,4F,57,19,53,45,54,20,54,4F,20,4EJ° Ж 4F,4E,2D,46,49,45,4C,44,45,44,20,53,54,52,49,4E,47,6,56,45,52,49,46,59,17,41,43,43,45,53K4 Ж 53,20,50,41,53,54,20,45,4E,44,20,4F,46,20,46,49,4C,45KD Т &HC000,68KP Т&H71,0K\в&HA027C#▓╟вCпFг['W#"#K&F.`Te PФEД ЕAБL-`A'i<хвTЕLЕL├E"M`EAБPа@Б БLt e`AЧЖЕвЕвP#e3s!a/y▒K╡YбTз 'o!o/b!cб▒L╡│╖Т#C3A;┼#lе│г"з е03@#╫#ф/zз"гEбNз ЗoЗlД`ГAS                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ,9F,76,9E,DC,9F,2B,10,DE,21,CC,AD,C4,34,6,F,6F,7E,AE,A9,8D,3C,BDAЫ▄Ж D1,E5,34,4,BD,CA,3B,35,4,BD,A7,E9,BD,AD,33,F,6F,BD,B9,5C,54,8D,6,BD,B9,A2,7E,AC,65,1FAў▌Ж 98,8E,DD,C5,5F,3A,E6,80,4A,2A,FA,39,8D,F,7E,C9,90,F,EA,C6,1,D7,EB,8D,14,A,EB,2A,FA,34BV▐Ж 16,9E,8A,9F,DC,CC,FF,FF,DD,76,97,5A,35,16,39,34,76,86,1,7E,D6,70,DC,76,10,83,FF,FF,10,26Be▀Ж FE,BD,7EBxрА I │ 1 е 123BДсН BYTE$BгтТ 56737лIм1, Й("&H"лBYTE$)BйуЛCфЖ B4,F4,4F,D6,5A,10,2A,FE,B3,1D,20,F3,D6,5A,2A,2,5F,A1,BD,DD,61,1F,13,BD,B5,F,27,5,1E,13CeхЖ BD,A5,9A,7E,B6,9B,10,4E,45,58,54,20,57,49,54,48,4F,55,54,20,46,4F,52,6,53,59,4E,54,41,58C─цЖ 14,52,45,54,55,52,4E,20,57,49,54,48,4F,55,54,20,47,4F,53,55,42,B,4F,55,54,20,4F,46,20,44D!чЖ 41,54,41,D,46,55,4E,43,54,49,4F,4E,20,43,41,4C,4C,8,4F,56,45,52,46,4C,4F,57,D,4F,55,54D0шЖ 20,4F,46DCщА I │ 1 е 123DOъН BYTE$DnыТ 56860лIм1, Й("&H"лBYTE$)DtьЛD╥эЖ 20,4D,45,4D,4F,52,59,E,4E,4F,20,53,55,43,48,20,4C,49,4E,45,20,23,9,53,55,42,53,43,52,49E1юЖ 50,54,13,52,45,44,49,4D,45,4E,53,49,4F,4E,45,44,20,41,52,52,41,59,B,44,49,56,49,44,45,20EРяЖ 42,59,20,30,16,49,4C,4C,45,47,41,4C,20,44,49,52,45,43,54,20,43,4F,4D,4D,41,4E,44,D,54,59EЁЁЖ 50,45,20,4D,49,53,4D,41,54,43,48,13,4F,55,54,20,4F,46,20,53,54,52,49,4E,47,20,53,50,41,43E■ёЖ 45,F,53FЄА I │ 1 е 123FєН BYTE$F<ЇТ 56983лIм1, Й("&H"лBYTE$)FBїЛFвЎЖ 54,52,49,4E,47,20,54,4F,4F,20,4C,4F,4E,47,12,53,54,52,49,4E,47,20,54,4F,4F,20,43,4F,4D,50F ўЖ 4C,45,58,E,43,41,4E,27,54,20,43,4F,4E,54,49,4E,55,45,9,46,49,4C,45,20,44,41,54,41,C,41G]°Ж 4C,52,45,41,44,59,20,4F,50,45,4E,D,44,45,56,49,43,45,20,4E,55,4D,42,45,52,A,52,45,41,44G╗∙Ж 2F,57,52,49,54,45,9,46,49,4C,45,20,4D,4F,44,45,D,46,49,4C,45,20,4E,4F,54,20,4F,50,45,4EG╩·Ж 15,52,45G▌√А I │ 1 е 123Gщ№Н BYTE$H¤Т 57106лIм1, Й("&H"лBYTE$)H■ЛHn Ж 41,44,20,50,41,53,54,20,45,4E,44,20,4F,46,20,46,49,4C,45,16,44,49,52,45,43,54,20,43,4F,4DH╬Ж 4D,41,4E,44,20,49,4E,20,46,49,4C,45,12,55,4E,44,45,46,49,4E,45,44,20,46,55,4E,43,54,49,4FI+Ж 4E,C,4E,4F,20,53,55,43,48,20,46,49,4C,45,8,52,45,43,4F,52,44,20,23,9,44,49,53,4B,20,46IКЖ 55,4C,4C,13,4F,55,54,20,4F,46,20,42,55,46,46,45,52,20,53,50,41,43,45,D,57,52,49,54,45,20IЩЖ 50,52,4FIмА I │ 1 е 108I╕Н BYTE$I╫Т 57229лIм1, Й("&H"лBYTE$)I▌ЛJ:Ж 54,45,43,54,9,46,49,4C,45,2TE$8!мТ 55999лIм1, Й("&H"лBYTE$)8'нЛ8ВоЖ D9,20,D2,7C,1,D7,20,4A,81,13,27,59,81,D,27,6E,81,8,27,9,81,A,26,17,BD,DB,16,20,B8,7D8┘пЖ 1,D8,26,25,8D,2,20,21,7D,1,D7,27,3,7A,1,D7,39,81,15,27,11,81,C,27,D,81,3,27,9,8191░Ж 5C,26,8,BD,A1,B1,20,3,7F,1,D7,81,20,25,7,7D,1,D8,26,2,8D,5,35,14,32,62,39,8E,1,DA9Л▒Ж F6,1,D7,6D,85,27,3,7C,1,D7,39,6F,F8,1,86,40,BD,A2,82,BD,B9,58,C6,1,E7,E4,8E,2,DD,AF9Щ▓Ж 61,8D,E9м│А I │ 1 е 1239╕┤Н BYTE$9╫╡Т 56122лIм1, Й("&H"лBYTE$)9▌╢Л:7╖Ж 7E,DA,8B,7F,1,4A,6F,F8,1,8D,3,7E,DB,11,8E,2,DD,10,8E,1,DA,E6,80,E7,A0,26,FA,39,F,71:Ц╕Ж 7E,A0,27,BD,B7,3D,9F,2B,BD,B2,6D,BD,B7,3D,AF,9F,0,2B,39,B7,FF,D7,39,B7,FF,D6,39,81,4D,27:Ё╣Ж 3,7E,AE,75,BD,CE,E5,7F,FF,40,6E,9F,0,9D,BD,D8,1B,26,68,CC,0,A,FD,1,D1,FD,1,D3,9D,A5;N║Ж 27,1D,BD,B7,3D,DC,52,FD,1,D1,9D,A5,27,11,BD,B2,6D,BD,B7,3D,DC,52,27,45,FD,1,D3,9D,A5,26;]╗Ж 3E,86,FF;p╝А I │ 1 е 123;|╜Н BYTE$;Ы╛Т 56245лIм1, Й("&H"лBYTE$);б┐Л;°└Ж B7,1,49,39,7D,1,49,27,C,FC,1,D1,10,83,F9,FF,23,4,7F,1,49,39,F,87,F,70,ED,E4,F3,1Н BYTE$*1?Т 50589лIм1, Й("&H"лBYTE$)*7@Л*FAЖ 7E,D9,1A*WBА I │ 1 е 2*cCН BYTE$*ВDТ 54878лIм1, Й("&H"лBYTE$)*ИEЛ*ФFЖ 91,80*еGА I │ 1 е 2*▒HН BYTE$*╨IТ 54913лIм1, Й("&H"лBYTE$)*╓JЛ*тKЖ 91,80*єLА I │ 1 е 1* MН BYTE$+NТ 54580лIм1, Й("&H"лBYTE$)+$OЛ+-PЖ 27+>QА I │ 1 е 3+JRН BYTE$+iSТ 54681лIм1, Й("&H"лBYTE$)+oTЛ+}UЖ 16,3,D1+ОVА I │ 1 е 3+ЪWН BYTE$+╣XТ 53871лIм1, Й("&H"лBYTE$)+┐YЛ+╬ZЖ 7E,D9,8D+▀[А I │ 1 е 2+ы\Н BYTE$, ]Т 53916лIм1, Й("&H"лBYTE$),^Л,_Ж 96,80,-`А I │ 1 е 3,9aН BYTE$,XbТ 50936лIм1, Й("&H"лBYTE$),^cЛ,mdЖ 7E,D9,B5,~eА I │ 1 е 1,КfН BYTE$,йgТ 55232лIм1, Й("&H"лBYTE$),пhЛ,╖iЖ 2,╚jА I │ 1 е 1,╘kН BYTE$,єlТ 55318лIм1, Й("&H"лBYTE$),∙mЛ-nЖ 16-oА I │ 1 е 123-!pН BYTE$-@qТ 55504лIм1, Й("&H"лBYTE$)-FrЛ-вsЖ 81,C0,10,26,F6,34,9D,9F,BD,B7,B,5D,27,39,C1,11,24,35,86,6,3D,DB,BC,1F,98,C6,1,1F,2,10-¤tЖ 93,B7,25,25,93,19,1F,3,D3,1B,1F,1,C3,0,C8,93,21,24,16,8D,B,27,6,1F,30,D3,A6,DD,A6,7E.YuЖ 96,B4,34,10,9E,68,30,1,35,10,39,7E,B4,4A,B7,9,76,A7,42,FC,1,4E,ED,45,7E,C5,A2,34,4,BD.▓vЖ BD,CC,BD,CD,1B,35,4,C1,9,22,3,BD,CD,1B,AE,62,EC,88,10,34,6,C6,8,BD,B5,F,35,6,BD,DC.┴wЖ DB,C6,F8.╘xА I │ 1 е 123.рyН BYTE$. zТ 55627лIм1, Й("&H"лBYTE$) %]&& Ю:З"COOKING WITH COCO DOS PATCH"&4 З"PART 7"&k З"USE ON COCO'S WITH THE PARALLEL PORT INSTALLED."&Р З:З"IF YOU HAVE NOT YET DONE SO"&мЗ"PUT YOUR DOS1.0 DISK"&┼З"IN DRIVE ZERO AND"&уЗ"BOOT UP EXTENDED COLOR"&№З"BASIC (KEY IN E)."'Й"HAVE YOU DONE THIS(Y/N)";A$'RЕ A$┤▓"Y"з З"PLEASE DO SO NOW AND RERUN THIS":С'uЗ"PATCHING, PLEASE WAIT......"'ЖА I │ 1 е 1'ТН BYTE$'▒Т 49533лIм1, Й("&H"лBYTE$)'╖Л'┐Ж 0'╨А I │ 1 е 3'▄Н BYTE$'√Т 49192лIм1, Й("&H"лBYTE$)(Л(Ж CC,D7,DD(!А I │ 1 е 3(- Н BYTE$(L!Т 53476лIм1, Й("&H"лBYTE$)(R"Л(a#Ж 7E,D8,24(r$А I │ 1 е 2(~%Н BYTE$(Э&Т 49416лIм1, Й("&H"лBYTE$)(г'Л(п(Ж DA,5A(└)А I │ 1 е 3(╠*Н BYTE$(ы+Т 49361лIм1, Й("&H"лBYTE$)(ё,Л)-Ж 7E,D9,94).А I │ 1 е 2)/Н BYTE$)<0Т 49444лIм1, Й("&H"лBYTE$))B1Л)N2Ж DD,6E)_3А I │ 1 е 2)k4Н BYTE$)К5Т 49432лIм1, Й("&H"лBYTE$))Р6Л)Ь7Ж DB,B9)н8А I │ 1 е 3)╣9Н BYTE$)╪:Т 52181лIм1, Й("&H"лBYTE$))▐;Л)э<Ж BD,D8,89)■=А I │ 1 е 3* >Н BYTE$*)?Т 52262лIм1, Й("&H"лBYTE$)*/@Л*>AЖ BD,D8,49*OBА I │ 1 е 3*[CН BYTE$*zDТ 50544лIм1, Й("&H"лBYTE$)*АEЛ*ПFЖ 7E,D8,3C*аGА I │ 1 е 2*мHН BYTE$*╦IТ 54641лIм1, Й("&H"лBYTE$)*╤JЛ*▌KЖ 91,80*юLА I │ 1 е 2*·MН BYTE$+NТ 54676лIм1, Й("&H"лBYTE$)+OЛ++PЖ 91,80+<QА I │ 1 е 1+HRН BYTE$+gSТ 54342лIм1, Й("&H"лBYTE$)+mTЛ+vUЖ 27+ЗVА I │ 1 е 3+УWН BYTE$+▓XТ 54443лIм1, Й("&H"лBYTE$)+╕YЛ+╞ZЖ 16,3,E1+╫[А I │ 1 е 3+у\Н BYTE$,]Т 53634лIм1, Й("&H"лBYTE$),^Л,_Ж 7E,D8,AF,(`А I │ 1 е 2,4aН BYTE$,SbТ 53679лIм1, Й("&H"лBYTE$),YcЛ,edЖ 96,80,veА I │ 1 е 3,ВfН BYTE$,бgТ 50891лIм1, Й("&H"лBYTE$),зhЛ,╢iЖ 7E,D8,D7,╟jА I │ 1 е 1,╙kН BYTE$,ЄlТ 54989лIм1, Й("&H"лBYTE$),°mЛ-nЖ 2-oА I │ 1 е 1-pН BYTE$-<qТ 55075лIм1, Й("&H"лBYTE$)-BrЛ-KsЖ 16-^tА I │ 1 е 123-juН BYTE$-ЙvТ 55261лIм1, Й("&H"лBYTE$)-ПwЛ-ыxЖ 81,C0,10,26,F6,4B,9D,9F,BD,B7,B,5D,27,4E,C1,11,24,4A,86,6,3D,DB,BC,1F,98,C6,1,1F,2,10.FyЖ 93,B7,25,3A,93,19,1F,3,D3,1B,1F,1,C3,0,C8,93,21,24,2B,8D,B,27,6,1F,30,D3,A6,DD,A6,7E.вzЖ 96,B4,34,10,9E,68,30,1,35,10,39,93,1B,34,6,8D,F1,27,6,EC,E4,D3,A6,DD,A6,35,6,D3,19,7E.¤{Ж D0,E8,7E,B4,4A,B7,9,76,A7,42,FC,1,4E,ED,45,7E,C5,75,34,4,BD,BD,CC,BD,CC,41,35,4,C1,9/ л&2В TO RETURN TO NORMAL LIST POKE422,57&Q X│256н Ж(116)л240:Х100,Xм1&gX│256н Ж(116)л240&АI│0е15:НA:ТXлI,A:Л&Щ(Т423, Ж(116):Т424,240&╒2Ю:З@134,"CHOOSE LIST VARIETY":З@166,"BY PRESSING 1 OR 2&√<З:З" 1. SLOW":З:З" 2. NO SCROLL'FK$│ Т:И  Й(K$) Бе140,90' PБе70'?ZX│256н Ж(116)л213:Х100,Xм1'hdX│256н Ж(116)л213:АI│0е15:НA:B│BлA:Л'ЖnАI│0е42:НA:B│BлA:ТXлI,A:Л'еxЕB┤▓6844зЮ:З"DATA ERROR":С'╜ВТ424,213:Т422,126:К(7МЮ:З@164,"FOR A FASTER SLOW LIST":З" PRESS A NUMBER KEY FROM":З" 1 THROUGH 4.":З" OTHERWISE, PRESS ENTER.(oЦK$│ Т:K│ Й(K$):ЕK┤5 ░ K▓0 з160:ДЕK$│ Л(13)з170:Д150(ЧаK│256о2пK:Т256н Ж(116)л249, Б(Kл.5)(жкТ422,126:К(╟┤Ж 52,16,134,254,145,111,39,6(ш╛Ж 142,0,0,189,167,211,53,144)╚Ж 220,136,159,66,227,132)"╥Ж 147,66,16,131,5,224,44)?▄Ж 1,57,182,2,220,129,155)[цЖ 39,248,129,182,39,244)wЁЖ 52,16,189,163,144,189)Т·Ж 169,40,48,95,189,185)кЖ 156,12,137,53,144,1:S│Sл500:З@1,S;)╦ЕSH│0з24)юЕ  Ж(343)│247зB│м2:ЕA│1504зB│0*Е  Ж(344)│24                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 :& Ю:X│256н Ж(116)л194:Х100,X&6X│256н Ж(116)л195&EАZ│X еXл60&Y(НA:B│BлA:ТZ,A:Л&v2ЕB┤▓5998зЗ"DATA ERROR":С&С<З@231," ";:Й"MARGIN";M&ЭFТXл60,M&║PЙ" LINE LENGTH";L&╠ZL│LлM:ТXл43,L&шdЕ Ж(32768)┤▓69зТXл11,57'nЕ Ж(186)│6зТXл12,130:ТXл13,115:ДТXл12,203:ТXл13,74'9xТ360, Ж(116):Т361,195'TВЖ 52,124,246,2,220,193'qМЖ 155,39,5,53,124,57,0,0'ОЦЖ 48,140,42,129,13,39,34'лаЖ 230,132,38,16,230,1,52'╞кЖ 6,231,132,134,32,189'у┤Ж 162,133,90,38,248,53,6(╛Ж 92,193,80,39,4,231,132(╚Ж 32,215,189,162,133,134(9╥Ж 13,111,132,32,206,0,0K$│ Т:K│ Й(K$):ЕK┤5 ░ K▓0 з160:ДЕK$│ Л(13)з170:Д150(ЧаK│256о2пK:Т256н Ж(116)л249, Б(Kл.5)(жкТ422,126:К(╟┤Ж 52,16,134,254,145,111,39,6(ш╛Ж 142,0,0,189,167,211,53,144)╚Ж 220,136,159,66,2                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 7& В**HEROIC FANTASY GMA 21-1&<шВ**SCAN CHARACTER TYPES&BЄЮ&[№П :ГSTART AT TOP&vБж 11010 :ГREAD RECORD&СБж 12010 :ГSHOW RECORD&пБж 10010 :ГTELL HOW AGAIN&╢K:Г&╙LВ**START OVER IF ENDFILE&ўVЕ KIN$│"ENDFILE" з 1020 :Д 1030&■п:Г'╨В**COMPUTE COST RATIOS'┌Ю'8фП :ГSTART AT TOP'SюБж 11010 :ГREAD RECORD'n°Бж 13010 :ГCOST RATIOS'ЙБж 14010 :ГSHOW RATIOS'з Бж 10010 :ГTELL HOW AGAIN'о3:Г'╦4В**START OVER IF ENDFILE'я>Е KIN$│"ENDFILE" з 2020 :Д 2030'ЎЧ:Г('В**DO AGAIN SUBROUTINE(='З @480, "TO DO AGAIN, PRESS space bar";(X'$Е  Т│"" з 10020 :Д Р(_'s:Г(x*°В**READ RECORD SUBR.(Ь+Н CODE$,KIN$,CLASS$,STR,CON,PTS(в+ Р(й+[:Г(┬.рВ**SHOW RECORD SUBR.).ъЗ @480, CODE$ д2) KIN$ д16) CLASS$ д19) STR д23) CON д27) PTS) .ЇР)/C:Г)+2╚В**COST RATIOS SUBR.)S2╥Е KIN$│"ENDFILE" з SC│0: CC│0: Р)d2▄SC │ STRоPTS)2цSC │  Б(100нSCл.5)о100)Р2ЁCC │ CONоPTS)л2·CC │  Б(100нCCл.5)о100)▒3Р)╕3+:Г)╒6░В**SHOW COST RATIOS SUBR*6║З @480, CODE$ д2) CLASS$ д5) STR д9) CON д13) PTS д17) SC д24)CC*$6─Р*+7:Г*H}В**HEROIC FANTASY GMA 21*_}В**CHARACTER TYPES*Д}В**CODE$,KIN$,CLASS$,STR,CON,PTS*Ъ} Ж F,FAIRY,F,1,1,1*░}Ж F,FAIRY,M,1,1,2*╚}Ж G,GREMLIN,F,3,4,3*у}(Ж L,LEPRECHAUN,M,3,4,4*√}2Ж H,HOBBIT,F,5,15,5+}<Ж H,HOBBIT,M,4,15,7++}FЖ K,GOBLIN,F,7,20,6+C}PЖ P,HUMAN,F,15,30,9+\}ZЖ P,HUMAN,M,10,30,11+s}dЖ E,ELF,F,25,25,15+К}nЖ E,ELF,M,20,25,18+г}xЖ D,DWARF,F,30,40,23+╝}ВЖ D,DWARF,M,30,40,36+╘}МЖ O,OGRE,F,35,40,29+ь}ЦЖ O,OGRE,M,35,40,46,}аЖ T,TROLL,F,50,50,57,}кЖ X,GIANT,F,60,60,72,6}┤Ж Z,ENDFILE,Z,0,0,0ROGRAM DIR2 OR DIR3 ON DRIVE 0",a┬Ж" ",В╠Ж"Program DIR2 explanation:",┤╓Ж" * THIS PROGRAM IS RUN AFTER PROGRAM DIR1",·рЖ" * READ DISK WORK FILE GENERATED BY PROGRAM DIR1 FROM DRIVE 0"-+ъ                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ,1)│"+"зЗ#м2,д5)"++++++++ +++ Fatal Disk Read Error 00 0 "; Р(R$,22,20):Бе610/О&Е  Р(R$,12,1)│"B" з FRMT$│"Binary" :Д FRMT$│"Ascii"/з0TYPE│ Й( Р(R$,13,1))/┴:BYTES│ Й( Р(R$,16,6))0DЕ HR$│ О(R$,13) ░ HBYTE$┤▓ Р(R$,16,6) з ERR$│"*":ERR│ERRл1:Бе600 :Д ERR$│""06NHR$│ О(R$,13):HBYTE$│ Р(R$,16,6)0█XЗ#м2,д5) О(R$,8);д14) Р(R$,9,3);д19)FRMT$;д27)FT$(TYPE);д43) Р(R$,14,2);:З#м2,д46);:З#м2,═"###,###";BYTES;:З#м2,д55) П(R$,20);:Е ERR$│"" з З#м2 :Д З#м2,д78)ERR$0хbL│Lл10ЎlЕJK│Pм1Бе7201vЕL▓60Бе4601АБе5301КЕL│66Бе67019ФЗ#м2:L│Lл1:ЕL┤▓66Бе6601CЮL│0:Р1Mиа10,31Ь▓Ю2:З@1,"PRINT CONSOLIDATED DIRECTORIES";:З@41,"PROGRAM 3 OF 3";:З@96,"";:Р1╡╝I$│ Т:ЕI$│""Бе700:ДР1╟╞АS│1е500:ЛS:Р1ъ╨ЕG┤▓6зЪ#1:G│Gл1:P│0:TT│0:Бе2002┌Бж690:З" PRINTING REPORT #7..."2`фБж650:З#м2,DA$;д15); Л(14);"disks directory summary"; Л(20);д47)"page 1 of 1"2mюЙ#1,T$,T2Д°ЕT$│"1"зЗ#м2:Бе7502вЕT$│"END"зЪ#1:З@416,"";:К2└ Е П(T$,7)│"flagged"зT│ERR3 J│40м З(T$):З#м2,д9):З#м2,═"#,###,###,###";T;:З#м2, б(J,".");:З#м2,T$3Ы Е( П(T$,7)│"flagged"░ERR▓0)зI│(ERRоTT)н100:I│Iл.25:I│ Б(I):З#м2,д9):З#м2,═"#,###,###,###";I;:З#м2,".............percentage versions flagged"3е*Бе7503└4Т65495,0 :Г<===== note3╩>Бж6903√HАX│1еPм1:P1│ Б((XоP)н100):З@96,P1;"% SORTED"46RАY│X еPм1:ЕD$(Y)┤D$(X)зS1$│D$(X):D$(X)│D$(Y):D$(Y)│S1$4A\ЛY:Л X4ZfЗ@96," 100 % SORTED"4xpЗ@160,Pм1"RECORDS SORTED"4ФzЕPм1▓50зЗ@224," WHEW!!"4гДАX│1е800:Л4░ОТ65494,04╢ШР4┼в╚0:└1:Бе70.5OJЗ@I3,"DIR. TRACK ERROR-CAN'T CONTIN.";:ЕP│1зБж225                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ╤0М ┐ 0М┐ b╢ В'\╛ Гпj В;╢ *N╢ ╢ Е'z Е& ╢ ЖД░╖ Ж╖ @ОRжАБ &МZ&ї ЦБ&   ЦБ&АЧОRжДК?зАМZ&ї;1Н^ЯЯЖзаЬ%&∙ pжА'╜г ў9Ю4 ЮИМ$ Й їЖАНE&ЖПН?'щБ& Ж5 здЯ ;Б&ЖПзЯИ5 1?Ь$1! ўЖзд4 Ж╜г Б #┤5 за4 мзЯИ╜б┴&Z&°9╜й(0НЕНЗ╜б┴'√А1%ўБ$єHОоЖ┐* ,O├;vvn~╜й(Ю T0Я W╜й( 0Н AН1ЦЧ  8Н(ЦЧЦ РЧ  )НЦЧ   ╜б┴Б'ЙБ &їО)ЯХ 3ЖА j&ЖП c'ЄБ &9Б0%щБ9"х╜г А0 &Ч ╪╞ ЫZ&√ єЮЯ_жА'(Б '$\╤ &є0Б 'Б.'Б!'Б;' Б-' Б?'жВZ у╫ ╞■╫oЮ╓'Ж ╜в┐Z&·╓ жАБ'KБ &%╓ &\Ж ╜в┐ Ц Б<'Z&Ё Ъ╞Ж ╜в┐Z&° МБ 'Б<&Ж╜в┐ЖEБ>&Ж╜в┐ЖR╜в┐Z&▒ ╣Ж ╜в┐o■й╜й(0Нn■/╜б┴'√Б'■Ф╞ ╗&НоНеЖI╞ ╧&~Ю&uзАM&Ї0Яц&e╞К&\■W╜й(О▌╠ UзАZ&√╢4Ж ╖0Нu¤╚╜гУ╤ .Є5ў9╞ ╫ Н╬0Нэ¤о╜б┴'√Б'■╞ Н;& О▌ЖO╞ P& ЮжАM' Г&ё Єz&шb&с╞Н&┘¤╘о]&╜зы╬╜з╩╚╫h╬╤o└╞ ч└Г┌%°╬╥цА┴ % ч└|╤Г┌%я9╜й(0Н¤"╜б┴'√¤КЖ ╖~а'4▄У'▐▌5Б ' EН.ОО▌О ЖO╞╩&W0Н4жА╞ч&JБ&є╞╠&?¤@╞i╞ь9НєНTО▌О ЖI╞Р&Ю╞┼&зАБ&є0Я╞Р&¤4╜й(50Н№ЖЖ/L└ $√╦:╜г Ш╜г ╜б┴'√№▌44╞ ╫ ■}5┤м4╜╩;5ў [╬ (О ЙoДп┴0ЙZ"ї╖Л■щБI'БO' ~ж╜ж)аO╜ж[ЩНn┐ W4НF5╜─hЗН\╜д7НT╫o╜╩S vНK╜вР oНD╫o╜вВ fН;p╜бзф [Н0╫o╜бvзф PН%ў З I╞ \жЕБ $∙oт╢ ZЧы╬ LЖ з└Г W&°~╚д4zOЛ╢О■ПЧ▀Ж~3Н╖О Пжф▀юfn°T\ _ Ц▐╖О П▐5z2b]9ОЯ ▄▌├ У%▄Г▌│Ю цд4О╜з╙╜б┴╞АчдО╜з╙5чдБ'сБ&и√ЭБ & 1и М "з ╞Б &1! юБ^& 1ирМ%ж нБ&1? юБ 'оБ\'°Н заМ "n НБ&Ж Б &Ж┐Б`%БА$А` Б@$Л@9Б &O Б┐&Ж Б@$Л` Б`%А@9╜й(ОЮжАН╢заЬ#ЎМ'Ж  Ё9ОЮжаН║зАЬ#Ў91й■Я Нц▄├У'■є■Є1йЯ Н╬▄ГУ%■█■┌!0М'&жДзВБ &ЮЯ0Я4 Нв5 ■╧0М'жДзВ єЮ0жД' *╖ 00жД'зВ ЎзВЯ■б!╜б┴'√Б'■Ф 4жАМ'*цДзАМ'ЙБ &ёМ 'ь4ЮЯ0Я5зД5за ┐Й■эЮ0цДзАЙБ&ЎзДЯ5заМ #Ю  ▄├▌├ У%▄Г▌■╙О { TO EXIT. ERROR # LOAD/SAVE ROUTINE PRESS break TO EXIT enter FILE NAME: BUFFER EMPTY A SIMPLE TEXT PROCESSOR BY A.K. BASARGEKAR TEXT IN < > WILL BE UNDERLINED SELECT 1-8. HIT break FOR MENU 1 - COMPOSE 2 - EDIT 3 - CLOAD 4 - DLOAD 5 - PRINT 6 - CSAVE 7 - DSAVE 8 - EXIT TOTAL LINE WIDTH = LEFT MARGIN = LINE SPACING = TURN ON PRINTER AND enter OR PRESS break TO EXITREADY CASSETT 55,96:З#м2, Л(28); Л(27); Л(48);/,ц ╞& :Г[DIR3]&#:ГPROGRAM 3 OF 3&E:ГCOPYRIGHT 1984 BY MARV SWAN&L(:Г&T2Ю:З&a<┌И:Бе930&lFХ19500&ЦPDD$│"disks directory":L│66:T$│"FILE "'sZFT$(0)│"Program Basic":FT$(1)│"Data File":FT$(2)│"Program Mach L":FT$(3)│"Program Assy L":МD$(450):G$(1)│"' ' TO 'B'":G$(2)│"'C' TO 'E'":G$(3)│"'F' TO 'L'":G$(4)│"'M' TO 'Q'":G$(5)│"'R' TO 'S'":G$(6)│"'T' TO 'Z'":G│1(dБж690:а10,3:З"make sure THAT THE DISK WORK FILE CREATED BY PROGRAM DIR1 IS IN DRIVE 0":З@224,"type FILE NAME OF 1-8 CHARACTERSWITHOUT EXTENSION":З" ........"(/nЗ@288,"";:ЙDI$(PxЕ З(DI$)┤1 ▒  З(DI$)▓8 Бе100(nВI│ Ю(DI$,"/"):ЕI┤▓0 Бе100(ММI│ Ю(DI$,"."):ЕI┤▓0 Бе100(ШЦАX│3е11(─а▀0,17,X,A$,B$:F│ Ю(B$,DI$):ЕF▓0зFT│FTл1(ткF│ Ю(A$,DI$):ЕF▓0зFT│FTл1(ш┤Л)f╛ЕFT│0за10,3:Бж690:З@128,"'";DI$;"' NOT FOUND ON DISKETTE":З"press ENTER TO retype FILE NAME":Бж700:Бе100 :ДDI$│DI$л".DIR")~╚Щ"I",#1,DI$:Й#1,DA$)╟╥Бж680:З" reading input directory file ";:З@129,T$"NAME:";:З@140,DI$;*Ж▄З@161,T$"DATE:";:З@172,DA$;:З@193,T$"PASS:";:I$│ И(G):I$│ П(I$,1):З@204,I$" OF 6";:З@225,"REC # IN:";:З@236,"0";:З@257,"DATA IN:";:З@268,"NONE";:З@289,"SEARCHING:";:З@300,"PREFIX "G$(G);*яцЗ@352," records selected for sort ";:З@385,"REC # OUT:";:З@396,"0";:З@417,"DATA OUT:";:З@428,"NONE";*∙ЁP│Pл1+7·Й#1,R$:TT│TTл1:I$│ И(TTм1):I$│ П(I$, З(I$)м1):З@236,I$S$;+НЕR$│"T0TALS"за10,3:D$(P)│R$:S$│ И(TTм1):S$│" OF "л П(S$, З(S$)м1):ЕP┤▓1Бе430:Д720+оЗ@268, О(R$,8)" " Р(R$,9,3);+╛A$│ О(R$,1)+╙"ЕG│1░A$┤"C"Бе410+с,ЕG│1Бе250+¤6ЕG│2░A$▓"B"░A$┤"F"Бе410, @ЕG│2Бе250,'JЕG│3░A$▓"E"░A$┤"M"Бе410,5TЕG│3Бе250,Q^ЕG│4░A$▓"L"░A$┤"R"Бе410,_hЕG│4Бе250,{rЕG│5░A$▓"Q"░A$┤"T"Бе410,Й|ЕG│5Бе250,ЪЖЕA$▓"S"Бе410,дРБе250,╕ЪD$(P)│ О(R$,41)-дI$│ И(P):I$│ П(I$, З(I$)м1):З@396,I$;:З@428, О(R$,8)" " Р(R$,9,3);:Бе240-Oоа10,3:Бж820:Бж680:I$│ И(G):З" PRINTING REPORT #6, PASS " П(I$,1)"..."-y╕ЕG│1 з PT│ Б((TTо57)л.999999999):PK│0-В┬JK│0-Щ╠ЕL▓60Бж650 :ДБе530-╣╓PK│PKл1:ЕPK┤10зTB│46:ДTB│45-╦рЕPT▓9зTB│TBм1.ъЗ#м2,д5)DA$;д16) Л(14);"consolidated directories"; Л(20);дTB)"page";PK;"of";PT.zЇЗ#м2:З#м2,д5)"name ext format type";д40)"grans bytes diskette name";д75)"flag".╤■З#м2,д5)"==== === ====== ====";д40)"===== ===== =============";д75)"====".█L│Lл4.ёJK│JKл1:R$│D$(JK)/VЕ Р(R$,12 n&:Г& Ю&&C│ Д(255)&7Е C┤144 з 20&A(Бж310&O2Т 1260,96&c<Т 1261,72:Бж320&wFТ 1262,69:Бж320&ЛPТ 1263,76:Бж320&ЯZТ 1264,76:Бж320&нdТ 1265,79&║nТ1266,97&╟xТ1267,96&╤ВБж310'wМТ1226,C:Бж320:Т1227,C:Бж320:Т1228,C:Бж320:Т1229,C:Бж320:Т1230,C:Бж320:Т1231,C:Бж320:Т1232,C:Бж320:Т1233,C:Бж320:Т1234,C:Бж320:Т1235,C:Бж320:Т1236,C:Бж320:Т1237,C'БЦБж320'ЧаТ 1268,C:Т 1269,C'бкБж320'╣┤А X│1301 е 1290 йм1'┬╛ТX,C'╠╚Бж320'╘╥Л X'▐▄Бж320'∙цТ 1258,C:Бж320:Т1259,C(ЁБж320(·А X│1260 е 1267( ТX,C(*Бж320(1ЛX(;"Бж320(E,Бе 10(W6А Z│1 е 200:Л(g@А Z│1е 30:Л(mJР&H9E,0(│╥Ж 5F,30,1,A6,84,26,FA,8D,1F,84,F,97,7D,8D,12,9A,7D,97,7D(я▄Ж 8D,13,84,F,97,7C,8D,6,9A,7C,97,7C,5D,39,8D,5,48,48,48),цЖ 48,39,8C,                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 &:Г&4 Ю:C│ Д(255):ЕC┤144 з 10:Бж310&Я2Т 1260,96:Т1261,72:Бж320:Т1262,69:Бж320:Т1263,76:Бж320:Т1264,76:Бж320:Т1265,79:Т1266,97:Т1267,96:Бж310'KМТ1226,C:Бж320:Т1227,C:Бж320:Т1228,C:Бж320:Т1229,C:Бж320:Т1230,C:Бж320:Т1231,C:Бж320:Т1232,C:Бж320:Т1233,C:Бж320:Т1234,C:Бж320:Т1235,C:Бж320:Т1236,C:Бж320:Т1237,C:Бж320'gаТ 1268,C:Т 1269,C:Бж320'Т┤А X│1301 е 1290 йм1:ТX,C:Бж320:Л:Бж320'│цТ 1258,C:Бж320:Т1259,C:Бж320'▀·А X│1260 е 1267:ТX,C:Бж320:Л:Бж320:Бе10'є6А Z│1 е 200:Л:Р(@А Z│1е 30:Л:РА X│1260 е 1267( ТX,C(*Бж320(1ЛX(;"Бж320(E,Бе 10(W6А Z│1 е 200:Л(g@А Z│1е 30:Л(mJР&H9E,0(│╥Ж 5F,30,1,A6,84,26,FA,8D,1F,84,F,97,7D,8D,12,9A,7D,97,7D(я▄Ж 8D,13,84,F,97,7C,8D,6,9A,7C,97,7C,5D,39,8D,5,48,48,48),цЖ 48,39,8C,                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 Э& Ю:K│255&(АI│0е31:ТIлJл&H400,K:Л&DK│Kм16:J│Jл32:ЕK▓142з20&n(З@238,"LINK";:З@268,"EXAMPLE";:K│Kл32&Й2АI│0е31:ТIлJл&H420,K:Л&е▐                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ?&# :Г***************************&E:Г* RAINBOW ON TAPE GRAPHIC *&g:Г* BY FRED B. SCERBO *&Й(:Г* COPYRIGHT (C) 1984 *&л2:Г* UNDER LICENSE TO *&═<:Г* FALSOFT PUBLISHING INC. *&ЁF:Г*************************** '$PЮ0:З@32, б(32,191);:АI│1120е1407:Н A:ЕA│0зA│128'BZТI,A:ЛI:З@416, б(32,239);'UdВ TEXT GRAPHIC(nЖ,,191,188,188,,183,188,187,,191,176,176,,191,188,188,,191,188,191,,191,188,188,,188,191,188,,,,,,255,252,252,,255,252,255,,255,240,240,,252,252,255,,255,240,255,,255,252,252,,240,255,240,,,(║xЖ,,252,240,240,,252,240,252,,252,252,252,,252,252,252,,252,252,252,,252,240,240,,240,252,240,,,,,,,,,,,,,148,159,152,,159,155,144,159,,159,156,156,,,,,,,,,,,)>ВЖ,,,,,,,,,144,159,144,,159,148,155,159,,159,144,144,,,,,,,,,,,,,,,,,,,,,148,156,152,,156,144,148,156,,156,156,156,,148,,,,,,,,,*МЖ143,140,143,,143,140,143,,143,140,140,,143,140,140,,143,140,140,,143,139,,143,,140,143,140,,143,140,140,175,172,172,,175,173,162,,175,172,172,,172,172,175,,175,172,172,,175,164,171,175,,160,175,160,,172,172,175*ЖЦЖ236,224,224,,236,224,236,,236,236,236,,236,236,236,,236,236,236,,236,224,228,236,,224,236,224,,236,236,236*ЦаZ│0:R│3:B│2*хк╚4,1:╝0:┐0,0:МA(50),B(50),G(50),S(50),P(50),R(50),Z(50):╗(0,0)м(256,1),╜,B+H┤АX│1е256й4:╜(XлZ,0,0):╜(Xл2лZ,1,0):╜(XлZ,4):╜(Xл2лZ,5):Л:─(0,0)м(256,1),A,G:─(0,4)м(256,5),B,G+Б╛АX│1е256й8:╜(XлZ,30):╜(Xл4лZ,31):╜(Xл1,40):╜(Xл3,41)+ў╚╜(Xл1лZ,50):╜(XлZ,51):╜(XлZл5,50):╜(Xл4лZ,51):ЛX:─(0,40)м(256,41),S,G:─(0,30)м(256,31),G,G:─(0,50)м(256,51),P,G ,W╥╚3:┴R,B:╗(0,60)м(256,61),╜,B:╗(0,64)м(256,65),╛,B:─(0,60)м(256,61),R,G:─(0,64)м(256,65),Z,G,Д▄╚4,1:╝1:┐0,0:╚4 -ц╞"BM0,54C0U42R20":┬(16,24),16,0,.8,.8,.17:╞"BD22BR4F2RDRM+2,+17L8U4LU7LU3L2UL2UL7D16NL8U16BU7U12R8DR2DRFRD2RD2LD2LGLGLDL8"-ХЁ╞"BR25BD23M+12,-42R10M+10,+42L8M-2,-8NL11BU6BL2M-3,-14LM-3,+14NR7BD6BL2M-2,+8NL8BR28U42R10D42NL10BR8U42R16M+14,+32U32R10D42L16M-14,-32D32L10".+·╞"BR48U42R20":┬(154,24),16,0,.8,.8,.17:┬(154,44),16,0,.8,.8,.17:╞"BD42NR4L20R9BU6U12R8DR2DRFRD2RD2LD2LGLGLDL8BU18U12R8DR2DRFRD2RD2LD2LGLGLDL8" .U┬(190,34),19,0,1.2:┬(190,34),11,0,1.2.о╞"BU18BR110NL8M-6,+42L12M-4,-26L2M-4,+26L12M-6,-42R9M+4,+26M+4,-26R12M+4,+26M+4,-26"/├(10,14),0,0:├(50,14),0,0:├(74,14),0,0:├(94,14),0,0:├(142,14),0,0:├(190,14),0,0:├(214,14),0,0/"╚4:┐1,1/C,АI│10е18й2:┼(0,I)м(256,Iл1),R,▒:ЛI/i6АI│20е26й2:┼(0,I)м(256,Iл1),A,▒:Л/П@АI│28е32й2:┼(0,I)м(256,Iл1),S,▒:Л/╡JАI│34е36й2:┼(0,I)м(256,Iл1),G,▒:Л/█TАI│38е42й2:┼(0,I)м(256,Iл1),B,▒:Л0^АI│44е46й2:┼(0,I)м(256,Iл1),Z,▒:Л0'hАI│48е56й2:┼(0,I)м(256,Iл1),P,▒:Л07rБж380:Бе4200`|╚3:┬(20,80),20,1,.9:┬(20,80),12,1,.90ЩЖ╞"BM44,96C1U32R14M+12,+22U22R10D32L14M-12,-22D22L10"1BР╞"BR76U24L14U8R40D8L14D24L12BR26M+12,-32R18M+12,+32L12M-2,-8L13M-2,+8NL12M+2,-8BU6BR2U4R2U4R6D4R2D4NL8BD14BR22U32R22F2RF2RF4D6G4LG2LG2L12BU6R8E4U2H4L8D10BD6D10NL10"1oЪ╞"BR28U32R32D8L12D4R12D8L12D4R12D8L20":Р1Мд├(8,78),1,1:├(48,78),1,11┤оАI│58е102й2:┼(0,I)м(256,Iл1),A,▒:ЛI1╛╕Бж3801·┬├(112,66),3,1:├(168,66),3,1:├(202,66),3,1:├(240,66),3,127╠╞"BM0,186NR26U16R8U44L8U12R2E2R2E4RU2RU2R16D66R8D16NL16"2y╓┬(72,130),36,1,.8,.2,.99:┬(72,160),36,1,.8,1.05,.48 2кр┬(72,130),18,1,.8:┬(72,160),18,1,.8,1.05,.452╪ъ╞"BU22BR2R16BR34U14NG6BR18NU20ND16" 3Ї┬(146,130),36,1,.8,.4,1.1:┬(146,160),36,1,.8,.92,.6 3F■┬(146,130),18,1,.8:┬(146,160),18,1,.83e┬(218,160),36,1,.8,.69,.483Г┬(218,160),18,1,.8,.6,.453н╞"BR96BD14NL18BU10L16U50R60D12L42D20"3╓&├(10,184),1,1:├(80,186),1,1 3°0├(146,186),2,1:├(218,186),2,14:АII│1е30004DЕ Т│""з590:Д6004#NЛII49XВ START MENU TEXT4FbМ A$(34)4PlН MN$4zvАP│1е34:Н A$(P):Е A$(P)│"END"з640:ДЛP4ЦАЕ A$(P)│"END"з A$(P)│""4ЬКЮ4╗ФЗ" RAINBOW ON TAPE"4█ЮЗ" (C) FALSOFT, 1984"4сиЗ5:▓З " (XX)=PAGE NUMBER OF LISTING":KK│ З(MN$):KK│ Б(KKо2):Зд9мKK)"IN "MN$"'S RAINBOW"5@╝З5]╞АP│1е7:ЗA$(P),A$(Pл7):ЛP5Г╨З:З" *=MACHINE LANGUAGE PROGRAM"5и┌З" PRESS ANY KEY TO CONTINUE";5╕фЕ  Т│""з7405╛юЮ5ч°З:З " (XX)= PAGE NUMBER OF LISTING"5эЗ6  АP│15е23:ЗA$(P),A$(Pл9):ЛP6QЗ:З " PRESS ANY KEY TO RETURN TO FIRST PAGE OF MENU"6z З "PRESS ^ (UP ARROW) TO EXIT MENU";6н*XX$│ Т:Е XX$│ Л(94) з Ю:К :Д Е XX$│""з810:Д6506╜4З б(32,45);6╦шЖ JANUARY6▐ЄЖ" (24) PUT 1"6ёўЖ" (24) PUT 2"7№Ж" (28) HOME"7Ж" (38) GHOSTBST"7/Ж" (38) 7 COLORS"7@Ж" (45) KCE"7V$Ж" (56) CATEGORY"7з.Ж" (59) GENLINK"," (60) LINK 2"," (61) LINK 3"," (64) LINK 4"," (64) LINK 5"7╜8Ж" (88) LISTING1"7╙BЖ" (88) LISTING2"7щLЖ" (99) DISKTEST"8VЖ"(105) TEXT PRO*"8`Ж"(122) DIR3"8$jЖ"(124) DIR0"89tЖ"(130) FANTASY"8O~Ж"(144) FRUITFLY"8cИЖ"(151) LISTER"8yТЖ"(156) HOURGLAS"8ПЬЖ"(166) SERL7V10"8ежЖ"(166) SERL7V11"8║░Ж"(166) PAR7V10"8╧║Ж"(166) PAR7V11"8х─Ж"(238) CHEKBOOK"8∙╬Ж"(248) SNAKE*"9╪Ж"(248) SCREEN51*"9"тЖ"(251) DEMO"94ьЖ"(264) CALC"9>ИЖ END)╧m╧}╧m╧}A9Q9U9A9▀m╧m╟}▀}C GCG▀m╧m╧}╧}G GG CN O N O ─╗─╗┼╗┼╗N O O O ┼╗┼╗╒╗╒╗N _ _ O ╟Ы╟Ы╟Ы╟ЫO O O O ╟Ы╟Ы╞Ы╟ЫN N N N ╘╗─╗─╗╘╗N N N N ─Ы─╗╘╗─╗N N N N ╞Ъ╞Ы╞Ы╞ЫN N N N ╞Ы╞Ы╞Ы╞Ы╧ ╧ ╧ я E╗E╗E                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  У&:Г&,:Г*****************************&P:Г* *&t:Г* EXECUTIVE HOUSE *&Ш:Г* MARLENE FEARING *&╝:Г* 812 S. PLUMER *&р:Г* TUCSON, ARIZ. 85719 *':Г* *'( :Г*****************************'2 ╚ 3,1'< ╝ (3)'F ┐ 1,1'_ :Г DRAW MAIN HOUSE'{╗ (32,180)м(152,88),╜,B'Ч╗ (28,68)м(156,88),╜,BF'й├ (32,72),2,4'╞╗ (152,91)м(240,180),╜,B'ф╗ (170,108)м(226,180),╜,B' :Г DRAW THE SUN(┬ (204,22),10,2(/╗ (44,104)м(68,140),╜,B(M╗ (124,104)м(148,140),╜,B(j╗ (82,104)м(112,180),╜,B(Ж╗ (76,52)м(100,68),╜,BF(Щ┬ (84,140),2,2(м├ (44,160),1,4(└├ (169,176),1,4(╘┬ (200,176),3,2(ч├ (204,22),1,2) ├(56,120),2,4:├ (133,120),2,4)#╗ (56,104)м(56,140),╜)? ╗ (136,104)м(136,140),╜)j!:Г TO OPEN AND CLOSE GARAGE DOOR)~"А X│1 е 500:Л X)Т#├ (190,179),2,4)з$А X│1 е 1500:Л X)╗%├ (176,110),4,4)╧&┬ (200,176),3,2)ы'╗ (0,180)м(255,191),╜,B*9(:Г TO OPEN AND CLOSE FRONT DOOR AND FIGURE TO WAVE AND GO BACK INSIDE*S)╗ (92,112)м(92,190),╜*n*╗ (92,190)м(112,180),╜*В+├ (185,190),1,4*Х,├ (10,185),2,4*░-╗ (92,112)м(112,104),╛*─.├ (185,190),2,4*▐/╗ (92,112)м(92,190),╛*∙0╗ (92,190)м(112,180),╛+1╗ (0,255)м(255,180),╜,B+)2А X│1 е 120:Л X+E3╗ (102,112)м(112,104),╜+a4╗ (102,112)м(102,190),╜+}5╗ (102,190)м(112,180),╜+Р6├ (96,124),1,4+г7┬ (96,124),7,0+╜8╗ (96,130)м(96,164),╜+╫9╗ (96,164)м(84,179),╜+ё:╗ (96,140)м(84,140),╜, ;╗ (96,164)м(102,179),╜,'<╗ (96,140)м(102,140),╜,A=╗ (86,140)м(86,130),╜,U>А X│1 е 300:Л X,o?╗ (86,140)м(86,120),╛,Г@А X│1 е 500:Л X,ЭA╗ (86,140)м(86,130),╜,▒BА X│1 е 150:Л X,╦C╗ (86,140)м(86,130),╛,▀DА X│1 е 150:Л X,∙E╗ (86,140)м(86,130),╜- F┬ (96,124),7,1-&G╗ (96,130)м(96,164),╛-@H╗ (96,164)м(84,179),╛-YI╗(96,140)м(84,140),╛-sJ╗ (0,180)м(255,180),╜-ОK╗ (96,164)м(102,179),╛-йL╗ (96,140)м(102,140),╛-├M╗ (86,140)м(86,130),╛-▀N╗ (102,112)м(112,104),╛-√O╗ (102,112)м(102,190),╛.P╗ (102,190)м(112,180),╛.3Q╗ (0,180)м(255,191),╜,B.FR┬ (86,140),3,3.PS┴ 2,1.cT├ (30,188),2,4.wU├ (232,188),2,4.~V:Г.ЦW:Г TO DRAW GRASS.ЭX:Г.лYТ 65495,0/Z╞ "BM0,180;R1;U8;R2;D8;R2;U10;R2;D10;R3;U12;R2;D12;R3;U5;R2;D5;R3;U5;R2;D5;R2;U3;R2;D2;R2;U4;R2;D4;R2;U3;R2;D3"/c[╞ "BM238,180;U10;R2;D10;R3;U8;R2;D8;R4;U6;R2;D6;R2;U8;R2;D8;R1"/j\:Г/В]:ГSMOKE STARTS HERE/Й^:Г/н_X│82:Y│52: :ГCIRCLE CENTERPOINT/╠`SP│0:EP│0 :ГCIRCLE RADIUS/ЄaА R│1 е 35 й .05 :ГCIRCLE RADIUS0bEP│EPл.02: Е EP▓1 з EP│00+c┬ (XлR,YмR),R,1,1,SP,EP03dЛ R0:e:Г0bf:Г TO TURN BACKGROUND TO NIGHT0ig:Г0sh╚ 4,10}i┐ 1,00Сj┬ (204,22),10,50дk├ (208,22),5.50╦l:Г REDRAWN SMOKE STARTS HERE0ЁmX│82:Y│52: :ГCIRCLE CENTERPOINT1nSP│0:EP│0: :ГCIRCLE RADUIS14oА R│1 е 35 й.05 :ГCIRCLE RADUIS1PpEP│EPл.02:Е EP▓1 з EP│01lq┬ (XлR,YмR),R,1,1,SP,EP1trЛ R1ВsТ 65494,01МtБе 101ТuК8е102й2:┼(0,I)м(256,Iл1),A,▒:ЛI1╛╕Бж3801·┬├(112,66),3,1:├(168,66),3,1:├(202,66),3,1:├(240,66),3,127╠                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 \& ЮO:В"KCE-BY GARY L. BEHR"&)A$│ Т&PЗ@100," KEYBOARD CASSETTE EDITOR"&b(З@164,"PRESS"&А2З@196," TO EDIT TAPE"&Ю<З@228," TO STOP TAPE"&┐FЗ@260," TO QUIT PROGRAM"&╫PЕA$│"E"за50,1:бИ:ЯИ&эZЕA$│"S"за150,1:Як'dЕA$│"Q"з110:Д20' nбк:Як'*xа200,2:а180,1:а200,1:Бж180'VВЮO:З@228," EDITING COMPLETED":Бж260'dМАT│1е1000'kЦЛT'qаЮ'wкЦ'~┤ЮO'И╛A$│ Т'░╚З@100,"DO YOU REALLY WANT TO QUIT?"'┼╥З@215," YES"'┘▄З@247," NO"'юцЗ@279," "'¤ЁЕA$│"N"з20(·ЕA$│"Y"з130:Д190(U╔"P12;T4;V25;L4;G;V18;L8;C;L8;C;L4;D;L4;C;P4;V22;L4;E;V25;L3;F([Р:ЛX:╚3:┴2,3:╗(32,24)м(48,24),╜:╗(32,25)м(48,25),╛)9╚4:─(32,0)м(47,1),Y,G:─(32,4)м(47,5),B,G:─(32,8)м(47,9),G,G:─(32,12)м(47,13),S,G:─(32,16)м(47,17),P,G:─(32,                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  т&P :ГENTRY ADDRESS IS &H1100; FIRST ADDRESS IS &H1000; LAST ADDRESS IS &H132B&eA$│"TYPE & ENTER&wB$│"FILENAME:&Н(C$│"TYPE (IN HEX)&д2D$│"ENTRY ADDRESS:&║nJ$│"READY CASSETTE TO RECORD'WxK$│"THEN PRESS ENTER'{ВX│256н Ж( Э(A$)л2)л Ж( Э(A$)л3)'ЙМАI│0е 174'ЯЦТIл&H1000, Ж(IлX)'╡аЕ Ж(IлX)│0 зX│Xл8'скЛ:Е Ж(398)│57зТ399,174:Т400,64:Т398,126(┤АI│0е596:НL$:L│ Й("&H"лL$):E│EлL:ТIл&H10AF,L:Л(E╛АI│0е76:НL$:L│ Й("&H"лL$):E│EлL:ТIл&H1E2,L:Л(v╚ЕE┤▓78082 зЮ:З"DATA ERROR":ДТ&H9D,17:Т&H9E,0(│╥Ж 5F,30,1,A6,84,26,FA,8D,1F,84,F,97,7D,8D,12,9A,7D,97,7D(я▄Ж 8D,13,84,F,97,7C,8D,6,9A,7C,97,7C,5D,39,8D,5,48,48,48),цЖ 48,39,8C,2,DD,27,15,A6,82,81,30,25,11,81,3A,25,C,81,46)jЁЖ 22,9,81,41,25,5,8B,9,81,4F,39,C6,8,D7,8C,7E,A9,51,7E,A9)ж·Ж 28,7E,B9,9C,8D,F8,8D,26,31,8D,FF,21,30,A8,D6,8D,F0,8D)тЖ 1E,8D,12,C6,8,30,1,CE,1,DA,A6,80,27,36,A7,C0,5A,26,F7* Ж 20,36,8D,D8,C,89,7E,A3,90,86,A3,8C,86,C3,97,89,39,8D,C6*\Ж 30,A8,ED,8D,F1,8D,C2,30,88,DF,8D,BD,20,EB,8D,B9,1F,21*Ъ"Ж 20,DB,8D,E8,96,44,BD,A2,85,C,89,39,86,20,A7,C0,5A,26,FB*╪,Ж 8D,D7,30,88,18,8D,C3,A6,1,81,58,26,5,8E,2,20,20,7,17,FF+6Ж 41,26,E9,9E,7C,BF,1,E5,BF,2,1E,CE,2,2F,DF,45,C6,31,D7+Q@Ж 44,33,8D,1,7F,DF,42,8D,BF,30,A8,18,8D,B4,A6,1,81,58,26+ПJЖ 39,DE,42,CC,0,19,ED,C4,9E,45,ED,84,C6,20,ED,42,DC,19,ED+═TЖ 44,ED,2,DC,1B,ED,46,8D,A,8D,8,C,44,8D,11,25,72,20,5E,DE, ^Ж 42,33,44,DF,42,DE,45,33,42,DF,45,39,C,44,86,39,91,44,39,GhЖ 17,FE,DF,26,B5,DE,42,DC,7C,ED,C4,17,FF,6D,30,A8,25,8D,ГrЖ 79,30,13,17,FF,5D,17,FE,C7,26,EE,DE,42,DC,7C,ED,42,17,┐|Ж FF,55,30,A8,2A,8D,61,1F,21,8D,5D,86,E3,97,89,BD,A3,90,√ЖЖ 17,FE,A9,26,E8,DE,45,DC,7C,ED,C4,8D,B6,25,13,8D,A5,BD-7РЖ A9,28,30,A8,3C,8D,3D,BD,A1,B1,81,59,10,26,FF,62,9E,45-sЪЖ 6F,84,6F,1,FE,1,8F,FF,1,FF,CE,1,E9,FF,1,8F,DC,74,7F,2-░дЖ 45,DE,42,83,0,E8,DD,7C,30,1E,8C,2,2D,27,2E,33,5C,EC,42-ьоЖ A3,C4,E3,84,10,93,7C,22,17,20,EA,7E,B9,9C,8D,FB,17,FE.*╕Ж CC,30,A8,74,8D,F3,BD,A1,B1,81,D,26,F9,39,AE,84,30,1F,BF.f┬Ж 2,46,7A,2,45,A,44,BD,A9,28,17,FE,AA,BD,A7,CA,30,2A,8D.в╠Ж D5,BD,A7,E9,BD,A9,28,17,FE,9A,30,A8,5B,8D,C7,30,8C,6C.р╓Ж 9F,42,8E,0,F,9F,7C,8E,1,DA,9F,7E,BD,A7,E5,BD,A7,D8,8E,1/рЖ 8E,9F,7E,8E,1,BA,9F,7C,8D,2F,D6,44,C0,30,D7,44,8E,0,1/ZъЖ 9F,7C,8D,22,9E,42,AE,84,9F,7E,CE,1,FF,DF,7C,DE,42,EC,42/ЦЇЖ C3,0,1,93,7E,27,F,10,83,0,FF,24,2,D7,7D,8D,2,20,E2,7E/╘■Ж A7,F4,0,7C,F,7D,8D,F7,9E,42,30,4,9F,42,A,44,26,CD,BD,A7/ЎЖ E9,BE,1,FF,BF,1,8F,16,FD,FC02Ж 2,0,0,0,0,1,8E,35,10,B6,2,45,27,E,FC,2,46,DD,27,DD,230nЖ 83,0,C8,DD,21,1F,4,8E,0,0,BF,1,8F,CE,2,2F,AE,C4,9F,7E0л&Ж BD,A7,F,26,1C,D,7C,2A,F5,33,42,AE,C4,26,EF,BD,A7,E9,7E0с0Ж 0,0,BD,AD,21,9E,A6,30,4,9F,A6,7E,AD,C0,7E,A6,190),8,1,1,.15,.75:╞"BM126,90                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ь& Ю:A│&H3000&/АI│0е47:ТIлA, Ж(Iл&H15E):Л&_АI│0е10:НD$:D│ Й("&H"лD$):B│BлD:ТIлAл48,D:Л&{(ЕB┤▓977зЗ"DATA ERROR":С&Ь2АI│0е1:ТIлAл59, Ж(Iл&H168):Л&╟ONTINUE NTER DEFECTS ";:╔A$*+sБж70:ЕK$│"C"зР:ДЕK$│"E"зБж170:Бе120:Д╔E$:Бе115*└xЗ@I3, б(30,32);:З@I1,"INSERT DELETE ONTIN";:╔A$:З@I3,"";:Й" ";I$:З@I3л30,F$;:L$│ О(I$,1):ЕL$│"C"з110:ДЕL$│"D"▒L$│"I"з125:ДБж155:Бе120+;}X1│ З(I$)м1:АX2│1еX1:Е Р(I$,X2л1,1)┤"0"▒ Р(I$,X2л1,1)▓"9"зX2│X1:Бж155:Л:Бе120:ДЛ:I│ Й( П(I$,X1)):ЕI┤0▒I▓67зБж155:Бе120+РВЕG(I)│&HB9 ▒G(I)│&HE9 зЗ@I3,"CANNOT OVERRIDE TESTED RESULTS";:З@I1,M1$;:╔E$:Д140+ЯЗБж70:Бе120+┴МЕL$│"I"зG(I)│&H99 :ДG(I)│&HFF+╘СX│I:Бж45:Бе120+їЦ:Гinvalid resp sub----------,.ЫЗ@I3,"INVALID ENTRY ";:З@I1,M1$;:╔E$,9аБж70:Р,Zе:Гmsg clear sub-------------,rкЗ@I3,C$;F$;F$;C$;:Р,Уп:Гlogo sub------------------,с┤З@134,"* D I S K T E S T *";:З@224,"COPYRIGHT (C) 1983 BY C C ZIMMER";:Р-╣:Гml load sub----------------9╛АX│0е З(P$)о2м1:ТX1лX, Й("&H"л Р(P$,1л2нX,2)):ЛX:Р-Z├:Гprint question sub---------Й╚З@I1,"

FOR PRINTOUT CONTIN";:╔A$-№═Бж70:ЕK$┤▓"P"зP│0:Р:ДP│1:З@I1,"ENTER DATE ";:З@I3, б(30,32);:З@I3,"";:╔A$:ЙD$:З@I3л30,F$;:Р.╥:Гdiskette # sub------------.г╫З@I1,"ENTER DISKETTE NUMBER <###> ";:З@I3, б(30,32);:З@I3,"";:╔A$:ЙDN:LN$│ О(LN$,8)л П("000"л П( И(DN), З( И(DN))м1),3):Бж170:Р.─▄:Гprint id sub--------------.·сТ149,0:Т150,18:Т155,96:З#м2, Л(28); Л(27); Л(48);/,цЗ#м2,═"% %d#%% % % "; П(LN$,3),D1,T$,D$;:Р/Mъ:Гprint log sub-------------/┤ыX2│0:АX│0е67:ЕG(X)│&HB9 зЗ#м2,"-";:ДЕG(X)│&H99 зЗ#м2, Л(34);:ДЕG(X)│&HE9 зЗ#м2,".";:ДЗ#м2,═"#";X2;04ЁX2│X2л1:ЕX2│10зX2│0:З#м2, Л(27); Л(74); Л(28); Л(31); Л(27);"T";:З#м2,═"#";Xо10;:З#м2, Л(27);"I"; Л(28); Л(27); Л(75);:Л:ДЛ0BїЗ#м2,"":Р0c·:Гdrive # sub---------------0╖ З@I1,"ENTER DRIVE NUMBER (0-3) ";:З@I3, б(30,32);:З@I3,"";:╔A$:ЙD1:Бж170:Р0╪:Гtest type sub-------------1 З@I1,"HORT TEST FULL TEST";:╔A$1-Бж70:ЕK$│"S"зT$│"Sh":Р:ДT$│"Lg":Р1R:Гinitialization................1фI1│481:I3│449:FC│127л16нBC:B$│ Л(128):C$│ б(30,FC):F$│ Л(FC):PP│256н Ж(&HC006)л Ж(&HC007):МG(69):╣ Г0│&H0E00:╣ Г1│&H0E0A:╣ Г2│&H0E86:B│&H04002/LN$│"DEFLOG ":A$│"V31;O5;L35;T50;EP3EP3E":E$│"V31;O3;L35;T50;EP3EP3E"2S"P$│"AD9FC00439":X1│&H0E00:Бж1902я'P$│"347FBDB3ED338D002D33CB10AE8D00236F8D00211F31A68D001B8155270EEC81EDA1A684A7A06C8D000B20E8A684A7A4357F39040000DB6DB6DB6D000000FFFFFF":X1│&H0E0A:Бж1903Г,P$│"343FBDB3EDBEC006A70286093D4C5CE7031F02AD9FC004E6062710E602C1112605CC0002200ECC000120091F20810926DCCC0000BDB4F4353F39":X1│&H0E86:Бж190:P$│""3╤1M1$│" TO CONTINUE ":M2$│" TO RESTART OR QUIT "3▀6З@I1,M1$;4I;З@I3,"PLEASE TURN UP VOLUME ON TV ";:АX│1е150:Л:╔E$:K$│ Т:ЕK$│""з320:ДБж170:Бж255:Бж265:Бж200:Бе3504и@З@I3,"please";B$;"turn";B$;"up";B$;"volume";B$;"on";B$;"tv";B$;B$;B$;:АX│1е150:Л:╔A$:Бе3154╔E:Гdir error abort point.....5OJЗ@I3,"DIR. TRACK ERROR-CAN'T CONTIN.";:ЕP│1зБж225:З#м2,"DIR. TRACK ERROR-CANNOT CONTINUE-DISK NOT USABLE OR UNFORMATTED":╔E$:Д╔E$5pO:Гrestart point.............5ЗTЗ@I1,M2$;:Бж70:ЮBC5иY:Гstart point...............6^Бж180:З@I1,"OMMENCE TEST UIT ";:З@I3,"INSERT OR CHANGE DISKETTES ";:╔A$6OcБж70:ЕK$│"C"зБж170:Бж215:Бе365:ДЕK$│"Q"зБж170:З@I3м33,"";:К:Д╔E$:Бе3556ph:Гfile check................6┐mБж170:З@357,"OPERATION: FILE CHECK ";:T1│17:S1│2:O1│2:Бж35:ЕEC┤▓0з330:Д3706єrX1│1:АX2│0е67:G(X2)│ Ж(BлX2):ЕG(X2)┤▓&HFF зX1│07wЛ:ЕX1│1зЗ@I3,"NO FILES ";:Бе39079|З@I3,"files present ";7ZБ:Гdirectory check...........7~ЖT1│17:S1│3:O1│2:Бж35:ЕEC┤▓0з3307ЯЛ:Гlog check.................7╙РLF│1:АX2│0е7:Е К( Р(LN$,X2л1,1))┤▓ Ж(BлX2)зLF│08ХЛX2:ЕLF│1зЗ@I3л15,"LOG PRESENT ";:ДЗ@I3л15,"NO DEFECT LOG ";8GЪЗ@I1,"ONTINUE ABORT TEST ";:╔A$8oЯБж70:ЕK$│"C"зБж170:Бе425:ДЮBC:Бе3508Рд:Гlog array prep............8лйЕLF│0з435:ДX1│ Ж(Bл13)9(оX2│G(X1):G(X1)│&HB9:ЕX2▓│&HC0 ░ X2┤│&HC9 з435:ДЕX2┤│67зX1│X2:Бе430:ДЗ@I3,"ERROR IN LOG - WILL TEST ALL ";:╔E$:LF│0:Бж809n│АX2│0е67:ЕLF│0зX1│&HFF:Бе440:ДЕG(X2)│&HB9 зX1│&HB9:Бе440:ДX1│&HFF9}╕G(X2)│X1:Л9Ю╜:Гfirst declare point.......9╗┬Бж100:M3$│"first ":Бж1109▄╟:Гtest sequence.............:╠Ж0,34,2,0,3,33,1,-2,1,3,0,0,1,0,0,1,33,2,1,2,34,0,-2,0,2,1,33,2,2,3,34,0,-2,1,3,0,34,2,1,2,33,1,-2,2,2,0,34,2,2,3,33,1,-2,0,3,0,0,1,0,0,1,33,2,0,2,34,0,-2,2,2:ъ╤Ж0,34,2,8,3,33,1,-2,5,3,0,0,1,0,0,1,33,2,5,2,34,0,-2,8,2,1,33,2,8,3,34,0,-2,5,3,0,34,2,5,2,33,1,-2,8,2:√╓Ж17,17,1,8,3;█:ГDATA0,3,1,0,2;рЖ99,0,0,0,0;eхЮBC:X1│.75:П:АX│67е34йм1:G(Xл2)│G(X):Л:DE│0:G(34)│&HFF:G(35)│&HFF;БъЕT$│"Sh"зАX│1е70:НOP:ЛX;■яН TI,TE,ST,PA,OP:ЕDE│1з565:ДЕTI│99зАX│36е69:G(Xм2)│G(X):Л:Бе555:ДЕOP│3зX│ Г1(PA):Бе500:ДЕOP│0зO1│2:T1│TI:S1│1:Бж35:Бе495<УЇO1│OP:X1│X1л.25:З@295," CYCLE: ";:З@327," TRACK: ";:З@359," granule: ";:З@391," OPERATION: ";:З@423, б(18,32);<Ю∙ТPP,O1<№■АT1│TI е TE й ST:З@307,═"##"; Б(X1);:З@339,═"##";T1;:ЕOP│2зЗ@403,"READ ";:ДЗ@403,"WRITE";=АX2│0е1:PG│2нT1лX2=1G1│2нT1лX2:ЕT1▓17зG1│G1м2=\ ЕT1│17зЗ@371,"DIR";:ДЗ@370,═"### ";G1;=ЙЕG(PG)│&HB9 ▒G(PG)│&H99 ▒G(PG)│&HE9 з545=■З@423, б(16,32);:X3│256нT1лX2:EC│ Г2(X3):ЕEC│0з545:ДЕEC│2зX2│1:T1│TE:DE│1:Бе540:ДЗ@423," BAD GRANULE ";:╔E$> G(PG)│&HE9>!ЛX2:ЛT1:Бе495>@&:Гfinal declare point.......>a+Бж100:M3$│"final ":Бж110:ЮBC>В0:Гformat allow table........>й5ЕDE│1з330:ДX│ Г1(8):X3│0:X2│0:X1│0>ф:АLG│0е67:ЕG(LG)│&H99 ▒G(LG)│&HB9 ▒G(LG)│&HE9 з575:Д585??ЕX3┤▓0з ТBлX1,LG :ДX2│LG?DX1│LG:X3│X3л1?1IЛLG:ЕX3│0з590:ДТBлX1,&HC9?cNT1│17:S1│2:O1│3:Бж35:АX4│1е200:ЛX4:ЕEC┤▓0з330?ДS:Гformat dir entry..........?цXX│ Г1(8):АX│0е10:ТBлX, К( Р(LN$,Xл1,1)):Л:ТBл11,1:ТBл12,0:ТBл13,X2:ТBл14,1:ТBл15,0:ЕX3│0зТB,0@]T1│17:S1│3:O1│3:Бж35:АX4│1е200:ЛX4:ЕEC┤▓0з330@bbБж90:З@I3,"test cplt - FINAL DEFECT LIST ";:АX│0е67:ЕG(X)┤▓&HFF зБж45@igЛX@~lЕP│1зБж225:Бж235@Мq╔A$:Бе340  е√╖█е█ў█/ / / / е█ч█з█е█/√o / o дsдsдsдs....дsдsфsдsn.n.ж[ж[д[д[....ж[д[ф[д[....%єeє%єEєп П п ?& :Г[DIR0]&:Г&O:ГDOCUMENTATION FOR PROGRAMS DIR1, DIR2 AND DIR3&д(:ГRUN THIS PROGRAM AND A HARD COPY WILL PRINT EXPLAINING THE 3 PROGRAMS&л2:Г&▓<:Г&╣F:Г&┼P┌И:Х500&чZЖ" D o c u m e n t a t i o n"&ЁdЖ" "'nЖ" f o r"'xЖ" "'5ВЖ"Diskette Directories Handler"'YМЖ"Programs DIR1, DIR2 and DIR3"'|ЦЖ"Copyright 1984 by Marv Swan"'ЕаЖ" "'ОкЖ" "'╘┤Ж"The Diskette DIrectories Handler system consists of 3 programs"(╛Ж"that generate all your diskette directories information onto"(7╚Ж"7 comprehensive reports"(@╥Ж" "(I▄Ж" "(vцЖ"Minimum computer system requirements:"(МЁЖ" * 32K OF RAM"(к·Ж" * EXTENDED DISK BASIC(┬Ж" * 1 DISK DRIVE"(┌Ж" * 1 TAPE DRIVE"(яЖ" * 1 PRINTER"(°"Ж" "),Ж"Program DIR1 explanation:")Q6Ж" * READ ALL DISKETTE DIRECTORIES IN YOUR SYSTEM")Ф@Ж" AND EXTRACT INFORMATION ABOUT ALL YOUR PROGRAMS & FILES")сJЖ" * GENERATE TAPE WORK FILE OF DIRECTORIES CONTAINED ON ALL DISKETTES"*$TЖ" * PRINT (OPTIONAL) 'EXTRACT & LOAD DIRECTORIES' REPORT #1"*U^Ж" * STORE DISKETTE NAMES & USAGE IN TABLE"*zhЖ" * SORT DISKETTE NAMES TABLE"*▒rЖ" * PRINT (OPTIONAL) 'DISKETTE NAMES' REPORT #2"*╓|Ж" * SORT DISKETTE USAGE TABLE"+ ЖЖ" * PRINT (OPTIONAL) 'DISKETTE USAGE' REPORT #3"+MРЖ" * TRANSFER TAPE WORK FILE TO DISK WORK FILE ON DRIVE 0"+СЪЖ" * READ DISK WORK FILE AND PRINT (OPTIONAL) DISKETTE JACKET"+╖дЖ" LABEL' DIRECTORY REPORT #4", оЖ" * THIS PROGRAM PASSES THE DISK WORK FILE ON DRIVE 0 TO PROG DIR2 AND/OR DIR3",X╕Ж" * THIS PROGRAM LINKS AND CALLS UP PROGRAM DIR2 OR DIR3 ON DRIVE 0",a┬Ж" ",В╠Ж"Program DIR2 explanation:",┤╓Ж" * THIS PROGRAM IS RUN AFTER PROGRAM DIR1",·рЖ" * READ DISK WORK FILE GENERATED BY PROGRAM DIR1 FROM DRIVE 0"-+ъЖ" * PRINT 'DISKETTE GUM LABELS' REPORT #5"-nЇЖ" * THIS PROGRAM LINKS AND CALLS UP PROGRAM DIR3 ON DRIVE 0"-w■Ж" "-ШЖ"Program DIR3 explanation:"-╩Ж" * THIS PROGRAM IS RUN AFTER DIR1 OR DIR2".Ж" * READ DISK WORK FILE GENERATED BY PROGRAM DIR1".H&Ж" * SORT DISK WORK FILE, IN RAM, TO PROGRAMS & FILES SEQUENCE".~0Ж" * PRINT 'CONSOLIDATED DIRECTORIES' REPORT #6".│:Ж" * PRINT 'DISKS DIRECTORY SUMMARY' REPORT #7".╝DЖ" ".їNЖ"record layout of tape work file & disk work file:"/XЖ" * RECORD SIZE = 42 BYTES"/QbЖ" * 01-08 = 08 BYTE = NAME OF PROGRAM OR DATA FILE"/xlЖ" * 09-11 = 03 BYTE = EXTENSION"/жvЖ" * 12-12 = 01 BYTE = FILE FORMAT CODE"/╧АЖ" * A = ASCII"/∙КЖ" * B = BINARY"0%ФЖ" * 13-13 = 01 BYTE = FILE TYPE CODE"0VЮЖ" * 0 = BASIC PROGRAM"0ГиЖ" * 1 = DATA FILE"0┐▓Ж" * 2 = MACHINE LANGUAGE PROGRAM"0№╝Ж" * 3 = ASSEMBLY LANGUAGE PROGRAM"1,╞Ж" * 14-15 = 02 BYTE = NUMBER OF GRANULES"1Y╨Ж" * 16-21 = 06 BYTE = NUMBER OF BYTES"1З┌Ж" * 22-41 = 20 BYTE = NAME OF DISKETTE"1╞фЖ" * 42-42 = 01 BYTE = SPECIAL CODE USED BY PROGRAM DIR1"2юЖ" * 'X' IDENTIFIES EVERY OTHER DISKETTE DURING DIR1 AND DIR2"2'°Ж" "2>Ж"Printer brands:"2| Ж" * ALL PROGRAMS PRINT ON ANY PRINTER, HOWEVER, REPORT"2├Ж" TITLES ARE DESIGNED & CODED TO PRINT ENLARGED LETTERS USING"3  Ж" EPSON CODES. TO MODIFY FOR OTHER PRINTERS, LOOK AT LINES:"32*Ж" * DIR1: 0820 0830 2680 3790"3e4Ж" * DIR2: 0510 0960 1020 1030 1040 1330"3Г>Ж" * DIR3: 0490 07403МHЖ" "3дRЖ"High speed poke:"3т\Ж" * THE FOLLOWING PROGRAMS USE THE HIGH SPEED POKE FOR"4!fЖ" FAST SORTING. TO TAKE OUT THE POKE, LOOK AT LINES:"4;pЖ" * DIR3: 0820"4FzЖ"END"4ОД┌И:Ю2:З@1," DISKETTE DIRECTORIES HANDLER ";:З@40," DOCUMENTATION ";4╤ОЗ@129," ready THE PRINTER ";:З@193," press ENTER WHEN READY ";4чШI$│ Т:ЕI$│""Бе9205 вЗ@289," PRINTING.......... ";5мЗ@384,"";58╢НA$:ЕA$┤▓"END"зЗ#м2,A$:Бе9505>└КTTED":╔E$:Д╔E$5pO:Гrestart point.............5ЗTЗ@I1,M2$;:Бж70:ЮBC5иY:Гstart point...............6^Бж180:З@I1,"OMMENCE TEST UIT ";:З@I3,"INSERT OR CHANGE DISKETTES "                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 >&$:Г***THE*****INTERPLANETARY***&G:Г******FRUIT****FLY**********&k:ГBY***MARTIN*OLAF*KASTE*******&П:Г**********MAY*1984***********&│:Г*****************************&└Т65495,0&╟Ю0&╪АA│1186е1213&ЇАC│C е Cл5:ТA, Д(26):ЛC'Q З@162, Р("the"л Л(128)л"interplanetary"л Л(128)л"fruit"л Л(128)л"fly",1,Aм1186);:аC,1:ЛA'щ З@189,"y";:АA│1е4:а50,1:а75,3:а150,3:а2,1:а3,1:З@200,"by"л Л(128)л"martin"л Л(128)л"kaste";:Т1480,40:Т1481,3:Т1482,41:Т1483,32:З@462,"smartsoft";:Л( АN│1056е1535:ТN,32:ЛN( З@0," "(L З@1,"0000";:З@22,"SHOTS:";:З@29,"50";:ЕHS│0з14:ДЗ@12,HS;(bSH│50:XY│40:YX│41(mA│1516(ЙZ│1056л Д(32):ЕSH│┤0з24(ЇТZ,32:ТZл1,32:ТZл2,32:ЕZ▓1503з16:ДZ│Zл Е(M)н Д(3):Z│Zл32:M│Mл1:ТZ,XY:ТZл1,43:ТZл2,YX:CC│XY:XY│YX:YX│CC)ЕZ┤Aл3░Z▓Aм2з24)╛Е Ж(341)│247зАC│Aм31е1056йм32:ТC,42:ТCл32,32:ЛC:ТCл32,32:SH│SHм1:З@28,SH;:Е Ж(Zл1)│32зS│Sл1000:Бж28:З@1,S;:ТZ,32:ТZл1,32:ТZл2,32:Бе16::ДЕ Ж(Z)│32▒ Ж(Zл2)│32за50,1:S│Sл500:З@1,S;)╦ЕSH│0з24)юЕ  Ж(343)│247зB│м2:ЕA│1504зB│0*Е  Ж(344)│247зB│2:ЕA│1532зB│0*OТA,32:ТAл1,32:ТAл2,32:A│AлB:B│0:ТA,47:ТAл1,42:ТAл2,28:Бе17*xа1,2:а13,1:а1,3:а2,4:а1,2:АA│1е300:Л*╡З@33,"TO PLAY AGAIN, PRESS THE A KEY";:A$│ Т:ЕA$┤▓"A"з25*╚Е HS┤│S з HS│S*╒S│0:Бе11+=ТZ,62:ТZл2,60:ТZм31,22:ТZл33,1:а50,1:а150,2:а123,1:а140,3:ТZ,32:ТZл1,32:ТZл2,32:ТZм31,32:ТZл33,32:Р0,9+\}ZЖ P,HUMAN,M,10,30,11+s}dЖ E,ELF,F,25,25,15+К}nЖ E,ELF,M,20,25,18+г}xЖ D,DWARF,F,30,40,23+╝}ВЖ D,DWARF,M,30,40,36+╘}МЖ O,OGRE,F,35,40,29+ь}ЦЖ O,OGRE,M,35,40,46,}аЖ T,TROLL,F,50                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 е& Х 350&╚4,1:╝:┐ 1,0&>AP$│"EU2UNHNUER2FDGL2HBD3BR4"&V(BL$│"BRRE2U3HGD4FR"&i2BE$│"RE2HGF2R"&ЕН BYTE$*2?Т 52262лIм1, Й("&H"лBYTE$)*8@Л*GAЖ BD,D8,49*XBА I │ 1 е 3*dCН BYTE$*ГDТ 50544лIм1, Й("&H"лBYTE$)*ЙEЛ*ШFЖ 7E,D8,3C*йGА I │ 1 е 2*╡HН BYTE$*╘IТ 54641лIм1, Й("&H"лBYTE$)*┌JЛ*цKЖ 91,80*ўLА I │ 1 е 2+MН BYTE$+"NТ 54676лIм1, Й("&H"лBYTE$)+(OЛ+4PЖ 91,80+EQА I │ 1 е 1+QRН BYTE$+pSТ 54342лIм1, Й("&H"лBYTE$)+vTЛ+UЖ 27+РVА I │ 1 е 3+ЬWН BYTE$+╗XТ 54443лIм1, Й("&H"лBYTE$)+┴YЛ+╧ZЖ 16,3,E1+р[А I │ 1 е 3+ь\Н BYTE$, ]Т 53634лIм1, Й("&H"лBYTE$),^Л, _Ж 7E,D8,AF,1`А I │ 1 е 2,=aН BYTE$,\bТ 53679лIм1, Й("&H"лBYTE$),bcЛ,ndЖ 96,80,eА I │ 1 е 3,ЛfН BYTE$,кgТ 50891лIм1, Й("&H"лBYTE$),░hЛ,┐iЖ 7E,D8,D7,╨jА I │ 1 е 1,▄kН BYTE$,√lТ 54989лIм1, Й("&H"лBYTE$)-mЛ- nЖ 2-oА I │ 1 е 1-&pН BYTE$-EqТ 55075лIм1, Й("&H"лBYTE$)-KrЛ-TsЖ 16-gtА I │ 1 е 123-suН BYTE$-ТvТ 55261лIм1, Й("&H"лBYTE$)-ШwЛ-ЇxЖ 81,C0,10,26,F6,4B,9D,9F,BD,B7,B,5D,27,4E,C1,11,24,4A,86,6,3D,DB,BC,1F,98,C6,1,1F,2,10.OyЖ 93,B7,25,3A,93,19,1F,3,D3,1B,1F,1,C3,0,C8,93,21,24,2B,8D,B,27,6,1F,30,D3,A6,DD,A6,7E.лzЖ 96,B4,34,10,9E,68,30,1,35,10,39,93,1B,34,6,8D,F1,27,6,EC,E4,D3,A6,DD,A6,35,6,D3,19,7E/{Ж D0,E8,7E,B4,4A,B7,9,76,A7,42,FC,1,4E,ED,45,7E,C5,75,34,4,BD,BD,CC,BD,CC,41,35,4,C1,9/|Ж 22,3,BD/'}А I │ 1 е 123/3~Н BYTE$/RТ 55384лIм1, Й("&H"лBYTE$)/XАЛ/▓БЖ CC,41,AE,62,EC,88,10,34,6,C6,8,BD,B5,F,35,6,BD,DC,5,C6,F8,A6,85,BD,A2,82,5C,26,F8,D0ВЖ 6F,26,15,7A,1,D5,26,10,BD,A1,B1,27,FB,81,3,26,2,32,64,C6,10,F7,1,D5,39,10,27,CD,8C,BD0kГЖ D1,69,C6,23,9D,A5,27,3,BD,B7,38,8D,3,7E,D4,B2,C1,23,25,91,C1,28,22,8D,D7,80,39,34,4,C60╟ДЖ 23,D7,80,35,4,9D,A5,27,19,81,2C,27,8,C6,A5,BD,B2,6F,BD,D1,69,34,4,9D,A5,27,5,BD,B7,380╓ЕЖ 8D,D2,350щЖА I │ 1 е 1230їЗН BYTE$1ИТ 55507лIм1, Й("&H"лBYTE$)1ЙЛ1wКЖ 4,7E,D1,8E,BD,C6,5F,BD,C6,B8,34,16,BD,D8,1B,26,38,C6,A,8E,D9,0,BD,B9,A2,BD,A1,B1,BD,A21╒ЛЖ 82,34,2,BD,B9,58,35,2,81,59,27,14,35,16,39,53,55,52,45,28,59,2F,4E,29,3F,44,45,4C,45,5423МЖ 45,44,8E,D9,A,C6,7,BD,B9,A2,BD,B9,58,35,16,7E,C6,CF,43,4F,4C,C4,57,50,4F,4B,C5,46,41,532УНЖ D4,53,4C,4F,D7,58,45,D1,41,55,54,CF,53,57,41,D0,45,52,52,4F,52,D3,42,41,55,C4,4C,44,49,D22вОЖ DB,32,DB2╡ПА I │ 1 е 1232┴РН BYTE$2рСТ 55630лIм1, Й("&H"лBYTE$)2цТЛ3FУЖ 37,DB,47,DB,4B,DB,4F,DB,60,DC,7B,DC,A4,DC,44,DC,74,53,43,41,4E,A4,44,41,54,45,A4,45,4C,493жФЖ 4E,C5,45,43,4F,44,C5,45,4E,41,4D,45,A4,57,50,45,45,CB,DB,EC,DB,F8,DD,41,DD,4E,DD,58,DC,344ХЖ 8E,D9,F7,BD,B9,9C,7F,1,49,7F,1,4A,8E,D9,21,CE,1,3E,AF,41,86,A,A7,C4,8E,DA,10,AF,43,864aЦЖ 6,A7,45,8E,D9,5F,AF,46,8E,DA,1F,AF,48,6F,4A,8E,B2,77,AF,C8,12,AF,4D,6F,4F,9E,8A,AF,C8,104pЧЖ BD,DD,1E4ГША I │ 1 е 1234ПЩН BYTE$4оЪТ 55753лIм1, Й("&H"лBYTE$)4┤ЫЛ5ЬЖ CC,DC,C3,FD,1,8F,8E,D9,EA,CE,2,DD,C6,E,34,44,BD,A5,9A,86,55,97,71,BD,B9,5C,35,14,30,1F5pЭЖ 7E,AC,7F,52,55,4E,22,41,55,54,4F,45,58,45,43,22,0,52,45,56,28,43,29,31,39,38,34,20,43,2E5╠ЮЖ 53,54,45,41,52,4D,41,4E,D,D,0,81,EA,23,3,7E,B2,77,8E,D9,4B,80,E1,7E,AD,D4,C1,5A,22,F16%ЯЖ C0,50,C1,8,2F,7,34,4,BD,B2,62,35,4,8E,D9,7E,7E,B2,CE,96,6F,27,C,81,FF,26,5,86,1,B763аЖ 1,4A,7E6FбА I │ 1 е 1236RвН BYTE$6qгТ 55876лIм1, Й("&H"лBYTE$)6wдЛ6╤еЖ C5,8F,34,14,AE,67,8C,A3,9D,27,4,35,14,20,F0,F,70,7D,1,4A,27,A,2B,2B,7F,1,DA,7F,1,4A7(жЖ 20,0,73,1,4A,7F,1,D7,7F,1,D8,7F,1,D9,BD,A1,B1,81,9,27,15,81,5D,26,5,73,1,D9,20,C7БзЖ 81,5F,26,1F,73,1,D8,7D,1,D9,27,E4,7F,1,D8,F6,1,D7,8E,1,DA,A6,85,26,5,7F,1,D9,20,D27█иЖ 7C,1,D7,20,4A,81,13,27,59,81,D,27,6E,81,8,27,9,81,A,26,17,BD,DA,F2,20,B8,7D,1,D8,267щйЖ 25,8D,27№кА I │ 1 е 1238лН BYTE$8'мТ 55999лIм1, Й("&H"лBYTE$)8-нЛ8ЕоЖ 20,21,7D,1,D7,27,3,7A,1,D7,39,81,15,27,11,81,C,27,D,81,3,27,9,81,5C,26,8,BD,A1,B18▌пЖ 20,3,7F,1,D7,81,20,25,7,7D,1,D8,26,2,8D,5,35,14,32,62,39,8E,1,DA,F6,1,D7,6D,85,2797░Ж 3,7C,1,D7,39,6F,F8,1,86,40,BD,A2,82,BD,B9,58,C6,1,E7,E4,8E,2,DD,AF,61,8D,E,7E,DA,679С▒Ж 7F,1,4A,6F,F8,1,8D,3,7E,DA,ED,8E,2,DD,10,8E,1,DA,E6,80,E7,A0,26,FA,39,F,71,7E,A0,279а▓Ж BD,B7,3D9││А I │ 1 е 1239┐┤Н BYTE$9▐╡Т 56122лIм1, Й("&H"лBYTE$)9ф╢Л:B╖Ж 9F,2B,BD,B2,6D,BD,B7,3D,AF,9F,0,2B,39,B7,FF,D7,39,B7,FF,D6,39,81,4D,27,3,7E,AE,75,BD,CE:Э╕Ж E5,7F,FF,40,6E,9F,0,9D,BD,D8,1B,26,68,CC,0,A,FD,1,D1,FD,1,D3,9D,A5,27,1D,BD,B7,3D,DC:·╣Ж 52,FD,1,D1,9D,A5,27,11,BD,B2,6D,BD,B7,3D,DC,52,27,45,FD,1,D3,9D,A5,26,3E,86,FF,B7,1,49;Q║Ж 39,7D,1,49,27,C,FC,1,D1,10,83,F9,FF,23,4,7F,1,49,39,F,87,F,70,ED,E4,F3,1,D3,FD,1;_╗Ж D1,35,6;r╝А I │ 1 е 123;~╜Н BYTE$;Э╛Т 56245лIм1, Й("&H"лBYTE$);г┐Л<└Ж BD,BD,CC,86,20,BD,A2,82,CE,3,DA,8E,2,DD,5F,A6,C0,27,8,A7,80,5C,20,F7,7E,DA,14,86,20,A7╩Ж 10,83,25,80,10,22,FB,E3,6C,E4,83,1,2C,10,2B,FB,DA,26,F5,35,2,5F,8E,DC,3E,44,25,3,5C,20>x╦Ж FA,A6,85,97,96,F,95,39,C6,FE,D7,6F,7E,CB,CF,BD,B3,57,96,6,34,12,BD,B2,6D,BD,B3,57,35,2>╘╠Ж 91,6,10,26,D4,C1,35,40,C6,5,A6,84,34,2,A6,C4,A7,80,35,2,A7,C0,5A,26,F1,39,C6,81,BD,B2>у═Ж 6F,C6,A5>Ў╬А I │ 1 е 123?╧Н BYTE$?!╨Т 56491лIм1, Й("&H"лBYTE$)?'╤Л?Е╥Ж BD,B2,6F,BD,AF,67,DC,2B,DD,DC,27,73,DC,A6,34,6,BD,AE,A9,35,6,DD,A6,39,BD,D8,1B,27,24,9E?т╙Ж DC,27,20,C1,6,26,4,9E,2B,9F,A6,54,D7,5A,9E,68,9F,76,9E,DC,9F,2B,10,DE,21,CC,AD,C4,34,6@>╘Ж F,6F,7E,AE,A9,8D,3C,BD,D1,E5,34,4,BD,CA,3B,35,4,BD,A7,E9,BD,AD,33,F,6F,BD,B9,5C,54,8D@Ъ╒Ж 6,BD,B9,A2,7E,AC,65,1F,98,8E,DD,70,5F,3A,E6,80,4A,2A,FA,39,8D,F,7E,C9,90,F,EA,C6,1,D7@й╓Ж EB,8D,14@╝╫А I │ 1 е 123@╚╪Н BYTE$@ч┘Т 56614лIм1, Й("&H"лBYTE$)@э┌ЛAK█Ж A,EB,2A,FA,34,16,9E,8A,9F,DC,CC,FF,FF,DD,76,97,5A,35,16,39,34,76,86,1,7E,D6,70,DC,76,10Aй▄Ж 83,FF,FF,10,26,FE,EE,7E,B4,F4,4F,D6,5A,10,2A,FE,E4,1D,20,F3,D6,5A,2A,2,5F,A1,BD,DD,C,1FB▌Ж 13,BD,B5,F,27,5,1E,13,BD,A5,9A,7E,B6,9B,10,4E,45,58,54,20,57,49,54,48,4F,55,54,20,46,4FBe▐Ж 52,6,53,59,4E,54,41,58,14,52,45,54,55,52,4E,20,57,49,54,48,4F,55,54,20,47,4F,53,55,42,BBt▀Ж 4F,55,54BЗрА I │ 1 е 123BУсН BYTE$B▓тТ 56737лIм1, Й("&H"лBYTE$)B╕уЛCфЖ 20,4F,46,20,44,41,54,41,D,46,55,4E,43,54,49,4F,4E,20,43,41,4C,4C,8,4F,56,45,52,46,4C,4FCtхЖ 57,D,4F,55,54,20,4F,46,20,4D,45,4D,4F,52,59,E,4E,4F,20,53,55,43,48,20,4C,49,4E,45,20,23C╙цЖ 9,53,55,42,53,43,52,49,50,54,13,52,45,44,49,4D,45,4E,53,49,4F,4E,45,44,20,41,52,52,41,59D2чЖ B,44,49,56,49,44,45,20,42,59,20,30,16,49,4C,4C,45,47,41,4C,20,44,49,52,45,43,54,20,43,4FDAшЖ 4D,4D,41DTщА I │ 1 е 123D`ъН BYTE$DыТ 56860лIм1, Й("&H"лBYTE$)DЕьЛDфэЖ 4E,44,D,54,59,50,45,20,4D,49,53,4D,41,54,43,48,13,4F,55,54,20,4F,46,20,53,54,52,49,4E,47ECюЖ 20,53,50,41,43,45,F,53,54,52,49,4E,47,20,54,4F,4F,20,4C,4F,4E,47,12,53,54,52,49,4E,47,20EбяЖ 54,4F,4F,20,43,4F,4D,50,4C,45,58,E,43,41,4E,27,54,20,43,4F,4E,54,49,4E,55,45,9,46,49,4CE ЁЖ 45,20,44,41,54,41,C,41,4C,52,45,41,44,59,20,4F,50,45,4E,D,44,45,56,49,43,45,20,4E,55,4DFёЖ 42,45,52F!ЄА I │ 1 е 123F-єН BYTE$FLЇТ 56983лIм1, Й("&H"лBYTE$)FRїЛFпЎЖ A,52,45,41,44,2F,57,52,49,54,45,9,46,49,4C,45,20,4D,4F,44,45,D,46,49,4C,45,20,4E,4F,54GўЖ 20,4F,50,45,4E,15,52,45,41,44,20,50,41,53,54,20,45,4E,44,20,4F,46,20,46,49,4C,45,16,44,49Go°Ж 52,45,43,54,20,43,4F,4D,4D,41,4E,44,20,49,4E,20,46,49,4C,45,12,55,4E,44,45,46,49,4E,45,44G═∙Ж 20,46,55,4E,43,54,49,4F,4E,C,4E,4F,20,53,55,43,48,20,46,49,4C,45,8,52,45,43,4F,52,44,20G█·Ж 23,9,44Gю√А I │ 1 е 123G·№Н BYTE$H¤Т 57106лIм1, Й("&H"лBYTE$)H■ЛH~ Ж 49,53,4B,20,46,55,4C,4C,13,4F,55,54,20,4F,46,20,42,55,46,46,45,52,20,53,50,41,43,45,D,57H▄Ж 52,49,54,45,20,50,52,4F,54,45,43,54,9,46,49,4C,45,20,4E,41,4D,45,9,44,49,52,45,43,54,4FI:Ж 52,59,B,46,49,4C,45,20,45,58,49,53,54,53,E,46,49,45,4C,44,20,4F,56,45,52,46,4C,4F,57,19IЩЖ 53,45,54,20,54,4F,20,4E,4F,4E,2D,46,49,45,4C,44,45,44,20,53,54,52,49,4E,47,6,56,45,52,49IиЖ 46,59,17I║А I │ 1 е 23I╞Н BYTE$IхТ 57229лIм1, Й("&H"лBYTE$)IыЛJ6Ж 41,43,43,45,53,53,20,50,41,53,54,20,45,4E,44,20,4F,46,20,46,49,4C,45JF Т &HC000,68JR Т&H71,0J^ в&HA027ЗуYяUбAєEa eee#eHT YЗUВ А@б&┼"AETЧPаHСQ░@E`ATЕPЕDа@Б @AR┼"tАEаEЖIД 'A#L/R%`▒Nе еAгE/`%O#@#}бJ╖"еHе #P3C7`#tбTбOз гP#R'A/`+TбIг"бBбД╟вIНPЕRTV                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 К&& Ю:З"COOKING WITH COCO DOS PATCH"&4 З"PART 7"&k З"USE ON COCO'S WITH THE PARALLEL PORT INSTALLED."&Р З:З"IF YOU HAVE NOT YET DONE SO"&мЗ"PUT YOUR DOS1.1 DISK"&┼З"IN DRIVE ZERO AND"&уЗ"BOOT UP EXTENDED COLOR"&№З"BASIC (KEY IN E)."'Й"HAVE YOU DONE THIS(Y/N)";A$'RЕ A$┤▓"Y"з З"PLEASE DO SO NOW AND RERUN THIS":С'uЗ"PATCHING, PLEASE WAIT......"'ЖА I │ 1 е 1'ТН BYTE$'▒Т 49552лIм1, Й("&H"лBYTE$)'╖Л'┐Ж 0'╨А I │ 1 е 3'▄Н BYTE$'√Т 49196лIм1, Й("&H"лBYTE$)(Л(Ж CC,D8,D0(!А I │ 1 е 2(- Н BYTE$(L!Т 49435лIм1, Й("&H"лBYTE$)(R"Л(^#Ж DB,30(o$А I │ 1 е 3({%Н BYTE$(Ъ&Т 49380лIм1, Й("&H"лBYTE$)(а'Л(п(Ж 7E,DA,6A(└)А I │ 1 е 2(╠*Н BYTE$(ы+Т 49463лIм1, Й("&H"лBYTE$)(ё,Л(¤-Ж DE,1C).А I │ 1 е 2)/Н BYTE$)90Т 49451лIм1, Й("&H"лBYTE$))?1Л)K2Ж DC,8F)\3А I │ 1 е 3)h4Н BYTE$)З5Т 52399лIм1, Й("&H"лBYTE$))Н6Л)Ь7Ж BD,D9,67)н8А I │ 1 е 3)╣9Н BYTE$)╪:Т 52480лIм1, Й("&H"лBYTE$))▐;Л)э<Ж BD,D9,27)■=А I │ 1 е 3* >Н BYTE$*)?Т 50589лIм1, Й("&H"лBYTE$)*/@Л*>AЖ 7E,D9,1A*OBА I │ 1 е 2*[CН BYTE$*zDТ 54878лIм1, Й("&H"лBYTE$)*АEЛ*МFЖ 91,80*ЭGА I │ 1 е 2*йHН BYTE$*╚IТ 54913лIм1, Й("&H"лBYTE$)*╬JЛ*┌KЖ 91,80*ыLА I │ 1 е 1*ўMН BYTE$+NТ 54580лIм1, Й("&H"лBYTE$)+OЛ+%PЖ 27+6QА I │ 1 е 3+BRН BYTE$+aSТ 54681лIм1, Й("&H"лBYTE$)+gTЛ+uUЖ 16,3,D1+ЖVА I │ 1 е 3+ТWН BYTE$+▒XТ 53871лIм1, Й("&H"лBYTE$)+╖YЛ+╞ZЖ 7E,D9,8D+╫[А I │ 1 е 2+у\Н BYTE$,]Т 53916лIм1, Й("&H"лBYTE$),^Л,_Ж 96,80,%`А I │ 1 е 3,1aН BYTE$,PbТ 50936лIм1, Й("&H"лBYTE$),VcЛ,edЖ 7E,D9,B5,veА I │ 1 е 1,ВfН BYTE$,бgТ 55232лIм1, Й("&H"лBYTE$),зhЛ,пiЖ 2,└jА I │ 1 е 1,╠kН BYTE$,ыlТ 55318лIм1, Й("&H"лBYTE$),ёmЛ,·nЖ 16- oА I │ 1 е 123-pН BYTE$-8qТ 55504лIм1, Й("&H"лBYTE$)->rЛ-ЪsЖ 81,C0,10,26,F6,34,9D,9F,BD,B7,B,5D,27,39,C1,11,24,35,86,6,3D,DB,BC,1F,98,C6,1,1F,2,10-їtЖ 93,B7,25,25,93,19,1F,3,D3,1B,1F,1,C3,0,C8,93,21,24,16,8D,B,27,6,1F,30,D3,A6,DD,A6,7E.QuЖ 96,B4,34,10,9E,68,30,1,35,10,39,7E,B4,4A,B7,9,76,A7,42,FC,1,4E,ED,45,7E,C5,A2,34,4,BD.кvЖ BD,CC,BD,CD,1B,35,4,C1,9,22,3,BD,CD,1B,AE,62,EC,88,10,34,6,C6,8,BD,B5,F,35,6,BD,DC.╣wЖ FF,C6,F8.╠xА I │ 1 е 123.╪yН BYTE$.ўzТ 55627лIм1, Й("&H"лBYTE$).¤{Л/Y|Ж A6,85,BD,A2,82,5C,26,F8,D,6F,26,15,7A,1,D5,26,10,BD,A1,B1,27,FB,81,3,26,2,32,64,C6,10/╢}Ж F7,1,D5,39,10,27,CC,AE,BD,D2,56,C6,23,9D,A5,27,3,BD,B7,38,8D,3,7E,D5,A0,C1,23,25,91,C10~Ж 28,22,8D,D7,80,39,34,4,C6,23,D7,80,35,4,9D,A5,27,19,81,2C,27,8,C6,A5,BD,B2,6F,BD,D2,560oЖ 34,4,9D,A5,27,5,BD,B7,38,8D,D2,35,4,7E,D2,7B,BD,C6,8C,BD,C6,E5,34,16,BD,D9,E,26,38,C60}АЖ A,8E,D90РБА I │ 1 е 1230ЬВН BYTE$0╗ГТ 55750лIм1, Й("&H"лBYTE$)0┴ДЛ1ЕЖ DE,BD,B9,A2,BD,A1,B1,BD,A2,82,34,2,BD,B9,58,35,2,81,59,27,14,35,16,39,53,55,52,45,28,591~ЖЖ 2F,4E,29,3F,44,45,4C,45,54,45,44,8E,D9,E8,C6,7,BD,B9,A2,BD,B9,58,35,16,7E,C6,FC,43,4F,4C1▐ЗЖ C4,57,50,4F,4B,C5,46,41,53,D4,53,4C,4F,D7,58,45,D1,41,55,54,CF,53,57,41,D0,45,52,52,4F,522>ИЖ D3,42,41,55,C4,4C,44,49,D2,50,41,52,41,4C,4C,45,CC,DC,2C,DC,31,DC,41,DC,45,DC,49,DC,5A,DD2MЙЖ A6,DD,CF2`КА I │ 1 е 1232lЛН BYTE$2ЛМТ 55873лIм1, Й("&H"лBYTE$)2СНЛ2ёОЖ DD,3E,DD,6E,DD,75,53,43,41,4E,A4,44,41,54,45,A4,45,4C,49,4E,C5,45,43,4F,44,C5,57,50,45,453NПЖ CB,DC,E6,DC,F2,DE,44,DE,51,DD,2E,8E,DA,F1,BD,B9,9C,7F,1,49,7F,1,4A,8E,D9,FF,CE,1,3E,AF3лРЖ 41,86,B,A7,C4,8E,DB,A,AF,43,86,5,A7,45,8E,DA,47,AF,46,8E,DB,19,AF,48,6F,4A,8E,B2,77,AF4 СЖ C8,12,AF,4D,6F,4F,9E,8A,AF,C8,10,BD,DE,21,CC,DD,EE,FD,1,8F,CC,DD,7B,FD,1,68,8E,FF,26,864ТЖ FF,A7,844+УА I │ 1 е 12347ФН BYTE$4VХТ 55996лIм1, Й("&H"лBYTE$)4\ЦЛ4╖ЧЖ 86,2C,A7,1,86,4,A7,1F,CC,1,CA,DD,95,8E,DA,E4,CE,2,DD,C6,E,34,44,BD,A5,9A,86,55,97,715ШЖ BD,B9,5C,35,14,30,1F,7E,AC,7F,52,55,4E,22,41,55,54,4F,45,58,45,43,22,0,52,45,56,28,43,295rЩЖ 31,39,38,34,20,43,2E,53,54,45,41,52,4D,41,4E,D,D,0,81,EC,23,3,7E,B2,77,8E,DA,31,80,E25═ЪЖ 7E,AD,D4,C1,58,22,F1,C0,50,C1,6,2F,7,34,4,BD,B2,62,35,4,8E,DA,60,7E,B2,CE,96,6F,27,C5▄ЫЖ 81,FF,265яЬА I │ 1 е 1235√ЭН BYTE$6ЮТ 56119лIм1, Й("&H"лBYTE$)6 ЯЛ6yаЖ 5,86,1,B7,1,4A,7E,C5,BC,34,14,AE,67,8C,A3,9D,27,4,35,14,20,F0,F,70,7D,1,4A,27,A,2B6╤бЖ 2B,7F,1,DA,7F,1,4A,20,0,73,1,4A,7F,1,D7,7F,1,D8,7F,1,D9,BD,A1,B1,81,9,27,15,81,5D7)вЖ 26,5,73,1,D9,20,C,81,5F,26,1F,73,1,D8,7D,1,D9,27,E4,7F,1,D8,F6,1,D7,8E,1,DA,A6,857ВгЖ 26,5,7F,1,D9,20,D2,7C,1,D7,20,4A,81,13,27,59,81,D,27,6E,81,8,27,9,81,A,26,17,BD,DB7СдЖ EC,20,B87деА I │ 1 е 1237░жН BYTE$7╧зТ 56242лIм1, Й("&H"лBYTE$)7╒иЛ8,йЖ 7D,1,D8,26,25,8D,2,20,21,7D,1,D7,27,3,7A,1,D7,39,81,15,27,11,81,C,27,D,81,3,27,98ДкЖ 81,5C,26,8,BD,A1,B1,20,3,7F,1,D7,81,20,25,7,7D,1,D8,26,2,8D,5,35,14,32,62,39,8E,18▐лЖ DA,F6,1,D7,6D,85,27,3,7C,1,D7,39,6F,F8,1,86,40,BD,A2,82,BD,B9,58,C6,1,E7,E4,8E,2,DD98мЖ AF,61,8D,E,7E,DB,61,7F,1,4A,6F,F8,1,8D,3,7E,DB,E7,8E,2,DD,10,8E,1,DA,E6,80,E7,A0,269FнЖ FA,39,F9YоА I │ 1 е 1239eпН BYTE$9Д░Т 56365лIм1, Й("&H"лBYTE$)9К▒Л9щ▓Ж 71,7E,A0,27,BD,B7,3D,9F,2B,BD,B2,6D,BD,B7,3D,AF,9F,0,2B,39,B7,FF,D7,39,B7,FF,D6,39,81,4D:B│Ж 27,3,7E,AE,75,BD,CF,C1,7F,FF,40,6E,9F,0,9D,BD,D9,E,26,68,CC,0,A,FD,1,D1,FD,1,D3,9D:а┤Ж A5,27,1D,BD,B7,3D,DC,52,FD,1,D1,9D,A5,27,11,BD,B2,6D,BD,B7,3D,DC,52,27,45,FD,1,D3,9D,A5:°╡Ж 26,3E,86,FF,B7,1,49,39,7D,1,49,27,C,FC,1,D1,10,83,F9,FF,23,4,7F,1,49,39,F,87,F,70;╢Ж ED,E4,F3;╖А I │ 1 е 123;&╕Н BYTE$;E╣Т 56488лIм1, Й("&H"лBYTE$);K║Л;е╗Ж 1,D3,FD,1,D1,35,6,BD,BD,CC,86,20,BD,A2,82,CE,3,DA,8E,2,DD,5F,A6,C0,27,8,A7,80,5C,20;№╝Ж F7,7E,DB,E,86,20,A7,80,5C,BD,A1,71,81,D,27,4,81,3,26,9,7F,1,49,CC,D,1,8E,2,DD,7E╞Ж DD,38,44,25,3,5C,20,FA,A6,85,97,96,F,95,39,C6,FE,D7,6F,7E,CC,A9,CC,1,CA,DD,95,39,D,95>v╟Ж 10,27,EE,9B,34,2,96,6F,81,FE,35,2,10,26,EE,8F,81,D,27,3,C,9C,8C,F,9C,34,11,8E,FF,26>Е╚Ж 6D,1E,2B>Ш╔А I │ 1 е 123>д╩Н BYTE$>├╦Т 56734лIм1, Й("&H"лBYTE$)>╔╠Л?&═Ж FC,A7,84,35,11,32,62,39,BD,B3,57,96,6,34,12,BD,B2,6D,BD,B3,57,35,2,91,6,10,26,D3,96,35?Г╬Ж 40,C6,5,A6,84,34,2,A6,C4,A7,80,35,2,A7,C0,5A,26,F1,39,C6,81,BD,B2,6F,C6,A5,BD,B2,6F,BD?р╧Ж AF,67,DC,2B,DD,DC,27,4B,DC,A6,34,6,BD,AE,A9,35,6,DD,A6,39,BD,D9,E,27,24,9E,DC,27,20,C1@<╨Ж 6,26,4,9E,2B,9F,A6,54,D7,5A,9E,68,9F,76,9E,DC,9F,2B,10,DE,21,CC,AD,C4,34,6,F,6F,7E,AE@K╤Ж A9,8D,14@]╥А I │ 1 е 66@i╙Н BYTE$@И╘Т 56857лIм1, Й("&H"лBYTE$)@О╒Л@ъ╓Ж 7E,AC,49,8D,F,7E,CA,3E,F,EA,C6,1,D7,EB,8D,14,A,EB,2A,FA,34,16,9E,8A,9F,DC,CC,FF,FF,DDAI╫Ж 76,97,5A,35,16,39,34,76,86,1,7E,D7,61,DC,76,10,83,FF,FF,10,26,FE,E5,7E,B4,F4,4F,D6,5A,10Aa╪Ж 2A,FE,DB,1D,20,F3Aq┘Т &HC000,68A}┌Т&H71,0AЙ█в&HA027,A2,7E,AC,65,1FAў▌Ж 98,8E,DD,C5,5F,3A,E6,80,4A,2A,FA,39,8D,F,7E,C9,90,F,EA,C6,1,D7,EB,8D,14,A,EB,2A,FA,34BV▐Ж 1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ▓pM'цДо\Z' жа4$Н5$ є9Б& рЖ Н:┘9Б &Ю║┐q*q(╠  эБЬ╖&·9Н╛q*Ь╖%0Й ┐q*Ю║ьЙэБ╝q*&ї ╫9Б & q+|q*q(9╞ўq,А =├q-╛q*жа4КАpАН5HHHHКН zq,&щ0Й Н@9Ўq(\ўq)4╠°¤q&5╞ zq)'FV■vq&vq' э4№q&кДъзДч5дДфэД0И 9Ўq(╦┴#0└┴&┴&L__ ўq(┐q*94&qЎq(╛q*└*╦0┴ &╞╞ ┐q*ўq(5Дq*Аq-    ▌▌▀▀U   Щ Я▒{╤┐є-┤╧╡[%п█   █w{▀╜юэ┐ЎРЦ √▒╗   Э┐ Ё    ¤▀¤█╖Ц@&Я┘▌▌ПЦэ╖ЦщцЯ┘P▌▀цЯ█qfЯэ╖ЦifЯЦhэ┐¤▀▌ ¤▀▌┐э╖╜я  {▐█Цэ┐┐АqнЦBGПЦ`fo5QfЦwvЯккqwqwЦtfЯf`foН▌▌П╬юцЯe35owww`fob$DoЦffЯawЦf%пa5oЦyцЯ ▌▌▀fffЯffiЯffofЩЦof`▌▀╔7Л╗╗Пў{╜▀▌▌╡_     lr-╜    ЖПwqf ЗwПюшfП ЦЯ┌▒╗┐∙fОПwfo▀Э▌ПяюцЯўdo;╗╗ `fo fo ЦfЯёf°fОя w ╗╗┐ ffЯ fiЯ f`o iЦoЎfОЯ █ A$(V),Fл3, З(A$(V))мFл3):CA│A(V,0):CB│A(V,1):Р)ЕCR▓1зCR│CRм1:Бж1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ж& Х1,&H6FFF:Х300&$╣ Г0│&H7000&2╚4,1:┐1,1&^(A$│ Л(12)л"Type what you want !"л Л(13)&h2Бж 90&} O_4 ╤2bO_эZ2~0T44@■┬2d5O4цSO4╠ O_мс&\дрфр]',0╪4╠=4╠4 d0T4▒╠4╠4ъ blьZ4╠_мс,\O4цSO4╠ O_мс'\крър]'>0╪4╠ 4ьZ4 Н  ^ ERRORO_4 ! цSO4╠ Oгс'0╪4  ьZ4╠_мс&\O4цSO4╠ O_мс&\дрфр]'■Ў2\5└50oть$4ь"4ьд4nДоi55эб5эб5эб2cnДоd ў&Aьш42y4и2dН╥2o50nД4@3bO_гD*"2ыoтA1FьD4&оB46<2jоMAO_46 b2^5@52knДmc'жbИАзb9жbДзb9жbHM/0b` є954@Ж oтJ&√CnД0B1╚ЖцАчаJ&∙0╚Д2I5@52gnД4601'■╞жВйвздZ&Ў5╢4601'╞ЖЩЙаВлвздZ&Є5╢4жДА%(ИАзД54ЖhiiiiiJ&ё5В4жДЛ%(ИАзД54ЖdfffffJ&ё5В4Ж0mА&J&∙o°5ЦоbжДЁ&ЎНЪ ЇжMHG4ж╚HGар'- Б , A0M @0MБ , (0╚НФJ&√0╚НМ0MНИ9жbИАзb■№Н┐0M1╚ж╚иM+  Н #Н "■∙4601!ЖцАса&J&ў5╢46Ж4цДждчазАjф&Ї2a5╢1i0bжДид*жДбд mД*ждH4жДHбр& Н│'%Ж ЖА52nnД■|0M  ж╚иMДАзBж╚лMДкBзB1BЖ ц╚─' 0M■Аj╚ яJ'■X0╚■╒0B■╨ ▌■90MьД&╠@эД■╜0╚■╖1M D$■xж╚иMДАзBж╚аMLДкBзB1╚Ж 0M■?$lH ї■ J'¤¤0╚■U0B■P р502y40b╠чА b0b2y42d0i╞5зАZ&∙92zocodoaoфЖ зe0loДоjцачbНuБ '·Б+'Б-&ЖАзДНcНl&mф'Ўlc ЄБ.&НQНZ&mф&Ўjc ЄБE&%Н?Б+'Б-&jaН3Б0-Б9.А0цd4Ж =ырчd чжdma'@лcДкДзДжe'¤ЫJ&·2f9jd+жа92b ┘Б0-Б9.mg'А0Йъbчb' jg¤oкзO9оjоdжiцgза4v42wCM/RжДHGзGзHьэAьэCьэEmJ+НI 6жIА-4Б /Ж зJжIАзIЖзHН-jG╠E+mG*╞-`GэбцGЖ/L└ ,√╦:эд2K5ЎоO╞*чаjI&· я╞ жIJmH/LаHАаJ-с'чаJ&√m╪ *╞-ча0─жH/Н"╞.ча ╠0.эбmH'mJ'заjJ'lH+ЎжJН9M/цTTTT╩0ча№ФJ&э90Н┐ 0Н"┐ 9 В Е @ ЖN9} В'╛ Гпj В;} *} } Е'z Е& ╢ ЖД0╖ Ж╖ @;46ЖА 46Жа╞4 Еж 1Н"жжК(цИ┴-КЎ Ж╖ Ж╖ @┼& О№∙╙&ЯО ~ж цжў IсИ'цИў KчжЖ╖ HИИл&yЕ&u┴жИ╖ J1Н_┐ Г0ИО} H╢ ЖКА╖ Жцфs ВPў HИИ┴А&╞ї H&1?&ў !Ў KчА╖ @ Ў╞ї H&1?&ў цАў K╖ @ Ў ВпНK п╢ HД|'#оdЖ■зja'О ~ж oжЖ╖ HНН4Е'  Ж■оdзЖx╖ Е2b5╢О1?'╢ HЕ&ї9Ж╨╖ HИИ} HЖА9О".1?&№9@4oтЖзИЖзИ■▓m&#Жзф1ИЖ и'1и jф&ЇlИжИБ -┌Ж¤з2a5Цж-зИь.эИж+з ь4НжИзИЛцЖчИН5Ж4ЖзИЖзИ■S5В4жИGзИжИБ"-lИД'Ж зИЛ зИжИБC#ДлИзИ5Ж4m&:lИжИбИ/ жИБC"*НО ц■╠эИOэИжИБC#жИбИ&ьИэИ'5ЖЖ з °Н m&Н6 {94 ж'Б¤&#o ж-4oд¤╖ L51ИжеoеjеЙM*ї¤б5Ж46НZm&1ЖзИЖзИ¤Дm& ╞1Ижд'L'1и Z&єlИжИБ -▌Ж¤з5╢╞ 0жАзаZ&∙оb15жз+ч,жИз-o.o/¤C5╢4&■╘oтЖ 1ИН1' lфлфН)'lфlфlфафJ*щЖ√з2a5жцИзезИ╞╔чИчж¤ шцж\'Кцж\94&■Кoт1ИжИБ ,Н"'╠Н Н'─Н'└ ╢4цж\'LБC/Ў5Ж2a5Д4Н╝'ЎА*°5Ж4m&lИ№кm&O_эИжИбИ- Я■<5Ж4&m&#lИ№ЕжИ■m&1ИА .Л К└цИзе№hж¤Ъm&з+_J&Zч,ьИэ.№N5жНSoИж *L' L+Ж№з з ¤d╛ЖкзИьИ'4E2dоф2jnдж *L&и ■#m'oИ ▐оj1ЙпБ╞1НДжазАZ&∙оfоjьdэИ0 ца' ┴#╞жазАZ&∙оhоjЖзтжазт'NжаБ 'Б:'Б/&Ж зa цa┴ ,зЕlajф&▐ *жфJ'%ца┴+'┴-'O J'Шца└0+ ┴. Б-&Pоlч 2b9 ╠оdцэf9Жзgоdц!'ч9m&og9ogоdц'ч9m&ьИгИ, ├жЛБ &lg9оdoжИБ╠'Ж№з9oИж *■XL&mИ'╞к╞ е9оd╜&'Ж№зоИ'o4 1ЙпД-& заьфГэф&Ё2b95 2q40Б&<&7Б 'ўБ 'єБ,'я1doацd┴'заldЁ&Б 'Б 'Б,&хьИГэИO5Р502onдоfНп&A46 Z2d52oоbМ'э° ч°52dnДоdН&Я&з°░50nД4ьИ&54жц ┴¤' цИ┴к'Ж№з5ЖоbН▄&Нk&Б &°{50nДоdоbьИ'эу0ЙжАзаьфГэф&є2bоd4■ь2d50nДоfоdoаНЦ&Н%&Б 'ц°сc$ёзаl° ъьИГэИН52dnД4Н&ьИ├эИ├жЛзф_5Жж L+ьИгИ-m& ж *L' h_9√+ т ▌4@3bO_гB*2ыьBA4ьDХAоFO_46Н/2^5@Tоf0dЖзДьb46Н52dnДоb0Н O_46Н56nД оfоdжацc'р?$жc_M' Н&1!J&ў]' 1Н Н &Z Є52dnД 4vжИБ╠'Ж№з >ц \+*m&5ьИ3И3╦ждз─\чИ'm *┴ &╞Z √╤ oжд\') л5m5роdоbьИ'эу0ЙжазАьфГэф&є2bоd42d50nДоdm&Ж№зьИ'o1ЙпД f&1!Г&Ї9оdО ╠46■є5ЖоdцOэf9оfьdч946M' 0цАса&J&ў5╢42|oc▄vГ▌v&╠7─ОROJзфзbжbI$АзblфСзaиДдДцaчА\'хlcM'р╞°╦D$√0Н▒ыф'0┴/0Н]┴ /$0Н7┴0,Нj┴+/И@M&╦ ╩@НY║& ╩ XНM'\цЕчdО^oЖ Н,L&жbН%бa& ┴&s mc'▄vГW&╠X"od2d5Ц╖ ╢ КА} +К@9Ж╖ ╢ CД@9▌vЖ ╞ОRзАZ&√9^_ [ ] 0 \@0&№9462~o╞Пчфoa1ИO_эИэИжфЛБ&ЖЯзфНvoa■╒& ja+ўЖНg сБ& ъ4ЖНX5Б 'AБ'Б'!Б '/цИ\'╝заlИН9 │mИ'о1?jИН+ еmИ' Ю1?jИЖН юЖ зЖ заН ьИ├эИ2b5╢4ЮИБ'Б '&Б 'BБ %MM+ Б@-Б`-Д▀И@зА М'5Ж`зВ Ж`зА┼&ЎЯИМ%ОьИ эБМр%Ў О╠``ЯИэБМ %∙ ╢ CH'¤Ў' Б&¤э'√ ї5ЦьdД├▌И94╞4Ў "─&∙PН_Н_DYНja&ўН5жфБ &ЮЧН 5Ц╞Xў  ЮХ4■Я5■Ъ94&НUж'Б & mИ&ёжБ ' Ж1И¤l&сН6m&ЖкзИ5ж461И╠эИ╞0жАзаZ&∙╞oаZ&√оb╠  эИ'_5╢4Н&Н:╢НO_эИm& mИ*Ж з5Ж╢ !Дў╖ !п94"╢ !К╖ !О1?&№P5в4oИНIН/"Н%%jИжИБа' ъН"шН%шlИжИА`&╪зИ5ЖБН БН!╓Б┴"┴ 9oИ9БmИ& Н%№Н $№9Н$№Н%№9 БЎ  V9ЖзИНFjИ&°9Н╨╓Б┴94&2~1ИOНюFБ<&∙Н┘зИН╘зИoИзфлИзamф' Н┴залaзajф&ЇН╡аa'Ж■з2b5ж4&чИ "╠UР4Н4jф&·2aЖ<Н*_жИН$жИНM' 1ИжаНjИ&ўШН ЖUН■сoИ5ж4&ыфчa1Н[4 1Н34 ╞жИ╖  офхd& жа╖  мb#Ў жб╖  мb%ЎжазИX$╒2d5жВТк║╩┌ъЄ···Єъ┌╩║кТzjRB2"  "2BRjоdмb'oдоbоdцд4ыДча5O1лцА'жАзаZ&∙оф2dnДo°оdlдцдO1лжcзд ч4оfоdцасА#ц]' жабА& Z Їж°б°52dnДоdoаmg'цiоjO0Лс° " жАзаl°\jg&я9оhцДOгf-)├гd,эdгd'4ьg0Льe1Л5цачАJ&∙ц°гdч°92~оhцg'сд#цд\O0лпфца0лы° ч?1лмф#жВзв ЎоjцА' офжАзаZ&∙2b92~ojokоfцдO1лпфоf1!пfоhцА'lkмф" жАба&хZ&Є2b9ok ∙M&4TTT0Е5─4╞jф+X ∙2a9_9ьш"0bН█фД'╞52ш"nДьb0dН╚ъДчД52bnДьdгb" 0fН│ъДчДle&э52dnД5╞ oтZ&√nДНжДказАZ&ў52ш nД╞ 0ш$1d9НЎжДдазАZ&ў фНщжаCдДзАZ&Ў ╓Н█жДдабА&Z&ї╞ _52ш@nДН┬ уН╝жабА&ыZ&ў ц50╞ 1ежв4Z&∙nД5╞ ох5заZ&∙2bnД4@юfоhоdж└бА&1?&Ў5@52fnД56CS├2ы44@3dжаз└0&°5└4@юfоhоdж└зА1?&° ╚mf*lcO_гfэfmh*jcO_гhэh9oтoтНсoтжfцh=эфжeцh=ыфчфжfцg=ыфчфmb'O_гфэфьфоc2inДoтoтmf*lфНи4ОO_hiihYIгf%гfli0&э5эdжр'O_гcэcжр'O_гdэd946oтM*lфO_гaэaЖ цf'14зАZ&√оb╠ 4&НЫжa*@Л0зВ╠ эфjd' ьb&шme'Ж-зВ2e2a5╢цgоdчАьhоfНй9оhоdьfXIXIуf├DVZчажgН946oтM'цДTTTTНцА─НJ'цф╚ чф&ч╞ ча с2a569╩0┴9/╦ча9ofogоdжАoтзт'@жАБ &jф&Ў 4Б-&ja А0+Б "зтьiXIэiXIXIуiырЙэhжАjф&▐ma'O_гhэh2b9ьН5э°уbэН,52dnДьН"э°9ьdэН9@ГdгН#*╠  O_эd9 И╗ЙAN$:З:З" enter bank name":╗ЙBA$: