│ACKUP 64
FILE INFORMATION
FILENAME(S): │ACKUP 64
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-10-19 22:48:33
APPEARS ON: 1 disk(s)
FILE HASH
7f236a43f246af8a85a3997bc0c10465f4e6be9adef9f8de7279b7b74894d4e1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MM UTILITY | │ACKUP 64 | PRG | Radd Maxx | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 01 00 81 49 B2 38 32 38 A4 38 38 33 |.......I.828.883|
00000010: 3A 87 41 3A 97 49 2C 41 3A 82 49 00 43 08 0A 00 |:.A:.I,A:.I.C...|
00000020: 8F 22 44 3D 44 53 41 56 45 22 40 42 41 43 4B 32 |."D=DSAVE"@BACK2|
00000030: 22 2C 44 30 3A 3F 44 53 24 3A 43 41 54 41 4C 4F |",D0:?DS$:CATALO|
00000040: 47 44 30 00 5B 08 14 00 42 42 B2 C2 28 34 34 29 |GD0.[...BB..(44)|
00000050: AA 32 37 3A 97 39 39 35 2C 42 42 00 84 08 1E 00 |.27:.995,BB.....|
00000060: 97 39 39 38 2C C2 28 35 35 29 3A 97 39 39 39 2C |.998,.(55):.999,|
00000070: C2 28 35 36 29 3A 97 35 35 2C 30 3A 97 35 36 2C |.(56):.55,0:.56,|
00000080: 42 42 3A 9C 00 92 08 28 00 42 42 B2 C2 28 39 39 |BB:....(.BB..(99|
00000090: 35 29 00 B5 08 32 00 4E B2 C2 28 39 39 39 29 AB |5)...2.N..(999).|
000000A0: 42 42 AB 31 3A 42 41 B2 42 42 AC 32 35 36 3A 4D |BB.1:BA.BB.256:M|
000000B0: 41 B2 38 32 38 00 C5 08 3C 00 86 42 4D 25 28 33 |A.828...<..BM%(3|
000000C0: 35 2C 32 34 29 00 DC 08 46 00 81 4A B2 30 A4 37 |5,24)...F..J.0.7|
000000D0: 3A 54 41 28 4A 29 B2 32 AE 4A 3A 82 00 0C 09 50 |:TA(J).2.J:....P|
000000E0: 00 99 22 93 1D 1D 1D 12 42 41 43 4B 55 50 20 32 |..".....BACKUP 2|
000000F0: 30 33 31 92 20 2D 20 4A 49 4D 20 4C 41 57 20 2F |031. - JIM LAW /|
00000100: 20 4B 45 49 54 48 20 48 4F 50 45 22 00 3C 09 5A | KEITH HOPE".<.Z|
00000110: 00 99 22 11 27 47 4F 54 4F 31 30 30 30 30 27 20 |..".'GOTO10000' |
00000120: 49 46 20 50 52 4F 47 52 41 4D 20 51 55 49 54 53 |IF PROGRAM QUITS|
00000130: 20 41 42 4E 4F 52 4D 41 4C 4C 59 22 00 59 09 64 | ABNORMALLY".Y.d|
00000140: 00 99 22 11 22 4E 22 42 55 46 46 45 52 53 20 41 |.."."N"BUFFERS A|
00000150: 56 41 49 4C 41 42 4C 45 22 00 65 09 6E 00 9F 31 |VAILABLE".e.n..1|
00000160: 2C 38 2C 31 35 00 83 09 C8 00 8F 20 2A 2A 2A 20 |,8,15...... *** |
00000170: 4D 41 49 4E 20 46 55 4E 43 54 49 4F 4E 53 20 2A |MAIN FUNCTIONS *|
00000180: 2A 2A 2A 00 8D 09 D2 00 8D 31 30 30 30 00 A6 09 |***......1000...|
00000190: DC 00 44 24 B2 22 53 22 3A 8D 33 32 30 30 3A 49 |..D$."S":.3200:I|
000001A0: 32 24 B2 49 52 24 00 D6 09 E6 00 8B 44 52 24 B3 |2$.IR$......DR$.|
000001B0: B1 22 32 41 22 A7 99 22 12 49 4C 4C 45 47 41 4C |."2A"..".ILLEGAL|
000001C0: 20 44 4F 53 20 31 2E 30 20 44 49 53 4B 92 22 3A | DOS 1.0 DISK.":|
000001D0: 89 31 30 30 30 30 00 18 0A F0 00 8B 49 32 24 B2 |.10000......I2$.|
000001E0: 49 31 24 A7 99 22 12 53 4F 55 52 43 45 20 41 4E |I1$..".SOURCE AN|
000001F0: 44 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 48 41 |D DESTINATION HA|
00000200: 56 45 20 53 41 4D 45 20 49 44 20 43 4F 44 45 92 |VE SAME ID CODE.|
00000210: 22 3A 89 31 30 30 30 30 00 22 0A FA 00 8D 32 35 |":.10000."....25|
00000220: 30 30 00 3E 0A 04 01 54 B2 54 53 3A 53 B2 30 3A |00.>...T.TS:S.0:|
00000230: 4E 55 B2 31 3A 54 31 B2 54 3A 53 31 B2 53 00 55 |NU.1:T1.T:S1.S.U|
00000240: 0A 0E 01 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C |....1,"I0":.3,8,|
00000250: 33 2C 22 23 22 00 6D 0A 18 01 99 22 52 45 41 44 |3,"#".m...."READ|
00000260: 49 4E 47 20 42 4C 4F 43 4B 20 23 22 3B 00 97 0A |ING BLOCK #";...|
00000270: 22 01 8B 42 4D 25 28 54 31 2C 53 31 29 B2 30 A7 |"..BM%(T1,S1).0.|
00000280: 8D 32 30 30 30 3A 4E 55 B2 4E 55 AA 31 3A 8B 4E |.2000:NU.NU.1:.N|
00000290: 55 B1 4E A7 33 32 30 00 B7 0A 2C 01 53 31 B2 53 |U.N.320...,.S1.S|
000002A0: 31 AA 31 3A 8B 53 31 B1 32 30 A7 53 31 B2 30 3A |1.1:.S1.20.S1.0:|
000002B0: 54 31 B2 54 31 AA 31 00 C8 0A 36 01 8B 54 31 B3 |T1.T1.1...6..T1.|
000002C0: 54 46 AA 31 A7 32 39 30 00 D1 0A 40 01 99 22 11 |TF.1.290...@..".|
000002D0: 22 00 D8 0A 4A 01 A0 33 00 F8 0A 54 01 44 24 B2 |"...J..3...T.D$.|
000002E0: 22 44 22 3A 8D 33 32 30 30 3A 8B 49 52 24 B3 B1 |"D":.3200:.IR$..|
000002F0: 49 31 24 A7 89 33 34 30 00 0F 0B 5E 01 98 31 2C |I1$..340...^..1,|
00000300: 22 49 30 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 |"I0":.3,8,3,"#".|
00000310: 28 0B 68 01 99 22 57 52 49 54 49 4E 47 20 42 55 |(.h.."WRITING BU|
00000320: 46 46 45 52 20 23 22 3B 00 3B 0B 72 01 4E 55 B2 |FFER #";.;.r.NU.|
00000330: 31 3A 54 31 B2 54 3A 53 31 B2 53 00 65 0B 7C 01 |1:T1.T:S1.S.e.|.|
00000340: 8B 42 4D 25 28 54 31 2C 53 31 29 B2 30 A7 8D 32 |.BM%(T1,S1).0..2|
00000350: 32 30 30 3A 4E 55 B2 4E 55 AA 31 3A 8B 4E 55 B1 |200:NU.NU.1:.NU.|
00000360: 4E A7 34 31 30 00 85 0B 86 01 53 31 B2 53 31 AA |N.410.....S1.S1.|
00000370: 31 3A 8B 53 31 B1 32 30 A7 53 31 B2 30 3A 54 31 |1:.S1.20.S1.0:T1|
00000380: B2 54 31 AA 31 00 96 0B 90 01 8B 54 31 B3 54 46 |.T1.1......T1.TF|
00000390: AA 31 A7 33 38 30 00 9F 0B 9A 01 99 22 11 22 00 |.1.380......".".|
000003A0: A6 0B A4 01 A0 33 00 C3 0B AE 01 53 B2 53 31 AA |.....3.....S.S1.|
000003B0: 31 3A 8B 53 B1 32 30 A7 53 B2 30 3A 54 31 B2 54 |1:.S.20.S.0:T1.T|
000003C0: 31 AA 31 00 D6 0B B8 01 54 B2 54 31 3A 8B 54 B1 |1.1.....T.T1:.T.|
000003D0: 54 46 A7 35 30 30 00 F5 0B C2 01 44 24 B2 22 53 |TF.500.....D$."S|
000003E0: 22 3A 8D 33 32 30 30 3A 8B 49 52 24 B3 B1 49 32 |":.3200:.IR$..I2|
000003F0: 24 A7 34 35 30 00 0D 0C CC 01 4E 55 B2 31 3A 54 |$.450.....NU.1:T|
00000400: 31 B2 54 3A 53 31 B2 53 3A 89 32 37 30 00 22 0C |1.T:S1.S:.270.".|
00000410: F4 01 8F 20 46 49 4E 49 53 48 45 44 20 58 46 45 |... FINISHED XFE|
00000420: 52 53 00 29 0C FE 01 A0 31 00 45 0C 08 02 97 35 |RS.)....1.E....5|
00000430: 35 2C C2 28 39 39 38 29 3A 97 35 36 2C C2 28 39 |5,.(998):.56,.(9|
00000440: 39 39 29 3A 9C 00 5E 0C 12 02 99 22 11 11 42 41 |99):..^...."..BA|
00000450: 43 4B 55 50 20 43 4F 4D 50 4C 45 54 45 22 00 6E |CKUP COMPLETE".n|
00000460: 0C 1C 02 9F 31 2C 38 2C 30 2C 22 24 30 22 00 86 |....1,8,0,"$0"..|
00000470: 0C 26 02 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 |.&..#1,A$:.A$.."|
00000480: 12 22 A7 35 35 30 00 94 0C 30 02 99 41 24 3B 3A |.".550...0..A$;:|
00000490: 89 36 31 30 00 B8 0C 3A 02 A1 23 31 2C 41 24 3A |.610...:..#1,A$:|
000004A0: 53 53 B2 53 54 3A 41 B2 C3 28 41 24 29 3A 8B 41 |SS.ST:A..(A$):.A|
000004B0: A7 41 B2 C6 28 41 24 29 00 DC 0C 44 02 A1 23 31 |.A..(A$)...D..#1|
000004C0: 2C 42 24 3A 53 53 B2 53 54 3A 42 B2 C3 28 42 24 |,B$:SS.ST:B..(B$|
000004D0: 29 3A 8B 42 A7 41 B2 C6 28 42 24 29 00 E8 0C 4E |):.B.A..(B$)...N|
000004E0: 02 8B 53 53 A7 36 36 30 00 FA 0C 58 02 8B 41 B2 |..SS.660...X..A.|
000004F0: 31 AF 42 B2 31 A7 8D 36 33 30 00 13 0D 62 02 A1 |1.B.1..630...b..|
00000500: 23 31 2C 41 24 3A 8B 41 24 B2 22 22 A7 99 3A 89 |#1,A$:.A$.""..:.|
00000510: 35 37 30 00 21 0D 6C 02 99 41 24 3B 3A 89 36 31 |570.!.l..A$;:.61|
00000520: 30 00 45 0D 76 02 A1 23 31 2C 41 24 3A 53 53 B2 |0.E.v..#1,A$:SS.|
00000530: 53 54 3A 41 B2 C3 28 41 24 29 3A 8B 41 A7 41 B2 |ST:A..(A$):.A.A.|
00000540: C6 28 41 24 29 00 69 0D 80 02 A1 23 31 2C 42 24 |.(A$).i....#1,B$|
00000550: 3A 53 53 B2 53 54 3A 42 B2 C3 28 42 24 29 3A 8B |:SS.ST:B..(B$):.|
00000560: 42 A7 42 B2 C6 28 42 24 29 00 7D 0D 8A 02 4E B2 |B.B..(B$).}...N.|
00000570: 42 AC 32 35 36 AA 41 3A 99 4E 3B 3A 8E 00 84 0D |B.256.A:.N;:....|
00000580: 94 02 A0 31 00 8A 0D 9E 02 80 00 A1 0D E8 03 8F |...1............|
00000590: 20 48 45 41 44 45 52 20 44 45 53 54 20 44 49 53 | HEADER DEST DIS|
000005A0: 4B 00 D1 0D F2 03 99 22 11 49 4E 53 45 52 54 20 |K......".INSERT |
000005B0: 44 45 53 54 49 4E 41 54 49 4F 4E 20 44 49 53 4B |DESTINATION DISK|
000005C0: 20 54 4F 20 42 45 20 46 4F 52 4D 41 54 54 45 44 | TO BE FORMATTED|
000005D0: 22 00 0F 0E FC 03 85 22 11 11 44 49 53 4B 20 4E |"......"..DISK N|
000005E0: 41 4D 45 1D 1D 1D A0 20 20 20 20 20 20 20 20 20 |AME.... |
000005F0: 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D | .........|
00000600: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 44 4E 24 00 |..........";DN$.|
00000610: 2A 0E 06 04 8B 44 4E 24 B2 22 A0 22 A7 99 22 91 |*....DN$."."..".|
00000620: 91 91 22 3B 3A 89 31 30 32 30 00 3F 0E 10 04 8B |..";:.1020.?....|
00000630: C3 28 44 4E 24 29 B1 31 36 A7 9C 3A 89 34 30 00 |.(DN$).16..:.40.|
00000640: 62 0E 1A 04 46 B2 30 3A 81 4A B2 31 A4 C3 28 44 |b...F.0:.J.1..(D|
00000650: 4E 24 29 3A 53 31 24 B2 CA 28 44 4E 24 2C 4A 2C |N$):S1$..(DN$,J,|
00000660: 31 29 00 7D 0E 24 04 8B 53 31 24 B2 22 A0 22 B0 |1).}.$..S1$.".".|
00000670: 53 31 24 B2 C7 28 33 34 29 A7 46 B2 31 00 95 0E |S1$..(34).F.1...|
00000680: 2E 04 82 4A 3A 8B 46 A7 99 22 91 91 91 22 3B 3A |...J:.F.."...";:|
00000690: 89 31 30 32 30 00 DF 0E 38 04 85 22 11 55 4E 49 |.1020...8..".UNI|
000006A0: 51 55 45 20 44 49 53 4B 20 49 44 1D 1D 1D A0 20 |QUE DISK ID.... |
000006B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006C0: 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | .............|
000006D0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 49 31 24 00 |..........";I1$.|
000006E0: F9 0E 42 04 8B 49 31 24 B2 22 A0 22 A7 99 22 91 |..B..I1$."."..".|
000006F0: 91 22 3B 3A 89 31 30 38 30 00 15 0F 4C 04 8B C3 |.";:.1080...L...|
00000700: 28 49 31 24 29 B3 B1 32 A7 99 22 91 91 22 3B 3A |(I1$)..2.."..";:|
00000710: 89 31 30 38 30 00 2E 0F 56 04 98 31 2C 22 4E 30 |.1080...V..1,"N0|
00000720: 3A 22 AA 44 4E 24 AA 22 2C 22 AA 49 31 24 00 38 |:".DN$.",".I1$.8|
00000730: 0F 60 04 8D 33 30 30 30 00 4C 0F 6A 04 8B 45 52 |.`..3000.L.j..ER|
00000740: A7 99 45 52 24 3A 89 31 30 30 30 30 00 52 0F 74 |..ER$:.10000.R.t|
00000750: 04 8E 00 78 0F D0 07 8F 20 52 45 41 44 20 42 4C |...x.... READ BL|
00000760: 4F 43 4B 20 54 31 2C 53 31 20 54 4F 20 42 55 46 |OCK T1,S1 TO BUF|
00000770: 46 45 52 20 23 20 4E 55 00 85 0F DA 07 43 B2 2E |FER # NU.....C..|
00000780: 3A 8F 43 3D 30 00 9B 0F E4 07 98 31 2C 22 55 31 |:.C=0......1,"U1|
00000790: 22 3B 33 3B 30 3B 54 31 3B 53 31 00 AF 0F EE 07 |";3;0;T1;S1.....|
000007A0: 8D 33 30 30 30 3A 8B A8 45 52 A7 32 30 36 30 00 |.3000:..ER.2060.|
000007B0: C3 0F F8 07 43 B2 43 AA 31 3A 8B 43 B3 33 89 32 |....C.C.1:.C.3.2|
000007C0: 30 32 30 00 F9 0F 02 08 99 45 52 24 3A 81 4A B2 |020......ER$:.J.|
000007D0: 28 42 42 AA 4E 55 29 AC 32 35 36 A4 28 42 42 AA |(BB.NU).256.(BB.|
000007E0: 4E 55 29 AC 32 35 36 AA 32 35 35 3A 97 4A 2C 2E |NU).256.255:.J,.|
000007F0: 3A 82 4A 3A 89 32 31 30 30 00 0A 10 0C 08 98 31 |:.J:.2100......1|
00000800: 2C 22 42 2D 50 22 3B 33 3B 30 00 36 10 16 08 8B |,"B-P";3;0.6....|
00000810: 4E 55 B3 B1 30 A7 99 22 20 20 20 9D 9D 9D 22 3B |NU..0.." ...";|
00000820: C9 28 22 20 20 22 AA C4 28 4E 55 29 2C 33 29 3B |.(" "..(NU),3);|
00000830: 22 9D 9D 9D 22 3B 00 5B 10 20 08 97 39 39 36 2C |"...";.[. ..996,|
00000840: C2 28 33 29 3A 97 39 39 37 2C C2 28 34 29 3A 97 |.(3):.997,.(4):.|
00000850: 34 2C 42 42 AA 4E 55 3A 9E 4D 41 00 73 10 25 08 |4,BB.NU:.MA.s.%.|
00000860: 97 33 2C C2 28 39 39 36 29 3A 97 34 2C C2 28 39 |.3,.(996):.4,.(9|
00000870: 39 37 29 00 97 10 2A 08 8B 53 54 B3 B1 2E AF 53 |97)...*..ST....S|
00000880: 54 B3 B1 36 34 A7 8D 33 30 30 30 3A 89 32 30 35 |T..64..3000:.205|
00000890: 30 3A 8F 20 43 3D 30 00 9D 10 34 08 8E 00 C6 10 |0:. C=0...4.....|
000008A0: 98 08 8F 20 57 52 49 54 45 20 42 4C 4F 43 4B 20 |... WRITE BLOCK |
000008B0: 54 31 2C 53 31 20 46 52 4F 4D 20 42 55 46 46 45 |T1,S1 FROM BUFFE|
000008C0: 52 20 23 20 4E 55 00 D3 10 A2 08 43 B2 2E 3A 8F |R # NU.....C..:.|
000008D0: 43 3D 30 00 F5 10 AC 08 98 31 2C 22 42 2D 41 22 |C=0......1,"B-A"|
000008E0: 3B 30 3B 54 31 3B 53 31 3A 98 31 2C 22 42 2D 50 |;0;T1;S1:.1,"B-P|
000008F0: 22 3B 33 3B 30 00 1A 11 B6 08 99 22 20 20 20 9D |";3;0......" .|
00000900: 9D 9D 22 3B C9 28 22 20 20 22 AA C4 28 4E 55 29 |..";.(" "..(NU)|
00000910: 2C 33 29 3B 22 9D 9D 9D 22 3B 00 41 11 C0 08 97 |,3);"...";.A....|
00000920: 39 39 36 2C C2 28 33 29 3A 97 39 39 37 2C C2 28 |996,.(3):.997,.(|
00000930: 34 29 3A 97 34 2C 42 42 AA 4E 55 3A 9E 4D 41 AA |4):.4,BB.NU:.MA.|
00000940: 33 00 59 11 C5 08 97 33 2C C2 28 39 39 36 29 3A |3.Y....3,.(996):|
00000950: 97 34 2C C2 28 39 39 37 29 00 92 11 CA 08 8B 53 |.4,.(997)......S|
00000960: 54 B3 B1 2E AF 53 54 B3 B1 36 34 A7 99 22 12 49 |T....ST..64..".I|
00000970: 45 45 45 20 57 52 49 54 45 20 45 52 52 4F 52 22 |EEE WRITE ERROR"|
00000980: 53 54 22 92 22 3A 89 31 30 30 30 30 3A 8F 20 43 |ST".":.10000:. C|
00000990: 3D 30 00 A8 11 D4 08 98 31 2C 22 55 32 22 3B 33 |=0......1,"U2";3|
000009A0: 3B 30 3B 54 31 3B 53 31 00 BC 11 DE 08 8D 33 30 |;0;T1;S1......30|
000009B0: 30 30 3A 8B A8 45 52 A7 32 33 30 30 00 D0 11 E8 |00:..ER.2300....|
000009C0: 08 43 B2 43 AA 31 3A 8B 43 B3 33 A7 32 32 36 30 |.C.C.1:.C.3.2260|
000009D0: 00 FC 11 F2 08 99 22 12 55 4E 52 45 43 4F 56 45 |......".UNRECOVE|
000009E0: 52 41 42 4C 45 20 57 52 49 54 45 20 45 52 52 4F |RABLE WRITE ERRO|
000009F0: 52 22 45 52 24 3A 89 31 30 30 30 30 00 02 12 FC |R"ER$:.10000....|
00000A00: 08 8E 00 1C 12 C4 09 8F 20 47 45 54 20 42 41 4D |........ GET BAM|
00000A10: 20 54 4F 20 42 4D 25 28 54 2C 53 29 00 31 12 CE | TO BM%(T,S).1..|
00000A20: 09 54 53 B2 31 3A 54 46 B2 2E 3A 8F 20 54 46 3D |.TS.1:TF..:. TF=|
00000A30: 30 00 48 12 D8 09 98 31 2C 22 49 30 22 3A 9F 33 |0.H....1,"I0":.3|
00000A40: 2C 38 2C 33 2C 22 23 22 00 51 12 E2 09 53 39 B2 |,8,3,"#".Q...S9.|
00000A50: 30 00 72 12 EC 09 99 22 11 54 52 41 43 4B 20 23 |0.r....".TRACK #|
00000A60: 20 20 20 42 4C 4F 43 4B 53 20 54 4F 20 58 46 45 | BLOCKS TO XFE|
00000A70: 52 22 00 92 12 F6 09 99 22 A3 A3 A3 A3 A3 A3 A3 |R"......".......|
00000A80: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000A90: A3 22 00 B5 12 00 0A 4E 55 B2 30 3A 54 31 B2 31 |.".....NU.0:T1.1|
00000AA0: 38 3A 53 31 B2 30 3A 43 30 24 B2 C7 28 2E 29 3A |8:S1.0:C0$..(.):|
00000AB0: 8D 32 30 30 30 00 BE 12 0A 0A 42 59 B2 34 00 D0 |.2000.....BY.4..|
00000AC0: 12 14 0A 54 25 B2 28 42 59 AB 34 29 AD 34 AA 31 |...T%.(BY.4).4.1|
00000AD0: 00 DE 12 1E 0A 99 22 20 20 22 3B 54 25 3B 00 12 |......" ";T%;..|
00000AE0: 13 28 0A 8B C2 28 42 41 AA 42 59 29 B2 2E A7 81 |.(...(BA.BY)....|
00000AF0: 4A B2 2E A4 32 30 3A 42 4D 25 28 54 25 2C 4A 29 |J...20:BM%(T%,J)|
00000B00: B2 2E 3A 82 3A 42 59 B2 42 59 AA 34 3A 89 32 36 |..:.:BY.BY.4:.26|
00000B10: 35 30 00 1A 13 32 0A 53 B2 30 00 54 13 3C 0A 42 |50...2.S.0.T.<.B|
00000B20: 59 B2 42 59 AA 31 3A 41 30 B2 C2 28 42 41 AA 42 |Y.BY.1:A0..(BA.B|
00000B30: 59 29 3A 81 4A B2 2E A4 37 3A 42 4D 25 28 54 25 |Y):.J...7:BM%(T%|
00000B40: 2C 53 29 B2 41 30 AF 54 41 28 4A 29 3A 53 B2 53 |,S).A0.TA(J):S.S|
00000B50: AA 31 3A 82 00 63 13 46 0A 8B 53 B3 32 32 A7 32 |.1:..c.F..S.22.2|
00000B60: 36 32 30 00 6F 13 50 0A 42 59 B2 42 59 AA 31 00 |620.o.P.BY.BY.1.|
00000B70: 86 13 5A 0A 45 53 B2 32 31 3A 8B 54 25 B1 31 37 |..Z.ES.21:.T%.17|
00000B80: A7 45 53 B2 31 39 00 97 13 64 0A 8B 54 25 B1 32 |.ES.19...d..T%.2|
00000B90: 34 A7 45 53 B2 31 38 00 A8 13 6E 0A 8B 54 25 B1 |4.ES.18...n..T%.|
00000BA0: 33 30 A7 45 53 B2 31 37 00 C4 13 78 0A 81 4A B2 |30.ES.17...x..J.|
00000BB0: 45 53 A4 32 34 3A 42 4D 25 28 54 25 2C 4A 29 B2 |ES.24:BM%(T%,J).|
00000BC0: AB 31 3A 82 00 EA 13 82 0A 53 4D B2 2E 3A 81 4A |.1:......SM..:.J|
00000BD0: B2 2E A4 32 30 3A 8B 42 4D 25 28 54 25 2C 4A 29 |...20:.BM%(T%,J)|
00000BE0: B2 2E A7 53 4D B2 53 4D AA 31 00 02 14 8C 0A 82 |...SM.SM.1......|
00000BF0: 3A 99 A3 31 32 29 3B 53 4D 3A 53 39 B2 53 39 AA |:..12);SM:S9.S9.|
00000C00: 53 4D 00 20 14 96 0A 8B 53 4D B2 2E AF 54 53 B2 |SM. ....SM...TS.|
00000C10: 54 25 A7 54 53 B2 54 53 AA 31 3A 89 32 37 33 30 |T%.TS.TS.1:.2730|
00000C20: 00 31 14 A0 0A 8B 53 4D B3 B1 2E A7 54 46 B2 54 |.1....SM....TF.T|
00000C30: 25 00 42 14 AA 0A 8B 42 59 B3 31 34 33 A7 32 35 |%.B....BY.143.25|
00000C40: 38 30 00 49 14 B4 0A A0 33 00 6A 14 BE 0A 99 22 |80.I....3.j...."|
00000C50: 53 54 41 52 54 20 3D 22 3B 54 53 3B 22 20 46 49 |START =";TS;" FI|
00000C60: 4E 49 53 48 20 3D 22 3B 54 46 00 91 14 C8 0A 99 |NISH =";TF......|
00000C70: 22 11 41 20 54 4F 54 41 4C 20 4F 46 22 3B 53 39 |".A TOTAL OF";S9|
00000C80: 3B 22 42 4C 4F 43 4B 53 20 54 4F 20 58 46 45 52 |;"BLOCKS TO XFER|
00000C90: 22 00 AD 14 D2 0A 53 38 B2 39 30 AA 32 35 AA 28 |".....S8.90.25.(|
00000CA0: 2E 36 35 30 AA 2E 39 38 30 29 AC 53 39 00 E3 14 |.650..980).S9...|
00000CB0: DC 0A 53 37 B2 B5 28 53 38 AD 36 30 29 3A 99 22 |..S7..(S8.60):."|
00000CC0: 41 50 50 52 4F 58 22 3B 53 37 22 3A 22 B5 28 53 |APPROX";S7":".(S|
00000CD0: 38 AB 53 37 AC 36 30 29 3B 22 46 4F 52 20 43 4F |8.S7.60);"FOR CO|
00000CE0: 50 59 22 00 E9 14 E6 0A 8E 00 05 15 B8 0B 8F 20 |PY"............ |
00000CF0: 52 45 41 44 20 45 52 52 20 43 48 20 54 4F 20 45 |READ ERR CH TO E|
00000D00: 52 2C 45 52 24 00 3C 15 C2 0B 84 31 2C 45 30 24 |R,ER$.<....1,E0$|
00000D10: 2C 45 31 24 2C 45 32 24 2C 45 33 24 3A 45 52 24 |,E1$,E2$,E3$:ER$|
00000D20: B2 45 30 24 AA 22 2C 22 AA 45 31 24 AA 22 2C 22 |.E0$.",".E1$.","|
00000D30: AA 45 32 24 AA 22 2C 22 AA 45 33 24 00 58 15 CC |.E2$.",".E3$.X..|
00000D40: 0B 45 52 B2 C3 28 45 30 24 29 3A 8B 45 52 A7 45 |.ER..(E0$):.ER.E|
00000D50: 52 B2 C5 28 45 30 24 29 00 5E 15 D6 0B 8E 00 89 |R..(E0$).^......|
00000D60: 15 80 0C 8F 20 49 4E 53 54 52 55 43 54 20 54 4F |.... INSTRUCT TO|
00000D70: 20 53 57 41 50 20 54 4F 20 44 49 53 4B 20 47 49 | SWAP TO DISK GI|
00000D80: 56 45 4E 20 49 4E 20 44 24 00 AD 15 8A 0C 8B 44 |VEN IN D$......D|
00000D90: 24 B2 22 44 22 A7 53 31 24 B2 22 44 45 53 54 49 |$."D".S1$."DESTI|
00000DA0: 4E 41 54 49 4F 4E 22 3A 89 33 32 33 30 00 BE 15 |NATION":.3230...|
00000DB0: 94 0C 53 31 24 B2 22 53 4F 55 52 43 45 22 00 E9 |..S1$."SOURCE"..|
00000DC0: 15 9E 0C 99 22 11 49 4E 53 45 52 54 20 22 3B 53 |....".INSERT ";S|
00000DD0: 31 24 3B 22 20 44 49 53 4B 2C 20 50 52 45 53 53 |1$;" DISK, PRESS|
00000DE0: 20 12 53 50 41 43 45 92 22 00 FF 15 A8 0C A1 41 | .SPACE."......A|
00000DF0: 24 3A 8B 41 24 B3 B1 22 20 22 A7 33 32 34 30 00 |$:.A$.." ".3240.|
00000E00: 0F 16 B2 0C 9F 32 2C 38 2C 30 2C 22 24 30 22 00 |.....2,8,0,"$0".|
00000E10: 25 16 BC 0C 8D 33 30 30 30 3A 8B 45 52 B1 30 A7 |%....3000:.ER.0.|
00000E20: 31 30 30 30 30 00 3B 16 C6 0C 81 4A B2 31 A4 32 |10000.;....J.1.2|
00000E30: 36 3A A1 23 32 2C 41 24 3A 82 4A 00 57 16 D0 0C |6:.#2,A$:.J.W...|
00000E40: A1 23 32 2C 41 24 3A A1 23 32 2C 42 24 3A 49 52 |.#2,A$:.#2,B$:IR|
00000E50: 24 B2 41 24 AA 42 24 00 7A 16 DA 0C A1 23 32 2C |$.A$.B$.z....#2,|
00000E60: 41 24 3A A1 23 32 2C 41 24 3A A1 23 32 2C 42 24 |A$:.#2,A$:.#2,B$|
00000E70: 3A 44 52 24 B2 41 24 AA 42 24 00 83 16 E4 0C A0 |:DR$.A$.B$......|
00000E80: 32 3A 8E 00 92 16 10 27 8F 20 44 52 4F 50 20 4F |2:.....'. DROP O|
00000E90: 55 54 00 B0 16 1A 27 97 35 35 2C C2 28 39 39 38 |UT....'.55,.(998|
00000EA0: 29 3A 97 35 36 2C C2 28 39 39 39 29 3A 9C 3A 90 |):.56,.(999):.:.|
00000EB0: 00 F1 16 98 3A 83 37 36 2C 36 36 2C 33 2C 37 36 |....:.76,66,3,76|
00000EC0: 2C 39 31 2C 33 2C 31 36 32 2C 33 2C 33 32 2C 31 |,91,3,162,3,32,1|
00000ED0: 39 38 2C 32 35 35 2C 31 36 30 2C 30 2C 31 33 32 |98,255,160,0,132|
00000EE0: 2C 33 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 34 |,3,32,207,255,14|
00000EF0: 35 00 35 17 A2 3A 83 33 2C 31 36 35 2C 31 34 34 |5.5..:.3,165,144|
00000F00: 2C 32 30 38 2C 33 2C 32 30 30 2C 32 30 38 2C 32 |,208,3,200,208,2|
00000F10: 34 34 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 |44,32,204,255,96|
00000F20: 2C 31 36 32 2C 33 2C 33 32 2C 32 30 31 2C 32 35 |,162,3,32,201,25|
00000F30: 35 2C 31 36 30 00 7B 17 AC 3A 83 30 2C 31 33 32 |5,160.{..:.0,132|
00000F40: 2C 33 2C 31 37 37 2C 33 2C 33 32 2C 32 31 30 2C |,3,177,3,32,210,|
00000F50: 32 35 35 2C 31 36 35 2C 31 34 34 2C 32 30 38 2C |255,165,144,208,|
00000F60: 33 2C 32 30 30 2C 32 30 38 2C 32 34 34 2C 33 32 |3,200,208,244,32|
00000F70: 2C 32 30 34 2C 32 35 35 2C 39 36 00 00 00 00 00 |,204,255,96.....|
00000F80: 50 00 00 00 00 00 00 00 00 00 00 00 00 97 35 32 |P.............52|
00000F90: 2C C2 28 36 33 32 29 3A 97 35 33 2C C2 28 36 33 |,.(632):.53,.(63|
00000FA0: 33 29 3A 9C 3A 90 00 00 00 4F 4C 46 12 4C 5F 12 |3):.:....OLF.L_.|
00000FB0: A2 03 20 C6 FF A0 00 84 01 20 CF FF 91 01 A5 96 |.. ...... ......|
00000FC0: D0 03 C8 D0 F4 20 CC FF 60 A2 03 20 C9 FF A0 00 |..... ..`.. ....|
00000FD0: 84 01 B1 01 20 D2 FF A5 96 D0 03 C8 D0 F4 20 CC |.... ......... .|
00000FE0: FF 60 60 50 20 4F 55 54 00 9D |.``P OUT.. |
.......I.828.883:.A:.I,A:.I.C...."D=DSAV
E"@BACK2",D0:?DS$:CATALOGD0.[...BB.B(44)
.27:.995,BB......998,B(55):.999,B(56):.5
5,0:.56,BB:....(.BB.B(995)...2.N.B(999).
BB.1:BA.BB.256:MA.828.E.<..BM%(35,24)...
F..J.0.7:TA(J).2.J:....P..".....BACKUP 2
031. - JIM LAW / KEITH HOPE".<.Z..".'GOT
O10000' IF PROGRAM QUITS ABNORMALLY".Y.D
.."."N"BUFFERS AVAILABLE".E.N..1,8,15...
H.. *** MAIN FUNCTIONS ****...R..1000...
..D$."S":.3200:I2$.IR$.V....DR$.."2A".."
.ILLEGAL DOS 1.0 DISK.":.10000......I2$.
I1$..".SOURCE AND DESTINATION HAVE SAME
ID CODE.":.10000."....2500.>...T.TS:S.0:
NU.1:T1.T:S1.S.U....1,"I0":.3,8,3,"#".M.
..."READING BLOCK #";..."..BM%(T1,S1).0.
.2000:NU.NU.1:.NU.N.320...,.S1.S1.1:.S1.
20.S1.0:T1.T1.1.H.6..T1.TF.1.290.Q.@..".
".X.J. 3...T.D$."D":.3200:.IR$..I1$..340
...^..1,"I0":.3,8,3,"#".(.H.."WRITING BU
FFER #";.;.R.NU.1:T1.T:S1.S.E.|..BM%(T1,
S1).0..2200:NU.NU.1:.NU.N.410.....S1.S1.
1:.S1.20.S1.0:T1.T1.1......T1.TF.1.380..
...."."..... 3.C...S.S1.1:.S.20.S.0:T1.T
1.1.V...T.T1:.T.TF.500...B.D$."S":.3200:
.IR$..I2$.450...L.NU.1:T1.T:S1.S:.270.".
... FINISHED XFERS.)... 1.E....55,B(998)
:.56,B(999):..^...."..BACKUP COMPLETE".N
....1,8,0,"$0"...&..#1,A$:.A$..".".550..
.0..A$;:.610...:..#1,A$:SS.ST:A.C(A$):.A
.A.F(A$)...D..#1,B$:SS.ST:B.C(B$):.B.A.F
(B$)...N..SS.660...X..A.1.B.1..630...B..
#1,A$:.A$.""..:.570.!.L..A$;:.610.E.V..#
1,A$:SS.ST:A.C(A$):.A.A.F(A$).I....#1,B$
:SS.ST:B.C(B$):.B.B.F(B$).}...N.B.256.A:
.N;:...... 1............ HEADER DEST DIS
K.Q....".INSERT DESTINATION DISK TO BE F
ORMATTED"......"..DISK NAME...
...................";DN$.*....DN$
." ".."...";:.1020.?....C(DN$).16..:.40.
B...F.0:.J.1.C(DN$):S1$.J(DN$,J,1).}.$..
S1$." ".S1$.G(34).F.1......J:.F.."...";:
.1020...8..".UNIQUE DISK ID...
.......................";I1$.
..B..I1$." ".."..";:.1080...L..C(I1$)..2
.."..";:.1080...V..1,"N0:".DN$.",".I1$.8
.`..3000.L.J..ER..ER$:.10000.R.T...X.P..
READ BLOCK T1,S1 TO BUFFER # NU...Z.C..
:.C=0......1,"U1";3;0;T1;S1......3000:..
ER.2060.C...C.C.1:.C.3.2020......ER$:.J.
(BB.NU).256.(BB.NU).256.255:.J,.:.J:.210
0......1,"B-P";3;0.6....NU..0.." ...";
I(" ".D(NU),3);"...";.[. ..996,B(3):.99
7,B(4):.4,BB.NU:.MA.S.%..3,B(996):.4,B(9
97)...*..ST....ST..64..3000:.2050:. C=0.
..4...F.... WRITE BLOCK T1,S1 FROM BUFFE
R # NU.S...C..:.C=0......1,"B-A";0;T1;S1
:.1,"B-P";3;0......" ...";I(" ".D(NU)
,3);"...";.A....996,B(3):.997,B(4):.4,BB
.NU:.MA.3.Y.E..3,B(996):.4,B(997)...J..S
T....ST..64..".IEEE WRITE ERROR"ST".":.1
0000:. C=0...T..1,"U2";3;0;T1;S1......30
00:..ER.2300.P...C.C.1:.C.3.2260......".
UNRECOVERABLE WRITE ERROR"ER$:.10000....
.....D.. GET BAM TO BM%(T,S).1.N.TS.1:TF
..:. TF=0.H.X..1,"I0":.3,8,3,"#".Q...S9.
0.R....".TRACK # BLOCKS TO XFER"......
"........................".....NU.0:T1.1
8:S1.0:C0$.G(.):.2000.....BY.4.P...T%.(B
Y.4).4.1......" ";T%;...(..B(BA.BY)....
J...20:BM%(T%,J)..:.:BY.BY.4:.2650...2.S
.0.T.<.BY.BY.1:A0.B(BA.BY):.J...7:BM%(T%
,S).A0.TA(J):S.S.1:..C.F..S.22.2620.O.P.
BY.BY.1...Z.ES.21:.T%.17.ES.19...D..T%.2
4.ES.18...N..T%.30.ES.17.D.X..J.ES.24:BM
%(T%,J)..1:......SM..:.J...20:.BM%(T%,J)
...SM.SM.1......:..12);SM:S9.S9.SM. ....
SM...TS.T%.TS.TS.1:.2730.1. ..SM....TF.T
%.B....BY.143.2580.I... 3.J...."START ="
;TS;" FINISH =";TF...H..".A TOTAL OF";S9
;"BLOCKS TO XFER"...R.S8.90.25.(.650..98
0).S9.....S7..(S8.60):."APPROX";S7":".(S
8.S7.60);"FOR COPY"............ READ ERR
CH TO ER,ER$.<.B..1,E0$,E1$,E2$,E3$:ER$
.E0$.",".E1$.",".E2$.",".E3$.X.L.ER.C(E0
$):.ER.ER.E(E0$).^.V........ INSTRUCT TO
SWAP TO DISK GIVEN IN D$......D$."D".S1
$."DESTINATION":.3230.....S1$."SOURCE"..
....".INSERT ";S1$;" DISK, PRESS .SPACE.
"......A$:.A$.." ".3240......2,8,0,"$0".
%....3000:.ER.0.10000.;.F..J.1.26:.#2,A$
:.J.W.P..#2,A$:.#2,B$:IR$.A$.B$.Z.Z..#2,
A$:.#2,A$:.#2,B$:DR$.A$.B$..... 2:.....'
. DROP OUT....'.55,B(998):.56,B(999):.:.
....:.76,66,3,76,91,3,162,3,32,198,255,1
60,0,132,3,32,207,255,145.5..:.3,165,144
,208,3,200,208,244,32,204,255,96,162,3,3
2,201,255,160.{..:.0,132,3,177,3,32,210,
255,165,144,208,3,200,208,244,32,204,255
,96.....P.............52,B(632):.53,B(63
3):.:....OLF.L_... F. ... O.....P.HP. L.
`.. I. ..... R...P.HP. L.``P OUT..
> CLICK IMAGE PREVIEW FOR FULL MODAL