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

DISK-REPAIR.64

FILE INFORMATION

FILENAME(S): DISK-REPAIR.64

FILE TYPE(S): PRG

FILE SIZE: 2.2K

FIRST SEEN: 2025-11-30 21:10:49

APPEARS ON: 1 disk(s)

FILE HASH

434a418c42d1a2134e8357d3dc67ddb2e019417787cdca07f3ad635fb1cd1b0d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C C D PD 05 DISK-REPAIR.64 PRG DuncanTwain 23 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 27 08 0A 00 8F 20  47 45 4F 53 20 44 49 53  |..'.... GEOS DIS|
00000010: 4B 20 46 49 58 45 52 2C  20 36 34 2F 31 32 38 20  |K FIXER, 64/128 |
00000020: 56 45 52 53 49 4F 4E 00  2D 08 14 00 3A 00 38 08  |VERSION.-...:.8.|
00000030: 1E 00 99 20 22 93 22 3B  00 4E 08 28 00 8B 20 C2  |... ".";.N.(.. .|
00000040: 28 36 35 32 38 30 29 B3  B1 30 A7 31 30 30 00 70  |(65280)..0.100.p|
00000050: 08 32 00 81 20 49 B2 34  30 39 36 A4 34 33 35 32  |.2.. I.4096.4352|
00000060: 3A 97 20 49 AA 32 30 34  38 2C C2 28 49 29 3A 82  |:. I.2048,.(I):.|
00000070: 00 A0 08 3C 00 4A B2 31  33 32 3A 81 20 41 B2 31  |...<.J.132:. A.1|
00000080: A4 32 3A 81 20 4B B2 41  20 A4 38 A9 32 3A 4A B2  |.2:. K.A .8.2:J.|
00000090: 4A AA 31 3A F9 20 4B 2C  C7 28 4A 29 3A 82 3A 82  |J.1:. K,.(J):.:.|
000000A0: 00 B3 08 46 00 8B 20 C2  28 32 31 35 29 B2 30 A7  |...F.. .(215).0.|
000000B0: 31 30 30 00 BA 08 47 00  FE 25 00 C4 08 50 00 E7  |100...G..%...P..|
000000C0: 36 2C 31 36 00 D7 08 5A  00 FE 1A 31 39 2C 30 2C  |6,16...Z...19,0,|
000000D0: 35 39 2C 32 34 2C 31 00  EE 08 64 00 97 35 33 32  |59,24,1...d..532|
000000E0: 38 30 2C 36 3A 97 35 33  32 38 31 2C 31 35 00 FA  |80,6:.53281,15..|
000000F0: 08 6E 00 5A 24 B2 C7 28  30 29 00 38 09 78 00 42  |.n.Z$..(0).8.x.B|
00000100: 4C 24 B2 5A 24 AA 5A 24  AA 5A 24 AA 5A 24 AA 5A  |L$.Z$.Z$.Z$.Z$.Z|
00000110: 24 AA 5A 24 AA 5A 24 AA  5A 24 AA 5A 24 AA 5A 24  |$.Z$.Z$.Z$.Z$.Z$|
00000120: AA 5A 24 AA 5A 24 AA 5A  24 AA 5A 24 AA 5A 24 AA  |.Z$.Z$.Z$.Z$.Z$.|
00000130: 5A 24 AA 5A 24 AA 5A 24  00 45 09 82 00 99 20 22  |Z$.Z$.Z$.E.... "|
00000140: 93 0E 08 22 3B 00 78 09  8C 00 99 20 22 1F 12 20  |...";.x.... ".. |
00000150: 20 20 20 20 20 20 20 20  20 20 20 C7 C5 CF D3 20  |           .... |
00000160: C4 49 53 4B 20 D2 45 50  41 49 52 20 20 20 20 20  |.ISK .EPAIR     |
00000170: 20 20 20 20 20 20 20 22  00 A1 09 96 00 99 A3 35  |       ".......5|
00000180: 29 22 11 D6 45 52 53 49  4F 4E 20 31 2E 30 2C 20  |)"..ERSION 1.0, |
00000190: C4 45 43 45 4D 42 45 52  20 20 35 2C 20 31 39 38  |.ECEMBER  5, 198|
000001A0: 37 00 CA 09 A0 00 99 A3  35 29 22 11 41 4E 4F 54  |7.......5)".ANOT|
000001B0: 48 45 52 20 46 49 4E 45  20 C7 C5 CF D3 20 55 54  |HER FINE .... UT|
000001C0: 49 4C 49 54 59 20 46 52  4F 4D 00 E5 09 AA 00 99  |ILITY FROM......|
000001D0: A3 31 32 29 22 D2 41 4E  44 59 20 D7 49 4E 43 48  |.12)".ANDY .INCH|
000001E0: 45 53 54 45 52 00 12 0A  B4 00 99 A3 33 29 22 11  |ESTER.......3)".|
000001F0: C3 4F 50 59 52 49 47 48  54 20 31 39 38 37 20 42  |.OPYRIGHT 1987 B|
00000200: 59 20 D2 41 4E 44 59 20  D7 49 4E 43 48 45 53 54  |Y .ANDY .INCHEST|
00000210: 45 52 00 30 0A BE 00 99  A3 31 30 29 22 C1 4C 4C  |ER.0.....10)".LL|
00000220: 20 D2 49 47 48 54 53 20  D2 45 53 45 52 56 45 44  | .IGHTS .ESERVED|
00000230: 00 63 0A C8 00 99 20 22  11 C0 C0 C0 C0 C0 C0 C0  |.c.... "........|
00000240: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000250: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000260: C0 22 3B 00 7C 0A D2 00  99 3A 99 A3 31 35 29 22  |.";.|....:..15)"|
00000270: 1C 11 12 CD 41 49 4E 20  CD 45 4E 55 00 9C 0A DC  |....AIN .ENU....|
00000280: 00 99 A3 31 30 29 22 11  12 46 20 31 92 20 2D 20  |...10)"..F 1. - |
00000290: C9 4E 53 54 52 55 43 54  49 4F 4E 53 00 B8 0A E6  |.NSTRUCTIONS....|
000002A0: 00 99 A3 31 30 29 22 11  12 46 20 33 92 20 2D 20  |...10)"..F 3. - |
000002B0: C6 49 58 20 C4 49 53 4B  00 D9 0A F0 00 99 A3 31  |.IX .ISK.......1|
000002C0: 30 29 22 11 12 46 20 35  92 20 2D 20 D1 55 49 54  |0)"..F 5. - .UIT|
000002D0: 20 54 4F 20 C2 C1 D3 C9  C3 00 F8 0A FA 00 99 A3  | TO ............|
000002E0: 31 30 29 22 11 12 46 20  37 92 20 2D 20 D2 45 42  |10)"..F 7. - .EB|
000002F0: 4F 4F 54 20 C7 C5 CF D3  00 0D 0B 04 01 A1 20 41  |OOT .......... A|
00000300: 24 3A 8B 20 41 24 B2 22  22 A7 32 36 30 00 1F 0B  |$:. A$."".260...|
00000310: 0E 01 8B 20 41 24 B2 22  85 22 20 A7 35 31 30 00  |... A$."." .510.|
00000320: 31 0B 18 01 8B 20 41 24  B2 22 86 22 20 A7 33 32  |1.... A$."." .32|
00000330: 30 00 43 0B 22 01 8B 20  41 24 B2 22 87 22 20 A7  |0.C.".. A$."." .|
00000340: 37 32 30 00 55 0B 2C 01  8B 20 41 24 B2 22 88 22  |720.U.,.. A$."."|
00000350: 20 A7 34 35 30 00 5E 0B  36 01 89 32 36 30 00 69  | .450.^.6..260.i|
00000360: 0B 40 01 99 20 22 93 22  3B 00 9C 0B 4A 01 99 20  |.@.. ".";...J.. |
00000370: 22 1F 12 20 20 20 20 20  20 20 20 20 20 20 20 C7  |"..            .|
00000380: C5 CF D3 20 C4 49 53 4B  20 D2 45 50 41 49 52 20  |... .ISK .EPAIR |
00000390: 20 20 20 20 20 20 20 20  20 20 20 22 00 CE 0B 54  |           "...T|
000003A0: 01 99 20 22 11 1C 20 12  D0 4C 41 43 45 20 44 49  |.. ".. ..LACE DI|
000003B0: 53 4B 20 49 4E 20 C4 52  49 56 45 20 C1 2E 20 20  |SK IN .RIVE ..  |
000003C0: D0 52 45 53 53 20 41 4E  59 20 4B 45 59 2E 00 E3  |.RESS ANY KEY...|
000003D0: 0B 5E 01 A1 20 41 24 3A  8B 20 41 24 B2 22 22 A7  |.^.. A$:. A$."".|
000003E0: 33 35 30 00 FE 0B 68 01  99 A3 31 33 29 22 11 12  |350...h...13)"..|
000003F0: D7 4F 52 4B 49 4E 47 20  2E 20 2E 20 2E 22 00 10  |.ORKING . . ."..|
00000400: 0C 72 01 9F 31 35 2C 38  2C 31 35 2C 22 49 30 22  |.r..15,8,15,"I0"|
00000410: 00 1F 0C 7C 01 9F 32 2C  38 2C 32 2C 22 23 22 00  |...|..2,8,2,"#".|
00000420: 35 0C 86 01 98 31 35 2C  22 55 31 22 3B 32 3B 30  |5....15,"U1";2;0|
00000430: 3B 31 38 3B 30 00 49 0C  90 01 98 31 35 2C 22 42  |;18;0.I....15,"B|
00000440: 2D 50 22 3B 32 3B 31 37  31 00 55 0C 9A 01 98 32  |-P";2;171.U....2|
00000450: 2C 42 4C 24 3B 00 6B 0C  A4 01 98 31 35 2C 22 55  |,BL$;.k....15,"U|
00000460: 32 22 3B 32 3B 30 3B 31  38 3B 30 00 76 0C AE 01  |2";2;0;18;0.v...|
00000470: A0 32 3A A0 31 35 00 7F  0C B8 01 89 31 33 30 00  |.2:.15......130.|
00000480: 8A 0C C2 01 99 20 22 93  22 3B 00 BD 0C CC 01 99  |..... ".";......|
00000490: 20 22 1F 12 20 20 20 20  20 20 20 20 20 20 20 20  | "..            |
000004A0: C7 C5 CF D3 20 C4 49 53  4B 20 D2 45 50 41 49 52  |.... .ISK .EPAIR|
000004B0: 20 20 20 20 20 20 20 20  20 20 20 20 22 00 EB 0C  |            "...|
000004C0: D6 01 99 A3 34 29 22 11  1C 12 D0 4C 41 43 45 20  |....4)"....LACE |
000004D0: C7 C5 CF D3 20 42 4F 4F  54 20 44 49 53 4B 20 49  |.... BOOT DISK I|
000004E0: 4E 20 C4 52 49 56 45 20  C1 2E 22 00 17 0D E0 01  |N .RIVE ..".....|
000004F0: 99 A3 34 29 22 12 20 20  20 20 20 20 20 20 20 20  |..4)".          |
00000500: D0 52 45 53 53 20 41 4E  59 20 4B 45 59 2E 20 20  |.RESS ANY KEY.  |
00000510: 20 20 20 20 20 20 22 00  2C 0D EA 01 A1 20 41 24  |      ".,.... A$|
00000520: 3A 8B 20 41 24 B2 22 22  A7 34 39 30 00 3D 0D F4  |:. A$."".490.=..|
00000530: 01 9E 34 39 31 35 32 3A  FE 26 3A FE 1B 00 48 0D  |..49152:.&:...H.|
00000540: FE 01 99 20 22 93 22 3B  00 7B 0D 08 02 99 20 22  |... ".";.{.... "|
00000550: 1F 12 20 20 20 20 20 20  20 20 20 20 20 20 C7 C5  |..            ..|
00000560: CF D3 20 C4 49 53 4B 20  D2 45 50 41 49 52 20 20  |.. .ISK .EPAIR  |
00000570: 20 20 20 20 20 20 20 20  20 20 22 00 AA 0D 12 02  |          ".....|
00000580: 99 20 22 11 D4 48 49 53  20 50 52 4F 47 52 41 4D  |. "..HIS PROGRAM|
00000590: 20 57 49 4C 4C 20 46 49  58 20 41 20 C7 C5 CF D3  | WILL FIX A ....|
000005A0: 20 44 49 53 4B 20 54 48  41 54 00 D7 0D 1C 02 99  | DISK THAT......|
000005B0: 20 22 43 41 4E 20 4E 4F  20 4C 4F 4E 47 45 52 20  | "CAN NO LONGER |
000005C0: 42 45 20 4F 50 45 4E 45  44 20 46 52 4F 4D 20 54  |BE OPENED FROM T|
000005D0: 48 45 20 C7 C5 CF D3 00  01 0E 26 02 99 20 22 44  |HE .......&.. "D|
000005E0: 45 53 4B D4 4F 50 20 42  55 54 20 43 41 4E 20 53  |ESK.OP BUT CAN S|
000005F0: 54 49 4C 4C 20 42 45 20  55 53 45 44 20 57 49 54  |TILL BE USED WIT|
00000600: 48 00 2E 0E 30 02 99 20  22 53 54 41 4E 44 41 52  |H...0.. "STANDAR|
00000610: 44 20 C3 4F 4D 4D 4F 44  4F 52 45 20 C4 CF D3 2E  |D .OMMODORE ....|
00000620: 20 20 C9 46 20 54 48 45  52 45 20 41 52 45 00 5A  |  .F THERE ARE.Z|
00000630: 0E 3A 02 99 20 22 4E 4F  52 4D 41 4C 20 C4 CF D3  |.:.. "NORMAL ...|
00000640: 20 44 49 53 4B 20 45 52  52 4F 52 53 2C 20 54 48  | DISK ERRORS, TH|
00000650: 45 20 44 49 53 4B 20 4D  41 59 00 78 0E 44 02 99  |E DISK MAY.x.D..|
00000660: 20 22 53 54 49 4C 4C 20  4E 4F 54 20 42 45 20 52  | "STILL NOT BE R|
00000670: 45 50 41 49 52 45 44 2E  00 A8 0E 4E 02 99 20 22  |EPAIRED....N.. "|
00000680: 11 CB 45 45 50 20 49 4E  20 4D 49 4E 44 20 54 48  |..EEP IN MIND TH|
00000690: 41 54 20 41 4C 54 48 4F  55 47 48 20 59 4F 55 20  |AT ALTHOUGH YOU |
000006A0: 4D 49 47 48 54 20 42 45  00 D7 0E 58 02 99 20 22  |MIGHT BE...X.. "|
000006B0: 41 42 4C 45 20 54 4F 20  4F 50 45 4E 20 54 48 45  |ABLE TO OPEN THE|
000006C0: 20 44 49 53 4B 20 46 52  4F 4D 20 54 48 45 20 44  | DISK FROM THE D|
000006D0: 45 53 4B D4 4F 50 2C 00  05 0F 62 02 99 20 22 C7  |ESK.OP,...b.. ".|
000006E0: C5 CF D3 20 D6 CC C9 D2  20 46 49 4C 45 53 20 4D  |... .... FILES M|
000006F0: 41 59 20 42 45 20 44 41  4D 41 47 45 44 2E 20 20  |AY BE DAMAGED.  |
00000700: C1 46 54 45 52 00 33 0F  6C 02 99 20 22 4F 50 45  |.FTER.3.l.. "OPE|
00000710: 4E 49 4E 47 20 54 48 45  20 44 49 53 4B 2C 20 53  |NING THE DISK, S|
00000720: 45 4C 45 43 54 49 4E 47  20 12 56 41 4C 49 44 41  |ELECTING .VALIDA|
00000730: 54 45 92 00 64 0F 76 02  99 20 22 46 52 4F 4D 20  |TE..d.v.. "FROM |
00000740: 54 48 45 20 12 44 49 53  4B 92 20 50 55 4C 4C 2D  |THE .DISK. PULL-|
00000750: 44 4F 57 4E 20 4D 45 4E  55 20 4D 49 47 48 54 20  |DOWN MENU MIGHT |
00000760: 4D 41 4B 45 00 8B 0F 80  02 99 20 22 53 4F 4D 45  |MAKE...... "SOME|
00000770: 20 4F 46 20 54 48 45 20  46 49 4C 45 53 20 55 53  | OF THE FILES US|
00000780: 41 42 4C 45 20 41 47 41  49 4E 2E 00 BB 0F 8A 02  |ABLE AGAIN......|
00000790: 99 20 22 11 D4 4F 20 4B  45 45 50 20 59 4F 55 52  |. "..O KEEP YOUR|
000007A0: 20 C7 C5 CF D3 20 44 49  53 4B 53 20 49 4E 20 47  | .... DISKS IN G|
000007B0: 4F 4F 44 20 57 4F 52 4B  49 4E 47 00 E7 0F 94 02  |OOD WORKING.....|
000007C0: 99 20 22 43 4F 4E 44 49  54 49 4F 4E 2C 20 CE C5  |. "CONDITION, ..|
000007D0: D6 C5 D2 20 56 41 4C 49  44 41 54 45 20 54 48 45  |... VALIDATE THE|
000007E0: 4D 20 55 53 49 4E 47 00  15 10 9E 02 99 20 22 53  |M USING...... "S|
000007F0: 54 41 4E 44 41 52 44 20  C3 4F 4D 4D 4F 44 4F 52  |TANDARD .OMMODOR|
00000800: 45 20 C4 CF D3 20 43 4F  4D 4D 41 4E 44 53 21 20  |E ... COMMANDS! |
00000810: 20 CF 4E 4C 59 00 42 10  A8 02 99 20 22 55 53 45  | .NLY.B.... "USE|
00000820: 20 C7 C5 CF D3 20 54 4F  20 56 41 4C 49 44 41 54  | .... TO VALIDAT|
00000830: 45 20 59 4F 55 52 20 C7  C5 CF D3 20 44 49 53 4B  |E YOUR .... DISK|
00000840: 53 21 00 72 10 B2 02 99  A3 34 29 22 11 11 11 1C  |S!.r.....4)"....|
00000850: 12 D0 52 45 53 53 20 41  4E 59 20 4B 45 59 20 54  |..RESS ANY KEY T|
00000860: 4F 20 43 4F 4E 54 49 4E  55 45 20 2E 20 2E 20 2E  |O CONTINUE . . .|
00000870: 22 3B 00 87 10 BC 02 A1  20 41 24 3A 8B 20 41 24  |";...... A$:. A$|
00000880: B2 22 22 A7 37 30 30 00  90 10 C6 02 89 31 33 30  |."".700......130|
00000890: 00 A6 10 D0 02 8B 20 C2  28 36 35 32 38 30 29 B3  |...... .(65280).|
000008A0: B1 30 A7 37 34 30 00 C8  10 DA 02 81 20 49 B2 34  |.0.740...... I.4|
000008B0: 30 39 36 A4 34 33 35 32  3A 97 20 49 2C C2 28 49  |096.4352:. I,.(I|
000008C0: AA 32 30 34 38 29 3A 82  00 E8 10 E4 02 99 20 22  |.2048):....... "|
000008D0: 93 D4 59 50 45 20 D2 D5  CE 20 54 4F 20 52 45 53  |..YPE ... TO RES|
000008E0: 54 41 52 54 2E 22 3A 80  00 00 00                 |TART.":....     |
..'.... GEOS DISK FIXER, 64/128 VERSION.
-...:.8.... ".";.N.(.. B(65280)..0.100.P
.2.. I.4096.4352:. I.2048,B(I):.. .<.J.1
32:. A.1.2:. K.A .8.2:J.J.1:. K,G(J):.:.
...F.. B(215).0.100...G..%.D.P..6,16.W.Z
...19,0,59,24,1...D..53280,6:.53281,15..
.N.Z$.G(0).8.X.BL$.Z$.Z$.Z$.Z$.Z$.Z$.Z$.
Z$.Z$.Z$.Z$.Z$.Z$.Z$.Z$.Z$.Z$.Z$.E.... "
...";.X.... "..            GEOS DISK REP
AIR            ".......5)".VERSION 1.0, 
DECEMBER  5, 1987.J. ...5)".ANOTHER FINE
 GEOS UTILITY FROM.......12)"RANDY WINCH
ESTER.......3)".COPYRIGHT 1987 BY RANDY 
WINCHESTER.0.....10)"ALL RIGHTS RESERVED
.C.H.. "................................
.........";.|.R..:..15)"...MAIN MENU....
...10)"..F 1. - INSTRUCTIONS.......10)".
.F 3. - FIX DISK.Y.....10)"..F 5. - QUIT
 TO BASIC.......10)"..F 7. - REBOOT GEOS
...... A$:. A$."".260...... A$."." .510.
1.... A$."." .320.C.".. A$."." .720.U.,.
. A$."." .450.^.6..260.I.@.. ".";...J.. 
"..            GEOS DISK REPAIR         
   ".N.T.. ".. .PLACE DISK IN DRIVE A.  
PRESS ANY KEY....^.. A$:. A$."".350...H.
..13)"..WORKING . . ."...R..15,8,15,"I0"
...|..2,8,2,"#".5....15,"U1";2;0;18;0.I.
...15,"B-P";2;171.U....2,BL$;.K....15,"U
2";2;0;18;0.V... 2: 15.....130...B.. ".
";...L.. "..            GEOS DISK REPAIR
            "...V...4)"...PLACE GEOS BOO
T DISK IN DRIVE A.".......4)".          
PRESS ANY KEY.        ".,.... A$:. A$.""
.490.=....49152:.&:...H.... ".";.{.... "
..            GEOS DISK REPAIR          
  "...... ".THIS PROGRAM WILL FIX A GEOS
 DISK THAT.W.... "CAN NO LONGER BE OPENE
D FROM THE GEOS...&.. "DESKTOP BUT CAN S
TILL BE USED WITH...0.. "STANDARD COMMOD
ORE DOS.  IF THERE ARE.Z.:.. "NORMAL DOS
 DISK ERRORS, THE DISK MAY.X.D.. "STILL 
NOT BE REPAIRED....N.. ".KEEP IN MIND TH
AT ALTHOUGH YOU MIGHT BE.W.X.. "ABLE TO 
OPEN THE DISK FROM THE DESKTOP,...B.. "G
EOS VLIR FILES MAY BE DAMAGED.  AFTER.3.
L.. "OPENING THE DISK, SELECTING .VALIDA
TE..D.V.. "FROM THE .DISK. PULL-DOWN MEN
U MIGHT MAKE...... "SOME OF THE FILES US
ABLE AGAIN....... ".TO KEEP YOUR GEOS DI
SKS IN GOOD WORKING...... "CONDITION, NE
VER VALIDATE THEM USING...... "STANDARD 
COMMODORE DOS COMMANDS!  ONLY.B.... "USE
 GEOS TO VALIDATE YOUR GEOS DISKS!.R....
.4)".....PRESS ANY KEY TO CONTINUE . . .
";...... A$:. A$."".700...F..130...P.. B
(65280)..0.740.H.Z.. I.4096.4352:. I,B(I
.2048):....... ".TYPE RUN TO RESTART.":.
...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL