_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

DISK CHECKER

FILE INFORMATION

FILENAME(S): DISK CHECKER

FILE TYPE(S): PRG

FILE SIZE: 3.5K

FIRST SEEN: 2025-12-02 00:01:54

APPEARS ON: 2 disk(s)

FILE HASH

4af758b1130bcae651ddabffa4d8ce6422981eb932a42360ee7c77fcd9205928

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DE GROOT DISK CHECKER PRG earthshaker 23 17 DOWNLOAD FILE
DE GROOT DISK CHECKER PRG earthshaker 13 10 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 28 08 64 00 99 22  44 49 53 4B 20 43 48 45  |..(.d.."DISK CHE|
00000010: 43 4B 45 52 20 20 2D 20  4A 49 4D 20 42 55 54 54  |CKER  - JIM BUTT|
00000020: 45 52 46 49 45 4C 44 22  00 70 08 6E 00 86 20 41  |ERFIELD".p.n.. A|
00000030: 28 32 35 35 29 2C 43 25  28 37 37 2C 32 38 29 2C  |(255),C%(77,28),|
00000040: 44 25 28 31 29 2C 4E 24  28 32 32 34 29 2C 54 25  |D%(1),N$(224),T%|
00000050: 28 32 32 34 2C 31 29 2C  53 25 28 32 32 34 2C 31  |(224,1),S%(224,1|
00000060: 29 2C 4C 25 28 32 32 34  29 2C 52 25 28 37 37 29  |),L%(224),R%(77)|
00000070: 00 90 08 78 00 44 25 28  30 29 B2 35 38 3A 44 25  |...x.D%(0).58:D%|
00000080: 28 31 29 B2 28 34 32 29  3A 5A 24 B2 C7 28 30 29  |(1).(42):Z$..(0)|
00000090: 00 B1 08 82 00 83 31 2C  31 37 2C 32 30 2C 32 34  |......1,17,20,24|
000000A0: 2C 31 39 2C 33 30 2C 31  37 2C 33 35 2C 31 36 2C  |,19,30,17,35,16,|
000000B0: 30 00 D3 08 8C 00 83 36  35 2C 31 37 2C 32 30 2C  |0......65,17,20,|
000000C0: 32 34 2C 31 38 2C 33 30  2C 31 37 2C 33 35 2C 31  |24,18,30,17,35,1|
000000D0: 36 2C 30 00 F5 08 96 00  83 36 37 2C 33 39 2C 32  |6,0......67,39,2|
000000E0: 38 2C 35 33 2C 32 36 2C  36 34 2C 32 34 2C 37 37  |8,53,26,64,24,77|
000000F0: 2C 32 32 2C 30 00 27 09  A0 00 42 24 B2 C7 28 31  |,22,0.'...B$..(1|
00000100: 37 29 3A 85 22 44 52 49  56 45 20 23 22 3B 44 24  |7):."DRIVE #";D$|
00000110: 3A 8B 44 24 B2 22 53 22  A7 44 24 B2 22 30 22 3A  |:.D$."S".D$."0":|
00000120: 42 24 B2 C7 28 33 29 00  41 09 AA 00 8B 44 24 B3  |B$..(3).A....D$.|
00000130: B1 22 30 22 AF 20 44 24  B3 B1 22 31 22 89 31 36  |."0". D$.."1".16|
00000140: 30 00 5B 09 B4 00 9F 31  35 2C 38 2C 31 35 2C 22  |0.[....15,8,15,"|
00000150: 49 22 AA 44 24 3A 8D 33  30 32 30 00 73 09 BE 00  |I".D$:.3020.s...|
00000160: 9F 33 2C 38 2C 33 2C 22  24 22 AA 44 24 3A 8D 33  |.3,8,3,"$".D$:.3|
00000170: 30 32 30 00 8E 09 C8 00  41 30 B2 31 3A A1 23 33  |020.....A0.1:.#3|
00000180: 2C 41 24 3A 41 B2 C6 28  41 24 AA 5A 24 29 00 A1  |,A$:A..(A$.Z$)..|
00000190: 09 D2 00 87 20 41 31 3A  8B 41 B2 41 31 89 32 35  |.... A1:.A.A1.25|
000001A0: 30 00 B8 09 DC 00 46 25  B2 46 25 AA 31 3A 8B 20  |0.....F%.F%.1:. |
000001B0: 46 25 B2 33 89 32 39 30  00 CB 09 E6 00 87 20 41  |F%.3.290...... A|
000001C0: 31 3A 8B 41 31 B2 30 89  32 31 30 00 D4 09 F0 00  |1:.A1.0.210.....|
000001D0: 89 32 33 30 00 E6 09 FA  00 87 41 31 3A 8B 41 31  |.230......A1:.A1|
000001E0: B2 30 89 32 37 30 00 0D  0A 04 01 87 42 31 3A 81  |.0.270......B1:.|
000001F0: 4A B2 41 30 A4 41 31 3A  52 25 28 4A 29 B2 42 31  |J.A0.A1:R%(J).B1|
00000200: 3A 82 4A 3A 41 30 B2 4A  3A 89 32 35 30 00 31 0A  |:.J:A0.J:.250.1.|
00000210: 0E 01 8B 41 B2 31 B0 41  B2 36 35 A7 44 31 B2 31  |...A.1.A.65.D1.1|
00000220: 3A 54 39 B2 33 35 3A 53  39 B2 33 3A 44 39 B2 31  |:T9.35:S9.3:D9.1|
00000230: 38 00 53 0A 18 01 8B 41  B2 36 37 A7 44 31 B2 32  |8.S....A.67.D1.2|
00000240: 35 37 3A 54 39 B2 37 37  3A 53 39 B2 34 3A 44 39  |57:T9.77:S9.4:D9|
00000250: B2 33 39 00 80 0A 22 01  8B 54 39 B2 30 A7 20 A0  |.39..."..T9.0. .|
00000260: 33 3A 99 22 3F 3F 20 44  49 53 4B 20 4E 4F 54 20  |3:."?? DISK NOT |
00000270: 52 45 43 4F 47 4E 49 53  45 44 20 3F 3F 22 3A 90  |RECOGNISED ??":.|
00000280: 00 96 0A 2C 01 8F 20 47  45 54 20 26 20 50 52 49  |...,.. GET & PRI|
00000290: 4E 54 20 42 41 4D 00 B2  0A 36 01 99 22 20 20 20  |NT BAM...6.."   |
000002A0: 20 20 20 46 52 45 45 20  42 4C 4F 43 4B 20 4D 41  |   FREE BLOCK MA|
000002B0: 50 22 00 C8 0A 40 01 81  4A B2 31 A4 44 31 3A A1  |P"...@..J.1.D1:.|
000002C0: 23 33 2C 41 24 3A 82 4A  00 D9 0A 4A 01 81 4A B2  |#3,A$:.J...J..J.|
000002D0: 31 A4 31 39 3A 54 31 B2  30 00 F3 0A 54 01 8B 4A  |1.19:T1.0...T..J|
000002E0: B2 35 31 A7 A1 23 33 2C  41 24 2C 41 24 2C 41 24  |.51..#3,A$,A$,A$|
000002F0: 2C 41 24 00 09 0B 5E 01  A1 23 33 2C 41 24 3A 43  |,A$...^..#3,A$:C|
00000300: B2 C6 28 41 24 AA 5A 24  29 00 21 0B 68 01 99 C9  |..(A$.Z$).!.h...|
00000310: 28 22 20 22 AA C4 28 4A  29 2C 32 29 3B 22 20 22  |(" "..(J),2);" "|
00000320: 3B 00 46 0B 72 01 4B 31  B2 30 3A 81 4B B2 30 A4  |;.F.r.K1.0:.K.0.|
00000330: 53 39 AB 31 3A A1 23 33  2C 41 24 3A 41 B2 C6 28  |S9.1:.#3,A$:A..(|
00000340: 41 24 AA 5A 24 29 00 85  0B 7C 01 81 4C B2 30 A4  |A$.Z$)...|..L.0.|
00000350: 37 3A 41 25 B2 41 AD 32  3A 44 31 B2 41 AB 41 25  |7:A%.A.2:D1.A.A%|
00000360: AC 32 3A 8B 4B 31 B3 B2  52 25 28 4A 29 A7 43 25  |.2:.K1..R%(J).C%|
00000370: 28 4A 2C 4B 31 29 B2 44  31 3A 99 C7 28 44 25 28  |(J,K1).D1:..(D%(|
00000380: 44 31 29 29 3B 00 A6 0B  86 01 41 B2 41 25 3A 54  |D1));.....A.A%:T|
00000390: 31 B2 54 31 AA 44 31 3A  4B 31 B2 4B 31 AA 31 3A  |1.T1.D1:K1.K1.1:|
000003A0: 82 4C 2C 4B 3A 99 00 B7  0B 90 01 8B 54 31 B3 B1  |.L,K:.......T1..|
000003B0: 43 A7 99 22 3F 22 3B 00  BE 0B 9A 01 82 4A 00 D5  |C.."?";......J..|
000003C0: 0B A4 01 8F 20 20 44 4F  20 53 50 45 43 49 46 49  |....  DO SPECIFI|
000003D0: 43 20 4A 4F 42 00 F0 0B  AE 01 99 3A A0 33 3A 99  |C JOB......:.3:.|
000003E0: 22 20 20 20 20 20 43 48  4F 4F 53 45 20 2D 2D 22  |"     CHOOSE --"|
000003F0: 00 0A 0C B8 01 99 22 31  2E 20 43 48 45 43 4B 20  |......"1. CHECK |
00000400: 41 4C 4C 20 46 49 4C 45  53 22 00 28 0C C2 01 99  |ALL FILES".(....|
00000410: 22 32 2E 20 43 48 45 43  4B 20 46 4F 52 20 42 41  |"2. CHECK FOR BA|
00000420: 44 20 53 50 4F 54 53 22  00 4A 0C CC 01 99 22 33  |D SPOTS".J...."3|
00000430: 2E 20 52 45 43 4F 56 45  52 20 53 43 52 41 54 43  |. RECOVER SCRATC|
00000440: 48 45 44 20 46 49 4C 45  53 22 00 62 0C D6 01 99  |HED FILES".b....|
00000450: 22 20 20 59 4F 55 52 20  43 48 4F 49 43 45 3F 20  |"  YOUR CHOICE? |
00000460: 22 3B 00 75 0C E0 01 A1  58 24 3A 8B 58 24 B2 22  |";.u....X$:.X$."|
00000470: 22 89 34 38 30 00 91 0C  EA 01 58 B2 C6 28 58 24  |".480.....X..(X$|
00000480: 29 AB 34 38 3A 8B 58 B3  31 B0 58 B1 33 A7 34 38  |).48:.X.1.X.3.48|
00000490: 30 00 AB 0C F4 01 99 58  24 3A 9F 32 2C 38 2C 32  |0......X$:.2,8,2|
000004A0: 2C 22 23 30 22 3A 8D 33  30 32 30 00 BE 0C FE 01  |,"#0":.3020.....|
000004B0: 91 58 89 35 32 30 2C 37  39 30 2C 38 39 30 00 D1  |.X.520,790,890..|
000004C0: 0C 08 02 8F 20 20 43 48  45 43 4B 20 46 49 4C 45  |....  CHECK FILE|
000004D0: 53 00 DE 0C 12 02 54 B2  44 39 3A 53 B2 31 00 E8  |S.....T.D9:S.1..|
000004E0: 0C 1C 02 8D 32 30 30 30  00 06 0D 26 02 81 44 B2  |....2000...&..D.|
000004F0: 32 A4 32 35 35 A9 33 32  3A 8B 41 28 44 29 B3 31  |2.255.32:.A(D).1|
00000500: 32 38 89 35 39 30 00 4D  0D 30 02 44 33 B2 44 33  |28.590.M.0.D3.D3|
00000510: AA 31 3A 54 25 28 44 33  2C 30 29 B2 41 28 44 AA  |.1:T%(D3,0).A(D.|
00000520: 31 29 3A 53 25 28 44 33  2C 30 29 B2 41 28 44 AA  |1):S%(D3,0).A(D.|
00000530: 32 29 3A 4C 25 28 44 33  29 B2 41 28 44 AA 32 38  |2):L%(D3).A(D.28|
00000540: 29 AA 41 28 44 AA 32 39  29 AC 32 35 36 00 7D 0D  |).A(D.29).256.}.|
00000550: 3A 02 8B 41 28 44 29 B2  31 33 32 A7 54 25 28 44  |:..A(D).132.T%(D|
00000560: 33 2C 31 29 B2 41 28 44  AA 31 39 29 3A 53 25 28  |3,1).A(D.19):S%(|
00000570: 44 33 2C 31 29 B2 41 28  44 AA 32 30 29 00 AE 0D  |D3,1).A(D.20)...|
00000580: 44 02 4E 24 B2 22 22 3A  81 4B B2 44 AA 33 A4 44  |D.N$."":.K.D.3.D|
00000590: AA 31 38 3A 4E 24 B2 4E  24 AA C7 28 41 28 4B 29  |.18:N$.N$..(A(K)|
000005A0: 29 3A 82 4B 3A 4E 24 28  44 33 29 B2 4E 24 00 B5  |):.K:N$(D3).N$..|
000005B0: 0D 4E 02 82 44 00 D1 0D  58 02 54 B2 41 28 30 29  |.N..D...X.T.A(0)|
000005C0: 3A 53 B2 41 28 31 29 3A  8B 54 B2 44 39 89 35 34  |:S.A(1):.T.D9.54|
000005D0: 30 00 E2 0D 62 02 81 44  B2 31 A4 44 33 3A 4C 25  |0...b..D.1.D3:L%|
000005E0: B2 30 00 EE 0D 6C 02 99  4E 24 28 44 29 3B 00 06  |.0...l..N$(D);..|
000005F0: 0E 76 02 54 B2 54 25 28  44 2C 30 29 3A 53 B2 53  |.v.T.T%(D,0):S.S|
00000600: 25 28 44 2C 30 29 00 18  0E 80 02 8B 54 B1 54 39  |%(D,0)......T.T9|
00000610: B0 53 B3 30 A7 54 B2 30  00 3D 0E 8A 02 8B 54 B3  |.S.0.T.0.=....T.|
00000620: 31 B0 53 B1 52 25 28 54  29 A7 99 20 22 20 42 41  |1.S.R%(T).. " BA|
00000630: 44 20 43 48 41 49 4E 22  3A 89 37 37 30 00 69 0E  |D CHAIN":.770.i.|
00000640: 94 02 8B 43 25 28 54 2C  53 29 B2 31 A7 99 22 20  |...C%(T,S).1.." |
00000650: 55 4E 41 4C 4C 4F 43 41  54 45 44 20 42 4C 4F 43  |UNALLOCATED BLOC|
00000660: 4B 53 20 22 3A 89 37 37  30 00 98 0E 9E 02 8B 43  |KS ":.770......C|
00000670: 25 28 54 2C 53 29 B1 31  A7 99 22 43 4F 4E 46 4C  |%(T,S).1.."CONFL|
00000680: 49 43 54 20 22 3B 4E 24  28 43 25 28 54 2C 53 29  |ICT ";N$(C%(T,S)|
00000690: AB 31 29 3A 89 37 37 30  00 A8 0E A8 02 43 25 28  |.1):.770.....C%(|
000006A0: 54 2C 53 29 B2 31 AA 44  00 B2 0E B2 02 8D 33 30  |T,S).1.D......30|
000006B0: 30 30 00 BE 0E BC 02 4C  25 B2 4C 25 AA 31 00 E3  |00.....L%.L%.1..|
000006C0: 0E C6 02 81 4A B2 30 A4  31 3A 98 31 35 2C 22 4D  |....J.0.1:.15,"M|
000006D0: 2D 52 22 3B C7 28 4A 29  3B 42 24 3A A1 23 31 35  |-R";.(J);B$:.#15|
000006E0: 2C 41 24 00 F8 0E D0 02  41 28 4A 29 B2 C6 28 41  |,A$.....A(J)..(A|
000006F0: 24 AA 5A 24 29 3A 82 4A  00 22 0F DA 02 54 34 B2  |$.Z$):.J."...T4.|
00000700: 54 3A 53 34 B2 53 3A 54  B2 41 28 30 29 3A 53 B2  |T:S4.S:T.A(0):S.|
00000710: 41 28 31 29 3A 8B 54 B3  B1 30 AF 45 B2 30 89 36  |A(1):.T..0.E.0.6|
00000720: 34 30 00 4E 0F E4 02 54  B2 54 25 28 44 2C 31 29  |40.N...T.T%(D,1)|
00000730: 3A 53 B2 53 25 28 44 2C  31 29 3A 54 25 28 44 2C  |:S.S%(D,1):T%(D,|
00000740: 31 29 B2 30 3A 8B 54 B3  B1 30 89 36 34 30 00 7C  |1).0:.T..0.640.||
00000750: 0F EE 02 8B 4C 25 B3 B1  4C 25 28 44 29 A7 99 22  |....L%..L%(D).."|
00000760: 20 49 4E 43 4F 52 52 45  43 54 20 42 4C 4F 43 4B  | INCORRECT BLOCK|
00000770: 20 43 4F 55 4E 54 22 3A  89 37 37 30 00 9F 0F F8  | COUNT":.770....|
00000780: 02 99 3A 99 22 91 20 20  20 20 20 20 20 20 20 20  |..:.".          |
00000790: 20 20 20 20 20 20 20 20  20 20 20 20 20 91 22 00  |             .".|
000007A0: A6 0F 02 03 82 44 00 BF  0F 0C 03 99 3A 99 44 33  |.....D......:.D3|
000007B0: 3B 22 46 49 4C 45 53 22  3A 89 20 31 32 37 30 00  |;"FILES":. 1270.|
000007C0: D2 0F 16 03 8F 20 53 43  41 4E 20 53 45 43 54 4F  |..... SCAN SECTO|
000007D0: 52 53 00 F9 0F 20 03 8B  46 25 B2 30 A7 99 20 22  |RS... ..F%.0.. "|
000007E0: 20 53 4F 52 52 59 20 43  41 4E 27 54 20 44 4F 20  | SORRY CAN'T DO |
000007F0: 49 54 22 3A 89 31 32 37  30 00 10 10 2A 03 81 54  |IT":.1270...*..T|
00000800: B2 31 A4 31 39 3A 99 22  54 52 41 43 4B 22 3B 54  |.1.19:."TRACK";T|
00000810: 00 1F 10 34 03 81 53 B2  30 A4 52 25 28 54 29 00  |...4..S.0.R%(T).|
00000820: 39 10 3E 03 99 22 91 1D  1D 1D 1D 1D 1D 1D 1D 1D  |9.>.."..........|
00000830: 1D 20 53 45 43 54 22 3B  53 00 43 10 48 03 8D 33  |. SECT";S.C.H..3|
00000840: 30 30 30 00 4A 10 52 03  82 53 00 67 10 5C 03 99  |000.J.R..S.g.\..|
00000850: 22 91 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000860: 20 20 20 20 20 91 22 00  6E 10 66 03 82 54 00 83  |     .".n.f..T..|
00000870: 10 70 03 99 22 44 49 53  4B 20 4F 4B 22 3A 89 31  |.p.."DISK OK":.1|
00000880: 32 37 30 00 93 10 7A 03  8F 20 55 4E 53 43 52 41  |270...z.. UNSCRA|
00000890: 54 43 48 00 C1 10 84 03  4B B2 30 3A 99 22 49 20  |TCH.....K.0:."I |
000008A0: 57 49 4C 4C 20 4C 4F 4F  4B 20 46 4F 52 20 44 49  |WILL LOOK FOR DI|
000008B0: 53 43 41 52 44 45 44 20  46 49 4C 45 53 2E 2E 2E  |SCARDED FILES...|
000008C0: 22 00 CE 10 8E 03 54 B2  44 39 3A 53 B2 31 00 D8  |".....T.D9:S.1..|
000008D0: 10 98 03 8D 32 30 30 30  00 FE 10 A2 03 81 44 B2  |....2000......D.|
000008E0: 32 A4 32 35 35 A9 33 32  3A 8B 41 28 44 29 B3 B1  |2.255.32:.A(D)..|
000008F0: 30 B0 41 28 44 AA 31 29  B2 30 89 39 38 30 00 24  |0.A(D.1).0.980.$|
00000900: 11 AC 03 8B 4B B2 30 A7  99 20 22 20 44 4F 20 59  |....K.0.. " DO Y|
00000910: 4F 55 20 57 41 4E 54 20  54 4F 20 52 45 43 4F 56  |OU WANT TO RECOV|
00000920: 45 52 3A 22 00 4C 11 B6  03 A1 58 24 3A 81 4B B2  |ER:".L....X$:.K.|
00000930: 44 AA 33 A4 44 AA 31 38  3A 99 C7 28 41 28 4B 29  |D.3.D.18:..(A(K)|
00000940: 29 3B 3A 82 4B 3A 99 22  3F 20 22 3B 00 69 11 C0  |);:.K:."? ";.i..|
00000950: 03 A1 58 24 3A 8B 58 24  B3 B1 22 59 22 AF 58 24  |..X$:.X$.."Y".X$|
00000960: B3 B1 22 4E 22 89 39 36  30 00 7E 11 CA 03 99 58  |.."N".960.~....X|
00000970: 24 3A 8B 58 24 B2 22 59  22 89 31 30 31 30 00 85  |$:.X$."Y".1010..|
00000980: 11 D4 03 82 44 00 A1 11  DE 03 54 B2 41 28 30 29  |....D.....T.A(0)|
00000990: 3A 53 B2 41 28 31 29 3A  8B 54 B2 44 39 89 39 32  |:S.A(1):.T.D9.92|
000009A0: 30 00 BA 11 E8 03 99 22  54 48 41 54 27 53 20 41  |0......"THAT'S A|
000009B0: 4C 4C 20 22 3A 89 31 32  37 30 00 F5 11 F2 03 54  |LL ":.1270.....T|
000009C0: 36 B2 54 3A 53 36 B2 53  3A 44 36 B2 44 3A 54 B2  |6.T:S6.S:D6.D:T.|
000009D0: 41 28 44 AA 31 29 3A 4C  25 28 30 29 B2 41 28 44  |A(D.1):L%(0).A(D|
000009E0: AA 32 38 29 AA 41 28 44  AA 32 39 29 AC 32 35 36  |.28).A(D.29).256|
000009F0: 3A 4C 25 B2 30 00 0E 12  FC 03 A1 58 24 3A 99 22  |:L%.0......X$:."|
00000A00: 49 53 20 54 48 49 53 20  46 49 4C 45 3A 22 00 23  |IS THIS FILE:".#|
00000A10: 12 06 04 99 22 31 2E 20  53 45 51 55 45 4E 54 49  |...."1. SEQUENTI|
00000A20: 41 4C 22 00 35 12 10 04  99 22 32 2E 20 50 52 4F  |AL".5...."2. PRO|
00000A30: 47 52 41 4D 22 00 43 12  1A 04 99 22 33 2E 20 55  |GRAM".C...."3. U|
00000A40: 53 52 22 00 57 12 24 04  8B 41 28 44 AA 31 39 29  |SR".W.$..A(D.19)|
00000A50: B2 30 89 31 30 38 30 00  6A 12 2E 04 99 22 34 2E  |.0.1080.j...."4.|
00000A60: 20 52 45 4C 41 54 49 56  45 22 00 82 12 38 04 99  | RELATIVE"...8..|
00000A70: 22 20 57 48 49 43 48 20  4E 55 4D 42 45 52 3F 20  |" WHICH NUMBER? |
00000A80: 22 3B 00 96 12 42 04 A1  58 24 3A 8B 58 24 B2 22  |";...B..X$:.X$."|
00000A90: 22 89 31 30 39 30 00 B3  12 4C 04 58 B2 C6 28 58  |".1090...L.X..(X|
00000AA0: 24 29 AB 34 38 3A 8B 58  B3 31 B0 58 B1 34 89 31  |$).48:.X.1.X.4.1|
00000AB0: 30 39 30 00 C3 12 56 04  99 58 24 3A 58 B2 58 AA  |090...V..X$:X.X.|
00000AC0: 31 32 38 00 FE 12 60 04  8B 58 B2 31 33 32 A7 54  |128...`..X.132.T|
00000AD0: 25 28 30 2C 31 29 B2 41  28 44 AA 31 39 29 3A 53  |%(0,1).A(D.19):S|
00000AE0: 25 28 30 2C 31 29 B2 41  28 44 AA 32 30 29 3A 8B  |%(0,1).A(D.20):.|
00000AF0: 54 25 28 30 2C 31 29 B2  30 89 31 30 32 30 00 10  |T%(0,1).0.1020..|
00000B00: 13 6A 04 8B 54 B1 54 39  B0 53 B3 30 A7 54 B2 30  |.j..T.T9.S.0.T.0|
00000B10: 00 37 13 74 04 8B 54 B3  31 B0 53 B1 52 25 28 54  |.7.t..T.1.S.R%(T|
00000B20: 29 A7 99 20 22 20 42 41  44 20 43 48 41 49 4E 21  |).. " BAD CHAIN!|
00000B30: 22 3A 89 31 32 36 30 00  62 13 7E 04 8B 43 25 28  |":.1260.b.~..C%(|
00000B40: 54 2C 53 29 B2 30 A7 99  22 20 41 4C 4C 4F 43 41  |T,S).0.." ALLOCA|
00000B50: 54 45 44 20 42 4C 4F 43  4B 53 21 22 3A 89 31 32  |TED BLOCKS!":.12|
00000B60: 36 30 00 75 13 88 04 8D  20 33 30 30 30 3A 4C 25  |60.u.... 3000:L%|
00000B70: B2 4C 25 AA 31 00 9A 13  92 04 81 4A B2 30 A4 31  |.L%.1......J.0.1|
00000B80: 3A 98 31 35 2C 22 4D 2D  52 22 3B C7 28 4A 29 3B  |:.15,"M-R";.(J);|
00000B90: 42 24 3A A1 23 31 35 2C  41 24 00 AF 13 9C 04 41  |B$:.#15,A$.....A|
00000BA0: 28 4A 29 B2 C6 28 41 24  AA 5A 24 29 3A 82 4A 00  |(J)..(A$.Z$):.J.|
00000BB0: D6 13 A6 04 54 34 B2 54  3A 53 34 B2 53 3A 54 B2  |....T4.T:S4.S:T.|
00000BC0: 41 28 30 29 3A 53 B2 41  28 31 29 3A 8B 54 B3 B1  |A(0):S.A(1):.T..|
00000BD0: 30 89 31 31 33 30 00 03  14 B0 04 54 B2 54 25 28  |0.1130.....T.T%(|
00000BE0: 30 2C 31 29 3A 53 B2 53  25 28 30 2C 31 29 3A 54  |0,1):S.S%(0,1):T|
00000BF0: 25 28 30 2C 31 29 B2 30  3A 8B 54 B3 B1 30 89 31  |%(0,1).0:.T..0.1|
00000C00: 31 33 30 00 34 14 BA 04  8B 4C 25 B3 B1 4C 25 28  |130.4....L%..L%(|
00000C10: 30 29 A7 20 99 20 22 49  4E 43 4F 52 52 45 43 54  |0). . "INCORRECT|
00000C20: 20 42 4C 4F 43 4B 20 43  4F 55 4E 54 21 22 3A 89  | BLOCK COUNT!":.|
00000C30: 31 32 36 30 00 47 14 C4  04 54 B2 54 36 3A 53 B2  |1260.G...T.T6:S.|
00000C40: 53 36 3A 44 B2 44 36 00  51 14 CE 04 8D 33 30 30  |S6:D.D6.Q....300|
00000C50: 30 00 71 14 D8 04 98 31  35 2C 22 4D 2D 57 22 3B  |0.q....15,"M-W";|
00000C60: C7 28 44 29 3B 42 24 3B  C7 28 31 29 3B C7 28 58  |.(D);B$;.(1);.(X|
00000C70: 29 00 95 14 E2 04 50 98  31 35 2C 22 55 32 3A 32  |).....P.15,"U2:2|
00000C80: 2C 22 3B 44 24 3B 54 3B  53 3A 8D 33 30 32 30 3A  |,";D$;T;S:.3020:|
00000C90: 89 31 33 30 30 00 B0 14  EC 04 99 22 53 4F 52 52  |.1300......"SORR|
00000CA0: 59 20 49 54 20 57 4F 4E  27 54 20 57 4F 52 4B 22  |Y IT WON'T WORK"|
00000CB0: 00 B7 14 F6 04 A0 32 00  E3 14 00 05 85 22 2A 20  |......2......"* |
00000CC0: 47 4F 54 20 54 49 4D 45  20 54 4F 20 56 45 52 49  |GOT TIME TO VERI|
00000CD0: 46 59 2F 43 4F 4C 4C 45  43 54 20 44 49 53 4B 22  |FY/COLLECT DISK"|
00000CE0: 3B 58 24 00 F3 14 0A 05  8B C6 28 58 24 29 B2 37  |;X$.......(X$).7|
00000CF0: 38 A7 80 00 07 15 14 05  A0 32 3A 98 31 35 2C 22  |8........2:.15,"|
00000D00: 56 22 3B 44 24 3A 80 00  22 15 D0 07 8F 20 47 52  |V";D$:..".... GR|
00000D10: 41 42 20 46 55 4C 4C 20  44 49 53 4B 20 42 4C 4F  |AB FULL DISK BLO|
00000D20: 43 4B 00 2C 15 DA 07 8D  33 30 30 30 00 53 15 E4  |CK.,....3000.S..|
00000D30: 07 81 4A B2 30 A4 32 35  35 3A 98 31 35 2C 22 4D  |..J.0.255:.15,"M|
00000D40: 2D 52 22 3B C7 28 4A 29  3B 42 24 3A A1 23 31 35  |-R";.(J);B$:.#15|
00000D50: 2C 41 24 00 6A 15 EE 07  41 28 4A 29 B2 C6 28 41  |,A$.j...A(J)..(A|
00000D60: 24 AA 5A 24 29 3A 82 4A  3A 8E 00 7B 15 B8 0B 8F  |$.Z$):.J:..{....|
00000D70: 20 52 45 41 44 20 42 4C  4F 43 4B 00 93 15 C2 0B  | READ BLOCK.....|
00000D80: 98 31 35 2C 22 42 2D 52  3A 32 2C 22 3B 44 24 3B  |.15,"B-R:2,";D$;|
00000D90: 54 3B 53 00 AA 15 CC 0B  8F 20 47 45 54 20 45 52  |T;S...... GET ER|
00000DA0: 52 4F 52 20 53 54 41 54  55 53 00 BD 15 D6 0B 84  |ROR STATUS......|
00000DB0: 31 35 2C 45 2C 45 24 2C  45 31 2C 45 32 00 E1 15  |15,E,E$,E1,E2...|
00000DC0: E0 0B 8B 45 B3 B1 30 A7  99 22 12 44 49 53 4B 20  |...E..0..".DISK |
00000DD0: 45 52 52 4F 52 92 22 45  3B 45 24 3B 45 31 3B 45  |ERROR."E;E$;E1;E|
00000DE0: 32 00 E7 15 EA 0B 8E 00  00 00 00                 |2..........     |
..(.D.."DISK CHECKER  - JIM BUTTERFIELD"
.P.N.. A(255),C%(77,28),D%(1),N$(224),T%
(224,1),S%(224,1),L%(224),R%(77)...X.D%(
0).58:D%(1).(42):Z$.G(0)......1,17,20,24
,19,30,17,35,16,0.S....65,17,20,24,18,30
,17,35,16,0......67,39,28,53,26,64,24,77
,22,0.'. .B$.G(17):."DRIVE #";D$:.D$."S"
.D$."0":B$.G(3).A....D$.."0". D$.."1".16
0.[....15,8,15,"I".D$:.3020.S....3,8,3,"
$".D$:.3020...H.A0.1:.#3,A$:A.F(A$.Z$)..
.R.. A1:.A.A1.250.....F%.F%.1:. F%.3.290
.K.... A1:.A1.0.210.T....230......A1:.A1
.0.270......B1:.J.A0.A1:R%(J).B1:.J:A0.J
:.250.1....A.1.A.65.D1.1:T9.35:S9.3:D9.1
8.S....A.67.D1.257:T9.77:S9.4:D9.39...".
.T9.0.  3:."?? DISK NOT RECOGNISED ??":.
...,.. GET & PRINT BAM...6.."      FREE 
BLOCK MAP".H.@..J.1.D1:.#3,A$:.J.Y.J..J.
1.19:T1.0...T..J.51..#3,A$,A$,A$,A$...^.
.#3,A$:C.F(A$.Z$).!.H..I(" ".D(J),2);" "
;.F.R.K1.0:.K.0.S9.1:.#3,A$:A.F(A$.Z$)..
.|..L.0.7:A%.A.2:D1.A.A%.2:.K1..R%(J).C%
(J,K1).D1:.G(D%(D1));.....A.A%:T1.T1.D1:
K1.K1.1:.L,K:.......T1..C.."?";......J.U
....  DO SPECIFIC JOB......: 3:."     CH
OOSE --"......"1. CHECK ALL FILES".(.B..
"2. CHECK FOR BAD SPOTS".J.L.."3. RECOVE
R SCRATCHED FILES".B.V.."  YOUR CHOICE? 
";.U....X$:.X$."".480.....X.F(X$).48:.X.
1.X.3.480......X$:.2,8,2,"#0":.3020.....
.X.520,790,890.Q....  CHECK FILES.....T.
D9:S.1......2000...&..D.2.255.32:.A(D).1
28.590.M.0.D3.D3.1:T%(D3,0).A(D.1):S%(D3
,0).A(D.2):L%(D3).A(D.28).A(D.29).256.}.
:..A(D).132.T%(D3,1).A(D.19):S%(D3,1).A(
D.20)...D.N$."":.K.D.3.D.18:N$.N$.G(A(K)
):.K:N$(D3).N$...N..D.Q.X.T.A(0):S.A(1):
.T.D9.540...B..D.1.D3:L%.0...L..N$(D);..
.V.T.T%(D,0):S.S%(D,0)......T.T9.S.0.T.0
.=....T.1.S.R%(T).. " BAD CHAIN":.770.I.
...C%(T,S).1.." UNALLOCATED BLOCKS ":.77
0......C%(T,S).1.."CONFLICT ";N$(C%(T,S)
.1):.770.....C%(T,S).1.D......3000.....L
%.L%.1...F..J.0.1:.15,"M-R";G(J);B$:.#15
,A$...P.A(J).F(A$.Z$):.J.".Z.T4.T:S4.S:T
.A(0):S.A(1):.T..0.E.0.640.N...T.T%(D,1)
:S.S%(D,1):T%(D,1).0:.T..0.640.|....L%..
L%(D).." INCORRECT BLOCK COUNT":.770....
..:.".                       ."......D..
....:.D3;"FILES":. 1270.R.... SCAN SECTO
RS... ..F%.0.. " SORRY CAN'T DO IT":.127
0...*..T.1.19:."TRACK";T...4..S.0.R%(T).
9.>.."........... SECT";S.C.H..3000.J.R.
.S.G.\..".                   .".N.F..T..
.P.."DISK OK":.1270...Z.. UNSCRATCH.A...
K.0:."I WILL LOOK FOR DISCARDED FILES...
".N...T.D9:S.1.X....2000......D.2.255.32
:.A(D)..0.A(D.1).0.980.$....K.0.. " DO Y
OU WANT TO RECOVER:".L....X$:.K.D.3.D.18
:.G(A(K));:.K:."? ";.I....X$:.X$.."Y".X$
.."N".960.~.J..X$:.X$."Y".1010...T..D...
..T.A(0):S.A(1):.T.D9.920......"THAT'S A
LL ":.1270.....T6.T:S6.S:D6.D:T.A(D.1):L
%(0).A(D.28).A(D.29).256:L%.0......X$:."
IS THIS FILE:".#...."1. SEQUENTIAL".5...
."2. PROGRAM".C...."3. USR".W.$..A(D.19)
.0.1080.J...."4. RELATIVE"...8.." WHICH 
NUMBER? ";...B..X$:.X$."".1090...L.X.F(X
$).48:.X.1.X.4.1090.C.V..X$:X.X.128...`.
.X.132.T%(0,1).A(D.19):S%(0,1).A(D.20):.
T%(0,1).0.1020...J..T.T9.S.0.T.0.7.T..T.
1.S.R%(T).. " BAD CHAIN!":.1260.B.~..C%(
T,S).0.." ALLOCATED BLOCKS!":.1260.U....
 3000:L%.L%.1......J.0.1:.15,"M-R";G(J);
B$:.#15,A$.....A(J).F(A$.Z$):.J.V...T4.T
:S4.S:T.A(0):S.A(1):.T..0.1130.....T.T%(
0,1):S.S%(0,1):T%(0,1).0:.T..0.1130.4...
.L%..L%(0). . "INCORRECT BLOCK COUNT!":.
1260.G.D.T.T6:S.S6:D.D6.Q.N..3000.Q.X..1
5,"M-W";G(D);B$;G(1);G(X).....P.15,"U2:2
,";D$;T;S:.3020:.1300......"SORRY IT WON
'T WORK"..... 2......"* GOT TIME TO VERI
FY/COLLECT DISK";X$......F(X$).78.......
 2:.15,"V";D$:..".P.. GRAB FULL DISK BLO
CK.,.Z..3000.S....J.0.255:.15,"M-R";G(J)
;B$:.#15,A$.J...A(J).F(A$.Z$):.J:..{....
 READ BLOCK...B..15,"B-R:2,";D$;T;S...L.
. GET ERROR STATUS...V..15,E,E$,E1,E2...
...E..0..".DISK ERROR."E;E$;E1;E2.......
...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL