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

BACK UP 1541

FILE INFORMATION

FILENAME(S): BACK UP 1541

FILE TYPE(S): PRG

FILE SIZE: 3.9K

FIRST SEEN: 2025-12-01 01:09:58

APPEARS ON: 1 disk(s)

FILE HASH

ad7cef74f394acd10d9213f97a10eda5c1b7ab3ef73816a794009e8b437c7f90

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CA EN NYTTO DISK BACK UP 1541 PRG hedning, Martin L0fgren 27 15 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 F5 08 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 22 00 25 09  5A 00 99 22 11 27 47 4F  |541.".%.Z..".'GO|
00000100: 54 4F 31 30 30 30 30 27  20 49 46 20 50 52 4F 47  |TO10000' IF PROG|
00000110: 52 41 4D 20 51 55 49 54  53 20 41 42 4E 4F 52 4D  |RAM QUITS ABNORM|
00000120: 41 4C 4C 59 22 00 42 09  64 00 99 22 11 22 4E 22  |ALLY".B.d.."."N"|
00000130: 42 55 46 46 45 52 53 20  41 56 41 49 4C 41 42 4C  |BUFFERS AVAILABL|
00000140: 45 22 00 4E 09 6E 00 9F  31 2C 38 2C 31 35 00 6C  |E".N.n..1,8,15.l|
00000150: 09 C8 00 8F 20 2A 2A 2A  20 4D 41 49 4E 20 46 55  |.... *** MAIN FU|
00000160: 4E 43 54 49 4F 4E 53 20  2A 2A 2A 2A 00 76 09 D2  |NCTIONS ****.v..|
00000170: 00 8D 31 30 30 30 00 8F  09 DC 00 44 24 B2 22 53  |..1000.....D$."S|
00000180: 22 3A 8D 33 32 30 30 3A  49 32 24 B2 49 52 24 00  |":.3200:I2$.IR$.|
00000190: BF 09 E6 00 8B 44 52 24  B3 B1 22 32 41 22 A7 99  |.....DR$.."2A"..|
000001A0: 22 12 49 4C 4C 45 47 41  4C 20 44 4F 53 20 31 2E  |".ILLEGAL DOS 1.|
000001B0: 30 20 44 49 53 4B 92 22  3A 89 31 30 30 30 30 00  |0 DISK.":.10000.|
000001C0: 01 0A F0 00 8B 49 32 24  B2 49 31 24 A7 99 22 12  |.....I2$.I1$..".|
000001D0: 53 4F 55 52 43 45 20 41  4E 44 20 44 45 53 54 49  |SOURCE AND DESTI|
000001E0: 4E 41 54 49 4F 4E 20 48  41 56 45 20 53 41 4D 45  |NATION HAVE SAME|
000001F0: 20 49 44 20 43 4F 44 45  92 22 3A 89 31 30 30 30  | ID CODE.":.1000|
00000200: 30 00 0B 0A FA 00 8D 32  35 30 30 00 27 0A 04 01  |0......2500.'...|
00000210: 54 B2 54 53 3A 53 B2 30  3A 4E 55 B2 31 3A 54 31  |T.TS:S.0:NU.1:T1|
00000220: B2 54 3A 53 31 B2 53 00  3E 0A 0E 01 98 31 2C 22  |.T:S1.S.>....1,"|
00000230: 49 30 22 3A 9F 33 2C 38  2C 33 2C 22 23 22 00 56  |I0":.3,8,3,"#".V|
00000240: 0A 18 01 99 22 52 45 41  44 49 4E 47 20 42 4C 4F  |...."READING BLO|
00000250: 43 4B 20 23 22 3B 00 80  0A 22 01 8B 42 4D 25 28  |CK #";..."..BM%(|
00000260: 54 31 2C 53 31 29 B2 30  A7 8D 32 30 30 30 3A 4E  |T1,S1).0..2000:N|
00000270: 55 B2 4E 55 AA 31 3A 8B  4E 55 B1 4E A7 33 32 30  |U.NU.1:.NU.N.320|
00000280: 00 A0 0A 2C 01 53 31 B2  53 31 AA 31 3A 8B 53 31  |...,.S1.S1.1:.S1|
00000290: B1 32 30 A7 53 31 B2 30  3A 54 31 B2 54 31 AA 31  |.20.S1.0:T1.T1.1|
000002A0: 00 B1 0A 36 01 8B 54 31  B3 54 46 AA 31 A7 32 39  |...6..T1.TF.1.29|
000002B0: 30 00 BA 0A 40 01 99 22  11 22 00 C1 0A 4A 01 A0  |0...@.."."...J..|
000002C0: 33 00 E1 0A 54 01 44 24  B2 22 44 22 3A 8D 33 32  |3...T.D$."D":.32|
000002D0: 30 30 3A 8B 49 52 24 B3  B1 49 31 24 A7 89 33 34  |00:.IR$..I1$..34|
000002E0: 30 00 F8 0A 5E 01 98 31  2C 22 49 30 22 3A 9F 33  |0...^..1,"I0":.3|
000002F0: 2C 38 2C 33 2C 22 23 22  00 11 0B 68 01 99 22 57  |,8,3,"#"...h.."W|
00000300: 52 49 54 49 4E 47 20 42  55 46 46 45 52 20 23 22  |RITING BUFFER #"|
00000310: 3B 00 24 0B 72 01 4E 55  B2 31 3A 54 31 B2 54 3A  |;.$.r.NU.1:T1.T:|
00000320: 53 31 B2 53 00 4E 0B 7C  01 8B 42 4D 25 28 54 31  |S1.S.N.|..BM%(T1|
00000330: 2C 53 31 29 B2 30 A7 8D  32 32 30 30 3A 4E 55 B2  |,S1).0..2200:NU.|
00000340: 4E 55 AA 31 3A 8B 4E 55  B1 4E A7 34 31 30 00 6E  |NU.1:.NU.N.410.n|
00000350: 0B 86 01 53 31 B2 53 31  AA 31 3A 8B 53 31 B1 32  |...S1.S1.1:.S1.2|
00000360: 30 A7 53 31 B2 30 3A 54  31 B2 54 31 AA 31 00 7F  |0.S1.0:T1.T1.1..|
00000370: 0B 90 01 8B 54 31 B3 54  46 AA 31 A7 33 38 30 00  |....T1.TF.1.380.|
00000380: 88 0B 9A 01 99 22 11 22  00 8F 0B A4 01 A0 33 00  |....."."......3.|
00000390: AD 0B AE 01 53 B2 53 31  AA 31 3A 8B 53 B1 32 30  |....S.S1.1:.S.20|
000003A0: A7 53 B2 30 3A 3A 54 31  B2 54 31 AA 31 00 C0 0B  |.S.0::T1.T1.1...|
000003B0: B8 01 54 B2 54 31 3A 8B  54 B1 54 46 A7 35 30 30  |..T.T1:.T.TF.500|
000003C0: 00 DF 0B C2 01 44 24 B2  22 53 22 3A 8D 33 32 30  |.....D$."S":.320|
000003D0: 30 3A 8B 49 52 24 B3 B1  49 32 24 A7 34 35 30 00  |0:.IR$..I2$.450.|
000003E0: F7 0B CC 01 4E 55 B2 31  3A 54 31 B2 54 3A 53 31  |....NU.1:T1.T:S1|
000003F0: B2 53 3A 89 32 37 30 00  0C 0C F4 01 8F 20 46 49  |.S:.270...... FI|
00000400: 4E 49 53 48 45 44 20 58  46 45 52 53 00 13 0C FE  |NISHED XFERS....|
00000410: 01 A0 31 00 2F 0C 08 02  97 35 35 2C C2 28 39 39  |..1./....55,.(99|
00000420: 38 29 3A 97 35 36 2C C2  28 39 39 39 29 3A 9C 00  |8):.56,.(999):..|
00000430: 48 0C 12 02 99 22 11 11  42 41 43 4B 55 50 20 43  |H...."..BACKUP C|
00000440: 4F 4D 50 4C 45 54 45 22  00 58 0C 1C 02 9F 31 2C  |OMPLETE".X....1,|
00000450: 38 2C 30 2C 22 24 30 22  00 70 0C 26 02 A1 23 31  |8,0,"$0".p.&..#1|
00000460: 2C 41 24 3A 8B 41 24 B3  B1 22 12 22 A7 35 35 30  |,A$:.A$..".".550|
00000470: 00 7E 0C 30 02 99 41 24  3B 3A 89 36 31 30 00 A2  |.~.0..A$;:.610..|
00000480: 0C 3A 02 A1 23 31 2C 41  24 3A 53 53 B2 53 54 3A  |.:..#1,A$:SS.ST:|
00000490: 41 B2 C3 28 41 24 29 3A  8B 41 A7 41 B2 C6 28 41  |A..(A$):.A.A..(A|
000004A0: 24 29 00 C6 0C 44 02 A1  23 31 2C 42 24 3A 53 53  |$)...D..#1,B$:SS|
000004B0: B2 53 54 3A 42 B2 C3 28  42 24 29 3A 8B 42 A7 41  |.ST:B..(B$):.B.A|
000004C0: B2 C6 28 42 24 29 00 D2  0C 4E 02 8B 53 53 A7 36  |..(B$)...N..SS.6|
000004D0: 36 30 00 E4 0C 58 02 8B  41 B2 31 AF 42 B2 31 A7  |60...X..A.1.B.1.|
000004E0: 8D 36 33 30 00 FD 0C 62  02 A1 23 31 2C 41 24 3A  |.630...b..#1,A$:|
000004F0: 8B 41 24 B2 22 22 A7 99  3A 89 35 37 30 00 0B 0D  |.A$.""..:.570...|
00000500: 6C 02 99 41 24 3B 3A 89  36 31 30 00 2F 0D 76 02  |l..A$;:.610./.v.|
00000510: A1 23 31 2C 41 24 3A 53  53 B2 53 54 3A 41 B2 C3  |.#1,A$:SS.ST:A..|
00000520: 28 41 24 29 3A 8B 41 A7  41 B2 C6 28 41 24 29 00  |(A$):.A.A..(A$).|
00000530: 53 0D 80 02 A1 23 31 2C  42 24 3A 53 53 B2 53 54  |S....#1,B$:SS.ST|
00000540: 3A 42 B2 C3 28 42 24 29  3A 8B 42 A7 42 B2 C6 28  |:B..(B$):.B.B..(|
00000550: 42 24 29 00 67 0D 8A 02  4E B2 42 AC 32 35 36 AA  |B$).g...N.B.256.|
00000560: 41 3A 99 4E 3B 3A 8E 00  6E 0D 94 02 A0 31 00 74  |A:.N;:..n....1.t|
00000570: 0D 9E 02 80 00 8B 0D E8  03 8F 20 48 45 41 44 45  |.......... HEADE|
00000580: 52 20 44 45 53 54 20 44  49 53 4B 00 BB 0D F2 03  |R DEST DISK.....|
00000590: 99 22 11 49 4E 53 45 52  54 20 44 45 53 54 49 4E  |.".INSERT DESTIN|
000005A0: 41 54 49 4F 4E 20 44 49  53 4B 20 54 4F 20 42 45  |ATION DISK TO BE|
000005B0: 20 46 4F 52 4D 41 54 54  45 44 22 00 F8 0D FC 03  | FORMATTED".....|
000005C0: 85 22 11 11 44 49 53 4B  20 4E 41 4D 45 1D 1D 1D  |."..DISK NAME...|
000005D0: A0 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000005E0: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
000005F0: 9D 9D 9D 22 3B 44 4E 24  00 13 0E 06 04 8B 44 4E  |...";DN$......DN|
00000600: 24 B2 22 A0 22 A7 99 22  91 91 91 22 3B 3A 89 31  |$.".".."...";:.1|
00000610: 30 32 30 00 28 0E 10 04  8B C3 28 44 4E 24 29 B1  |020.(.....(DN$).|
00000620: 31 36 A7 9C 3A 89 34 30  00 4B 0E 1A 04 46 B2 30  |16..:.40.K...F.0|
00000630: 3A 81 4A B2 31 A4 C3 28  44 4E 24 29 3A 53 31 24  |:.J.1..(DN$):S1$|
00000640: B2 CA 28 44 4E 24 2C 4A  2C 31 29 00 66 0E 24 04  |..(DN$,J,1).f.$.|
00000650: 8B 53 31 24 B2 22 A0 22  B0 53 31 24 B2 C7 28 33  |.S1$.".".S1$..(3|
00000660: 34 29 A7 46 B2 31 00 7E  0E 2E 04 82 4A 3A 8B 46  |4).F.1.~....J:.F|
00000670: A7 99 22 91 91 91 22 3B  3A 89 31 30 32 30 00 C7  |.."...";:.1020..|
00000680: 0E 38 04 85 22 11 55 4E  49 51 55 45 20 44 49 53  |.8..".UNIQUE DIS|
00000690: 4B 20 49 44 1D 1D 1D A0  20 20 20 20 20 20 20 20  |K ID....        |
000006A0: 20 20 20 20 20 20 20 20  20 20 20 9D 9D 9D 9D 9D  |           .....|
000006B0: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
000006C0: 9D 9D 22 3B 49 31 24 00  E1 0E 42 04 8B 49 31 24  |..";I1$...B..I1$|
000006D0: B2 22 A0 22 A7 99 22 91  91 22 3B 3A 89 31 30 38  |.".".."..";:.108|
000006E0: 30 00 FD 0E 4C 04 8B C3  28 49 31 24 29 B3 B1 32  |0...L...(I1$)..2|
000006F0: A7 99 22 91 91 22 3B 3A  89 31 30 38 30 00 16 0F  |.."..";:.1080...|
00000700: 56 04 98 31 2C 22 4E 30  3A 22 AA 44 4E 24 AA 22  |V..1,"N0:".DN$."|
00000710: 2C 22 AA 49 31 24 00 20  0F 60 04 8D 33 30 30 30  |,".I1$. .`..3000|
00000720: 00 34 0F 6A 04 8B 45 52  A7 99 45 52 24 3A 89 31  |.4.j..ER..ER$:.1|
00000730: 30 30 30 30 00 3A 0F 74  04 8E 00 60 0F D0 07 8F  |0000.:.t...`....|
00000740: 20 52 45 41 44 20 42 4C  4F 43 4B 20 54 31 2C 53  | READ BLOCK T1,S|
00000750: 31 20 54 4F 20 42 55 46  46 45 52 20 23 20 4E 55  |1 TO BUFFER # NU|
00000760: 00 68 0F DA 07 43 B2 2E  00 7E 0F E4 07 98 31 2C  |.h...C...~....1,|
00000770: 22 55 31 22 3B 33 3B 30  3B 54 31 3B 53 31 00 92  |"U1";3;0;T1;S1..|
00000780: 0F EE 07 8D 33 30 30 30  3A 8B A8 45 52 A7 32 30  |....3000:..ER.20|
00000790: 36 30 00 A6 0F F8 07 43  B2 43 AA 31 3A 8B 43 B3  |60.....C.C.1:.C.|
000007A0: 33 89 32 30 32 30 00 DC  0F 02 08 99 45 52 24 3A  |3.2020......ER$:|
000007B0: 81 4A B2 28 42 42 AA 4E  55 29 AC 32 35 36 A4 28  |.J.(BB.NU).256.(|
000007C0: 42 42 AA 4E 55 29 AC 32  35 36 AA 32 35 35 3A 97  |BB.NU).256.255:.|
000007D0: 4A 2C 2E 3A 82 4A 3A 89  32 31 30 30 00 ED 0F 0C  |J,.:.J:.2100....|
000007E0: 08 98 31 2C 22 42 2D 50  22 3B 33 3B 30 00 19 10  |..1,"B-P";3;0...|
000007F0: 16 08 8B 4E 55 B3 B1 30  A7 99 22 20 20 20 9D 9D  |...NU..0.."   ..|
00000800: 9D 22 3B C9 28 22 20 20  22 AA C4 28 4E 55 29 2C  |.";.("  "..(NU),|
00000810: 33 29 3B 22 9D 9D 9D 22  3B 00 3E 10 20 08 97 39  |3);"...";.>. ..9|
00000820: 39 36 2C C2 28 33 29 3A  97 39 39 37 2C C2 28 34  |96,.(3):.997,.(4|
00000830: 29 3A 97 34 2C 42 42 AA  4E 55 3A 9E 4D 41 00 56  |):.4,BB.NU:.MA.V|
00000840: 10 25 08 97 33 2C C2 28  39 39 36 29 3A 97 34 2C  |.%..3,.(996):.4,|
00000850: C2 28 39 39 37 29 00 74  10 2A 08 8B 53 54 B3 B1  |.(997).t.*..ST..|
00000860: 2E AF 53 54 B3 B1 36 34  A7 8D 33 30 30 30 3A 89  |..ST..64..3000:.|
00000870: 32 30 35 30 00 7A 10 34  08 8E 00 A3 10 98 08 8F  |2050.z.4........|
00000880: 20 57 52 49 54 45 20 42  4C 4F 43 4B 20 54 31 2C  | WRITE BLOCK T1,|
00000890: 53 31 20 46 52 4F 4D 20  42 55 46 46 45 52 20 23  |S1 FROM BUFFER #|
000008A0: 20 4E 55 00 AB 10 A2 08  43 B2 2E 00 CD 10 AC 08  | NU.....C.......|
000008B0: 98 31 2C 22 42 2D 41 22  3B 30 3B 54 31 3B 53 31  |.1,"B-A";0;T1;S1|
000008C0: 3A 98 31 2C 22 42 2D 50  22 3B 33 3B 30 00 F2 10  |:.1,"B-P";3;0...|
000008D0: B6 08 99 22 20 20 20 9D  9D 9D 22 3B C9 28 22 20  |..."   ...";.(" |
000008E0: 20 22 AA C4 28 4E 55 29  2C 33 29 3B 22 9D 9D 9D  | "..(NU),3);"...|
000008F0: 22 3B 00 19 11 C0 08 97  39 39 36 2C C2 28 33 29  |";......996,.(3)|
00000900: 3A 97 39 39 37 2C C2 28  34 29 3A 97 34 2C 42 42  |:.997,.(4):.4,BB|
00000910: AA 4E 55 3A 9E 4D 41 AA  33 00 31 11 C5 08 97 33  |.NU:.MA.3.1....3|
00000920: 2C C2 28 39 39 36 29 3A  97 34 2C C2 28 39 39 37  |,.(996):.4,.(997|
00000930: 29 00 64 11 CA 08 8B 53  54 B3 B1 2E AF 53 54 B3  |).d....ST....ST.|
00000940: B1 36 34 A7 99 22 12 49  45 45 45 20 57 52 49 54  |.64..".IEEE WRIT|
00000950: 45 20 45 52 52 4F 52 22  53 54 22 92 22 3A 89 31  |E ERROR"ST".":.1|
00000960: 30 30 30 30 00 7A 11 D4  08 98 31 2C 22 55 32 22  |0000.z....1,"U2"|
00000970: 3B 33 3B 30 3B 54 31 3B  53 31 00 8E 11 DE 08 8D  |;3;0;T1;S1......|
00000980: 33 30 30 30 3A 8B A8 45  52 A7 32 33 30 30 00 A2  |3000:..ER.2300..|
00000990: 11 E8 08 43 B2 43 AA 31  3A 8B 43 B3 33 A7 32 32  |...C.C.1:.C.3.22|
000009A0: 36 30 00 CF 11 F2 08 99  22 12 55 4E 52 45 43 4F  |60......".UNRECO|
000009B0: 56 45 52 41 4E 42 4C 45  20 57 52 49 54 45 20 45  |VERANBLE WRITE E|
000009C0: 52 52 4F 52 22 45 52 24  3A 89 31 30 30 30 30 00  |RROR"ER$:.10000.|
000009D0: D5 11 FC 08 8E 00 EF 11  C4 09 8F 20 47 45 54 20  |........... GET |
000009E0: 42 41 4D 20 54 4F 20 42  4D 25 28 54 2C 53 29 00  |BAM TO BM%(T,S).|
000009F0: FD 11 CE 09 54 53 B2 31  3A 54 46 B2 2E 00 14 12  |....TS.1:TF.....|
00000A00: D8 09 98 31 2C 22 49 30  22 3A 9F 33 2C 38 2C 33  |...1,"I0":.3,8,3|
00000A10: 2C 22 23 22 00 1D 12 E2  09 53 39 B2 30 00 3E 12  |,"#".....S9.0.>.|
00000A20: EC 09 99 22 11 54 52 41  43 4B 20 23 20 20 20 42  |...".TRACK #   B|
00000A30: 4C 4F 43 4B 53 20 54 4F  20 58 46 45 52 22 00 5E  |LOCKS TO XFER".^|
00000A40: 12 F6 09 99 22 23 23 23  23 23 23 23 23 23 23 23  |...."###########|
00000A50: 23 23 23 23 23 23 23 23  23 23 23 23 23 22 00 81  |#############"..|
00000A60: 12 00 0A 4E 55 B2 30 3A  54 31 B2 31 38 3A 53 31  |...NU.0:T1.18:S1|
00000A70: B2 30 3A 43 30 24 B2 C7  28 2E 29 3A 8D 32 30 30  |.0:C0$..(.):.200|
00000A80: 30 00 8A 12 0A 0A 42 59  B2 34 00 9C 12 14 0A 54  |0.....BY.4.....T|
00000A90: 25 B2 28 42 59 AB 34 29  AD 34 AA 31 00 AA 12 1E  |%.(BY.4).4.1....|
00000AA0: 0A 99 22 20 20 22 3B 54  25 3B 00 DE 12 28 0A 8B  |.."  ";T%;...(..|
00000AB0: C2 28 42 41 AA 42 59 29  B2 2E A7 81 4A B2 2E A4  |.(BA.BY)....J...|
00000AC0: 32 30 3A 42 4D 25 28 54  25 2C 4A 29 B2 2E 3A 82  |20:BM%(T%,J)..:.|
00000AD0: 3A 42 59 B2 42 59 AA 34  3A 89 32 36 35 30 00 E6  |:BY.BY.4:.2650..|
00000AE0: 12 32 0A 53 B2 30 00 20  13 3C 0A 42 59 B2 42 59  |.2.S.0. .<.BY.BY|
00000AF0: AA 31 3A 41 30 B2 C2 28  42 41 AA 42 59 29 3A 81  |.1:A0..(BA.BY):.|
00000B00: 4A B2 2E A4 37 3A 42 4D  25 28 54 25 2C 53 29 B2  |J...7:BM%(T%,S).|
00000B10: 41 30 AF 54 41 28 4A 29  3A 53 B2 53 AA 31 3A 82  |A0.TA(J):S.S.1:.|
00000B20: 00 2F 13 46 0A 8B 53 B3  32 32 A7 32 36 32 30 00  |./.F..S.22.2620.|
00000B30: 3B 13 50 0A 42 59 B2 42  59 AA 31 00 52 13 5A 0A  |;.P.BY.BY.1.R.Z.|
00000B40: 45 53 B2 32 31 3A 8B 54  25 B1 31 37 A7 45 53 B2  |ES.21:.T%.17.ES.|
00000B50: 31 39 00 63 13 64 0A 8B  54 25 B1 32 34 A7 45 53  |19.c.d..T%.24.ES|
00000B60: B2 31 38 00 74 13 6E 0A  8B 54 25 B1 33 30 A7 45  |.18.t.n..T%.30.E|
00000B70: 53 B2 31 37 00 90 13 78  0A 81 4A B2 45 53 A4 32  |S.17...x..J.ES.2|
00000B80: 34 3A 42 4D 25 28 54 25  2C 4A 29 B2 AB 31 3A 82  |4:BM%(T%,J)..1:.|
00000B90: 00 B6 13 82 0A 53 4D B2  2E 3A 81 4A B2 2E A4 32  |.....SM..:.J...2|
00000BA0: 30 3A 8B 42 4D 25 28 54  25 2C 4A 29 B2 2E A7 53  |0:.BM%(T%,J)...S|
00000BB0: 4D B2 53 4D AA 31 00 CF  13 8C 0A 82 3A 99 20 A3  |M.SM.1......:. .|
00000BC0: 31 32 29 3B 53 4D 3A 53  39 B2 53 39 AA 53 4D 00  |12);SM:S9.S9.SM.|
00000BD0: ED 13 96 0A 8B 53 4D B2  2E AF 54 53 B2 54 25 A7  |.....SM...TS.T%.|
00000BE0: 54 53 B2 54 53 AA 31 3A  89 32 37 33 30 00 FE 13  |TS.TS.1:.2730...|
00000BF0: A0 0A 8B 53 4D B3 B1 2E  A7 54 46 B2 54 25 00 0F  |...SM....TF.T%..|
00000C00: 14 AA 0A 8B 42 59 B3 31  34 33 A7 32 35 38 30 00  |....BY.143.2580.|
00000C10: 16 14 B4 0A A0 33 00 37  14 BE 0A 99 22 53 54 41  |.....3.7...."STA|
00000C20: 52 54 20 3D 22 3B 54 53  3B 22 20 46 49 4E 49 53  |RT =";TS;" FINIS|
00000C30: 48 20 3D 22 3B 54 46 00  5E 14 C8 0A 99 22 11 41  |H =";TF.^....".A|
00000C40: 20 54 4F 54 41 4C 20 4F  46 22 3B 53 39 3B 22 42  | TOTAL OF";S9;"B|
00000C50: 4C 4F 43 4B 53 20 54 4F  20 58 46 45 52 22 00 7A  |LOCKS TO XFER".z|
00000C60: 14 D2 0A 53 38 B2 39 30  AA 32 35 AA 28 2E 36 35  |...S8.90.25.(.65|
00000C70: 30 AA 2E 39 38 30 29 AC  53 39 00 B0 14 DC 0A 53  |0..980).S9.....S|
00000C80: 37 B2 B5 28 53 38 AD 36  30 29 3A 99 22 41 50 50  |7..(S8.60):."APP|
00000C90: 52 4F 58 22 3B 53 37 22  3A 22 B5 28 53 38 AB 53  |ROX";S7":".(S8.S|
00000CA0: 37 AC 36 30 29 3B 22 46  4F 52 20 43 4F 50 59 22  |7.60);"FOR COPY"|
00000CB0: 00 B6 14 E6 0A 8E 00 D2  14 B8 0B 8F 20 52 45 41  |............ REA|
00000CC0: 44 20 45 52 52 20 43 48  20 54 4F 20 45 52 2C 45  |D ERR CH TO ER,E|
00000CD0: 52 24 00 09 15 C2 0B 84  31 2C 45 30 24 2C 45 31  |R$......1,E0$,E1|
00000CE0: 24 2C 45 32 24 2C 45 33  24 3A 45 52 24 B2 45 30  |$,E2$,E3$:ER$.E0|
00000CF0: 24 AA 22 2C 22 AA 45 31  24 AA 22 2C 22 AA 45 32  |$.",".E1$.",".E2|
00000D00: 24 AA 22 2C 22 AA 45 33  24 00 25 15 CC 0B 45 52  |$.",".E3$.%...ER|
00000D10: B2 C3 28 45 30 24 29 3A  8B 45 52 A7 45 52 B2 C5  |..(E0$):.ER.ER..|
00000D20: 28 45 30 24 29 00 2B 15  D6 0B 8E 00 56 15 80 0C  |(E0$).+.....V...|
00000D30: 8F 20 49 4E 53 54 52 55  43 54 20 54 4F 20 53 57  |. INSTRUCT TO SW|
00000D40: 41 50 20 54 4F 20 44 49  53 4B 20 47 49 56 45 4E  |AP TO DISK GIVEN|
00000D50: 20 49 4E 20 44 24 00 7A  15 8A 0C 8B 44 24 B2 22  | IN D$.z....D$."|
00000D60: 44 22 A7 53 31 24 B2 22  44 45 53 54 49 4E 41 54  |D".S1$."DESTINAT|
00000D70: 49 4F 4E 22 3A 89 33 32  33 30 00 8B 15 94 0C 53  |ION":.3230.....S|
00000D80: 31 24 B2 22 53 4F 55 52  43 45 22 00 B6 15 9E 0C  |1$."SOURCE".....|
00000D90: 99 22 11 49 4E 53 45 52  54 20 22 3B 53 31 24 3B  |.".INSERT ";S1$;|
00000DA0: 22 20 44 49 53 4B 2C 20  50 52 45 53 53 20 12 53  |" DISK, PRESS .S|
00000DB0: 50 41 43 45 92 22 00 FB  15 A2 0C 53 4F B2 35 34  |PACE.".....SO.54|
00000DC0: 32 37 32 3A 81 4C B2 4F  A4 32 34 3A 97 53 4F AA  |272:.L.O.24:.SO.|
00000DD0: 4C 2C 30 3A 82 3A 97 53  4F AA 31 2C 31 33 30 3A  |L,0:.:.SO.1,130:|
00000DE0: 97 53 4F AA 35 2C 39 3A  97 53 4F AA 31 35 2C 33  |.SO.5,9:.SO.15,3|
00000DF0: 30 3A 97 53 4F AA 32 34  2C 31 35 00 12 16 A3 0C  |0:.SO.24,15.....|
00000E00: 97 53 4F AA 34 2C 32 31  3A 81 51 51 B2 31 A4 34  |.SO.4,21:.QQ.1.4|
00000E10: 30 30 00 35 16 A8 0C A1  41 24 3A 8B 41 24 B3 B1  |00.5....A$:.A$..|
00000E20: 22 20 22 A7 82 51 51 3A  97 53 4F AA 34 2C 30 3A  |" "..QQ:.SO.4,0:|
00000E30: 89 33 32 33 35 00 41 16  AD 0C 97 53 4F AA 34 2C  |.3235.A....SO.4,|
00000E40: 30 00 51 16 B2 0C 9F 32  2C 38 2C 30 2C 22 24 30  |0.Q....2,8,0,"$0|
00000E50: 22 00 67 16 BC 0C 8D 33  30 30 30 3A 8B 45 52 B1  |".g....3000:.ER.|
00000E60: 30 A7 31 30 30 30 30 00  7D 16 C6 0C 81 4A B2 31  |0.10000.}....J.1|
00000E70: A4 32 36 3A A1 23 32 2C  41 24 3A 82 4A 00 99 16  |.26:.#2,A$:.J...|
00000E80: D0 0C A1 23 32 2C 41 24  3A A1 23 32 2C 42 24 3A  |...#2,A$:.#2,B$:|
00000E90: 49 52 24 B2 41 24 AA 42  24 00 BC 16 DA 0C A1 23  |IR$.A$.B$......#|
00000EA0: 32 2C 41 24 3A A1 23 32  2C 41 24 3A A1 23 32 2C  |2,A$:.#2,A$:.#2,|
00000EB0: 42 24 3A 44 52 24 B2 41  24 AA 42 24 00 C5 16 E4  |B$:DR$.A$.B$....|
00000EC0: 0C A0 32 3A 8E 00 D4 16  10 27 8F 20 44 52 4F 50  |..2:.....'. DROP|
00000ED0: 20 4F 55 54 00 F2 16 1A  27 97 35 35 2C C2 28 39  | OUT....'.55,.(9|
00000EE0: 39 38 29 3A 97 35 36 2C  C2 28 39 39 39 29 3A 9C  |98):.56,.(999):.|
00000EF0: 3A 90 00 34 17 98 3A 83  20 37 36 2C 36 36 2C 33  |:..4..:. 76,66,3|
00000F00: 2C 37 36 2C 39 31 2C 33  2C 31 36 32 2C 33 2C 33  |,76,91,3,162,3,3|
00000F10: 32 2C 31 39 38 2C 32 35  35 2C 31 36 30 2C 30 2C  |2,198,255,160,0,|
00000F20: 31 33 32 2C 33 2C 33 32  2C 32 30 37 2C 32 35 35  |132,3,32,207,255|
00000F30: 2C 31 34 35 00 79 17 A2  3A 83 20 33 2C 31 36 35  |,145.y..:. 3,165|
00000F40: 2C 31 34 34 2C 32 30 38  2C 33 2C 32 30 30 2C 32  |,144,208,3,200,2|
00000F50: 30 38 2C 32 34 34 2C 33  32 2C 32 30 34 2C 32 35  |08,244,32,204,25|
00000F60: 35 2C 39 36 2C 31 36 32  2C 33 2C 33 32 2C 32 30  |5,96,162,3,32,20|
00000F70: 31 2C 32 35 35 2C 31 36  30 00 C0 17 AC 3A 83 20  |1,255,160....:. |
00000F80: 30 2C 31 33 32 2C 33 2C  31 37 37 2C 33 2C 33 32  |0,132,3,177,3,32|
00000F90: 2C 32 31 30 2C 32 35 35  2C 31 36 35 2C 31 34 34  |,210,255,165,144|
00000FA0: 2C 32 30 38 2C 33 2C 32  30 30 2C 32 30 38 2C 32  |,208,3,200,208,2|
00000FB0: 34 34 2C 33 32 2C 32 30  34 2C 32 35 35 2C 39 36  |44,32,204,255,96|
00000FC0: 00 00 00                                          |...             |
.......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.".%.Z..".'GOTO10000' IF PROGRAM QUIT
S ABNORMALLY".B.D.."."N"BUFFERS AVAILABL
E".N.N..1,8,15.L.H.. *** MAIN FUNCTIONS 
****.V.R..1000.....D$."S":.3200:I2$.IR$.
.....DR$.."2A"..".ILLEGAL DOS 1.0 DISK."
:.10000......I2$.I1$..".SOURCE AND DESTI
NATION HAVE SAME ID CODE.":.10000......2
500.'...T.TS:S.0:NU.1:T1.T:S1.S.>....1,"
I0":.3,8,3,"#".V...."READING BLOCK #";..
."..BM%(T1,S1).0..2000:NU.NU.1:.NU.N.320
. .,.S1.S1.1:.S1.20.S1.0:T1.T1.1...6..T1
.TF.1.290...@..".".A.J. 3...T.D$."D":.32
00:.IR$..I1$..340...^..1,"I0":.3,8,3,"#"
...H.."WRITING BUFFER #";.$.R.NU.1:T1.T:
S1.S.N.|..BM%(T1,S1).0..2200:NU.NU.1:.NU
.N.410.N...S1.S1.1:.S1.20.S1.0:T1.T1.1.
....T1.TF.1.380......"."..... 3.....S.S1
.1:.S.20.S.0::T1.T1.1.....T.T1:.T.TF.500
...B.D$."S":.3200:.IR$..I2$.450...L.NU.1
:T1.T:S1.S:.270...... FINISHED XFERS....
. 1./....55,B(998):.56,B(999):..H...."..
BACKUP COMPLETE".X....1,8,0,"$0".P.&..#1
,A$:.A$..".".550.~.0..A$;:.610...:..#1,A
$:SS.ST:A.C(A$):.A.A.F(A$).F.D..#1,B$:SS
.ST:B.C(B$):.B.A.F(B$).R.N..SS.660...X..
A.1.B.1..630...B..#1,A$:.A$.""..:.570...
L..A$;:.610./.V..#1,A$:SS.ST:A.C(A$):.A.
A.F(A$).S....#1,B$:SS.ST:B.C(B$):.B.B.F(
B$).G...N.B.256.A:.N;:..N... 1.T........
.. HEADER DEST DISK......".INSERT DESTIN
ATION DISK TO BE FORMATTED"......"..DISK
 NAME...                ................
...";DN$......DN$." ".."...";:.1020.(...
.C(DN$).16..:.40.K...F.0:.J.1.C(DN$):S1$
.J(DN$,J,1).F.$..S1$." ".S1$.G(34).F.1.~
....J:.F.."...";:.1020.G.8..".UNIQUE DIS
K ID...                    .............
..........";I1$...B..I1$." ".."..";:.108
0...L..C(I1$)..2.."..";:.1080...V..1,"N0
:".DN$.",".I1$. .`..3000.4.J..ER..ER$:.1
0000.:.T...`.P.. READ BLOCK T1,S1 TO BUF
FER # NU.H.Z.C...~....1,"U1";3;0;T1;S1..
....3000:..ER.2060.....C.C.1:.C.3.2020..
....ER$:.J.(BB.NU).256.(BB.NU).256.255:.
J,.:.J:.2100......1,"B-P";3;0......NU..0
.."   ...";I("  ".D(NU),3);"...";.>. ..9
96,B(3):.997,B(4):.4,BB.NU:.MA.V.%..3,B(
996):.4,B(997).T.*..ST....ST..64..3000:.
2050.Z.4........ WRITE BLOCK T1,S1 FROM 
BUFFER # NU.....C...M....1,"B-A";0;T1;S1
:.1,"B-P";3;0......"   ...";I("  ".D(NU)
,3);"...";......996,B(3):.997,B(4):.4,BB
.NU:.MA.3.1.E..3,B(996):.4,B(997).D.J..S
T....ST..64..".IEEE WRITE ERROR"ST".":.1
0000.Z.T..1,"U2";3;0;T1;S1......3000:..E
R.2300.....C.C.1:.C.3.2260.O....".UNRECO
VERANBLE WRITE ERROR"ER$:.10000.U.......
D.. GET BAM TO BM%(T,S)...N.TS.1:TF.....
X..1,"I0":.3,8,3,"#".....S9.0.>....".TRA
CK #   BLOCKS TO XFER".^...."###########
#############".....NU.0:T1.18:S1.0:C0$.G
(.):.2000.....BY.4.....T%.(BY.4).4.1....
.."  ";T%;...(..B(BA.BY)....J...20:BM%(T
%,J)..:.:BY.BY.4:.2650...2.S.0. .<.BY.BY
.1:A0.B(BA.BY):.J...7:BM%(T%,S).A0.TA(J)
:S.S.1:../.F..S.22.2620.;.P.BY.BY.1.R.Z.
ES.21:.T%.17.ES.19.C.D..T%.24.ES.18.T.N.
.T%.30.ES.17...X..J.ES.24:BM%(T%,J)..1:.
.....SM..:.J...20:.BM%(T%,J)...SM.SM.1.O
....:. .12);SM:S9.S9.SM......SM...TS.T%.
TS.TS.1:.2730... ..SM....TF.T%......BY.1
43.2580..... 3.7...."START =";TS;" FINIS
H =";TF.^.H..".A TOTAL OF";S9;"BLOCKS TO
 XFER".Z.R.S8.90.25.(.650..980).S9.....S
7..(S8.60):."APPROX";S7":".(S8.S7.60);"F
OR COPY".......R.... READ ERR CH TO ER,E
R$...B..1,E0$,E1$,E2$,E3$:ER$.E0$.",".E1
$.",".E2$.",".E3$.%.L.ER.C(E0$):.ER.ER.E
(E0$).+.V...V.... INSTRUCT TO SWAP TO DI
SK GIVEN IN D$.Z....D$."D".S1$."DESTINAT
ION":.3230.....S1$."SOURCE"......".INSER
T ";S1$;" DISK, PRESS .SPACE.".....SO.54
272:.L.O.24:.SO.L,0:.:.SO.1,130:.SO.5,9:
.SO.15,30:.SO.24,15......SO.4,21:.QQ.1.4
00.5....A$:.A$.." "..QQ:.SO.4,0:.3235.A.
...SO.4,0.Q....2,8,0,"$0".G....3000:.ER.
0.10000.}.F..J.1.26:.#2,A$:.J...P..#2,A$
:.#2,B$:IR$.A$.B$...Z..#2,A$:.#2,A$:.#2,
B$:DR$.A$.B$.E... 2:..T..'. DROP OUT....
'.55,B(998):.56,B(999):.:..4..:. 76,66,3
,76,91,3,162,3,32,198,255,160,0,132,3,32
,207,255,145.Y..:. 3,165,144,208,3,200,2
08,244,32,204,255,96,162,3,32,201,255,16
0....:. 0,132,3,177,3,32,210,255,165,144
,208,3,200,208,244,32,204,255,96...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL