00000000: 01 04 28 08 0A 00 99 20 22 93 11 20 52 45 56 49 |..(.... ".. REVI|
00000010: 56 45 20 53 43 52 41 54 43 48 45 44 20 44 49 53 |VE SCRATCHED DIS|
00000020: 4B 20 46 49 4C 45 53 22 00 51 08 14 00 99 20 22 |K FILES".Q.... "|
00000030: 11 11 20 44 49 53 4B 20 55 4E 49 54 20 4E 52 20 |.. DISK UNIT NR |
00000040: 28 38 2D 31 35 29 20 3F A0 38 20 9D 9D 9D 9D 22 |(8-15) ?.8 ...."|
00000050: 3B 00 77 08 1E 00 85 20 55 3A 20 8B 20 55 B3 38 |;.w.... U: . U.8|
00000060: 20 B0 20 55 B1 31 35 20 A7 20 99 20 22 91 91 91 | . U.15 . . "...|
00000070: 22 3A 20 89 20 32 30 00 A2 08 28 00 99 20 22 11 |": . 20...(.. ".|
00000080: 20 44 49 53 4B 20 44 52 49 56 45 20 4E 52 20 28 | DISK DRIVE NR (|
00000090: 30 2F 31 29 20 3F A0 30 9D 9D 9D 22 3B 3A 20 47 |0/1) ?.0...";: G|
000000A0: B2 30 00 C7 08 32 00 85 20 44 3A 20 8B 20 44 B3 |.0...2.. D: . D.|
000000B0: 30 20 B0 20 44 B1 31 20 A7 20 99 20 22 91 91 91 |0 . D.1 . . "...|
000000C0: 22 3A 20 89 20 34 30 00 F6 08 3C 00 99 20 22 11 |": . 40...<.. ".|
000000D0: 11 20 50 55 54 20 54 41 52 47 45 54 20 44 49 53 |. PUT TARGET DIS|
000000E0: 4B 20 49 4E 20 55 4E 49 54 22 3B 55 3B 22 44 52 |K IN UNIT";U;"DR|
000000F0: 49 56 45 22 3B 44 00 1E 09 46 00 99 20 22 20 54 |IVE";D...F.. " T|
00000100: 48 45 4E 20 50 52 45 53 53 20 41 4E 59 20 4B 45 |HEN PRESS ANY KE|
00000110: 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 34 |Y TO CONTINUE".4|
00000120: 09 50 00 A1 20 58 24 3A 20 8B 20 58 24 B2 22 22 |.P.. X$: . X$.""|
00000130: A7 20 38 30 00 62 09 5A 00 99 20 22 93 11 20 45 |. 80.b.Z.. ".. E|
00000140: 4E 54 45 52 20 53 43 52 41 54 43 48 45 44 20 46 |NTER SCRATCHED F|
00000150: 49 4C 45 2D 4E 41 4D 45 20 28 4F 52 20 45 4E 44 |ILE-NAME (OR END|
00000160: 29 22 00 92 09 64 00 99 20 22 20 55 53 45 20 2A |)"...d.. " USE *|
00000170: 20 41 54 20 4E 41 4D 45 2D 45 4E 44 20 46 4F 52 | AT NAME-END FOR|
00000180: 20 57 49 4C 44 2D 43 41 52 44 20 53 45 41 52 43 | WILD-CARD SEARC|
00000190: 48 22 00 BB 09 6E 00 85 20 22 20 3F 20 45 4E 44 |H"...n.. " ? END|
000001A0: 9D 9D 9D 9D 9D 22 3B 4E 24 3A 20 8B 20 4E 24 B2 |.....";N$: . N$.|
000001B0: 22 45 4E 44 22 20 A7 20 35 32 30 00 E1 09 78 00 |"END" . 520...x.|
000001C0: 56 B2 31 36 3A 20 51 B2 33 32 3A 20 46 B2 32 35 |V.16: Q.32: F.25|
000001D0: 36 3A 20 54 B2 31 38 3A 20 53 B2 31 3A 20 57 B2 |6: T.18: S.1: W.|
000001E0: 30 00 FB 09 82 00 5A 24 B2 C7 28 30 29 3A 20 44 |0.....Z$..(0): D|
000001F0: 24 B2 C9 28 C4 28 44 29 2C 31 29 00 13 0A 8C 00 |$..(.(D),1).....|
00000200: 4E 24 B2 C8 28 4E 24 2C 56 29 3A 20 4C B2 C3 28 |N$..(N$,V): L..(|
00000210: 4E 24 29 00 2C 0A 96 00 8B 20 C9 28 4E 24 2C 31 |N$).,.... .(N$,1|
00000220: 29 B3 B1 22 2A 22 20 A7 20 31 37 30 00 4D 0A A0 |).."*" . 170.M..|
00000230: 00 4C B2 4C AB 31 3A 20 4E 24 B2 C8 28 4E 24 2C |.L.L.1: N$..(N$,|
00000240: 4C 29 3A 20 57 B2 31 3A 89 20 31 39 30 00 5D 0A |L): W.1:. 190.].|
00000250: AA 00 8B 20 4C B2 56 20 A7 20 31 39 30 00 83 0A |... L.V . 190...|
00000260: B4 00 81 20 58 B2 4C AA 31 20 A4 20 56 3A 20 4E |... X.L.1 . V: N|
00000270: 24 B2 4E 24 AA C7 28 31 36 30 29 3A 20 82 3A 20 |$.N$..(160): .: |
00000280: 4C B2 56 00 9E 0A BE 00 9F 20 31 2C 55 2C 31 35 |L.V...... 1,U,15|
00000290: 2C 22 49 22 AA 44 24 3A 20 8D 20 35 30 30 00 B5 |,"I".D$: . 500..|
000002A0: 0A C8 00 9F 20 32 2C 55 2C 32 2C 22 23 22 3A 20 |.... 2,U,2,"#": |
000002B0: 8D 20 35 30 30 00 D1 0A D2 00 98 31 2C 22 55 31 |. 500......1,"U1|
000002C0: 3A 22 3B 32 3B 44 3B 54 3B 53 3A 20 8D 20 35 30 |:";2;D;T;S: . 50|
000002D0: 30 00 EE 0A DC 00 98 31 2C 22 42 2D 50 3A 22 3B |0......1,"B-P:";|
000002E0: 32 3B 30 3A 20 A1 23 32 2C 41 24 2C 42 24 00 10 |2;0: .#2,A$,B$..|
000002F0: 0B E6 00 54 52 B2 C6 28 41 24 AA 5A 24 29 3A 20 |...TR..(A$.Z$): |
00000300: 53 43 B2 C6 28 42 24 AA 5A 24 29 3A 20 48 B2 32 |SC..(B$.Z$): H.2|
00000310: 00 2A 0B F0 00 98 31 2C 22 42 2D 50 3A 22 3B 32 |.*....1,"B-P:";2|
00000320: 3B 48 3A 20 A1 23 32 2C 54 24 00 46 0B FA 00 43 |;H: .#2,T$.F...C|
00000330: B2 C6 28 54 24 AA 5A 24 29 3A 20 8B 20 43 B1 30 |..(T$.Z$): . C.0|
00000340: 20 A7 20 32 39 30 00 66 0B 04 01 A1 23 32 2C 41 | . 290.f....#2,A|
00000350: 24 2C 42 24 3A 20 46 24 B2 22 22 3A 20 81 20 58 |$,B$: F$."": . X|
00000360: B2 31 20 A4 20 56 00 8D 0B 0E 01 A1 23 32 2C 54 |.1 . V......#2,T|
00000370: 24 3A 20 46 24 B2 46 24 AA 54 24 3A 20 82 3A 20 |$: F$.F$.T$: .: |
00000380: 8B 20 46 24 B2 22 22 20 A7 20 33 31 30 00 AA 0B |. F$."" . 310...|
00000390: 18 01 8B 20 4C B2 30 20 B0 20 4E 24 B2 C8 28 46 |... L.0 . N$..(F|
000003A0: 24 2C 4C 29 20 A7 20 33 35 30 00 C1 0B 22 01 48 |$,L) . 350...".H|
000003B0: B2 48 AA 51 3A 20 8B 20 48 B3 46 20 A7 20 32 34 |.H.Q: . H.F . 24|
000003C0: 30 00 E0 0B 2C 01 8B 20 54 52 B1 30 20 A7 20 54 |0...,.. TR.0 . T|
000003D0: B2 54 52 3A 20 53 B2 53 43 3A 20 89 20 32 31 30 |.TR: S.SC: . 210|
000003E0: 00 08 0C 36 01 8B 20 57 20 A7 20 99 20 22 11 20 |...6.. W . . ". |
000003F0: 45 4E 44 20 4F 46 20 44 49 52 45 43 54 4F 52 59 |END OF DIRECTORY|
00000400: 22 3A 20 89 20 34 37 30 00 22 0C 40 01 99 20 22 |": . 470.".@.. "|
00000410: 11 20 46 49 4C 45 2D 4E 41 4D 45 3A 20 20 22 3B |. FILE-NAME: ";|
00000420: 4E 24 00 42 0C 4A 01 99 20 22 20 4E 4F 54 20 46 |N$.B.J.. " NOT F|
00000430: 4F 55 4E 44 20 49 4E 20 44 49 52 45 43 54 4F 52 |OUND IN DIRECTOR|
00000440: 59 22 00 5D 0C 54 01 81 20 58 B2 31 20 A4 20 32 |Y".].T.. X.1 . 2|
00000450: 30 30 30 3A 20 82 3A 20 89 20 34 39 30 00 78 0C |000: .: . 490.x.|
00000460: 5E 01 41 B2 C6 28 41 24 AA 5A 24 29 3A 20 42 B2 |^.A..(A$.Z$): B.|
00000470: C6 28 42 24 AA 5A 24 29 00 93 0C 68 01 99 20 22 |.(B$.Z$)...h.. "|
00000480: 11 20 46 4F 55 4E 44 20 46 49 4C 45 3A 20 20 22 |. FOUND FILE: "|
00000490: 3B 46 24 00 B3 0C 72 01 99 20 22 20 41 54 20 54 |;F$...r.. " AT T|
000004A0: 52 41 43 4B 22 3B 41 3B 22 20 53 45 43 54 4F 52 |RACK";A;" SECTOR|
000004B0: 22 3B 42 00 E4 0C 7C 01 99 20 22 11 20 57 41 4E |";B...|.. ". WAN|
000004C0: 54 20 54 4F 20 52 45 56 49 56 45 20 54 48 49 53 |T TO REVIVE THIS|
000004D0: 20 46 49 4C 45 20 28 59 2F 4E 29 20 3F 20 59 9D | FILE (Y/N) ? Y.|
000004E0: 9D 9D 22 3B 00 FD 0C 86 01 85 20 58 24 3A 20 8B |..";...... X$: .|
000004F0: 20 58 24 B2 22 59 22 20 A7 20 34 31 30 00 0B 0D | X$."Y" . 410...|
00000500: 90 01 8B 20 57 20 A7 20 32 39 30 00 30 0D 9A 01 |... W . 290.0...|
00000510: 99 20 22 11 20 31 3D 53 45 51 20 20 32 3D 50 52 |. ". 1=SEQ 2=PR|
00000520: 47 20 20 33 3D 55 53 52 20 20 34 3D 52 45 4C 22 |G 3=USR 4=REL"|
00000530: 00 57 0D A4 01 99 20 22 20 45 4E 54 45 52 20 46 |.W.... " ENTER F|
00000540: 49 4C 45 2D 54 59 50 45 20 28 31 2D 34 29 20 3F |ILE-TYPE (1-4) ?|
00000550: 20 31 9D 9D 9D 22 3B 00 7C 0D AE 01 85 20 50 3A | 1...";.|.... P:|
00000560: 20 8B 20 50 B3 31 20 B0 20 50 B1 34 20 A7 20 99 | . P.1 . P.4 . .|
00000570: 20 22 91 91 22 3A 20 89 20 34 30 30 00 9C 0D B8 | "..": . 400....|
00000580: 01 98 31 2C 22 42 2D 50 3A 22 3B 32 3B 48 3A 20 |..1,"B-P:";2;H: |
00000590: 98 32 2C C7 28 50 AA 31 32 38 29 3B 00 BB 0D C2 |.2,.(P.128);....|
000005A0: 01 98 31 2C 22 55 32 3A 22 3B 32 3B 44 3B 54 3B |..1,"U2:";2;D;T;|
000005B0: 53 3A 8D 20 35 30 30 3A 47 B2 31 00 E8 0D CC 01 |S:. 500:G.1.....|
000005C0: 99 20 22 11 20 55 4E 2D 53 43 52 41 54 43 48 45 |. ". UN-SCRATCHE|
000005D0: 44 20 46 49 4C 45 3A 20 20 22 3B 46 24 3A 20 8B |D FILE: ";F$: .|
000005E0: 20 57 20 A7 20 32 39 30 00 12 0E D6 01 99 20 22 | W . 290...... "|
000005F0: 11 20 52 45 56 49 56 45 20 4D 4F 52 45 20 46 49 |. REVIVE MORE FI|
00000600: 4C 45 53 20 28 59 2F 4E 29 20 3F 20 59 9D 9D 9D |LES (Y/N) ? Y...|
00000610: 22 3B 00 2C 0E E0 01 85 20 58 24 3A 20 8B 20 58 |";.,.... X$: . X|
00000620: 24 B3 B1 22 59 22 20 A7 20 35 32 30 00 3F 0E EA |$.."Y" . 520.?..|
00000630: 01 A0 20 32 3A 20 A0 20 31 3A 20 89 20 39 30 00 |.. 2: . 1: . 90.|
00000640: 59 0E F4 01 84 31 2C 45 2C 4D 24 2C 4A 2C 4B 3A |Y....1,E,M$,J,K:|
00000650: 8B 20 45 B2 30 20 A7 20 8E 00 74 0E FE 01 99 20 |. E.0 . ..t.... |
00000660: 22 11 20 45 52 52 4F 52 3A 20 22 3B 45 3B 4D 24 |". ERROR: ";E;M$|
00000670: 3B 4A 3B 4B 00 8C 0E 08 02 A0 20 32 3A 20 A0 20 |;J;K...... 2: . |
00000680: 31 3A 20 8B 20 47 B2 30 20 A7 20 80 00 AD 0E 12 |1: . G.0 . .....|
00000690: 02 99 20 22 93 11 20 52 45 2D 42 55 49 4C 44 49 |.. ".. RE-BUILDI|
000006A0: 4E 47 20 56 41 4C 49 44 20 42 41 4D 22 00 D0 0E |NG VALID BAM"...|
000006B0: 1C 02 99 20 22 20 4F 4E 20 44 49 53 4B 2D 55 4E |... " ON DISK-UN|
000006C0: 49 54 22 3B 55 3B 22 20 44 52 49 56 45 22 3B 44 |IT";U;" DRIVE";D|
000006D0: 00 EC 0E 26 02 9F 20 31 2C 55 2C 31 35 2C 22 56 |...&.. 1,U,15,"V|
000006E0: 22 AA 44 24 3A 20 A0 20 31 3A 20 80 00 00 00 |".D$: . 1: .... |
..(.... ".. REVIVE SCRATCHED DISK FILES"
.Q.... ".. DISK UNIT NR (8-15) ? 8 ...."
;.W.... U: . U.8 . U.15 . . "...": . 20.
..(.. ". DISK DRIVE NR (0/1) ? 0...";: G
.0.G.2.. D: . D.0 . D.1 . . "...": . 40.
..<.. ".. PUT TARGET DISK IN UNIT";U;"DR
IVE";D...F.. " THEN PRESS ANY KEY TO CON
TINUE".4.P.. X$: . X$."". 80.B.Z.. ".. E
NTER SCRATCHED FILE-NAME (OR END)"...D..
" USE * AT NAME-END FOR WILD-CARD SEARC
H"...N.. " ? END.....";N$: . N$."END" .
520...X.V.16: Q.32: F.256: T.18: S.1: W.
0.....Z$.G(0): D$.I(D(D),1).....N$.H(N$,
V): L.C(N$).,.... I(N$,1).."*" . 170.M.
.L.L.1: N$.H(N$,L): W.1:. 190.].... L.V
. 190...... X.L.1 . V: N$.N$.G(160): .:
L.V...... 1,U,15,"I".D$: . 500...H.. 2,U
,2,"#": . 500.Q.R..1,"U1:";2;D;T;S: . 50
0......1,"B-P:";2;0: .#2,A$,B$.....TR.F(
A$.Z$): SC.F(B$.Z$): H.2.*....1,"B-P:";2
;H: .#2,T$.F...C.F(T$.Z$): . C.0 . 290.F
....#2,A$,B$: F$."": . X.1 . V......#2,T
$: F$.F$.T$: .: . F$."" . 310...... L.0
. N$.H(F$,L) . 350.A.".H.H.Q: . H.F . 24
0...,.. TR.0 . T.TR: S.SC: . 210...6.. W
. . ". END OF DIRECTORY": . 470.".@.. "
. FILE-NAME: ";N$.B.J.. " NOT FOUND IN
DIRECTORY".].T.. X.1 . 2000: .: . 490.X.
^.A.F(A$.Z$): B.F(B$.Z$)...H.. ". FOUND
FILE: ";F$...R.. " AT TRACK";A;" SECTOR
";B...|.. ". WANT TO REVIVE THIS FILE (Y
/N) ? Y...";...... X$: . X$."Y" . 410...
... W . 290.0.... ". 1=SEQ 2=PRG 3=USR
4=REL".W.... " ENTER FILE-TYPE (1-4) ?
1...";.|.... P: . P.1 . P.4 . . "..": .
400......1,"B-P:";2;H: .2,G(P.128);...B
..1,"U2:";2;D;T;S:. 500:G.1...L.. ". UN-
SCRATCHED FILE: ";F$: . W . 290...V.. "
. REVIVE MORE FILES (Y/N) ? Y...";.,....
X$: . X$.."Y" . 520.?... 2: 1: . 90.
Y....1,E,M$,J,K:. E.0 . ..T.... ". ERROR
: ";E;M$;J;K..... 2: 1: . G.0 . .....
.. ".. RE-BUILDING VALID BAM".P.... " ON
DISK-UNIT";U;" DRIVE";D...&.. 1,U,15,"V
".D$: 1: ....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL