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

BACKUP BLOCK

FILE INFORMATION

FILENAME(S): BACKUP BLOCK

FILE TYPE(S): PRG

FILE SIZE: 3.9K

FIRST SEEN: 2025-12-02 23:21:47

APPEARS ON: 1 disk(s)

FILE HASH

9183526b1c81f35d97aefd81f76c1c669dd95f1d7564678922c5d7bd0f06e3dc

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
HILFSPROGRAMME BACKUP BLOCK PRG swasti, dinkel 22 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1A 08 01 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 33 08 02 00 8F  |**********.3....|
00000020: 20 2A 20 36 34 20 44 49  53 4B 20 42 41 43 4B 55  | * 64 DISK BACKU|
00000030: 50 20 2A 00 4C 08 03 00  8F 20 2A 2A 2A 2A 2A 2A  |P *.L.... ******|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 00 52 08 04  |************.R..|
00000050: 00 3A 00 6A 08 05 00 8F  20 41 55 53 20 43 4F 4D  |.:.j.... AUS COM|
00000060: 50 55 54 45 21 20 37 2F  38 33 00 70 08 06 00 3A  |PUTE! 7/83.p...:|
00000070: 00 76 08 07 00 3A 00 90  08 08 00 81 49 B2 38 32  |.v...:......I.82|
00000080: 38 A4 38 38 33 3A 87 41  3A 97 49 2C 41 3A 82 49  |8.883:.A:.I,A:.I|
00000090: 00 B8 08 0A 00 8F 22 44  3D 44 53 41 56 45 22 40  |......"D=DSAVE"@|
000000A0: 42 41 43 4B 32 22 2C 44  30 3A 3F 44 53 24 3A 43  |BACK2",D0:?DS$:C|
000000B0: 41 54 41 4C 4F 47 44 30  00 D0 08 14 00 42 42 B2  |ATALOGD0.....BB.|
000000C0: C2 28 34 34 29 AA 32 37  3A 97 39 39 35 2C 42 42  |.(44).27:.995,BB|
000000D0: 00 F9 08 1E 00 97 39 39  38 2C C2 28 35 35 29 3A  |......998,.(55):|
000000E0: 97 39 39 39 2C C2 28 35  36 29 3A 97 35 35 2C 30  |.999,.(56):.55,0|
000000F0: 3A 97 35 36 2C 42 42 3A  9C 00 07 09 28 00 42 42  |:.56,BB:....(.BB|
00000100: B2 C2 28 39 39 35 29 00  2A 09 32 00 4E B2 C2 28  |..(995).*.2.N..(|
00000110: 39 39 39 29 AB 42 42 AB  31 3A 42 41 B2 42 42 AC  |999).BB.1:BA.BB.|
00000120: 32 35 36 3A 4D 41 B2 38  32 38 00 3A 09 3C 00 86  |256:MA.828.:.<..|
00000130: 42 4D 25 28 33 35 2C 32  34 29 00 51 09 46 00 81  |BM%(35,24).Q.F..|
00000140: 4A B2 30 A4 37 3A 54 41  28 4A 29 B2 32 AE 4A 3A  |J.0.7:TA(J).2.J:|
00000150: 82 00 6A 09 50 00 99 22  93 1D 1D 1D 12 42 41 43  |..j.P..".....BAC|
00000160: 4B 55 50 20 31 35 34 31  92 22 00 9B 09 5A 00 99  |KUP 1541."...Z..|
00000170: 22 11 27 47 4F 54 4F 31  30 30 30 30 27 20 49 46  |".'GOTO10000' IF|
00000180: 20 50 52 4F 47 52 41 4D  20 51 55 49 54 45 53 20  | PROGRAM QUITES |
00000190: 41 42 4E 4F 52 4D 41 4C  4C 59 22 00 B8 09 64 00  |ABNORMALLY"...d.|
000001A0: 99 22 11 22 4E 22 42 55  46 46 45 52 53 20 41 56  |."."N"BUFFERS AV|
000001B0: 41 49 4C 41 42 4C 45 22  00 C4 09 6E 00 9F 31 2C  |AILABLE"...n..1,|
000001C0: 38 2C 31 35 00 E1 09 C8  00 8F 20 2A 2A 2A 20 4D  |8,15...... *** M|
000001D0: 41 49 4E 20 46 55 4E 43  54 49 4F 4E 53 20 2A 2A  |AIN FUNCTIONS **|
000001E0: 2A 00 EB 09 D2 00 8D 31  30 30 30 00 04 0A DC 00  |*......1000.....|
000001F0: 44 24 B2 22 53 22 3A 8D  33 32 30 30 3A 49 32 24  |D$."S":.3200:I2$|
00000200: B2 49 52 24 00 34 0A E6  00 8B 44 52 24 B3 B1 22  |.IR$.4....DR$.."|
00000210: 32 41 22 A7 99 22 12 49  4C 4C 45 47 41 4C 20 44  |2A"..".ILLEGAL D|
00000220: 4F 53 20 31 2E 30 20 44  49 53 4B 92 22 3A 89 31  |OS 1.0 DISK.":.1|
00000230: 30 30 30 30 00 76 0A F0  00 8B 49 32 24 B2 49 31  |0000.v....I2$.I1|
00000240: 24 A7 99 22 12 53 4F 55  52 43 45 20 41 4E 44 20  |$..".SOURCE AND |
00000250: 44 45 53 54 49 4E 41 54  49 4F 4E 20 48 41 56 45  |DESTINATION HAVE|
00000260: 20 53 41 4D 45 20 49 44  20 43 4F 44 45 92 22 3A  | SAME ID CODE.":|
00000270: 89 31 30 30 30 30 00 80  0A FA 00 8D 32 35 30 30  |.10000......2500|
00000280: 00 9C 0A 04 01 54 B2 54  53 3A 53 B2 30 3A 4E 55  |.....T.TS:S.0:NU|
00000290: B2 31 3A 54 31 B2 54 3A  53 31 B2 53 00 B3 0A 0E  |.1:T1.T:S1.S....|
000002A0: 01 98 31 2C 22 49 30 22  3A 9F 33 2C 38 2C 33 2C  |..1,"I0":.3,8,3,|
000002B0: 22 23 22 00 CB 0A 18 01  99 22 52 45 41 44 49 4E  |"#"......"READIN|
000002C0: 47 20 42 4C 4F 43 4B 20  23 22 3B 00 F5 0A 22 01  |G BLOCK #";...".|
000002D0: 8B 42 4D 25 28 54 31 2C  53 31 29 B2 30 A7 8D 32  |.BM%(T1,S1).0..2|
000002E0: 30 30 30 3A 4E 55 B2 4E  55 AA 31 3A 8B 4E 55 B1  |000:NU.NU.1:.NU.|
000002F0: 4E A7 33 32 30 00 15 0B  2C 01 53 31 B2 53 31 AA  |N.320...,.S1.S1.|
00000300: 31 3A 8B 53 31 B1 32 30  A7 53 31 B2 30 3A 54 31  |1:.S1.20.S1.0:T1|
00000310: B2 54 31 AA 31 00 26 0B  36 01 8B 54 31 B3 54 46  |.T1.1.&.6..T1.TF|
00000320: AA 31 A7 32 39 30 00 2F  0B 40 01 99 22 11 22 00  |.1.290./.@..".".|
00000330: 36 0B 4A 01 A0 33 00 56  0B 54 01 44 24 B2 22 44  |6.J..3.V.T.D$."D|
00000340: 22 3A 8D 33 32 30 30 3A  8B 49 52 24 B3 B1 49 31  |":.3200:.IR$..I1|
00000350: 24 A7 89 33 34 30 00 6D  0B 5E 01 98 31 2C 22 49  |$..340.m.^..1,"I|
00000360: 30 22 3A 9F 33 2C 38 2C  33 2C 22 23 22 00 86 0B  |0":.3,8,3,"#"...|
00000370: 68 01 99 22 57 52 49 54  49 4E 47 20 42 55 46 46  |h.."WRITING BUFF|
00000380: 45 52 20 23 22 3B 00 99  0B 72 01 4E 55 B2 31 3A  |ER #";...r.NU.1:|
00000390: 54 31 B2 54 3A 53 31 B2  53 00 C3 0B 7C 01 8B 42  |T1.T:S1.S...|..B|
000003A0: 4D 25 28 54 31 2C 53 31  29 B2 30 A7 8D 32 32 30  |M%(T1,S1).0..220|
000003B0: 30 3A 4E 55 B2 4E 55 AA  31 3A 8B 4E 55 B1 4E A7  |0:NU.NU.1:.NU.N.|
000003C0: 34 31 30 00 E3 0B 86 01  53 31 B2 53 31 AA 31 3A  |410.....S1.S1.1:|
000003D0: 8B 53 31 B1 32 30 A7 53  31 B2 30 3A 54 31 B2 54  |.S1.20.S1.0:T1.T|
000003E0: 31 AA 31 00 F4 0B 90 01  8B 54 31 B3 54 46 AA 31  |1.1......T1.TF.1|
000003F0: A7 33 38 30 00 FD 0B 9A  01 99 22 11 22 00 04 0C  |.380......"."...|
00000400: A4 01 A0 33 00 21 0C AE  01 53 B2 53 31 AA 31 3A  |...3.!...S.S1.1:|
00000410: 8B 53 B1 32 30 A7 53 B2  30 3A 54 31 B2 54 31 AA  |.S.20.S.0:T1.T1.|
00000420: 31 00 34 0C B8 01 54 B2  54 31 3A 8B 54 B1 54 46  |1.4...T.T1:.T.TF|
00000430: A7 35 30 30 00 53 0C C2  01 44 24 B2 22 53 22 3A  |.500.S...D$."S":|
00000440: 8D 33 32 30 30 3A 8B 49  52 24 B3 B1 49 32 24 A7  |.3200:.IR$..I2$.|
00000450: 34 35 30 00 6B 0C CC 01  4E 55 B2 31 3A 54 31 B2  |450.k...NU.1:T1.|
00000460: 54 3A 53 31 B2 53 3A 89  32 37 30 00 80 0C F4 01  |T:S1.S:.270.....|
00000470: 8F 20 46 49 4E 49 53 48  45 44 20 58 46 45 52 53  |. FINISHED XFERS|
00000480: 00 87 0C FE 01 A0 31 00  A3 0C 08 02 97 35 35 2C  |......1......55,|
00000490: C2 28 39 39 38 29 3A 97  35 36 2C C2 28 39 39 39  |.(998):.56,.(999|
000004A0: 29 3A 9C 00 BC 0C 12 02  99 22 11 11 42 41 43 4B  |):......."..BACK|
000004B0: 55 50 20 43 4F 4D 50 4C  45 54 45 22 00 CC 0C 1C  |UP COMPLETE"....|
000004C0: 02 9F 31 2C 38 2C 30 2C  22 24 30 22 00 E4 0C 26  |..1,8,0,"$0"...&|
000004D0: 02 A1 23 31 2C 41 24 3A  8B 41 24 B3 B1 22 12 22  |..#1,A$:.A$.."."|
000004E0: A7 35 35 30 00 F2 0C 30  02 99 41 24 3B 3A 89 36  |.550...0..A$;:.6|
000004F0: 31 30 00 16 0D 3A 02 A1  23 31 2C 41 24 3A 53 53  |10...:..#1,A$:SS|
00000500: B2 53 54 3A 41 B2 C3 28  41 24 29 3A 8B 41 A7 41  |.ST:A..(A$):.A.A|
00000510: B2 C6 28 41 24 29 00 3A  0D 44 02 A1 23 31 2C 42  |..(A$).:.D..#1,B|
00000520: 24 3A 53 53 B2 53 54 3A  42 B2 C3 28 42 24 29 3A  |$:SS.ST:B..(B$):|
00000530: 8B 42 A7 41 B2 C6 28 42  24 29 00 46 0D 4E 02 8B  |.B.A..(B$).F.N..|
00000540: 53 53 A7 36 36 30 00 58  0D 58 02 8B 41 B2 31 AF  |SS.660.X.X..A.1.|
00000550: 42 B2 31 A7 8D 36 33 30  00 71 0D 62 02 A1 23 31  |B.1..630.q.b..#1|
00000560: 2C 41 24 3A 8B 41 24 B2  22 22 A7 99 3A 89 35 37  |,A$:.A$.""..:.57|
00000570: 30 00 7F 0D 6C 02 99 41  24 3B 3A 89 36 31 30 00  |0...l..A$;:.610.|
00000580: A3 0D 76 02 A1 23 31 2C  41 24 3A 53 53 B2 53 54  |..v..#1,A$:SS.ST|
00000590: 3A 41 B2 C3 28 41 24 29  3A 8B 41 A7 41 B2 C6 28  |:A..(A$):.A.A..(|
000005A0: 41 24 29 00 C7 0D 80 02  A1 23 31 2C 42 24 3A 53  |A$)......#1,B$:S|
000005B0: 53 B2 53 54 3A 42 B2 C3  28 42 24 29 3A 8B 42 A7  |S.ST:B..(B$):.B.|
000005C0: 41 B2 C6 28 42 24 29 00  DB 0D 8A 02 4E B2 42 AC  |A..(B$).....N.B.|
000005D0: 32 35 36 AA 41 3A 99 4E  3B 3A 8E 00 E2 0D 94 02  |256.A:.N;:......|
000005E0: A0 31 00 E8 0D 9E 02 80  00 FF 0D E8 03 8F 20 48  |.1............ H|
000005F0: 45 41 44 45 52 20 44 45  53 54 20 44 49 53 4B 00  |EADER DEST DISK.|
00000600: 2F 0E F2 03 99 22 11 49  4E 53 45 52 54 20 44 45  |/....".INSERT DE|
00000610: 53 54 49 4E 41 54 49 4F  4E 20 44 49 53 4B 20 54  |STINATION DISK T|
00000620: 4F 20 42 45 20 46 4F 52  4D 41 54 54 45 44 22 00  |O BE FORMATTED".|
00000630: 6C 0E FC 03 85 22 11 11  44 49 53 4B 20 4E 41 4D  |l...."..DISK NAM|
00000640: 45 1D 1D 1D A0 20 20 20  20 20 20 20 20 20 20 20  |E....           |
00000650: 20 20 20 20 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |    ............|
00000660: 9D 9D 9D 9D 9D 9D 9D 22  3B 44 4E 24 00 87 0E 06  |.......";DN$....|
00000670: 04 8B 44 4E 24 B2 22 A0  22 A7 99 22 11 11 11 22  |..DN$.".".."..."|
00000680: 3B 3A 89 31 30 32 30 00  9C 0E 10 04 8B C3 28 44  |;:.1020.......(D|
00000690: 4E 24 29 B1 31 36 A7 9C  3A 89 34 30 00 BF 0E 1A  |N$).16..:.40....|
000006A0: 04 46 B2 30 3A 81 4A B2  31 A4 C3 28 44 4E 24 29  |.F.0:.J.1..(DN$)|
000006B0: 3A 53 31 24 B2 CA 28 44  4E 24 2C 4A 2C 31 29 00  |:S1$..(DN$,J,1).|
000006C0: DA 0E 24 04 8B 53 31 24  B2 22 A0 22 B0 53 31 24  |..$..S1$.".".S1$|
000006D0: B2 C7 28 33 34 29 A7 46  B2 31 00 F2 0E 2E 04 82  |..(34).F.1......|
000006E0: 4A 3A 8B 46 A7 99 22 11  11 11 22 3B 3A 89 31 30  |J:.F.."...";:.10|
000006F0: 32 30 00 3B 0F 38 04 85  22 11 55 4E 49 51 55 45  |20.;.8..".UNIQUE|
00000700: 20 44 49 53 4B 20 49 44  1D 1D 1D 20 20 20 20 20  | DISK ID...     |
00000710: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 9D  |               .|
00000720: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
00000730: 9D 9D 9D 9D 9D 9D 22 3B  49 31 24 00 55 0F 42 04  |......";I1$.U.B.|
00000740: 8B 49 31 24 B2 22 20 22  A7 99 22 11 11 22 3B 3A  |.I1$." ".."..";:|
00000750: 89 31 30 38 30 00 71 0F  4C 04 8B C3 28 49 31 24  |.1080.q.L...(I1$|
00000760: 29 B3 B1 32 A7 99 22 11  11 22 3B 3A 89 31 30 38  |)..2.."..";:.108|
00000770: 30 00 8A 0F 56 04 98 31  2C 22 4E 30 3A 22 AA 44  |0...V..1,"N0:".D|
00000780: 4E 24 AA 22 2C 22 AA 49  31 24 00 94 0F 60 04 8D  |N$.",".I1$...`..|
00000790: 33 30 30 30 00 A8 0F 6A  04 8B 45 52 A7 99 45 52  |3000...j..ER..ER|
000007A0: 24 3A 89 31 30 30 30 30  00 AE 0F 74 04 8E 00 D4  |$:.10000...t....|
000007B0: 0F D0 07 8F 20 52 45 41  44 20 42 4C 4F 43 4B 20  |.... READ BLOCK |
000007C0: 54 31 2C 53 31 20 54 4F  5D 42 55 46 46 45 52 20  |T1,S1 TO]BUFFER |
000007D0: 23 20 4E 55 00 DC 0F DA  07 43 B2 2E 00 F2 0F E4  |# NU.....C......|
000007E0: 07 98 31 2C 22 55 31 22  3B 33 3B 30 3B 54 31 3B  |..1,"U1";3;0;T1;|
000007F0: 53 31 00 06 10 EE 07 8D  33 30 30 30 3A 8B A8 45  |S1......3000:..E|
00000800: 52 A7 32 30 36 30 00 1A  10 F8 07 43 B2 43 AA 31  |R.2060.....C.C.1|
00000810: 3A 8B 43 B3 33 89 32 30  32 30 00 50 10 02 08 99  |:.C.3.2020.P....|
00000820: 45 52 24 3A 81 4A B2 28  42 42 AA 4E 55 29 AC 32  |ER$:.J.(BB.NU).2|
00000830: 35 36 A4 28 42 42 AA 4E  55 29 AC 32 35 36 AA 32  |56.(BB.NU).256.2|
00000840: 35 35 3A 97 4A 2C 2E 3A  82 4A 3A 89 32 31 30 30  |55:.J,.:.J:.2100|
00000850: 00 61 10 0C 08 98 31 2C  22 42 2D 50 22 3B 33 3B  |.a....1,"B-P";3;|
00000860: 30 00 8D 10 16 08 8B 4E  55 B3 B1 30 A7 99 22 20  |0......NU..0.." |
00000870: 20 20 9D 9D 9D 22 3B C9  28 22 20 20 22 AA C4 28  |  ...";.("  "..(|
00000880: 4E 55 29 2C 33 29 3B 22  9D 9D 9D 22 3B 00 B2 10  |NU),3);"...";...|
00000890: 20 08 97 39 39 36 2C C2  28 33 29 3A 97 39 39 37  | ..996,.(3):.997|
000008A0: 2C C2 28 34 29 3A 97 34  2C 42 42 AA 4E 55 3A 9E  |,.(4):.4,BB.NU:.|
000008B0: 4D 41 00 CA 10 25 08 97  33 2C C2 28 39 39 36 29  |MA...%..3,.(996)|
000008C0: 3A 97 34 2C C2 28 39 39  37 29 00 E8 10 2A 08 8B  |:.4,.(997)...*..|
000008D0: 53 54 B3 B1 2E AF 53 54  B3 B1 36 34 A7 8D 33 30  |ST....ST..64..30|
000008E0: 30 30 3A 89 32 30 35 30  00 EE 10 34 08 8E 00 17  |00:.2050...4....|
000008F0: 11 98 08 8F 20 57 52 49  54 45 20 42 4C 4F 43 4B  |.... WRITE BLOCK|
00000900: 20 54 31 2C 53 31 20 46  52 4F 4D 20 42 55 46 46  | T1,S1 FROM BUFF|
00000910: 45 52 20 23 20 4E 55 00  1F 11 A2 08 43 B2 2E 00  |ER # NU.....C...|
00000920: 41 11 AC 08 98 31 2C 22  42 2D 41 22 3B 30 3B 54  |A....1,"B-A";0;T|
00000930: 31 3B 53 31 3A 98 31 2C  22 42 2D 50 22 3B 33 3B  |1;S1:.1,"B-P";3;|
00000940: 30 00 66 11 B6 08 99 22  20 20 20 9D 9D 9D 22 3B  |0.f...."   ...";|
00000950: C9 28 22 20 20 22 AA C4  28 4E 55 29 2C 33 29 3B  |.("  "..(NU),3);|
00000960: 22 9D 9D 9D 22 3B 00 8D  11 C0 08 97 39 39 36 2C  |"...";......996,|
00000970: C2 28 33 29 3A 97 39 39  37 2C C2 28 34 29 3A 97  |.(3):.997,.(4):.|
00000980: 34 2C 42 42 AA 4E 55 3A  9E 4D 41 AA 33 00 A5 11  |4,BB.NU:.MA.3...|
00000990: C5 08 97 33 2C C2 28 39  39 36 29 3A 97 34 2C C2  |...3,.(996):.4,.|
000009A0: 28 39 39 37 29 00 D8 11  CA 08 8B 53 54 B3 B1 2E  |(997)......ST...|
000009B0: AF 53 54 B3 B1 36 34 A7  99 22 12 49 45 45 45 20  |.ST..64..".IEEE |
000009C0: 57 52 49 54 45 20 45 52  52 4F 52 22 53 54 22 92  |WRITE ERROR"ST".|
000009D0: 22 3A 89 31 30 30 30 30  00 EE 11 D4 08 98 31 2C  |":.10000......1,|
000009E0: 22 55 32 22 3B 33 3B 30  3B 54 31 3B 53 31 00 02  |"U2";3;0;T1;S1..|
000009F0: 12 DE 08 8D 33 30 30 30  3A 8B A8 45 52 A7 32 33  |....3000:..ER.23|
00000A00: 30 30 00 16 12 E8 08 43  B2 43 AA 31 3A 8B 43 B3  |00.....C.C.1:.C.|
00000A10: 33 A7 32 32 36 30 00 42  12 F2 08 99 22 12 55 4E  |3.2260.B....".UN|
00000A20: 52 45 43 4F 56 45 52 41  42 4C 45 20 57 52 49 54  |RECOVERABLE WRIT|
00000A30: 45 20 45 52 52 4F 52 22  45 52 24 3A 89 31 30 30  |E ERROR"ER$:.100|
00000A40: 30 30 00 48 12 FC 08 8E  00 62 12 C4 09 8F 20 47  |00.H.....b.... G|
00000A50: 45 54 20 42 41 4D 20 54  4F 20 42 4D 25 28 54 2C  |ET BAM TO BM%(T,|
00000A60: 53 29 00 70 12 CE 09 54  53 B2 31 3A 54 46 B2 2E  |S).p...TS.1:TF..|
00000A70: 00 87 12 D8 09 98 31 2C  22 49 30 22 3A 9F 33 2C  |......1,"I0":.3,|
00000A80: 38 2C 33 2C 22 23 22 00  90 12 E2 09 53 39 B2 30  |8,3,"#".....S9.0|
00000A90: 00 B1 12 EC 09 99 22 11  54 52 41 43 4B 20 23 20  |......".TRACK # |
00000AA0: 20 20 42 4C 4F 43 4B 53  20 54 4F 20 58 46 45 52  |  BLOCKS TO XFER|
00000AB0: 22 00 D1 12 F6 09 99 22  23 23 23 23 23 23 23 23  |"......"########|
00000AC0: 23 23 23 23 23 23 23 23  23 23 23 23 23 23 23 23  |################|
00000AD0: 22 00 F4 12 00 0A 4E 55  B2 30 3A 54 31 B2 31 38  |".....NU.0:T1.18|
00000AE0: 3A 53 31 B2 30 3A 43 30  24 B2 C7 28 2E 29 3A 8D  |:S1.0:C0$..(.):.|
00000AF0: 32 30 30 30 00 FD 12 0A  0A 42 59 B2 34 00 0F 13  |2000.....BY.4...|
00000B00: 14 0A 54 25 B2 28 42 59  AB 34 29 AD 34 AA 31 00  |..T%.(BY.4).4.1.|
00000B10: 1D 13 1E 0A 99 22 20 20  22 3B 54 25 3B 00 51 13  |....."  ";T%;.Q.|
00000B20: 28 0A 8B C2 28 42 41 AA  42 59 29 B2 2E A7 81 4A  |(...(BA.BY)....J|
00000B30: B2 2E A4 32 30 3A 42 4D  25 28 54 25 2C 4A 29 B2  |...20:BM%(T%,J).|
00000B40: 2E 3A 82 3A 42 59 B2 42  59 AA 34 3A 89 32 36 35  |.:.:BY.BY.4:.265|
00000B50: 30 00 59 13 32 0A 53 B2  30 00 93 13 3C 0A 42 59  |0.Y.2.S.0...<.BY|
00000B60: B2 42 59 AA 31 3A 41 30  B2 C2 28 42 41 AA 42 59  |.BY.1:A0..(BA.BY|
00000B70: 29 3A 81 4A B2 2E A4 37  3A 42 4D 25 28 54 25 2C  |):.J...7:BM%(T%,|
00000B80: 53 29 B2 41 30 AF 54 41  28 4A 29 3A 53 B2 53 AA  |S).A0.TA(J):S.S.|
00000B90: 31 3A 82 00 A2 13 46 0A  8B 53 B3 32 32 A7 32 36  |1:....F..S.22.26|
00000BA0: 32 30 00 AE 13 50 0A 42  59 B2 42 59 AA 31 00 C5  |20...P.BY.BY.1..|
00000BB0: 13 5A 0A 45 53 B2 32 31  3A 8B 54 25 B1 31 37 A7  |.Z.ES.21:.T%.17.|
00000BC0: 45 53 B2 31 39 00 D6 13  64 0A 8B 54 25 B1 32 34  |ES.19...d..T%.24|
00000BD0: A7 45 53 B2 31 38 00 E7  13 6E 0A 8B 54 25 B1 33  |.ES.18...n..T%.3|
00000BE0: 30 A7 45 53 B2 31 37 00  03 14 78 0A 81 4A B2 45  |0.ES.17...x..J.E|
00000BF0: 53 A4 32 34 3A 42 4D 25  28 54 25 2C 4A 29 B2 AB  |S.24:BM%(T%,J)..|
00000C00: 31 3A 82 00 29 14 82 0A  53 4D B2 2E 3A 81 4A B2  |1:..)...SM..:.J.|
00000C10: 2E A4 32 30 3A 8B 42 4D  25 28 54 25 2C 4A 29 B2  |..20:.BM%(T%,J).|
00000C20: 2E A7 53 4D B2 53 4D AA  31 00 42 14 8C 0A 82 3A  |..SM.SM.1.B....:|
00000C30: 99 20 A3 31 32 29 3B 53  4D 3A 53 39 B2 53 39 AA  |. .12);SM:S9.S9.|
00000C40: 53 4D 00 60 14 96 0A 8B  53 4D B2 2E AF 54 53 B2  |SM.`....SM...TS.|
00000C50: 54 25 A7 54 53 B2 54 53  AA 31 3A 89 32 37 33 30  |T%.TS.TS.1:.2730|
00000C60: 00 71 14 A0 0A 8B 53 4D  B3 B1 2E A7 54 46 B2 54  |.q....SM....TF.T|
00000C70: 25 00 82 14 AA 0A 8B 42  59 B3 31 34 33 A7 32 35  |%......BY.143.25|
00000C80: 38 30 00 89 14 B4 0A A0  33 00 AA 14 BE 0A 99 22  |80......3......"|
00000C90: 53 54 41 52 54 20 3D 22  3B 54 53 3B 22 20 46 49  |START =";TS;" FI|
00000CA0: 4E 49 53 48 20 3D 22 3B  54 46 00 D1 14 C8 0A 99  |NISH =";TF......|
00000CB0: 22 11 41 20 54 4F 54 41  4C 20 4F 46 22 3B 53 39  |".A TOTAL OF";S9|
00000CC0: 3B 22 42 4C 4F 43 4B 53  20 54 4F 20 58 46 45 52  |;"BLOCKS TO XFER|
00000CD0: 22 00 ED 14 D2 0A 53 38  B2 39 30 AA 32 35 AA 28  |".....S8.90.25.(|
00000CE0: 2E 36 35 30 AA 2E 39 38  30 29 AC 53 39 00 23 15  |.650..980).S9.#.|
00000CF0: DC 0A 53 37 B2 B5 28 53  38 AD 36 30 29 3A 99 22  |..S7..(S8.60):."|
00000D00: 41 50 50 52 4F 58 22 3B  53 37 22 3A 22 B5 28 53  |APPROX";S7":".(S|
00000D10: 38 AB 53 37 AC 36 30 29  3B 22 46 4F 52 20 43 4F  |8.S7.60);"FOR CO|
00000D20: 50 59 22 00 29 15 E6 0A  8E 00 45 15 B8 0B 8F 20  |PY".).....E.... |
00000D30: 52 45 41 44 20 45 52 52  20 43 48 20 54 4F 20 45  |READ ERR CH TO E|
00000D40: 52 2C 45 52 24 00 7C 15  C2 0B 84 31 2C 45 30 24  |R,ER$.|....1,E0$|
00000D50: 2C 45 31 24 2C 45 32 24  2C 45 33 24 3A 45 52 24  |,E1$,E2$,E3$:ER$|
00000D60: B2 45 30 24 AA 22 2C 22  AA 45 31 24 AA 22 2C 22  |.E0$.",".E1$.","|
00000D70: AA 45 32 24 AA 22 2C 22  AA 45 33 24 00 98 15 CC  |.E2$.",".E3$....|
00000D80: 0B 45 52 B2 C3 28 45 30  24 29 3A 8B 45 52 A7 45  |.ER..(E0$):.ER.E|
00000D90: 52 B2 C5 28 45 30 24 29  00 9E 15 D6 0B 8E 00 C9  |R..(E0$)........|
00000DA0: 15 80 0C 8F 20 49 4E 53  54 52 55 43 54 20 54 4F  |.... INSTRUCT TO|
00000DB0: 20 53 57 41 50 20 54 4F  20 44 49 53 4B 20 47 49  | SWAP TO DISK GI|
00000DC0: 56 45 4E 20 49 4E 20 44  24 00 ED 15 8A 0C 8B 44  |VEN IN D$......D|
00000DD0: 24 B2 22 44 22 A7 53 31  24 B2 22 44 45 53 54 49  |$."D".S1$."DESTI|
00000DE0: 4E 41 54 49 4F 4E 22 3A  89 33 32 33 30 00 FE 15  |NATION":.3230...|
00000DF0: 94 0C 53 31 24 B2 22 53  4F 55 52 43 45 22 00 29  |..S1$."SOURCE".)|
00000E00: 16 9E 0C 99 22 11 49 4E  53 45 52 54 20 22 3B 53  |....".INSERT ";S|
00000E10: 31 24 3B 22 20 44 49 53  4B 2C 20 50 52 45 53 53  |1$;" DISK, PRESS|
00000E20: 20 12 53 50 41 43 45 92  22 00 3F 16 A8 0C A1 41  | .SPACE.".?....A|
00000E30: 24 3A 8B 41 24 B3 B1 22  20 22 A7 33 32 34 30 00  |$:.A$.." ".3240.|
00000E40: 4F 16 B2 0C 9F 32 2C 38  2C 30 2C 22 24 30 22 00  |O....2,8,0,"$0".|
00000E50: 65 16 BC 0C 8D 33 30 30  30 3A 8B 45 52 B1 30 A7  |e....3000:.ER.0.|
00000E60: 31 30 30 30 30 00 7B 16  C6 0C 81 4A B2 31 A4 32  |10000.{....J.1.2|
00000E70: 36 3A A1 23 32 2C 41 24  3A 82 4A 00 97 16 D0 0C  |6:.#2,A$:.J.....|
00000E80: A1 23 32 2C 41 24 3A A1  23 32 2C 42 24 3A 49 52  |.#2,A$:.#2,B$:IR|
00000E90: 24 B2 41 24 AA 42 24 00  BA 16 DA 0C A1 23 32 2C  |$.A$.B$......#2,|
00000EA0: 41 24 3A A1 23 32 2C 41  24 3A A1 23 32 2C 42 24  |A$:.#2,A$:.#2,B$|
00000EB0: 3A 44 52 24 B2 41 24 AA  42 24 00 C3 16 E4 0C A0  |:DR$.A$.B$......|
00000EC0: 32 3A 8E 00 D3 16 10 27  8F 20 20 44 52 4F 50 20  |2:.....'.  DROP |
00000ED0: 4F 55 54 00 F1 16 1A 27  97 35 35 2C C2 28 39 39  |OUT....'.55,.(99|
00000EE0: 38 29 3A 97 35 36 2C C2  28 39 39 39 29 3A 9C 3A  |8):.56,.(999):.:|
00000EF0: 90 00 33 17 98 3A 83 20  37 36 2C 36 36 2C 33 2C  |..3..:. 76,66,3,|
00000F00: 37 36 2C 39 31 2C 33 2C  31 36 32 2C 33 2C 33 32  |76,91,3,162,3,32|
00000F10: 2C 31 39 38 2C 32 35 35  2C 31 36 30 2C 30 2C 31  |,198,255,160,0,1|
00000F20: 33 32 2C 33 2C 33 32 2C  32 30 37 2C 32 35 35 2C  |32,3,32,207,255,|
00000F30: 31 34 35 00 78 17 A2 3A  83 20 33 2C 31 36 35 2C  |145.x..:. 3,165,|
00000F40: 31 34 34 2C 32 30 38 2C  33 2C 32 30 30 2C 32 30  |144,208,3,200,20|
00000F50: 38 2C 32 34 34 2C 33 32  2C 32 30 34 2C 32 35 35  |8,244,32,204,255|
00000F60: 2C 39 36 2C 31 36 32 2C  33 2C 33 32 2C 32 30 31  |,96,162,3,32,201|
00000F70: 2C 32 35 35 2C 31 36 30  00 BF 17 AC 3A 83 20 30  |,255,160....:. 0|
00000F80: 2C 31 33 32 2C 33 2C 31  37 37 2C 33 2C 33 32 2C  |,132,3,177,3,32,|
00000F90: 32 31 30 2C 32 35 35 2C  31 36 35 2C 31 34 34 2C  |210,255,165,144,|
00000FA0: 32 30 38 2C 33 2C 32 30  30 2C 32 30 38 2C 32 34  |208,3,200,208,24|
00000FB0: 34 2C 33 32 2C 32 30 34  2C 32 35 35 2C 39 36 00  |4,32,204,255,96.|
00000FC0: 00 00 48 00 FF                                    |..H..           |
....... ******************.3.... * 64 DI
SK BACKUP *.L.... ******************.R..
.:.J.... AUS COMPUTE! 7/83.P...:.V...:..
....I.828.883:.A:.I,A:.I......"D=DSAVE"@
BACK2",D0:?DS$:CATALOGD0.P...BB.B(44).27
:.995,BB......998,B(55):.999,B(56):.55,0
:.56,BB:....(.BB.B(995).*.2.N.B(999).BB.
1:BA.BB.256:MA.828.:.<..BM%(35,24).Q.F..
J.0.7:TA(J).2.J:..J.P..".....BACKUP 1541
."...Z..".'GOTO10000' IF PROGRAM QUITES 
ABNORMALLY"...D.."."N"BUFFERS AVAILABLE"
.D.N..1,8,15...H.. *** MAIN FUNCTIONS **
*...R..1000.....D$."S":.3200:I2$.IR$.4..
..DR$.."2A"..".ILLEGAL DOS 1.0 DISK.":.1
0000.V....I2$.I1$..".SOURCE AND DESTINAT
ION HAVE SAME ID CODE.":.10000......2500
.....T.TS:S.0:NU.1:T1.T:S1.S......1,"I0"
:.3,8,3,"#".K...."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./.@..".".6.J. 3.V.T.D$."D":.3200:
.IR$..I1$..340.M.^..1,"I0":.3,8,3,"#"...
H.."WRITING BUFFER #";...R.NU.1:T1.T:S1.
S.C.|..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.!...S.S1.1:
.S.20.S.0:T1.T1.1.4...T.T1:.T.TF.500.S.B
.D$."S":.3200:.IR$..I2$.450.K.L.NU.1:T1.
T:S1.S:.270...... FINISHED XFERS..... 1.
.....55,B(998):.56,B(999):......."..BACK
UP COMPLETE".L....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$).F.N..SS.660.X.X..A.1.
B.1..630.Q.B..#1,A$:.A$.""..:.570..L..A
$;:.610...V..#1,A$:SS.ST:A.C(A$):.A.A.F(
A$).G....#1,B$:SS.ST:B.C(B$):.B.A.F(B$).
....N.B.256.A:.N;:...... 1............ H
EADER DEST DISK./....".INSERT DESTINATIO
N DISK TO BE FORMATTED".L...."..DISK NAM
E...                ..................."
;DN$......DN$." ".."...";:.1020......C(D
N$).16..:.40.....F.0:.J.1.C(DN$):S1$.J(D
N$,J,1).Z.$..S1$." ".S1$.G(34).F.1......
J:.F.."...";:.1020.;.8..".UNIQUE DISK ID
...                    .................
......";I1$.U.B..I1$." ".."..";:.1080.Q.
L..C(I1$)..2.."..";:.1080...V..1,"N0:".D
N$.",".I1$...`..3000...J..ER..ER$:.10000
...T...T.P.. READ BLOCK T1,S1 TO]BUFFER 
# NU...Z.C........1,"U1";3;0;T1;S1......
3000:..ER.2060.....C.C.1:.C.3.2020.P....
ER$:.J.(BB.NU).256.(BB.NU).256.255:.J,.:
.J:.2100.A....1,"B-P";3;0......NU..0.." 
  ...";I("  ".D(NU),3);"...";... ..996,B
(3):.997,B(4):.4,BB.NU:.MA.J.%..3,B(996)
:.4,B(997)...*..ST....ST..64..3000:.2050
...4........ WRITE BLOCK T1,S1 FROM BUFF
ER # NU.....C...A....1,"B-A";0;T1;S1:.1,
"B-P";3;0.F...."   ...";I("  ".D(NU),3);
"...";......996,B(3):.997,B(4):.4,BB.NU:
.MA.3...E..3,B(996):.4,B(997).X.J..ST...
.ST..64..".IEEE WRITE ERROR"ST".":.10000
...T..1,"U2";3;0;T1;S1......3000:..ER.23
00.....C.C.1:.C.3.2260.B....".UNRECOVERA
BLE WRITE ERROR"ER$:.10000.H.....B.D.. G
ET BAM TO BM%(T,S).P.N.TS.1:TF.....X..1,
"I0":.3,8,3,"#".....S9.0......".TRACK # 
  BLOCKS TO XFER".Q...."################
########".....NU.0:T1.18:S1.0:C0$.G(.):.
2000.....BY.4.....T%.(BY.4).4.1......"  
";T%;.Q.(..B(BA.BY)....J...20:BM%(T%,J).
.:.:BY.BY.4:.2650.Y.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.E.Z.ES.21
:.T%.17.ES.19.V.D..T%.24.ES.18...N..T%.3
0.ES.17...X..J.ES.24:BM%(T%,J)..1:..)...
SM..:.J...20:.BM%(T%,J)...SM.SM.1.B....:
. .12);SM:S9.S9.SM.`....SM...TS.T%.TS.TS
.1:.2730.Q. ..SM....TF.T%......BY.143.25
80..... 3......"START =";TS;" FINISH =";
TF.Q.H..".A TOTAL OF";S9;"BLOCKS TO XFER
"...R.S8.90.25.(.650..980).S9.#...S7..(S
8.60):."APPROX";S7":".(S8.S7.60);"FOR CO
PY".).....E.... READ ERR CH TO ER,ER$.|.
B..1,E0$,E1$,E2$,E3$:ER$.E0$.",".E1$.","
.E2$.",".E3$...L.ER.C(E0$):.ER.ER.E(E0$)
...V...I.... INSTRUCT TO SWAP TO DISK GI
VEN IN D$......D$."D".S1$."DESTINATION":
.3230.....S1$."SOURCE".)....".INSERT ";S
1$;" DISK, PRESS .SPACE.".?....A$:.A$.."
 ".3240.O....2,8,0,"$0".E....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$.C... 2:..S..'.  DROP OUT....'
.55,B(998):.56,B(999):.:..3..:. 76,66,3,
76,91,3,162,3,32,198,255,160,0,132,3,32,
207,255,145.X..:. 3,165,144,208,3,200,20
8,244,32,204,255,96,162,3,32,201,255,160
....:. 0,132,3,177,3,32,210,255,165,144,
208,3,200,208,244,32,204,255,96...H..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL