DISK 1541 BACKUP

00000000: 01 12 1B 12 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 38 12 0A 00  |:.A:.I,A:.I.8...|
00000020: 8F 2A 2A 2A 20 27 43 4F  4D 50 55 54 45 27 20 4A  |.*** 'COMPUTE' J|
00000030: 55 4C 59 20 31 39 38 33  00 5C 12 0C 00 8F 2A 2A  |ULY 1983.\....**|
00000040: 2A 20 20 4D 4F 44 49 46  49 43 45 52 45 54 20 41  |*  MODIFICERET A|
00000050: 46 20 41 2E 20 4E 45 4C  53 53 4F 4E 00 74 12 14  |F A. NELSSON.t..|
00000060: 00 42 42 B2 C2 28 34 34  29 AA 32 37 3A 97 39 39  |.BB..(44).27:.99|
00000070: 35 2C 42 42 00 9D 12 1E  00 97 39 39 38 2C C2 28  |5,BB......998,.(|
00000080: 35 35 29 3A 97 39 39 39  2C C2 28 35 36 29 3A 97  |55):.999,.(56):.|
00000090: 35 35 2C 30 3A 97 35 36  2C 42 42 3A 9C 00 AB 12  |55,0:.56,BB:....|
000000A0: 28 00 42 42 B2 C2 28 39  39 35 29 00 CE 12 32 00  |(.BB..(995)...2.|
000000B0: 4E B2 C2 28 39 39 39 29  AB 42 42 AB 31 3A 42 41  |N..(999).BB.1:BA|
000000C0: B2 42 42 AC 32 35 36 3A  4D 41 B2 38 32 38 00 DE  |.BB.256:MA.828..|
000000D0: 12 3C 00 86 42 4D 25 28  33 35 2C 32 34 29 00 F5  |.<..BM%(35,24)..|
000000E0: 12 46 00 81 4A B2 30 A4  37 3A 54 41 28 4A 29 B2  |.F..J.0.7:TA(J).|
000000F0: 32 AE 4A 3A 82 00 0E 13  50 00 99 22 93 1D 1D 1D  |2.J:....P.."....|
00000100: 12 42 41 43 4B 55 50 20  31 35 34 31 92 22 00 3E  |.BACKUP 1541.".>|
00000110: 13 5A 00 99 22 11 27 47  4F 54 4F 20 31 30 30 30  |.Z..".'GOTO 1000|
00000120: 30 20 49 46 20 50 52 4F  47 52 41 4D 20 51 55 49  |0 IF PROGRAM QUI|
00000130: 54 53 20 41 42 4E 4F 52  4D 41 4C 4C 59 22 00 5C  |TS ABNORMALLY".\|
00000140: 13 64 00 99 22 11 22 4E  22 20 42 55 46 46 45 52  |.d.."."N" BUFFER|
00000150: 53 20 41 56 41 49 4C 41  42 4C 45 22 00 68 13 6E  |S AVAILABLE".h.n|
00000160: 00 9F 31 2C 38 2C 31 35  00 6E 13 C8 00 8F 00 78  |..1,8,15.n.....x|
00000170: 13 D2 00 8D 31 30 30 30  00 91 13 DC 00 44 24 B2  |....1000.....D$.|
00000180: 22 53 22 3A 8D 33 32 30  30 3A 49 32 24 B2 49 52  |"S":.3200:I2$.IR|
00000190: 24 00 C2 13 E6 00 8B 44  52 24 B3 B1 22 32 41 22  |$......DR$.."2A"|
000001A0: A7 20 99 22 12 49 4C 4C  45 47 41 4C 20 44 4F 53  |. .".ILLEGAL DOS|
000001B0: 20 31 2E 30 20 44 49 53  4B 92 22 3A 89 31 30 30  | 1.0 DISK.":.100|
000001C0: 30 30 00 04 14 F0 00 8B  49 32 24 B2 49 31 24 A7  |00......I2$.I1$.|
000001D0: 99 22 12 53 4F 55 52 43  45 20 41 4E 44 20 44 49  |.".SOURCE AND DI|
000001E0: 53 54 49 4E 41 54 49 4F  4E 20 48 41 56 45 20 53  |STINATION HAVE S|
000001F0: 41 4D 45 20 49 44 20 43  4F 44 45 92 22 3A 89 31  |AME ID CODE.":.1|
00000200: 30 30 30 30 00 0E 14 FA  00 8D 32 35 30 30 00 2A  |0000......2500.*|
00000210: 14 04 01 54 B2 54 53 3A  53 B2 30 3A 4E 55 B2 31  |...T.TS:S.0:NU.1|
00000220: 3A 54 31 B2 54 3A 53 31  B2 53 00 41 14 0E 01 98  |:T1.T:S1.S.A....|
00000230: 31 2C 22 49 30 22 3A 9F  33 2C 38 2C 33 2C 22 23  |1,"I0":.3,8,3,"#|
00000240: 22 00 59 14 18 01 99 22  52 45 41 44 49 4E 47 20  |".Y...."READING |
00000250: 42 4C 4F 43 4B 20 23 22  3B 00 83 14 22 01 8B 42  |BLOCK #";..."..B|
00000260: 4D 25 28 54 31 2C 53 31  29 B2 30 A7 8D 32 30 30  |M%(T1,S1).0..200|
00000270: 30 3A 4E 55 B2 4E 55 AA  31 3A 8B 4E 55 B1 4E A7  |0:NU.NU.1:.NU.N.|
00000280: 33 32 30 00 A3 14 2C 01  53 31 B2 53 31 AA 31 3A  |320...,.S1.S1.1:|
00000290: 8B 53 31 B1 32 30 A7 53  31 B2 30 3A 54 31 B2 54  |.S1.20.S1.0:T1.T|
000002A0: 31 AA 31 00 B4 14 36 01  8B 54 31 B3 54 46 AA 31  |1.1...6..T1.TF.1|
000002B0: A7 32 39 30 00 BD 14 40  01 99 22 11 22 00 C4 14  |.290...@.."."...|
000002C0: 4A 01 A0 33 00 E4 14 54  01 44 24 B2 22 44 22 3A  |J..3...T.D$."D":|
000002D0: 8D 33 32 30 30 3A 8B 49  52 24 B3 B1 49 31 24 A7  |.3200:.IR$..I1$.|
000002E0: 89 33 34 30 00 FB 14 5E  01 98 31 2C 22 49 30 22  |.340...^..1,"I0"|
000002F0: 3A 9F 33 2C 38 2C 33 2C  22 23 22 00 14 15 68 01  |:.3,8,3,"#"...h.|
00000300: 99 22 57 52 49 54 49 4E  47 20 42 55 46 46 45 52  |."WRITING BUFFER|
00000310: 20 23 22 3B 00 27 15 72  01 4E 55 B2 31 3A 54 31  | #";.'.r.NU.1:T1|
00000320: B2 54 3A 53 31 B2 53 00  51 15 7C 01 8B 42 4D 25  |.T:S1.S.Q.|..BM%|
00000330: 28 54 31 2C 53 31 29 B2  30 A7 8D 32 32 30 30 3A  |(T1,S1).0..2200:|
00000340: 4E 55 B2 4E 55 AA 31 3A  8B 4E 55 B1 4E A7 34 31  |NU.NU.1:.NU.N.41|
00000350: 30 00 71 15 86 01 53 31  B2 53 31 AA 31 3A 8B 53  |0.q...S1.S1.1:.S|
00000360: 31 B1 32 30 A7 53 31 B2  30 3A 54 31 B2 54 31 AA  |1.20.S1.0:T1.T1.|
00000370: 31 00 82 15 90 01 8B 54  31 B3 54 46 AA 31 A7 33  |1......T1.TF.1.3|
00000380: 38 30 00 8B 15 9A 01 99  22 11 22 00 92 15 A4 01  |80......".".....|
00000390: A0 33 00 AF 15 AE 01 53  B2 53 31 AA 31 3A 8B 53  |.3.....S.S1.1:.S|
000003A0: B1 32 30 A7 53 B2 30 3A  54 31 B2 54 31 AA 31 00  |.20.S.0:T1.T1.1.|
000003B0: C2 15 B8 01 54 B2 54 31  3A 8B 54 B1 54 46 A7 35  |....T.T1:.T.TF.5|
000003C0: 30 30 00 E1 15 C2 01 44  24 B2 22 53 22 3A 8D 33  |00.....D$."S":.3|
000003D0: 32 30 30 3A 8B 49 52 24  B3 B1 49 32 24 A7 34 35  |200:.IR$..I2$.45|
000003E0: 30 00 F9 15 CC 01 4E 55  B2 31 3A 54 31 B2 54 3A  |0.....NU.1:T1.T:|
000003F0: 53 31 B2 53 3A 89 32 37  30 00 0E 16 F4 01 8F 20  |S1.S:.270...... |
00000400: 46 49 4E 49 53 48 45 44  20 58 46 45 52 53 00 15  |FINISHED XFERS..|
00000410: 16 FE 01 A0 31 00 31 16  08 02 97 35 35 2C C2 28  |....1.1....55,.(|
00000420: 39 39 38 29 3A 97 35 36  2C C2 28 39 39 39 29 3A  |998):.56,.(999):|
00000430: 9C 00 4A 16 12 02 99 22  11 11 42 41 43 4B 55 50  |..J...."..BACKUP|
00000440: 20 43 4F 4D 50 4C 45 54  45 22 00 5A 16 1C 02 9F  | COMPLETE".Z....|
00000450: 31 2C 38 2C 30 2C 22 24  30 22 00 72 16 26 02 A1  |1,8,0,"$0".r.&..|
00000460: 23 31 2C 41 24 3A 8B 41  24 B3 B1 22 12 22 A7 35  |#1,A$:.A$..".".5|
00000470: 35 30 00 80 16 30 02 99  41 24 3B 3A 89 36 31 30  |50...0..A$;:.610|
00000480: 00 A4 16 3A 02 A1 23 31  2C 41 24 3A 53 53 B2 53  |...:..#1,A$:SS.S|
00000490: 54 3A 41 B2 C3 28 41 24  29 3A 8B 41 A7 41 B2 C6  |T:A..(A$):.A.A..|
000004A0: 28 41 24 29 00 C8 16 44  02 A1 23 31 2C 42 24 3A  |(A$)...D..#1,B$:|
000004B0: 53 53 B2 53 54 3A 42 B2  C3 28 42 24 29 3A 8B 42  |SS.ST:B..(B$):.B|
000004C0: A7 41 B2 C6 28 42 24 29  00 D4 16 4E 02 8B 53 53  |.A..(B$)...N..SS|
000004D0: A7 36 36 30 00 E6 16 58  02 8B 41 B2 31 AF 42 B2  |.660...X..A.1.B.|
000004E0: 31 A7 8D 36 33 30 00 FF  16 62 02 A1 23 31 2C 41  |1..630...b..#1,A|
000004F0: 24 3A 8B 41 24 B2 22 22  A7 99 3A 89 35 37 30 00  |$:.A$.""..:.570.|
00000500: 0D 17 6C 02 99 41 24 3B  3A 89 36 31 30 00 31 17  |..l..A$;:.610.1.|
00000510: 76 02 A1 23 31 2C 41 24  3A 53 53 B2 53 54 3A 41  |v..#1,A$:SS.ST:A|
00000520: B2 C3 28 41 24 29 3A 8B  41 A7 41 B2 C6 28 41 24  |..(A$):.A.A..(A$|
00000530: 29 00 55 17 80 02 A1 23  31 2C 42 24 3A 53 53 B2  |).U....#1,B$:SS.|
00000540: 53 54 3A 42 B2 C3 28 42  24 29 3A 8B 42 A7 42 B2  |ST:B..(B$):.B.B.|
00000550: C6 28 42 24 29 00 69 17  8A 02 4E B2 42 AC 32 35  |.(B$).i...N.B.25|
00000560: 36 AA 41 3A 99 4E 3B 3A  8E 00 70 17 94 02 A0 31  |6.A:.N;:..p....1|
00000570: 00 76 17 9E 02 80 00 7C  17 E8 03 8F 00 AC 17 F2  |.v.....|........|
00000580: 03 99 22 11 49 4E 53 45  52 54 20 44 45 53 54 49  |..".INSERT DESTI|
00000590: 4E 41 54 49 4F 4E 20 44  49 53 4B 20 54 4F 20 42  |NATION DISK TO B|
000005A0: 45 20 46 4F 52 4D 41 54  54 45 44 22 00 C3 17 FC  |E FORMATTED"....|
000005B0: 03 85 22 11 11 44 49 53  4B 20 4E 41 4D 45 22 3B  |.."..DISK NAME";|
000005C0: 44 4E 24 00 02 18 06 04  8B C3 28 44 4E 24 29 B2  |DN$.......(DN$).|
000005D0: 30 A7 44 4E 24 B2 22 31  35 34 31 20 42 41 43 4B  |0.DN$."1541 BACK|
000005E0: 55 50 20 43 4F 50 59 22  3A 99 22 91 1D 1D 1D 1D  |UP COPY":.".....|
000005F0: 1D 1D 1D 1D 1D 1D 1D 22  3B 44 4E 24 3A 89 31 30  |.......";DN$:.10|
00000600: 38 30 00 17 18 10 04 8B  C3 28 44 4E 24 29 B1 31  |80.......(DN$).1|
00000610: 36 A7 9C 3A 89 34 30 00  3A 18 1A 04 46 B2 30 3A  |6..:.40.:...F.0:|
00000620: 81 4A B2 31 A4 C3 28 44  4E 24 29 3A 53 31 24 B2  |.J.1..(DN$):S1$.|
00000630: CA 28 44 4E 24 2C 4A 2C  31 29 00 55 18 24 04 8B  |.(DN$,J,1).U.$..|
00000640: 53 31 24 B2 22 20 22 B0  53 31 24 B2 C7 28 33 34  |S1$." ".S1$..(34|
00000650: 29 A7 46 B2 31 00 6D 18  2E 04 82 4A 3A 8B 46 A7  |).F.1.m....J:.F.|
00000660: 99 22 91 91 91 22 3B 3A  89 31 30 32 30 00 88 18  |."...";:.1020...|
00000670: 38 04 85 22 11 55 4E 49  51 55 45 20 44 49 53 4B  |8..".UNIQUE DISK|
00000680: 20 49 44 22 3B 49 31 24  00 A2 18 42 04 8B 49 31  | ID";I1$...B..I1|
00000690: 24 B2 22 20 22 A7 99 22  91 91 22 3B 3A 89 31 30  |$." ".."..";:.10|
000006A0: 38 30 00 BE 18 4C 04 8B  C3 28 49 31 24 29 B3 B1  |80...L...(I1$)..|
000006B0: 32 A7 99 22 91 91 22 3B  3A 89 31 30 38 30 00 D7  |2.."..";:.1080..|
000006C0: 18 56 04 98 31 2C 22 4E  30 3A 22 AA 44 4E 24 AA  |.V..1,"N0:".DN$.|
000006D0: 22 2C 22 AA 49 31 24 00  E1 18 60 04 8D 33 30 30  |",".I1$...`..300|
000006E0: 30 00 F8 18 6A 04 8B 45  52 A7 99 22 11 22 45 52  |0...j..ER.."."ER|
000006F0: 24 3A 89 31 30 30 30 30  00 FE 18 74 04 8E 00 04  |$:.10000...t....|
00000700: 19 D0 07 8F 00 1A 19 E4  07 98 31 2C 22 55 31 22  |..........1,"U1"|
00000710: 3B 33 3B 30 3B 54 31 3B  53 31 00 2E 19 EE 07 8D  |;3;0;T1;S1......|
00000720: 33 30 30 30 3A 8B A8 45  52 A7 32 30 36 30 00 42  |3000:..ER.2060.B|
00000730: 19 F8 07 43 B2 43 AA 31  3A 8B 43 B3 33 89 32 30  |...C.C.1:.C.3.20|
00000740: 32 30 00 78 19 02 08 99  45 52 24 3A 81 4A B2 28  |20.x....ER$:.J.(|
00000750: 42 42 AA 4E 55 29 AC 32  35 36 A4 28 42 42 AA 4E  |BB.NU).256.(BB.N|
00000760: 55 29 AC 32 35 36 AA 32  35 35 3A 97 4A 2C 2E 3A  |U).256.255:.J,.:|
00000770: 82 4A 3A 89 32 31 30 30  00 89 19 0C 08 98 31 2C  |.J:.2100......1,|
00000780: 22 42 2D 50 22 3B 33 3B  30 00 AE 19 16 08 8B 4E  |"B-P";3;0......N|
00000790: 55 B3 B1 30 A7 99 22 22  3B C9 28 22 20 22 AA C4  |U..0.."";.(" "..|
000007A0: 28 4E 55 29 2C 33 29 3B  22 9D 9D 9D 22 3B 00 D3  |(NU),3);"...";..|
000007B0: 19 20 08 97 39 39 36 2C  C2 28 33 29 3A 97 39 39  |. ..996,.(3):.99|
000007C0: 37 2C C2 28 34 29 3A 97  34 2C 42 42 AA 4E 55 3A  |7,.(4):.4,BB.NU:|
000007D0: 9E 4D 41 00 EB 19 25 08  97 33 2C C2 28 39 39 36  |.MA...%..3,.(996|
000007E0: 29 3A 97 34 2C C2 28 39  39 37 29 00 09 1A 2A 08  |):.4,.(997)...*.|
000007F0: 8B 53 54 B3 B1 2E AF 53  54 B3 B1 36 34 A7 8D 33  |.ST....ST..64..3|
00000800: 30 30 30 3A 89 32 30 35  30 00 0F 1A 34 08 8E 00  |000:.2050...4...|
00000810: 15 1A 98 08 8F 00 1D 1A  A2 08 43 B2 2E 00 40 1A  |..........C...@.|
00000820: AC 08 98 31 2C 22 42 2D  41 22 3B 30 3B 54 31 3B  |...1,"B-A";0;T1;|
00000830: 53 31 3B 3A 98 31 2C 22  42 2D 50 22 3B 33 3B 30  |S1;:.1,"B-P";3;0|
00000840: 00 5E 1A B6 08 99 22 22  3B C9 28 22 20 22 AA C4  |.^...."";.(" "..|
00000850: 28 4E 55 29 2C 33 29 3B  22 9D 9D 9D 22 3B 00 85  |(NU),3);"...";..|
00000860: 1A C0 08 97 39 39 36 2C  C2 28 33 29 3A 97 39 39  |....996,.(3):.99|
00000870: 37 2C C2 28 34 29 3A 97  34 2C 42 42 AA 4E 55 3A  |7,.(4):.4,BB.NU:|
00000880: 9E 4D 41 AA 33 00 9D 1A  C5 08 97 33 2C C2 28 39  |.MA.3......3,.(9|
00000890: 39 36 29 3A 97 34 2C C2  28 39 39 37 29 00 D0 1A  |96):.4,.(997)...|
000008A0: CA 08 8B 53 54 B3 B1 2E  AF 53 54 B3 B1 36 34 A7  |...ST....ST..64.|
000008B0: 99 22 12 49 45 45 45 20  57 52 49 54 45 20 45 52  |.".IEEE WRITE ER|
000008C0: 52 4F 52 22 53 54 22 92  22 3A 89 31 30 30 30 30  |ROR"ST".":.10000|
000008D0: 00 E6 1A D4 08 98 31 2C  22 55 32 22 3B 33 3B 30  |......1,"U2";3;0|
000008E0: 3B 54 31 3B 53 31 00 FA  1A DE 08 8D 33 30 30 30  |;T1;S1......3000|
000008F0: 3A 8B A8 45 52 A7 32 33  30 30 00 0E 1B E8 08 43  |:..ER.2300.....C|
00000900: B2 43 AA 31 3A 8B 43 B3  33 A7 32 32 36 30 00 38  |.C.1:.C.3.2260.8|
00000910: 1B F2 08 99 22 12 55 4E  43 4F 56 45 52 41 42 4C  |....".UNCOVERABL|
00000920: 45 20 57 52 49 54 45 20  45 52 52 4F 52 22 45 52  |E WRITE ERROR"ER|
00000930: 24 47 89 31 30 30 30 30  00 3E 1B FC 08 8E 00 44  |$G.10000.>.....D|
00000940: 1B C4 09 8F 00 52 1B CE  09 54 53 B2 31 3A 54 46  |.....R...TS.1:TF|
00000950: B2 2E 00 69 1B D8 09 98  31 2C 22 49 30 22 3A 9F  |...i....1,"I0":.|
00000960: 33 2C 38 2C 33 2C 22 23  22 00 72 1B E2 09 53 39  |3,8,3,"#".r...S9|
00000970: B2 30 00 92 1B EC 09 99  22 11 54 52 41 43 4B 20  |.0......".TRACK |
00000980: 23 20 20 42 4C 4F 43 4B  53 20 54 4F 20 58 46 45  |#  BLOCKS TO XFE|
00000990: 52 22 00 B1 1B F6 09 99  22 23 23 23 23 23 23 23  |R"......"#######|
000009A0: 23 23 23 23 23 23 23 23  23 23 23 23 23 23 23 23  |################|
000009B0: 22 00 D4 1B 00 0A 4E 55  B2 30 3A 54 31 B2 31 38  |".....NU.0:T1.18|
000009C0: 3A 53 31 B2 30 3A 43 30  24 B2 C7 28 2E 29 3A 8D  |:S1.0:C0$..(.):.|
000009D0: 32 30 30 30 00 DD 1B 0A  0A 42 59 B2 34 00 EF 1B  |2000.....BY.4...|
000009E0: 14 0A 54 25 B2 28 42 59  AB 34 29 AD 34 AA 31 00  |..T%.(BY.4).4.1.|
000009F0: FC 1B 1E 0A 99 22 20 22  3B 54 25 3B 00 30 1C 28  |....." ";T%;.0.(|
00000A00: 0A 8B C2 28 42 41 AA 42  59 29 B2 2E A7 81 4A B2  |...(BA.BY)....J.|
00000A10: 2E A4 32 30 3A 42 4D 25  28 54 25 2C 4A 29 B2 2E  |..20:BM%(T%,J)..|
00000A20: 3A 82 3A 42 59 B2 42 59  AA 34 3A 89 32 36 35 30  |:.:BY.BY.4:.2650|
00000A30: 00 38 1C 32 0A 53 B2 30  00 72 1C 3C 0A 42 59 B2  |.8.2.S.0.r.<.BY.|
00000A40: 42 59 AA 31 3A 41 30 B2  C2 28 42 41 AA 42 59 29  |BY.1:A0..(BA.BY)|
00000A50: 3A 81 4A B2 2E A4 37 3A  42 4D 25 28 54 25 2C 53  |:.J...7:BM%(T%,S|
00000A60: 29 B2 41 30 AF 54 41 28  4A 29 3A 53 B2 53 AA 31  |).A0.TA(J):S.S.1|
00000A70: 3A 82 00 81 1C 46 0A 8B  53 B3 32 32 A7 32 36 32  |:....F..S.22.262|
00000A80: 30 00 8D 1C 50 0A 42 59  B2 42 59 AA 31 00 A4 1C  |0...P.BY.BY.1...|
00000A90: 5A 0A 45 53 B2 32 31 3A  8B 54 25 B1 31 37 A7 45  |Z.ES.21:.T%.17.E|
00000AA0: 53 B2 31 39 00 B5 1C 64  0A 8B 54 25 B1 32 34 A7  |S.19...d..T%.24.|
00000AB0: 45 53 B2 31 38 00 C6 1C  6E 0A 8B 54 25 B1 33 30  |ES.18...n..T%.30|
00000AC0: A7 45 53 B2 31 37 00 E2  1C 78 0A 81 4A B2 45 53  |.ES.17...x..J.ES|
00000AD0: A4 32 34 3A 42 4D 25 28  54 25 2C 4A 29 B2 AB 31  |.24:BM%(T%,J)..1|
00000AE0: 3A 82 00 08 1D 82 0A 53  4D B2 2E 3A 81 4A B2 2E  |:......SM..:.J..|
00000AF0: A4 32 30 3A 8B 42 4D 25  28 54 25 2C 4A 29 B2 2E  |.20:.BM%(T%,J)..|
00000B00: A7 53 4D B2 53 4D AA 31  00 20 1D 8C 0A 82 3A 99  |.SM.SM.1. ....:.|
00000B10: A3 31 32 29 3B 53 4D 3A  53 39 B2 53 39 AA 53 4D  |.12);SM:S9.S9.SM|
00000B20: 00 3E 1D 96 0A 8B 53 4D  B2 2E AF 54 53 B2 54 25  |.>....SM...TS.T%|
00000B30: A7 54 53 B2 54 53 AA 31  3A 89 32 37 33 30 00 4F  |.TS.TS.1:.2730.O|
00000B40: 1D A0 0A 8B 53 4D B3 B1  2E A7 54 46 B2 54 25 00  |....SM....TF.T%.|
00000B50: 60 1D AA 0A 8B 42 59 B3  31 34 33 A7 32 35 38 30  |`....BY.143.2580|
00000B60: 00 67 1D B4 0A A0 33 00  88 1D BE 0A 99 22 53 54  |.g....3......"ST|
00000B70: 41 52 54 20 3D 22 3B 54  53 3B 22 20 46 49 4E 49  |ART =";TS;" FINI|
00000B80: 53 48 20 3D 22 3B 54 46  00 AF 1D C8 0A 99 22 11  |SH =";TF......".|
00000B90: 41 20 54 4F 54 41 4C 20  4F 46 22 3B 53 39 3B 22  |A TOTAL OF";S9;"|
00000BA0: 42 4C 4F 43 4B 53 20 54  4F 20 58 46 45 52 22 00  |BLOCKS TO XFER".|
00000BB0: CB 1D D2 0A 53 38 B2 39  30 AA 32 35 AA 28 2E 36  |....S8.90.25.(.6|
00000BC0: 35 30 AA 2E 39 38 30 29  AC 53 39 00 01 1E DC 0A  |50..980).S9.....|
00000BD0: 53 37 B2 B5 28 53 38 AD  36 30 29 3A 99 22 41 50  |S7..(S8.60):."AP|
00000BE0: 50 52 4F 58 22 3B 53 37  22 3A 22 B5 28 53 38 AB  |PROX";S7":".(S8.|
00000BF0: 53 37 AC 36 30 29 3B 22  46 4F 52 20 43 4F 50 59  |S7.60);"FOR COPY|
00000C00: 22 00 07 1E E6 0A 8E 00  23 1E B8 0B 8F 20 52 45  |".......#.... RE|
00000C10: 41 44 20 45 52 52 20 43  48 20 54 4F 20 45 52 2C  |AD ERR CH TO ER,|
00000C20: 45 52 24 00 5A 1E C2 0B  84 31 2C 45 30 24 2C 45  |ER$.Z....1,E0$,E|
00000C30: 31 24 2C 45 32 24 2C 45  33 24 3A 45 52 24 B2 45  |1$,E2$,E3$:ER$.E|
00000C40: 30 24 AA 22 2C 22 AA 45  31 24 AA 22 2C 22 AA 45  |0$.",".E1$.",".E|
00000C50: 32 24 AA 22 2C 22 AA 45  33 24 00 76 1E CC 0B 45  |2$.",".E3$.v...E|
00000C60: 52 B2 C3 28 45 30 24 29  3A 8B 45 52 A7 45 52 B2  |R..(E0$):.ER.ER.|
00000C70: C5 28 45 30 24 29 00 7C  1E D6 0B 8E 00 82 1E 80  |.(E0$).|........|
00000C80: 0C 8F 00 A6 1E 8A 0C 8B  44 24 B2 22 44 22 A7 53  |........D$."D".S|
00000C90: 31 24 B2 22 44 49 53 54  49 4E 41 54 49 4F 4E 22  |1$."DISTINATION"|
00000CA0: 3A 89 33 32 33 30 00 B7  1E 94 0C 53 31 24 B2 22  |:.3230.....S1$."|
00000CB0: 53 4F 55 52 43 45 22 00  E2 1E 9E 0C 99 22 11 49  |SOURCE"......".I|
00000CC0: 4E 53 45 52 54 20 22 3B  53 31 24 3B 22 20 44 49  |NSERT ";S1$;" DI|
00000CD0: 53 4B 2C 20 50 52 45 53  53 20 12 53 50 41 43 45  |SK, PRESS .SPACE|
00000CE0: 92 22 00 F8 1E A8 0C A1  41 24 3A 8B 41 24 B3 B1  |."......A$:.A$..|
00000CF0: 22 20 22 A7 33 32 34 30  00 08 1F B2 0C 9F 32 2C  |" ".3240......2,|
00000D00: 38 2C 30 2C 22 24 30 22  00 1E 1F BC 0C 8D 33 30  |8,0,"$0"......30|
00000D10: 30 30 3A 8B 45 52 B1 30  A7 31 30 30 30 30 00 34  |00:.ER.0.10000.4|
00000D20: 1F C6 0C 81 4A B2 31 A4  32 36 3A A1 23 32 2C 41  |....J.1.26:.#2,A|
00000D30: 24 3A 82 4A 00 50 1F D0  0C A1 23 32 2C 41 24 3A  |$:.J.P....#2,A$:|
00000D40: A1 23 32 2C 42 24 3A 49  52 24 B2 41 24 AA 42 24  |.#2,B$:IR$.A$.B$|
00000D50: 00 73 1F DA 0C A1 23 32  2C 41 24 3A A1 23 32 2C  |.s....#2,A$:.#2,|
00000D60: 41 24 3A A1 23 32 2C 42  24 3A 44 52 24 B2 41 24  |A$:.#2,B$:DR$.A$|
00000D70: AA 42 24 00 7C 1F E4 0C  A0 32 3A 8E 00 82 1F 10  |.B$.|....2:.....|
00000D80: 27 8F 00 A0 1F 1A 27 97  35 35 2C C2 28 39 39 38  |'.....'.55,.(998|
00000D90: 29 3A 97 35 36 2C C2 28  39 39 39 29 3A 9C 3A 90  |):.56,.(999):.:.|
00000DA0: 00 E1 1F 98 3A 83 37 36  2C 36 36 2C 33 2C 37 36  |....:.76,66,3,76|
00000DB0: 2C 39 31 2C 33 2C 31 36  32 2C 33 2C 33 32 2C 31  |,91,3,162,3,32,1|
00000DC0: 39 38 2C 32 35 35 2C 31  36 30 2C 30 2C 31 33 32  |98,255,160,0,132|
00000DD0: 2C 33 2C 33 32 2C 32 30  37 2C 32 35 35 2C 31 34  |,3,32,207,255,14|
00000DE0: 35 00 25 20 A2 3A 83 33  2C 31 36 35 2C 31 34 34  |5.% .:.3,165,144|
00000DF0: 2C 32 30 38 2C 33 2C 32  30 30 2C 32 30 38 2C 32  |,208,3,200,208,2|
00000E00: 34 34 2C 33 32 2C 32 30  34 2C 32 35 35 2C 39 36  |44,32,204,255,96|
00000E10: 2C 31 36 32 2C 33 2C 33  32 2C 32 30 31 2C 32 35  |,162,3,32,201,25|
00000E20: 35 2C 31 36 30 00 6B 20  AC 3A 83 30 2C 31 33 32  |5,160.k .:.0,132|
00000E30: 2C 33 2C 31 37 37 2C 33  2C 33 32 2C 32 31 30 2C  |,3,177,3,32,210,|
00000E40: 32 35 35 2C 31 36 35 2C  31 34 34 2C 32 30 38 2C  |255,165,144,208,|
00000E50: 33 2C 32 30 30 2C 32 30  38 2C 32 34 34 2C 33 32  |3,200,208,244,32|
00000E60: 2C 32 30 34 2C 32 35 35  2C 39 36 00 00 00        |,204,255,96...  |

.......I.828.883:.A:.I,A:.I.8....*** 'CO
MPUTE' JULY 1983.\....***  MODIFICERET A
F A. NELSSON.T...BB.B(44).27:.995,BB....
..998,B(55):.999,B(56):.55,0:.56,BB:....
(.BB.B(995).N.2.N.B(999).BB.1:BA.BB.256:
MA.828...<..BM%(35,24)...F..J.0.7:TA(J).
2.J:....P..".....BACKUP 1541.".>.Z..".'G
OTO 10000 IF PROGRAM QUITS ABNORMALLY".\
.D.."."N" BUFFERS AVAILABLE".H.N..1,8,15
.N.H...X.R..1000.....D$."S":.3200:I2$.IR
$.B....DR$.."2A". .".ILLEGAL DOS 1.0 DIS
K.":.10000......I2$.I1$..".SOURCE AND DI
STINATION HAVE SAME ID CODE.":.10000....
..2500.*...T.TS:S.0:NU.1:T1.T:S1.S.A....
1,"I0":.3,8,3,"#".Y...."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...@..".".D.J. 3...T.D$."D":
.3200:.IR$..I1$..340...^..1,"I0":.3,8,3,
"#"...H.."WRITING BUFFER #";.'.R.NU.1:T1
.T:S1.S.Q.|..BM%(T1,S1).0..2200:NU.NU.1:
.NU.N.410.Q...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.B...T.T1:.T.TF.5
00...B.D$."S":.3200:.IR$..I2$.450...L.NU
.1:T1.T:S1.S:.270...... FINISHED XFERS..
... 1.1....55,B(998):.56,B(999):..J...."
..BACKUP COMPLETE".Z....1,8,0,"$0".R.&..
#1,A$:.A$..".".550...0..A$;:.610...:..#1
,A$:SS.ST:A.C(A$):.A.A.F(A$).H.D..#1,B$:
SS.ST:B.C(B$):.B.A.F(B$).T.N..SS.660...X
..A.1.B.1..630...B..#1,A$:.A$.""..:.570.
..L..A$;:.610.1.V..#1,A$:SS.ST:A.C(A$):.
A.A.F(A$).U....#1,B$:SS.ST:B.C(B$):.B.B.
F(B$).I...N.B.256.A:.N;:..P... 1.V.....|
..........".INSERT DESTINATION DISK TO B
E FORMATTED".C...."..DISK NAME";DN$.....
.C(DN$).0.DN$."1541 BACKUP COPY":.".....
.......";DN$:.1080......C(DN$).16..:.40.
:...F.0:.J.1.C(DN$):S1$.J(DN$,J,1).U.$..
S1$." ".S1$.G(34).F.1.M....J:.F.."...";:
.1020...8..".UNIQUE DISK ID";I1$...B..I1
$." ".."..";:.1080...L..C(I1$)..2.."..";
:.1080.W.V..1,"N0:".DN$.",".I1$...`..300
0...J..ER.."."ER$:.10000...T.....P......
..1,"U1";3;0;T1;S1......3000:..ER.2060.B
...C.C.1:.C.3.2020.X....ER$:.J.(BB.NU).2
56.(BB.NU).256.255:.J,.:.J:.2100......1,
"B-P";3;0......NU..0.."";I(" ".D(NU),3);
"...";.S. ..996,B(3):.997,B(4):.4,BB.NU:
.MA...%..3,B(996):.4,B(997)...*..ST....S
T..64..3000:.2050...4.............C...@.
...1,"B-A";0;T1;S1;:.1,"B-P";3;0.^....""
;I(" ".D(NU),3);"...";......996,B(3):.99
7,B(4):.4,BB.NU:.MA.3...E..3,B(996):.4,B
(997).P.J..ST....ST..64..".IEEE WRITE ER
ROR"ST".":.10000...T..1,"U2";3;0;T1;S1..
....3000:..ER.2300.....C.C.1:.C.3.2260.8
....".UNCOVERABLE WRITE ERROR"ER$G.10000
.>.....D.D...R.N.TS.1:TF...I.X..1,"I0":.
3,8,3,"#".R...S9.0......".TRACK #  BLOCK
S TO XFER"......"#######################
".T...NU.0:T1.18:S1.0:C0$.G(.):.2000....
.BY.4.....T%.(BY.4).4.1......" ";T%;.0.(
..B(BA.BY)....J...20:BM%(T%,J)..:.:BY.BY
.4:.2650.8.2.S.0.R.<.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...Z.ES.21:.T%.17.E
S.19...D..T%.24.ES.18.F.N..T%.30.ES.17..
.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.O
. ..SM....TF.T%.`....BY.143.2580.G... 3.
....."START =";TS;" FINISH =";TF...H..".
A TOTAL OF";S9;"BLOCKS TO XFER".K.R.S8.9
0.25.(.650..980).S9.....S7..(S8.60):."AP
PROX";S7":".(S8.S7.60);"FOR COPY".......
#.... READ ERR CH TO ER,ER$.Z.B..1,E0$,E
1$,E2$,E3$:ER$.E0$.",".E1$.",".E2$.",".E
3$.V.L.ER.C(E0$):.ER.ER.E(E0$).|.V......
........D$."D".S1$."DISTINATION":.3230..
...S1$."SOURCE"......".INSERT ";S1$;" DI
SK, PRESS .SPACE."......A$:.A$.." ".3240
......2,8,0,"$0"......3000:.ER.0.10000.4
.F..J.1.26:.#2,A$:.J.P.P..#2,A$:.#2,B$:I
R$.A$.B$.S.Z..#2,A$:.#2,A$:.#2,B$:DR$.A$
.B$.|... 2:.....'.. ..'.55,B(998):.56,B(
999):.:.....:.76,66,3,76,91,3,162,3,32,1
98,255,160,0,132,3,32,207,255,145.% .:.3
,165,144,208,3,200,208,244,32,204,255,96
,162,3,32,201,255,160.K .:.0,132,3,177,3
,32,210,255,165,144,208,3,200,208,244,32
,204,255,96...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL