Коды драйвера
К сожалению, объем книги не позволяет включить в нее полный текст
драйвера, поэтому мы приводим программу на Бейсике, позволяющую
получить его коды.
Программа состоит из двух частей: кодировщика (строки 10...550) и
собственно кодов драйвера (строки DATA — 1000...2350). Особенно аккурат-
но нужно набирать строки с данными, так как, несмотря в а то, что каждая
из них содержит два числа контрольной суммы для проверки, все же остается
вероятность появления ошибок.
После набора программы запустите ее оператором RUN и подождите
несколько минут. Начнется обработка данных, во время которой в верхнем
левом углу экрана будет высвечиваться надпись
LINE No: ХХХХ
где ХХХХ — номер обрабатываемой строки DATA. Если Вы допустите ошибку
при наборе строк, содержащих коды драйвера, программа известит Вас об
этом сообщением
Error in DATA lino No: ХХХХ
означающим, что ошибку следует искать в строке с номером ХХХХ.
Когда обработка данных пройдет до конца, компьютер подаст звуковой
сигнал, а на экране появится надпись
Saving: "DRIVER"CODE 63000,2160
Insert disk...
Вставьте дискету и нажмите любую клавишу для записи кодов драйвера. Для
получения страховочной копии можете ввести с клавиатуры оператор
GO ТО 500
и, сменив диск, нажать любую клавишу для записи.
10 CLEAR 62999: LET ad=63000: LET ln=1000: LET adO^ad
20 LET $1=0: LET s2=s1
30 PRINT AT 0,0;"LINE No: ";!n
40 READ a$: IF a$="END" THEN GO TO 500
50 IF LEN a$<>32 THEN GO TO 300
60 FOR n=1 TO 31 STEP 2
70 LET b$=a$(n): GO SUB 200: LET Ь0=Ь*16
80 LET b$=a$(n+1): GO SUB 200: LET b0=b0+b: LET s1=s1+b0:
LET $2=s2+b0*(n+1)/2
90 POKE ad,b0: LET ad=ad+1
100 NEXT n
110 READ s: IF slOs THEN GO TO 300
120 READ s: IF s2<>s THEN GO TO 300
130 LET ln=ln+10; GO TO 20
200 IF b$>«"0" AND b$<="9" THEN LET b=VAL b$: RETURN
210 IF b$>="A" AND b$<="F" THEN LET b=CODE b$-55: RETURN
220 IF b$>="a" AND b$<="f" THEN LET b=CODE b$~87: RETURN
300 CLS : PRINT INK 2; FLASH 1; BRIGHT 1;"Error in DATA line No: ";ln:
BEEP 1,-20: STOP
500 CLS : PRINT "Saving: ""DRIVER""CODE 63000,2160"
510 FOR n=1 TO 8: BEEP .05,12: BEEP .05,16: NEXT n
520 PRINT #0;"Insert disk..."
530 PAUSE 0: INPUT ;
540 RANDOMIZE USR 15619: REM : SAVE "DRIVER"CODE 63000,2160
550 CLS : PRINT "O.K.": STOP
1000 DATA "1801 FFCD47F67CFEE5D521E5FDCB56CC",2630,24329
1010 DATA "87F6692600291 16EFD195E2356DD6BDD", 1734,1 5673
1020 DATA "6221 1AF636FF21 E5FDCB86D1 El DDE9DD",2673,26428
1030 DATA "E332F6FDED5F3AF6FDF5F3ED73F6FDE5",32 33,28848
1040 DATA "DD6E00DD23DD6600DD23DD226CF6E3DD",2223,20507
1050 DATA "El DDF9CD6CF6E521 E5FDCBA6E1 ED7BF6",31 98,26957
1060 DATA "FD32F6FDF1 3AF6FDE284F6FBDDE1 C9C5",3299,28664
1070 DATA "F5E5CD21 3D2AC2 5C2200FE2AC35C2202", 1 754,1 2070
1080 DATA "FE2A02 5D2204FE2A045D2206FE3EC332", 1423,12331
1090 DATA "C25C21 BDF622C35C21 000039CD933DF9", 1 827,1 5371
1 100 DATA "E1CBFE1804F9E1 CBBEE52A00FE22C25C",2422,1 8824
1110 DATA "2A02FE22C35C2A04FE22025D2A06FE22", 1384,1 1545
1 120 DATA "045DE1 FI CI CBD6C9AFCDA0F777CD37F7",291 5,26581
1 130 DATA "CD2FFD00CDAAF77EE603F60C0E1 F CD 2 F", 20 41 ,1 5233
I 140 DATA "FD00CD40F7CD65F7CBE6CD08F70601 C9",2423,19276
II 50 DATA "CD9BF77E3CC83D360AC9060021 F2FD78". 1 973,1 581 7
1 160 DATA "E60F201 1 06047E3C28043D2801 3523 1 0",740,4927
1 170 DATA "F521 1 2F7C97806041 F30080E00CB5F20", 1 305,8946
1 180 DATA "01 0D71 2310F218E9CD5CF721 08FE0E5F",1625,1533®
1190 DATA "1 601 CD2FFD01 78В721 E5FDC0CB46C03E",2066,1 9567
1200 DATA "01 СЗЕ1 F8CD541 FD83E03C3E1 F8E5C5D5",2577,23758
1210 DATA " AF0E3FCD2FFD003E0A0E5FCD2FFD001 6", 1 465,11 701
1220 DATA "01 CD2FFD03CDA0F77E0E3FCD2FFD0078", 1949,16405
1230 DATA "DI CI E1C9CDA5F704200277C97EC9CDAA",2505,201 26
1240 DATA "F77EC921 F2FD1 80D21 EEFD1 8Q821 EAFD",221 5*18106
1250 DATA "1 80321 E6FDD5ED5BE4FD16001 9D1 C93A'2080,1 7997
1260 DATA "E4FDCDA5F7E603F61 C4F7EE640B10EFF",2550,1 9401
1270 DATA "C921 E5FDCBF6C9E5D5C53 AE5FDCB7720",2899,23397
1280 DATA "1 AE610EE1047CDB7F7A8CD2FFD00CDA0",2270,20537
1290 DATA "F77E0E3FCD2FFD00CDC9F7C1 DI Е1 C9E6",2666,25321
1300 DATA "0332E4FD21 E5FDCBB6C921 E5FDCB76C0",2663,24465
1310 DATA "21 C9F7E5CDB7F7CD2FFD00CDAAF77E3C",2658,21 51 5
1320 DATA "C0E5CDB4F ADD21 E5FDDDCB00C6AFCD45",2863,22547
1330 DATA "F83E32CD45F83E02CD45F8DDCB0086E1 ",2251,1 9789
1340 DATA "CB57CBB62002CBF67EE6C377AFCDA0F7",261 5,23779
1350 DATA "77061 81 802061 C0E7FCD2FFD00CD5BF8", 1 399,1 5602
1360 DATA "C365F7CDAAF77EE603B00E1 FCD2FFD00"i2250,1 6443
1370 DATA "C340F7D5CD02F8D1 CDB7F7CDA5F75ECD",2934,25506
1380 DATA "AAF7CB6B2808CB76201 33EC81 85BCB76M 653,1 2089
1390 DATA "280BCB22CB7B2805CB4A2801 1 5CB7B28", 1 364,1 1 499
1400 DATA "11CB7E23E5CB3A21 E5FDCBE63004CBA6",2245,19959
1410 DATA "CBA7CD2FFD00CD1 EFA3E06DAE1 F8DD7E",2466,21 560
1420 DATA "00CDA0F7BEE5D5C4E0F6D1 E1 7ECB5328", 2796,23101
1430 DATA "02CB27BAC80E3FCD2FFD007ACB532028", 1 692,1 3772
1440 DATA "77CD4DF8CB67C83E05321 AF63ED00E1 F", 1 859,1 3488
1450 DATA "CD2FFD00CDF2F8C36EF6E5F5CD9BF77E",2958,26296
1460 DATA "3C28023600F1 El C9CB3A72D5CD49F8D1 ",21 46,21 959
1470 DATA "CD1 EFA3E0638D2DD7E00BAC81 8C95FD5",2085,1 8406
1480 DATA "CDCFF7CDB4FACDB7F7D1 CB0B21 E5FDCB", 3070,24835
1490 DATA "E63004CBA7CBA6CD2FFD007ACDA5F7CB",2468,22350
1500 DATA "56CA45F8CDA0F77ECB270E3FCD2FFD00",21 67,1 6656
1510 DATA "727ACB27C349F821 96FDC9CDB4FA1851 "«2371,20583
1520 DATA "3E800E01 1 8043EA00E0232F8FD79321 1", 1 21 0,1 1 899
1530 DATA "FAC5D5E5CDA5F77EE603CB762002C604",2422f 1 61 78
1540 DATA "06004F21 96FD097E32E6F9CD02F8CDB4",2025,21 1 16
1550 DATA "FAE1 DI CI 22F9FDED53FBFD7832FDFDCD",31 1 8,26177
1560 DATA "6BF81 80B7832FDFD22F9FDED53FBFD06",2432,22321
1570 DATA "03ED5BFBFDCD5CF72AF9FDC5CDFAF94F",2903,26048
1580 DATA "E61 F79C1 281A10E93E04C3E1 F8CDB4FA",2259,21 996
1590 DATA "CDA5F77EE6034FCD63FC2AF9FD091 807",2195,1 5889
1600 DATA "CB773E02C2E1 F8ED5BFBFD1 C7BFE0038",2346,1 9086
1610 DATA "0A1E00143AFDFD471 09AC93AFDFD471 0", 1 71 7,1 7040
1620 DATA "A3C9D50E5F7B3CCD2FFD003AF8FD0EIF", 1978,15654
1630 DATA "CD2FFD000E7FCD2FFD01 78B73E01CAE1",1945,1 6954
1640 DATA "F8CD65F7D1C9B7180137D5D4B4FA2108",2370,17582
1650 DATA "FE3AF8FD5F3EC032F8FD3A1 1FA57D53E",2400,18976
1660 DATA "013211FAE5CDFAF9DDE1 D1F57B32F8FD",2825,2681 4
1670 DATA "7A321 1FAF1D1E61 FC837C9CDCFF722F9",2548,23254
1680 DATA "FD36FE23232322FBFD36003E3C32FDFD", 1 936,16778
1690 DATA "CDB4FACD5CF7CD65F7CB4F28F611 9065",2562,191 34
1700 DATA "1 B7AB320FBCD2t FA2AF9FD3600300236", 1 801,1351 7
1710 DATA "FF23ED5BFBFD1 ADDBE02281 CDDE5D1 EB",2523,21 603
1720 DATA "010400EDB0EB36FE22F9FD3AFDFD3DC8",2322, 22878
1730 DATA "32FDFDCD5CF71 8CD2B36FEC9E521 E5FD",2625,22940
1740 DATA "CB662024CBE6CDA0F77E0E3FCD2FFD00",21 26,1 7268
1750 DATA "0E7FCD2FFD000618CD5BF8CD08F72008", 1720,14683
1760 DATA "21 3421 2B7CB520FBE1C9CD02F8CDAAF7",2252,23256
1770 DATA "7EF6C077CDA5F736A0E5CDE0F63E02CD",2687,21 895
1780 DATA "45F8CD1 EFAE1 301 3CBF6E5CDB7F7CD2F",2659,2331 8
1790 DATA "FD00CD1 EFAE1 3E09DAE1 F8DD7E03E603",2308,1 8864
1800 DATA "4F7EE6FCB1 77DD5600E5CDAAF7CB765E",2556,21775
1810 DATA "2002CB3AE1 CB96CB3 A300ECBAECB7328", 1 931,1 6955
1820 DATA "08CBD6E5CDA0F735E1 CDB7F7CBA7CD2F",2801,23966
1830 DATA "FD00E5CD1 EFAE1 3003CBBEC9DD7E01 B7",2368,1 9508
1840 DATA "C0CBBECDAAF7CBBEC9CDE2FACDA5F77E",3225,27302
1850 DATA "E643FE01 3E1 0C2E1 F81 1 08000601 2AFE",1625,1 1 970
1860 DATA "FD7CB53E12CAE1F8CD58F9DD2AFEFD11 ",2642,22438
1870 DATA "E100DD193E10DDBE06C2E1F8CDAAF75E",2349,22160
1880 DATA "CDA5F73CCBBEDDCB02562807CBFECB7B",241 2,1 9452
1890 DATA "CAE1F8CBAEDDCB0246C0CBEECB73CAE1 ",2926,24359
1900 DATA "F8C922FEFDC9CDCFF7D5D5DDE1 E5CDA5",3321,28524
1910 DATA "F77021 9EFDCD43FCE1 7EFEFE283F23FE",2578,21300
1920 DATA "FDE52007EBCDA0F77E1 2EB21 A2FDCD43",2467,20426
1930 DATA "FCE3DD5DDD5401 0400EDB0DD6BDD62E3" ,2390,1 9934
1940 DATA "DD4EFFCD52FCCD63FCE5DDE5E136FF5D",2955,24842
1950 DATA "541 3EDB0E5DDE1 El CD52FC18BBDDE501",261 7,22084
1960 DATA "F6003EFFCDA5F7CB76E1 20053E4E01 55",t989,1 381 7
1970 DATA "02775D541 3EDB0CDB4FACD5CF73E0232",2023,1 7632
1980 DATA "1 1FA3EF032F8FDE1 C3FAF9EBCDA5F7CB",3094,2871 4
1990 DATA "76EB200223235E23666B7E23FE80C847", 1 609,1 5039
2000 DATA "7E23DD7700DD231 OF91 8EF79E6034704", 1 71 4,1 3757
2010 DATA "0E01 CB21 1 0FC41 CB380E00CB38CB1 9C9", 1 545,1 4669
2020 DATA "3E800E01 1 8043EA00E0232F8FD79321 1",1210,11 899
2030 DATA "FAED53F9FDED53FBFDE5CDCFF7CDB4FA",3419,29332
2040 DATA "DDE1 0604C5DDE5DD7E00DD23FEFC2836",2306,1 8666
2050 DATA "FEFF2832FEFE2842CD5CF7DD7E000E3F",21 81,1 5676
2060 DATA "CD2FFD002AF9FDDD7E023D5FCDFAF9CB",2461,22414
2070 DATA "77F53E02C2E1F8F1E61F3EFC2805321 A",2032,14629
2080 DATA "F63EFDDD77FFDD4E03CD63FC2AF9FD09",2567,20470
2090 DATA "22F9FD01 0400DD091 8ADDDE1C1211AF6",1912,17308
2100 DATA "7E3C280E36FFED5BFBFDED53F9FD1 094",2367,22388
2110 DATA "361 4CDA0F77E0E3FCD2FFD0011FC0001", 1664,12805
2120 DATA "0500DD7E00FEFEC8BB2003DD7200DD09", 1847,15703
2130 DATA "18F0E5DDE1 18E83256FD2253FDE17E23",2340,18931
2140 DATA "E50707D55F3AE5FDCB7F20021 CI C1 600", 1 533,10125
2150 DATA "215AFD195E2356EBE3EB2152FD3E00C3", 1938,17251
2160 DATA "2F3D532A092AD53FCB3FBA3FB03F333F", 1428,1 3080
2170 DATA "293F3A3E303EE0F6F7F76BF8C5F953F9",2431,24859
2180 DATA "58F95EF9E2FA61 FBBAFB53FABEFB78FC",3087,27094
2190 DATA "7EFC16F92AFD8CF796F74FF914F71 AOF",2364,18401
2200 DATA "08041 61 00905A6FDADFDB6FDCBFD28FF",2095,23393
2210 DATA "060001 FC80504E0C0003F601FC800CFF", 1454,14855
2220 DATA "060001 FE8001 F70BFF060001 FB8001 F7", 1 537,1 4877
2230 DATA "01 FF80324E0C.0003F501 FE8001 F7164E",1503,13175
2240 DATA "0C0003F501 FB8001 F7044E800000FFFF", 1 608,1 5978
2250 DATA "FFFF0000000000000000FFFFFFFF0000", 1 530,1 351 5
2260 DATA "OOOOOOOOOOOOOOOOOOFEOOOOOOOOOOOO",254,2540
^270 DATA "0000000000002843292031393932204D",502,5881
2280 DATA "4F41 2E20563031 2E31 3961 20666F7220", 1 045,9468
2290 DATA "43502F4D2026204D6963726F444F5320", 11 41,1 01 72
2300 DATA "756E6465722053636F7270696F6E2032", 1 501,1 2070
2310 DATA " 35 36 2 E466C6F 707079 2044 69 736В 2042 м, 1312,11411
2320 DATA "494F 532Е20444849474854207265616С", 1205,1 1066
2330 DATA "697A6174696F6E2E202054522D444F53",1317,9999
2340 DATA " 20 6F 6Е 2 E7CFE 00000000000000000000 ",677,291 2
2350 DATA "END"
