1541BACKUP(FREE)

FILE INFORMATION

FILENAME(S): 1541BACKUP(FREE)

FILE TYPE(S): PRG

FILE SIZE: 4K

FIRST SEEN: 2025-11-02 17:01:44

APPEARS ON: 1 disk(s)

FILE HASH

e0a21998b35c1b9b45d4ec25e42e918a8dcd500c7f51140fc73f5a65cc484e19

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
DISKTL09	1541BACKUP(FREE)	PRG	Treasure Chest - Spook	29	3	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 31  |..".....BACKUP 1|
000000F0: 35 34 31 92 20 2D 20 4A  49 4D 20 4C 41 57 20 2F  |541. - 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 36                 |.``P OUT..6     |

.......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 1
541. - 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..6

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL