DISK CHECKER
FILE INFORMATION
FILENAME(S): DISK CHECKER
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-12-01 02:25:53
APPEARS ON: 1 disk(s)
FILE HASH
74202ec13cfce1e202bad0d45ecf5b0ea4b48c115458961a49b135860b5a75fd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK ARRANGER A | DISK CHECKER | PRG | hedning, shine | 31 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 5A 00 97 35 33 32 38 30 2C 30 3A 97 |....Z..53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 97 36 34 36 2C 37 00 6A |53281,0:.646,7.j|
00000020: 08 64 00 99 22 93 11 11 20 20 20 20 44 49 53 4B |.d.."... DISK|
00000030: 20 43 48 45 43 4B 45 52 20 20 20 20 20 20 20 20 | CHECKER |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 20 20 20 20 43 4F 4D 50 55 54 45 20 41 50 52 27 | COMPUTE APR'|
00000060: 38 32 20 23 32 33 3A 31 36 30 00 B2 08 6E 00 86 |82 #23:160...n..|
00000070: 20 41 28 32 35 35 29 2C 43 25 28 37 37 2C 32 38 | A(255),C%(77,28|
00000080: 29 2C 44 25 28 31 29 2C 4E 24 28 32 32 34 29 2C |),D%(1),N$(224),|
00000090: 54 25 28 32 32 34 2C 31 29 2C 53 25 28 32 32 34 |T%(224,1),S%(224|
000000A0: 2C 31 29 2C 4C 25 28 32 32 34 29 2C 52 25 28 37 |,1),L%(224),R%(7|
000000B0: 37 29 00 D0 08 78 00 44 25 28 30 29 B2 35 38 3A |7)...x.D%(0).58:|
000000C0: 44 25 28 31 29 B2 34 32 3A 5A 24 B2 C7 28 30 29 |D%(1).42:Z$..(0)|
000000D0: 00 F2 08 82 00 83 20 31 2C 31 37 2C 32 30 2C 32 |...... 1,17,20,2|
000000E0: 34 2C 31 39 2C 33 30 2C 31 37 2C 33 35 2C 31 36 |4,19,30,17,35,16|
000000F0: 2C 30 00 15 09 8C 00 83 20 36 35 2C 31 37 2C 32 |,0...... 65,17,2|
00000100: 30 2C 32 34 2C 31 38 2C 33 30 2C 31 37 2C 33 35 |0,24,18,30,17,35|
00000110: 2C 31 36 2C 30 00 38 09 96 00 83 20 36 37 2C 33 |,16,0.8.... 67,3|
00000120: 39 2C 32 38 2C 35 33 2C 32 36 2C 36 34 2C 32 34 |9,28,53,26,64,24|
00000130: 2C 37 37 2C 32 32 2C 30 00 6D 09 A0 00 42 24 B2 |,77,22,0.m...B$.|
00000140: C7 28 31 37 29 3A 85 22 11 11 20 20 44 52 49 56 |.(17):.".. DRIV|
00000150: 45 23 22 3B 44 24 3A 8B 44 24 B2 22 53 22 A7 44 |E#";D$:.D$."S".D|
00000160: 24 B2 22 30 22 3A 42 24 B2 C7 28 33 29 00 86 09 |$."0":B$..(3)...|
00000170: AA 00 8B 44 24 B3 B1 22 30 22 AF 44 24 B3 B1 22 |...D$.."0".D$.."|
00000180: 31 22 89 31 36 30 00 A0 09 B4 00 9F 31 35 2C 38 |1".160......15,8|
00000190: 2C 31 35 2C 22 49 22 AA 44 24 3A 8D 33 30 32 30 |,15,"I".D$:.3020|
000001A0: 00 BE 09 BE 00 9F 33 2C 38 2C 33 2C 22 24 22 AA |......3,8,3,"$".|
000001B0: 44 24 3A 20 20 20 20 20 20 8D 33 30 32 30 00 D9 |D$: .3020..|
000001C0: 09 C8 00 41 30 B2 31 3A A1 23 33 2C 41 24 3A 41 |...A0.1:.#3,A$:A|
000001D0: B2 C6 28 41 24 AA 5A 24 29 00 EB 09 D2 00 87 41 |..(A$.Z$)......A|
000001E0: 31 3A 8B 41 B2 41 31 89 32 35 30 00 01 0A DC 00 |1:.A.A1.250.....|
000001F0: 46 25 B2 46 25 AA 31 3A 8B 46 25 B2 33 89 32 39 |F%.F%.1:.F%.3.29|
00000200: 30 00 13 0A E6 00 87 41 31 3A 8B 41 31 B2 30 89 |0......A1:.A1.0.|
00000210: 32 31 30 00 1C 0A F0 00 89 32 33 30 00 2E 0A FA |210......230....|
00000220: 00 87 41 31 3A 8B 41 31 B2 30 A7 32 37 30 00 55 |..A1:.A1.0.270.U|
00000230: 0A 04 01 87 42 31 3A 81 4A B2 41 30 A4 41 31 3A |....B1:.J.A0.A1:|
00000240: 52 25 28 4A 29 B2 42 31 3A 82 4A 3A 41 30 B2 4A |R%(J).B1:.J:A0.J|
00000250: 3A 89 32 35 30 00 7C 0A 0E 01 8B 41 B2 31 20 B0 |:.250.|....A.1 .|
00000260: 20 41 B2 36 35 A7 20 44 31 B2 31 3A 54 39 B2 33 | A.65. D1.1:T9.3|
00000270: 35 3A 53 39 B2 33 3A 44 39 B2 31 38 00 A0 0A 18 |5:S9.3:D9.18....|
00000280: 01 8B 41 B2 36 37 A7 20 44 31 B2 32 35 37 20 3A |..A.67. D1.257 :|
00000290: 54 39 B2 37 37 3A 53 39 B2 34 3A 44 39 B2 33 39 |T9.77:S9.4:D9.39|
000002A0: 00 C9 0A 22 01 8B 54 39 B2 30 A7 A0 33 3A 99 22 |..."..T9.0..3:."|
000002B0: 20 3F 20 44 49 53 4B 20 4E 4F 54 20 52 45 43 4F | ? DISK NOT RECO|
000002C0: 47 4E 49 5A 45 44 22 3A 90 00 E2 0A 2C 01 89 34 |GNIZED":....,..4|
000002D0: 32 30 3A 8F 20 47 45 54 2F 50 52 49 4E 54 20 42 |20:. GET/PRINT B|
000002E0: 41 4D 00 07 0B 36 01 99 22 93 11 11 20 46 52 45 |AM...6.."... FRE|
000002F0: 45 20 42 4C 4F 43 4B 20 4D 41 50 3A 20 23 22 3B |E BLOCK MAP: #";|
00000300: 44 24 3A 99 22 11 11 00 1D 0B 40 01 81 4A B2 31 |D$:.".....@..J.1|
00000310: A4 44 31 3A A1 23 33 2C 41 24 3A 82 4A 00 2E 0B |.D1:.#3,A$:.J...|
00000320: 4A 01 81 4A B2 31 A4 54 39 3A 54 31 B2 30 00 48 |J..J.1.T9:T1.0.H|
00000330: 0B 54 01 8B 4A B2 35 31 A7 A1 23 33 2C 41 24 2C |.T..J.51..#3,A$,|
00000340: 41 24 2C 41 24 2C 41 24 00 5E 0B 5E 01 A1 23 33 |A$,A$,A$.^.^..#3|
00000350: 2C 41 24 3A 43 B2 C6 28 41 24 AA 5A 24 29 00 72 |,A$:C..(A$.Z$).r|
00000360: 0B 68 01 99 C9 28 22 20 22 AA C4 28 4A 29 2C 32 |.h...(" "..(J),2|
00000370: 29 2C 00 97 0B 72 01 4B 31 B2 30 3A 81 4B B2 30 |),...r.K1.0:.K.0|
00000380: A4 53 39 AB 31 3A A1 23 33 2C 41 24 3A 41 B2 C6 |.S9.1:.#3,A$:A..|
00000390: 28 41 24 AA 5A 24 29 00 D6 0B 7C 01 81 4C B2 30 |(A$.Z$)...|..L.0|
000003A0: A4 37 3A 41 25 B2 41 AD 32 3A 44 31 B2 41 AB 41 |.7:A%.A.2:D1.A.A|
000003B0: 25 AC 32 3A 8B 4B 31 B3 B2 52 25 28 4A 29 A7 43 |%.2:.K1..R%(J).C|
000003C0: 25 28 4A 2C 4B 31 29 B2 44 31 3A 99 C7 28 44 25 |%(J,K1).D1:..(D%|
000003D0: 28 44 31 29 29 3B 00 F7 0B 86 01 41 B2 41 25 3A |(D1));.....A.A%:|
000003E0: 54 31 B2 54 31 AA 44 31 3A 4B 31 B2 4B 31 AA 31 |T1.T1.D1:K1.K1.1|
000003F0: 3A 82 4C 2C 4B 3A 99 00 09 0C 90 01 8B 54 31 B3 |:.L,K:.......T1.|
00000400: B1 43 20 A7 99 22 3F 22 3B 00 10 0C 9A 01 82 4A |.C .."?";......J|
00000410: 00 27 0C A4 01 9F 34 2C 34 3A 8F 20 53 50 45 43 |.'....4,4:. SPEC|
00000420: 49 46 59 20 4A 4F 42 00 3C 0C A9 01 81 56 B2 31 |IFY JOB.<....V.1|
00000430: A4 32 35 30 3A 99 22 20 22 3B 3A 82 00 55 0C AE |.250:." ";:..U..|
00000440: 01 99 3A A0 33 3A 99 22 93 11 20 20 20 20 43 48 |..:.3:.".. CH|
00000450: 4F 4F 53 45 3A 00 70 0C B8 01 99 22 11 20 31 2E |OOSE:.p....". 1.|
00000460: 20 43 48 45 43 4B 20 41 4C 4C 20 46 49 4C 45 53 | CHECK ALL FILES|
00000470: 00 89 0C C2 01 99 22 20 32 2E 20 42 41 44 20 53 |......" 2. BAD S|
00000480: 50 4F 54 20 43 48 45 43 4B 00 AF 0C CC 01 99 22 |POT CHECK......"|
00000490: 20 33 2E 20 52 45 43 4F 56 45 52 20 53 43 52 41 | 3. RECOVER SCRA|
000004A0: 54 43 48 45 44 20 20 20 20 20 46 49 4C 45 53 00 |TCHED FILES.|
000004B0: C9 0C D6 01 99 22 11 20 20 45 4E 54 45 52 20 4E |.....". ENTER N|
000004C0: 55 4D 42 45 52 3A 20 22 3B 00 DC 0C E0 01 A1 58 |UMBER: ";......X|
000004D0: 24 3A 8B 58 24 B2 22 22 89 34 38 30 00 FB 0C EA |$:.X$."".480....|
000004E0: 01 58 B2 C6 28 58 24 29 AB 34 38 3A 8B 58 B3 31 |.X..(X$).48:.X.1|
000004F0: 20 B0 20 58 B1 33 20 89 34 38 30 00 15 0D F4 01 | . X.3 .480.....|
00000500: 99 58 24 3A 9F 32 2C 38 2C 32 2C 22 23 30 22 3A |.X$:.2,8,2,"#0":|
00000510: 8D 33 30 32 30 00 28 0D FE 01 91 58 89 35 32 30 |.3020.(....X.520|
00000520: 2C 37 39 30 2C 38 39 30 00 41 0D 08 02 99 22 93 |,790,890.A....".|
00000530: 11 11 20 20 20 20 43 48 45 43 4B 20 46 49 4C 45 |.. CHECK FILE|
00000540: 53 00 4F 0D 0D 02 99 3A 99 22 11 11 20 22 3B 00 |S.O....:.".. ";.|
00000550: 5C 0D 12 02 54 B2 44 39 3A 53 B2 31 00 66 0D 1C |\...T.D9:S.1.f..|
00000560: 02 8D 32 30 30 30 00 86 0D 26 02 81 44 B2 32 A4 |..2000...&..D.2.|
00000570: 32 35 35 A9 33 32 3A 8B 20 41 28 44 29 B3 31 32 |255.32:. A(D).12|
00000580: 38 20 A7 35 39 30 00 CE 0D 30 02 44 33 B2 44 33 |8 .590...0.D3.D3|
00000590: AA 31 3A 54 25 28 44 33 2C 30 29 B2 20 41 28 44 |.1:T%(D3,0). A(D|
000005A0: AA 31 29 3A 53 25 28 44 33 2C 30 29 B2 41 28 44 |.1):S%(D3,0).A(D|
000005B0: AA 32 29 3A 4C 25 28 44 33 29 B2 41 28 44 AA 32 |.2):L%(D3).A(D.2|
000005C0: 38 29 AA 41 28 44 AA 32 39 29 AC 32 35 36 00 0B |8).A(D.29).256..|
000005D0: 0E 3A 02 8B 41 28 44 29 B2 31 33 32 20 A7 20 20 |.:..A(D).132 . |
000005E0: 20 20 20 20 20 54 25 28 44 33 2C 31 29 B2 41 28 | T%(D3,1).A(|
000005F0: 44 AA 31 39 29 3A 20 20 20 20 20 53 25 28 44 33 |D.19): S%(D3|
00000600: 2C 31 29 B2 41 28 44 AA 32 30 29 00 3C 0E 44 02 |,1).A(D.20).<.D.|
00000610: 4E 24 B2 22 22 3A 81 4B B2 44 AA 33 A4 44 AA 31 |N$."":.K.D.3.D.1|
00000620: 38 3A 4E 24 B2 4E 24 AA C7 28 41 28 4B 29 29 3A |8:N$.N$..(A(K)):|
00000630: 82 4B 3A 4E 24 28 44 33 29 B2 4E 24 00 43 0E 4E |.K:N$(D3).N$.C.N|
00000640: 02 82 44 00 5F 0E 58 02 54 B2 41 28 30 29 3A 53 |..D._.X.T.A(0):S|
00000650: B2 41 28 31 29 3A 8B 54 B2 44 39 A7 35 34 30 00 |.A(1):.T.D9.540.|
00000660: 70 0E 62 02 81 44 B2 31 A4 44 33 3A 4C 25 B2 30 |p.b..D.1.D3:L%.0|
00000670: 00 7C 0E 6C 02 99 4E 24 28 44 29 3B 00 94 0E 76 |.|.l..N$(D);...v|
00000680: 02 54 B2 54 25 28 44 2C 30 29 3A 53 B2 53 25 28 |.T.T%(D,0):S.S%(|
00000690: 44 2C 30 29 00 AD 0E 80 02 8B 54 B1 54 39 20 B0 |D,0)......T.T9 .|
000006A0: 20 53 B3 30 20 A7 20 20 20 20 54 B2 30 00 DB 0E | S.0 . T.0...|
000006B0: 8A 02 8B 20 54 B3 31 20 B0 20 53 B1 52 25 28 54 |... T.1 . S.R%(T|
000006C0: 29 20 A7 20 99 3A 99 22 20 42 41 44 20 43 48 41 |) . .:." BAD CHA|
000006D0: 49 4E 20 22 3A 99 3A 89 37 36 30 00 0E 0F 94 02 |IN ":.:.760.....|
000006E0: 8B 20 43 25 28 54 2C 53 29 B2 31 20 A7 20 99 3A |. C%(T,S).1 . .:|
000006F0: 99 22 20 55 4E 41 4C 4C 4F 43 41 54 45 44 20 42 |." UNALLOCATED B|
00000700: 4C 4F 43 4B 53 20 22 3A 99 3A 89 37 36 30 00 51 |LOCKS ":.:.760.Q|
00000710: 0F 9E 02 8B 20 43 25 28 54 2C 53 29 B1 31 20 A7 |.... C%(T,S).1 .|
00000720: 99 3A 99 22 20 48 41 53 20 41 20 43 4F 4E 46 4C |.:." HAS A CONFL|
00000730: 49 43 54 20 57 49 54 48 20 20 20 22 3B 4E 24 28 |ICT WITH ";N$(|
00000740: 43 25 28 54 2C 53 29 AB 31 29 3A 99 3A 89 37 36 |C%(T,S).1):.:.76|
00000750: 30 00 61 0F A8 02 43 25 28 54 2C 53 29 B2 31 AA |0.a...C%(T,S).1.|
00000760: 44 00 6B 0F B2 02 8D 33 30 30 30 00 77 0F BC 02 |D.k....3000.w...|
00000770: 4C 25 B2 4C 25 AA 31 00 9C 0F C6 02 81 4A B2 30 |L%.L%.1......J.0|
00000780: A4 31 3A 98 31 35 2C 22 4D 2D 52 22 3B C7 28 4A |.1:.15,"M-R";.(J|
00000790: 29 3B 42 24 3A A1 23 31 35 2C 41 24 00 B1 0F D0 |);B$:.#15,A$....|
000007A0: 02 41 28 4A 29 B2 C6 28 41 24 AA 5A 24 29 3A 82 |.A(J)..(A$.Z$):.|
000007B0: 4A 00 E0 0F DA 02 54 34 B2 54 3A 53 34 B2 53 3A |J.....T4.T:S4.S:|
000007C0: 54 B2 41 28 30 29 3A 20 53 B2 41 28 31 29 3A 8B |T.A(0): S.A(1):.|
000007D0: 54 B3 B1 30 20 AF 20 45 B2 30 20 A7 20 36 34 30 |T..0 . E.0 . 640|
000007E0: 00 0F 10 E4 02 54 B2 54 25 28 44 2C 31 29 3A 53 |.....T.T%(D,1):S|
000007F0: B2 53 25 28 44 2C 31 29 3A 54 25 28 44 2C 31 29 |.S%(D,1):T%(D,1)|
00000800: B2 30 3A 8B 20 54 B3 B1 30 20 A7 20 36 34 30 00 |.0:. T..0 . 640.|
00000810: 44 10 EE 02 8B 20 4C 25 20 B3 B1 4C 25 28 44 29 |D.... L% ..L%(D)|
00000820: 20 A7 20 99 3A 99 22 20 49 4E 43 4F 52 52 45 43 | . .:." INCORREC|
00000830: 54 20 42 4C 4F 43 4B 20 4E 4F 2E 20 22 3A 99 3A |T BLOCK NO. ":.:|
00000840: 89 37 36 30 00 53 10 F8 02 99 3A 99 22 91 91 11 |.760.S....:."...|
00000850: 20 22 3B 00 5A 10 02 03 82 44 00 77 10 07 03 99 | ";.Z....D.w....|
00000860: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000870: 20 20 20 20 20 20 22 00 95 10 0C 03 99 44 33 3B | "......D3;|
00000880: 22 46 49 4C 45 53 20 43 48 45 43 4B 45 44 22 3A |"FILES CHECKED":|
00000890: 89 31 32 37 30 00 B3 10 16 03 99 22 93 11 11 20 |.1270......"... |
000008A0: 43 48 45 43 4B 20 46 4F 52 20 42 41 44 20 53 50 |CHECK FOR BAD SP|
000008B0: 4F 54 53 00 DF 10 20 03 8B 20 46 25 B2 30 20 A7 |OTS... .. F%.0 .|
000008C0: 20 99 22 11 11 20 53 4F 52 52 59 2C 20 43 41 4E | .".. SORRY, CAN|
000008D0: 27 54 20 44 4F 20 49 54 22 3A 89 31 32 37 30 00 |'T DO IT":.1270.|
000008E0: 00 11 2A 03 99 22 11 11 22 3A 81 54 B2 31 20 A4 |..*.."..":.T.1 .|
000008F0: 20 54 39 20 3A 99 22 20 54 52 41 43 4B 22 3B 54 | T9 :." TRACK";T|
00000900: 00 12 11 34 03 81 20 53 B2 30 20 A4 20 52 25 28 |...4.. S.0 . R%(|
00000910: 54 29 00 2D 11 3E 03 99 22 91 1D 22 2C 22 53 45 |T).-.>.."..","SE|
00000920: 43 54 4F 52 1D 1D 20 9D 9D 9D 22 3B 53 00 37 11 |CTOR.. ...";S.7.|
00000930: 48 03 8D 33 30 30 30 00 3E 11 52 03 82 53 00 48 |H..3000.>.R..S.H|
00000940: 11 5C 03 99 22 91 91 22 00 4F 11 66 03 82 54 00 |.\.."..".O.f..T.|
00000950: 67 11 70 03 99 22 11 11 20 44 49 53 4B 20 4F 4B |g.p..".. DISK OK|
00000960: 22 3A 89 31 32 37 30 00 82 11 7A 03 99 22 93 11 |":.1270...z.."..|
00000970: 11 20 20 20 55 4E 53 43 52 41 54 43 48 20 46 49 |. UNSCRATCH FI|
00000980: 4C 45 00 B5 11 84 03 4B B2 30 3A 99 22 11 11 11 |LE.....K.0:."...|
00000990: 4C 4F 4F 4B 49 4E 47 20 46 4F 52 20 44 49 53 43 |LOOKING FOR DISC|
000009A0: 41 52 44 45 44 20 20 46 49 4C 45 53 2E 2E 2E 11 |ARDED FILES....|
000009B0: 11 11 11 11 22 00 C2 11 8E 03 54 B2 44 39 3A 53 |....".....T.D9:S|
000009C0: B2 31 00 CC 11 98 03 8D 32 30 30 30 00 F5 11 A2 |.1......2000....|
000009D0: 03 81 44 B2 32 A4 32 35 35 A9 33 32 3A 8B 41 28 |..D.2.255.32:.A(|
000009E0: 44 29 B3 B1 20 30 20 B0 20 41 28 44 AA 31 29 B2 |D).. 0 . A(D.1).|
000009F0: 30 89 39 38 30 00 16 12 AC 03 8B 4B B2 30 A7 99 |0.980......K.0..|
00000A00: 22 93 11 20 20 57 41 4E 54 20 54 4F 20 52 45 43 |".. WANT TO REC|
00000A10: 4F 56 45 52 3A 22 00 40 12 B6 03 A1 58 24 3A 81 |OVER:".@....X$:.|
00000A20: 4B B2 44 AA 33 20 A4 20 44 AA 31 38 3A 99 C7 28 |K.D.3 . D.18:..(|
00000A30: 41 28 4B 29 29 3B 3A 82 4B 3A 99 22 3F 20 22 3B |A(K));:.K:."? ";|
00000A40: 00 5D 12 C0 03 A1 58 24 3A 8B 58 24 B3 B1 22 59 |.]....X$:.X$.."Y|
00000A50: 22 AF 58 24 B3 B1 22 4E 22 89 39 36 30 00 72 12 |".X$.."N".960.r.|
00000A60: CA 03 99 58 24 3A 8B 58 24 B2 22 59 22 89 31 30 |...X$:.X$."Y".10|
00000A70: 31 30 00 79 12 D4 03 82 44 00 95 12 DE 03 54 B2 |10.y....D.....T.|
00000A80: 41 28 30 29 3A 53 B2 41 28 31 29 3A 8B 54 B2 44 |A(0):S.A(1):.T.D|
00000A90: 39 89 39 32 30 00 B2 12 E8 03 99 22 93 11 20 20 |9.920......".. |
00000AA0: 54 48 41 54 27 53 20 41 4C 4C 20 22 3A 89 31 32 |THAT'S ALL ":.12|
00000AB0: 37 30 00 F6 12 F2 03 54 36 B2 54 3A 53 36 B2 53 |70.....T6.T:S6.S|
00000AC0: 3A 44 36 B2 44 3A 54 B2 41 28 44 AA 31 29 3A 53 |:D6.D:T.A(D.1):S|
00000AD0: B2 41 28 44 AA 32 29 3A 4C 25 28 30 29 B2 41 28 |.A(D.2):L%(0).A(|
00000AE0: 44 AA 32 38 29 AA 41 28 44 AA 32 39 29 AC 32 35 |D.28).A(D.29).25|
00000AF0: 36 3A 4C 25 B2 30 00 14 13 FC 03 A1 58 24 3A 99 |6:L%.0......X$:.|
00000B00: 22 11 11 11 20 20 49 53 20 54 48 49 53 20 46 49 |"... IS THIS FI|
00000B10: 4C 45 3A 22 00 2A 13 06 04 99 22 11 20 31 2E 20 |LE:".*....". 1. |
00000B20: 53 45 51 55 45 4E 54 49 41 4C 00 3C 13 10 04 99 |SEQUENTIAL.<....|
00000B30: 22 20 32 2E 20 50 52 4F 47 52 41 4D 00 4A 13 1A |" 2. PROGRAM.J..|
00000B40: 04 99 22 20 33 2E 20 55 53 52 00 5E 13 24 04 8B |.." 3. USR.^.$..|
00000B50: 41 28 44 AA 31 39 29 B2 30 89 31 30 38 30 00 73 |A(D.19).0.1080.s|
00000B60: 13 2E 04 99 22 20 34 2E 20 52 45 4C 41 54 49 56 |...." 4. RELATIV|
00000B70: 45 20 3F 00 8B 13 38 04 99 22 11 20 45 4E 54 45 |E ?...8..". ENTE|
00000B80: 52 20 4E 55 4D 42 45 52 20 22 3B 00 9F 13 42 04 |R NUMBER ";...B.|
00000B90: A1 58 24 3A 8B 58 24 B2 22 22 89 31 30 39 30 00 |.X$:.X$."".1090.|
00000BA0: BF 13 4C 04 58 B2 C6 28 58 24 29 AB 34 38 3A 8B |..L.X..(X$).48:.|
00000BB0: 58 B3 31 20 B0 20 58 B1 34 20 89 31 30 39 30 00 |X.1 . X.4 .1090.|
00000BC0: CF 13 56 04 99 58 24 3A 58 B2 58 AA 31 32 38 00 |..V..X$:X.X.128.|
00000BD0: 0A 14 60 04 8B 58 B2 31 33 32 A7 54 25 28 30 2C |..`..X.132.T%(0,|
00000BE0: 31 29 B2 41 28 44 AA 31 39 29 3A 53 25 28 30 2C |1).A(D.19):S%(0,|
00000BF0: 31 29 B2 41 28 44 AA 32 30 29 3A 8B 54 25 28 30 |1).A(D.20):.T%(0|
00000C00: 2C 31 29 B2 30 89 31 30 32 30 00 1C 14 6A 04 8B |,1).0.1020...j..|
00000C10: 54 B1 54 39 B0 53 B3 30 A7 54 B2 30 00 44 14 74 |T.T9.S.0.T.0.D.t|
00000C20: 04 8B 54 B3 31 20 B0 20 53 B1 52 25 28 54 29 A7 |..T.1 . S.R%(T).|
00000C30: 99 22 20 42 41 44 20 43 48 41 49 4E 21 22 3A 89 |." BAD CHAIN!":.|
00000C40: 31 32 36 30 00 70 14 7E 04 8B 43 25 28 54 2C 53 |1260.p.~..C%(T,S|
00000C50: 29 B2 30 A7 20 99 22 20 41 4C 4C 4F 43 41 54 45 |).0. ." ALLOCATE|
00000C60: 44 20 42 4C 4F 43 4B 53 21 22 3A 89 31 32 36 30 |D BLOCKS!":.1260|
00000C70: 00 82 14 88 04 8D 33 30 30 30 3A 4C 25 B2 4C 25 |......3000:L%.L%|
00000C80: AA 31 00 A7 14 92 04 81 4A B2 30 A4 31 3A 98 31 |.1......J.0.1:.1|
00000C90: 35 2C 22 4D 2D 52 22 3B C7 28 4A 29 3B 42 24 3A |5,"M-R";.(J);B$:|
00000CA0: A1 23 31 35 2C 41 24 00 BC 14 9C 04 41 28 4A 29 |.#15,A$.....A(J)|
00000CB0: B2 C6 28 41 24 AA 5A 24 29 3A 82 4A 00 E3 14 A6 |..(A$.Z$):.J....|
00000CC0: 04 54 34 B2 54 3A 53 34 B2 53 3A 54 B2 41 28 30 |.T4.T:S4.S:T.A(0|
00000CD0: 29 3A 53 B2 41 28 31 29 3A 8B 54 B3 B1 30 89 31 |):S.A(1):.T..0.1|
00000CE0: 31 33 30 00 10 15 B0 04 54 B2 54 25 28 30 2C 31 |130.....T.T%(0,1|
00000CF0: 29 3A 53 B2 53 25 28 30 2C 31 29 3A 54 25 28 30 |):S.S%(0,1):T%(0|
00000D00: 2C 31 29 B2 30 3A 8B 54 B3 B1 30 89 31 31 33 30 |,1).0:.T..0.1130|
00000D10: 00 3F 15 BA 04 8B 4C 25 B3 B1 4C 25 28 30 29 A7 |.?....L%..L%(0).|
00000D20: 99 3A 99 22 20 49 4E 43 4F 52 52 45 43 54 20 42 |.:." INCORRECT B|
00000D30: 4C 4F 43 4B 20 4E 4F 2E 22 3A 89 31 32 36 30 00 |LOCK NO.":.1260.|
00000D40: 52 15 C4 04 54 B2 54 36 3A 53 B2 53 36 3A 44 B2 |R...T.T6:S.S6:D.|
00000D50: 44 36 00 5C 15 CE 04 8D 33 30 30 30 00 7C 15 D8 |D6.\....3000.|..|
00000D60: 04 98 31 35 2C 22 4D 2D 57 22 3B C7 28 44 29 3B |..15,"M-W";.(D);|
00000D70: 42 24 3B C7 28 31 29 3B C7 28 58 29 00 9F 15 E2 |B$;.(1);.(X)....|
00000D80: 04 98 31 35 2C 22 55 32 3A 32 2C 22 3B 44 24 3B |..15,"U2:2,";D$;|
00000D90: 54 3B 53 3A 8D 33 30 32 30 3A 89 31 33 30 30 00 |T;S:.3020:.1300.|
00000DA0: BB 15 EC 04 99 22 20 53 4F 52 52 59 2C 20 49 54 |....." SORRY, IT|
00000DB0: 20 57 4F 4E 27 54 20 57 4F 52 4B 00 C2 15 F6 04 | WON'T WORK.....|
00000DC0: A0 32 00 E2 15 00 05 85 22 11 20 56 41 4C 49 44 |.2......". VALID|
00000DD0: 41 54 45 20 44 49 53 4B 20 20 59 9D 9D 9D 22 3B |ATE DISK Y...";|
00000DE0: 58 24 00 F2 15 0A 05 8B C6 28 58 24 29 B2 37 38 |X$.......(X$).78|
00000DF0: A7 80 00 06 16 14 05 A0 32 3A 98 31 35 2C 22 56 |........2:.15,"V|
00000E00: 22 3B 44 24 3A 80 00 19 16 D0 07 8F 20 47 52 41 |";D$:....... GRA|
00000E10: 42 20 41 20 42 4C 4F 43 4B 00 23 16 DA 07 8D 33 |B A BLOCK.#....3|
00000E20: 30 30 30 00 4A 16 E4 07 81 4A B2 30 A4 32 35 35 |000.J....J.0.255|
00000E30: 3A 98 31 35 2C 22 4D 2D 52 22 3B C7 28 4A 29 3B |:.15,"M-R";.(J);|
00000E40: 42 24 3A A1 23 31 35 2C 41 24 00 61 16 EE 07 41 |B$:.#15,A$.a...A|
00000E50: 28 4A 29 B2 C6 28 41 24 AA 5A 24 29 3A 82 4A 3A |(J)..(A$.Z$):.J:|
00000E60: 8E 00 72 16 B8 0B 8F 20 52 45 41 44 20 42 4C 4F |..r.... READ BLO|
00000E70: 43 4B 00 8A 16 C2 0B 98 31 35 2C 22 42 2D 52 3A |CK......15,"B-R:|
00000E80: 32 2C 22 3B 44 24 3B 54 3B 53 00 9D 16 CC 0B 8F |2,";D$;T;S......|
00000E90: 20 45 52 52 4F 52 20 53 54 41 54 55 53 00 B0 16 | ERROR STATUS...|
00000EA0: D6 0B 84 31 35 2C 45 2C 45 24 2C 45 31 2C 45 32 |...15,E,E$,E1,E2|
00000EB0: 00 F1 16 E0 0B 8B 45 B3 B1 30 A7 98 34 2C 22 11 |......E..0..4,".|
00000EC0: 12 44 49 53 4B 20 45 52 52 4F 52 3A 92 22 45 3A |.DISK ERROR:."E:|
00000ED0: 98 34 2C 45 24 3A 98 34 2C 22 11 54 52 41 43 4B |.4,E$:.4,".TRACK|
00000EE0: 3A 22 3B 45 31 2C 22 53 45 43 54 4F 52 3A 22 45 |:";E1,"SECTOR:"E|
00000EF0: 32 00 F7 16 EA 0B 8E 00 00 00 |2......... |
....Z..53280,0:.53281,0:.646,7.J.D.."...
DISK CHECKER
COMPUTE APR'82 #23:160...N.. A(255),
C%(77,28),D%(1),N$(224),T%(224,1),S%(224
,1),L%(224),R%(77).P.X.D%(0).58:D%(1).42
:Z$.G(0)...... 1,17,20,24,19,30,17,35,16
,0...... 65,17,20,24,18,30,17,35,16,0.8.
... 67,39,28,53,26,64,24,77,22,0.M. .B$.
G(17):.".. DRIVE#";D$:.D$."S".D$."0":B$
.G(3)......D$.."0".D$.."1".160. ....15,8
,15,"I".D$:.3020......3,8,3,"$".D$:
.3020.Y.H.A0.1:.#3,A$:A.F(A$.Z$)...R..A
1:.A.A1.250.....F%.F%.1:.F%.3.290......A
1:.A1.0.210......230......A1:.A1.0.270.U
....B1:.J.A0.A1:R%(J).B1:.J:A0.J:.250.|.
...A.1 . A.65. D1.1:T9.35:S9.3:D9.18. ..
..A.67. D1.257 :T9.77:S9.4:D9.39.I."..T9
.0. 3:." ? DISK NOT RECOGNIZED":....,..4
20:. GET/PRINT BAM...6.."... FREE BLOCK
MAP: #";D$:.".....@..J.1.D1:.#3,A$:.J...
J..J.1.T9:T1.0.H.T..J.51..#3,A$,A$,A$,A$
.^.^..#3,A$:C.F(A$.Z$).R.H..I(" ".D(J),2
),...R.K1.0:.K.0.S9.1:.#3,A$:A.F(A$.Z$).
V.|..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
.'....4,4:. SPECIFY JOB.<....V.1.250:."
";:..U....: 3:.".. CHOOSE:.P....". 1.
CHECK ALL FILES...B.." 2. BAD SPOT CHEC
K...L.." 3. RECOVER SCRATCHED FILES.
I.V..". ENTER NUMBER: ";......X$:.X$.""
.480.....X.F(X$).48:.X.1 . X.3 .480.....
.X$:.2,8,2,"#0":.3020.(....X.520,790,890
.A...."... CHECK FILES.O....:.".. ";.
\...T.D9:S.1.F....2000...&..D.2.255.32:.
A(D).128 .590.N.0.D3.D3.1:T%(D3,0). A(D
.1):S%(D3,0).A(D.2):L%(D3).A(D.28).A(D.2
9).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$.C.N
..D._.X.T.A(0):S.A(1):.T.D9.540.P.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 ":.:.760.....
. C%(T,S).1 . .:." UNALLOCATED BLOCKS ":
.:.760.Q.... C%(T,S).1 ..:." HAS A CONFL
ICT WITH ";N$(C%(T,S).1):.:.760.A...C%
(T,S).1.D.K....3000.W...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.....T.T%(D,1):S.S%(D,1)
:T%(D,1).0:. T..0 . 640.D.... L% ..L%(D)
. .:." INCORRECT BLOCK NO. ":.:.760.S..
..:."... ";.Z....D.W...."
"......D3;"FILES CHECKED":.1270...
..."... CHECK FOR BAD SPOTS... .. F%.0 .
.".. SORRY, CAN'T DO IT":.1270...*.."..
":.T.1 . T9 :." TRACK";T...4.. S.0 . R%(
T).-.>.."..","SECTOR.. ...";S.7.H..3000.
>.R..S.H.\.."..".O.F..T.G.P..".. DISK OK
":.1270...Z.."... UNSCRATCH FILE.....K
.0:."...LOOKING FOR DISCARDED FILES....
....".B...T.D9:S.1.L....2000......D.2.25
5.32:.A(D).. 0 . A(D.1).0.980......K.0..
".. WANT TO RECOVER:".@....X$:.K.D.3 .
D.18:.G(A(K));:.K:."? ";.]....X$:.X$.."Y
".X$.."N".960.R.J..X$:.X$."Y".1010.Y.T..
D.....T.A(0):S.A(1):.T.D9.920......"..
THAT'S ALL ":.1270.....T6.T:S6.S:D6.D:T.
A(D.1):S.A(D.2):L%(0).A(D.28).A(D.29).25
6:L%.0......X$:."... IS THIS FILE:".*..
..". 1. SEQUENTIAL.<...." 2. PROGRAM.J..
.." 3. USR.^.$..A(D.19).0.1080.S...." 4.
RELATIVE ?...8..". ENTER NUMBER ";...B.
.X$:.X$."".1090...L.X.F(X$).48:.X.1 . X.
4 .1090.O.V..X$:X.X.128...`..X.132.T%(0,
1).A(D.19):S%(0,1).A(D.20):.T%(0,1).0.10
20...J..T.T9.S.0.T.0.D.T..T.1 . S.R%(T).
." BAD CHAIN!":.1260.P.~..C%(T,S).0. ."
ALLOCATED BLOCKS!":.1260......3000:L%.L%
.1......J.0.1:.15,"M-R";G(J);B$:.#15,A$.
....A(J).F(A$.Z$):.J.....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.?....L%..L%(0).
.:." INCORRECT BLOCK NO.":.1260.R.D.T.T6
:S.S6:D.D6.\.N..3000.|.X..15,"M-W";G(D);
B$;G(1);G(X)......15,"U2:2,";D$;T;S:.302
0:.1300......" SORRY, IT WON'T WORK.B...
2......". VALIDATE DISK Y...";X$......
F(X$).78....... 2:.15,"V";D$:....P.. GRA
B A BLOCK.#.Z..3000.J....J.0.255:.15,"M-
R";G(J);B$:.#15,A$.A...A(J).F(A$.Z$):.J:
..R.... READ BLOCK...B..15,"B-R:2,";D$;T
;S...L.. ERROR STATUS...V..15,E,E$,E1,E2
......E..0..4,"..DISK ERROR:."E:.4,E$:.4
,".TRACK:";E1,"SECTOR:"E2.........
> CLICK IMAGE PREVIEW FOR FULL MODAL