> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 39 08 |*************.9.|
00000020: 02 00 8F 20 2A 20 44 49 53 4B 20 49 44 20 43 4F |... * DISK ID CO|
00000030: 52 52 45 43 54 4F 52 20 2A 00 55 08 03 00 8F 20 |RRECTOR *.U.... |
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000050: 2A 2A 2A 2A 2A 00 77 08 0A 00 44 56 B2 30 3A 97 |*****.w...DV.0:.|
00000060: 35 33 32 38 30 2C 31 31 3A 97 35 33 32 38 31 2C |53280,11:.53281,|
00000070: 30 3A 99 22 98 93 22 00 88 08 14 00 A0 31 35 3A |0:.".."......15:|
00000080: 9F 31 35 2C 38 2C 31 35 00 AA 08 1E 00 4D 44 24 |.15,8,15.....MD$|
00000090: B2 22 13 22 3A 81 49 B2 31 A4 32 30 3A 4D 44 24 |.".":.I.1.20:MD$|
000000A0: B2 4D 44 24 AA 22 11 22 3A 82 00 C4 08 28 00 81 |.MD$.".":....(..|
000000B0: 49 B2 31 A4 33 39 3A 42 4C 24 B2 42 4C 24 AA 22 |I.1.39:BL$.BL$."|
000000C0: 20 22 3A 82 00 EF 08 32 00 50 30 24 B2 22 93 11 | ":....2.P0$."..|
000000D0: 11 20 20 20 20 20 20 20 20 20 20 49 44 20 43 48 |. ID CH|
000000E0: 45 43 4B 45 52 2F 43 4F 52 52 45 43 54 4F 52 00 |ECKER/CORRECTOR.|
000000F0: 1B 09 3C 00 52 45 24 B2 22 20 20 20 20 20 20 20 |..<.RE$." |
00000100: 20 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 20 | PRESS .RETURN. |
00000110: 54 4F 20 43 4F 4E 54 49 4E 55 45 00 26 09 63 00 |TO CONTINUE.&.c.|
00000120: 89 20 31 30 30 30 00 39 09 64 00 84 31 35 2C 45 |. 1000.9.d..15,E|
00000130: 52 3A 8B 45 52 B2 30 A7 8E 00 50 09 6E 00 84 31 |R:.ER.0...P.n..1|
00000140: 35 2C 45 52 2C 45 4D 24 2C 45 54 24 2C 45 53 24 |5,ER,EM$,ET$,ES$|
00000150: 00 7F 09 78 00 99 4D 44 24 22 12 44 49 53 4B 20 |...x..MD$".DISK |
00000160: 45 52 52 4F 52 21 92 20 23 22 45 52 22 20 22 45 |ERROR!. #"ER" "E|
00000170: 4D 24 22 20 22 45 54 24 22 2C 20 22 45 53 24 00 |M$" "ET$", "ES$.|
00000180: 85 09 82 00 80 00 9C 09 2C 01 A0 31 35 3A 99 C7 |........,..15:..|
00000190: 28 31 34 32 29 3A 99 22 93 22 3A 80 00 DA 09 E8 |(142):.".":.....|
000001A0: 03 99 50 30 24 3A 99 22 11 50 4C 41 43 45 20 44 |..P0$:.".PLACE D|
000001B0: 49 53 4B 45 54 54 45 20 54 4F 20 42 45 20 43 48 |ISKETTE TO BE CH|
000001C0: 45 43 4B 45 44 20 49 4E 20 44 52 49 56 45 22 44 |ECKED IN DRIVE"D|
000001D0: 56 22 11 11 22 3A 99 52 45 24 00 F2 09 F2 03 A1 |V"..":.RE$......|
000001E0: 51 24 3A 8B 51 24 B3 B1 C7 28 31 33 29 A7 31 30 |Q$:.Q$...(13).10|
000001F0: 31 30 00 04 0A FC 03 41 44 24 B2 22 22 3A 49 44 |10.....AD$."":ID|
00000200: 24 B2 22 22 00 1B 0A 06 04 98 31 35 2C 22 49 22 |$.""......15,"I"|
00000210: AA C4 28 44 56 29 3A 8D 31 30 30 00 30 0A 10 04 |..(DV):.100.0...|
00000220: 9F 32 2C 38 2C 32 2C 22 23 30 22 3A 8D 31 30 30 |.2,8,2,"#0":.100|
00000230: 00 4F 0A 1A 04 98 31 35 2C 22 55 31 3A 32 22 3B |.O....15,"U1:2";|
00000240: 44 56 3B 22 2C 31 38 2C 30 22 3A 8D 31 30 30 00 |DV;",18,0":.100.|
00000250: 5C 0A 24 04 81 4A B2 32 32 A4 32 33 00 7C 0A 2E |\.$..J.22.23.|..|
00000260: 04 98 31 35 2C 22 4D 2D 52 22 3B C7 28 4A 29 3B |..15,"M-R";.(J);|
00000270: C7 28 30 29 3A A1 23 31 35 2C 5A 24 00 8E 0A 38 |.(0):.#15,Z$...8|
00000280: 04 41 44 24 B2 41 44 24 AA 5A 24 3A 82 4A 00 B8 |.AD$.AD$.Z$:.J..|
00000290: 0A 42 04 98 31 35 2C 22 42 2D 50 3A 32 2C 31 36 |.B..15,"B-P:2,16|
000002A0: 32 22 3A A1 23 32 2C 41 24 2C 41 31 24 3A 49 44 |2":.#2,A$,A1$:ID|
000002B0: 24 B2 41 24 AA 41 31 24 00 E8 0A 4C 04 99 22 11 |$.A$.A1$...L..".|
000002C0: 11 20 41 43 54 55 41 4C 20 49 44 20 52 45 43 4F |. ACTUAL ID RECO|
000002D0: 52 44 45 44 20 4F 4E 20 53 45 43 54 4F 52 53 20 |RDED ON SECTORS |
000002E0: 49 53 3A 20 22 41 44 24 00 06 0B 56 04 99 22 11 |IS: "AD$...V..".|
000002F0: 22 A6 31 33 29 22 46 49 4C 45 20 49 44 20 49 53 |".13)"FILE ID IS|
00000300: 3A 20 22 49 44 24 00 1C 0B 60 04 8B 20 41 44 24 |: "ID$...`.. AD$|
00000310: B3 B1 49 44 24 20 A7 20 31 32 30 30 00 3C 0B 6A |..ID$ . 1200.<.j|
00000320: 04 99 22 11 22 A6 31 32 29 22 12 54 48 49 53 20 |..".".12)".THIS |
00000330: 44 49 53 4B 20 49 53 20 4F 4B 21 22 00 43 0B 74 |DISK IS OK!".C.t|
00000340: 04 A0 32 00 77 0B 7E 04 99 4D 44 24 42 4C 24 3A |..2.w.~..MD$BL$:|
00000350: 99 42 4C 24 4D 44 24 22 20 20 20 20 20 20 20 20 |.BL$MD$" |
00000360: 20 20 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F | DO YOU WISH TO|
00000370: 20 43 48 45 43 4B 22 00 9D 0B 88 04 99 22 20 20 | CHECK"......" |
00000380: 20 20 20 20 20 20 41 4E 4F 54 48 45 52 20 44 49 | ANOTHER DI|
00000390: 53 4B 45 54 54 45 20 28 59 2F 4E 29 3F 00 B1 0B |SKETTE (Y/N)?...|
000003A0: 8D 04 A1 51 24 3A 8B 51 24 B2 22 22 A7 31 31 36 |...Q$:.Q$."".116|
000003B0: 35 00 C2 0B 92 04 8B 51 24 B2 22 59 22 A7 31 30 |5......Q$."Y".10|
000003C0: 30 30 00 D4 0B 9C 04 8B 51 24 B3 B1 22 4E 22 A7 |00......Q$.."N".|
000003D0: 31 31 35 30 00 DD 0B A6 04 89 33 30 30 00 0C 0C |1150......300...|
000003E0: B0 04 99 22 11 11 20 41 43 54 55 41 4C 20 49 44 |...".. ACTUAL ID|
000003F0: 20 41 4E 44 20 46 49 4C 45 20 49 44 20 44 4F 20 | AND FILE ID DO |
00000400: 4E 4F 54 20 4D 41 54 43 48 21 21 22 00 38 0C BA |NOT MATCH!!".8..|
00000410: 04 99 4D 44 24 22 20 53 48 41 4C 4C 20 49 20 50 |..MD$" SHALL I P|
00000420: 52 4F 43 45 45 44 20 54 4F 20 43 4F 52 52 45 43 |ROCEED TO CORREC|
00000430: 54 20 28 59 2F 4E 29 3F 00 4C 0C BF 04 A1 51 24 |T (Y/N)?.L....Q$|
00000440: 3A 8B 51 24 B2 22 22 A7 31 32 31 35 00 5E 0C C4 |:.Q$."".1215.^..|
00000450: 04 8B 51 24 B3 B1 22 59 22 A7 31 31 34 30 00 81 |..Q$.."Y".1140..|
00000460: 0C CE 04 99 4D 44 24 42 4C 24 4D 44 24 A6 31 30 |....MD$BL$MD$.10|
00000470: 29 22 42 45 20 50 41 54 49 45 4E 54 20 2E 2E 2E |)"BE PATIENT ...|
00000480: 22 00 9A 0C D8 04 98 31 35 2C 22 42 2D 50 3A 32 |"......15,"B-P:2|
00000490: 2C 31 36 32 22 3A 8D 31 30 30 00 AB 0C E2 04 98 |,162":.100......|
000004A0: 32 2C 41 44 24 3B 3A 8D 31 30 30 00 CA 0C EC 04 |2,AD$;:.100.....|
000004B0: 98 31 35 2C 22 55 32 3A 32 22 3B 44 56 3B 22 2C |.15,"U2:2";DV;",|
000004C0: 31 38 2C 30 22 3A 8D 31 30 30 00 DF 0C F6 04 98 |18,0":.100......|
000004D0: 31 35 2C 22 49 22 AA C4 28 44 56 29 3A A0 32 00 |15,"I"..(DV):.2.|
000004E0: 03 0D 00 05 99 4D 44 24 42 4C 24 22 93 22 4D 44 |.....MD$BL$"."MD|
000004F0: 24 A6 31 30 29 22 43 48 45 43 4B 49 4E 47 20 44 |$.10)"CHECKING D|
00000500: 49 53 4B 00 12 0D 0A 05 99 C8 28 4D 44 24 2C 38 |ISK.......(MD$,8|
00000510: 29 3B 00 1C 0D 14 05 89 31 30 32 30 00 00 00 |);......1020... |
....... *********************.9.... * DI
SK ID CORRECTOR *.U.... ****************
*****.W...DV.0:.53280,11:.53281,0:."..".
.... 15:.15,8,15.....MD$.".":.I.1.20:MD$
.MD$.".":..D.(..I.1.39:BL$.BL$." ":....2
.P0$."... ID CHECKER/CORRECTOR.
..<.RE$." PRESS .RETURN. TO CONTI
NUE.&.C.. 1000.9.D..15,ER:.ER.0...P.N..1
5,ER,EM$,ET$,ES$..X..MD$".DISK ERROR!.
#"ER" "EM$" "ET$", "ES$.........,. 15:.G
(142):.".":..Z....P0$:.".PLACE DISKETTE
TO BE CHECKED IN DRIVE"DV"..":.RE$......
Q$:.Q$..G(13).1010.....AD$."":ID$.""....
..15,"I".D(DV):.100.0....2,8,2,"#0":.100
.O....15,"U1:2";DV;",18,0":.100.\.$..J.2
2.23.|....15,"M-R";G(J);G(0):.#15,Z$...8
.AD$.AD$.Z$:.J...B..15,"B-P:2,162":.#2,A
$,A1$:ID$.A$.A1$...L..".. ACTUAL ID RECO
RDED ON SECTORS IS: "AD$...V..".".13)"FI
LE ID IS: "ID$...`.. AD$..ID$ . 1200.<.J
..".".12)".THIS DISK IS OK!".C.T. 2.W.~.
.MD$BL$:.BL$MD$" DO YOU WISH TO
CHECK"......" ANOTHER DISKETTE (
Y/N)?......Q$:.Q$."".1165.B....Q$."Y".10
00.T....Q$.."N".1150......300......".. A
CTUAL ID AND FILE ID DO NOT MATCH!!".8..
..MD$" SHALL I PROCEED TO CORRECT (Y/N)?
.L....Q$:.Q$."".1215.^.D..Q$.."Y".1140..
.N..MD$BL$MD$.10)"BE PATIENT ..."...X..1
5,"B-P:2,162":.100......2,AD$;:.100.J...
.15,"U2:2";DV;",18,0":.100......15,"I".D
(DV): 2......MD$BL$"."MD$.10)"CHECKING D
ISK......H(MD$,8);......1020...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL