00000000: 01 04 1B 04 0A 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 42 04 14 00 |:.A:.I,A:.I.B...|
00000020: 97 39 39 39 2C C2 28 35 36 29 3A 97 35 36 2C C2 |.999,.(56):.56,.|
00000030: 28 34 36 29 AA 31 30 3A 9C 3A 42 42 B2 C2 28 35 |(46).10:.:BB..(5|
00000040: 36 29 00 65 04 1E 00 4E B2 C2 28 39 39 39 29 AB |6).e...N..(999).|
00000050: 42 42 AB 31 3A 42 41 B2 42 42 AC 32 35 36 3A 4D |BB.1:BA.BB.256:M|
00000060: 41 B2 38 32 38 00 75 04 28 00 86 42 4D 25 28 33 |A.828.u.(..BM%(3|
00000070: 35 2C 32 34 29 00 8C 04 32 00 81 4A B2 30 A4 37 |5,24)...2..J.0.7|
00000080: 3A 54 41 28 4A 29 B2 32 AE 4A 3A 82 00 AD 04 3C |:TA(J).2.J:....<|
00000090: 00 99 22 93 12 42 41 43 4B 55 50 20 36 34 92 20 |.."..BACKUP 64. |
000000A0: 2D 20 4B 45 49 54 48 20 48 4F 50 45 22 00 C3 04 |- KEITH HOPE"...|
000000B0: 46 00 99 22 11 4D 4F 44 49 46 49 45 44 20 46 52 |F..".MODIFIED FR|
000000C0: 4F 4D 22 00 EF 04 50 00 99 22 12 42 41 43 4B 55 |OM"...P..".BACKU|
000000D0: 50 20 32 30 33 31 92 20 2D 20 4A 49 4D 20 4C 41 |P 2031. - JIM LA|
000000E0: 57 20 2F 20 4B 45 49 54 48 20 48 4F 50 45 22 00 |W / KEITH HOPE".|
000000F0: 1E 05 5A 00 99 22 11 27 47 4F 54 4F 34 30 30 30 |..Z..".'GOTO4000|
00000100: 27 20 49 46 20 50 52 4F 47 52 41 4D 20 51 55 49 |' IF PROGRAM QUI|
00000110: 54 53 20 41 42 4E 4F 52 4D 41 4C 4C 59 22 00 3B |TS ABNORMALLY".;|
00000120: 05 64 00 99 22 11 22 4E 22 42 55 46 46 45 52 53 |.d.."."N"BUFFERS|
00000130: 20 41 56 41 49 4C 41 42 4C 45 22 00 47 05 6E 00 | AVAILABLE".G.n.|
00000140: 9F 31 2C 38 2C 31 35 00 50 05 78 00 8D 35 36 30 |.1,8,15.P.x..560|
00000150: 00 69 05 82 00 44 24 B2 22 53 22 3A 8D 31 32 39 |.i...D$."S":.129|
00000160: 30 3A 49 32 24 B2 49 52 24 00 98 05 8C 00 8B 44 |0:I2$.IR$......D|
00000170: 52 24 B3 B1 22 32 41 22 A7 99 22 12 49 4C 4C 45 |R$.."2A"..".ILLE|
00000180: 47 41 4C 20 44 4F 53 20 31 2E 30 20 44 49 53 4B |GAL DOS 1.0 DISK|
00000190: 92 22 3A 89 34 30 30 30 00 D9 05 96 00 8B 49 32 |.":.4000......I2|
000001A0: 24 B2 49 31 24 A7 99 22 12 53 4F 55 52 43 45 20 |$.I1$..".SOURCE |
000001B0: 41 4E 44 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 |AND DESTINATION |
000001C0: 48 41 56 45 20 53 41 4D 45 20 49 44 20 43 4F 44 |HAVE SAME ID COD|
000001D0: 45 92 22 3A 89 34 30 30 30 00 E2 05 A0 00 8D 39 |E.":.4000......9|
000001E0: 36 30 00 FE 05 AA 00 54 B2 54 53 3A 53 B2 30 3A |60.....T.TS:S.0:|
000001F0: 4E 55 B2 31 3A 54 31 B2 54 3A 53 31 B2 53 00 15 |NU.1:T1.T:S1.S..|
00000200: 06 B4 00 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C |....1,"I0":.3,8,|
00000210: 33 2C 22 23 22 00 2D 06 BE 00 99 22 52 45 41 44 |3,"#".-...."READ|
00000220: 49 4E 47 20 42 4C 4F 43 4B 20 23 22 3B 00 56 06 |ING BLOCK #";.V.|
00000230: C8 00 8B 42 4D 25 28 54 31 2C 53 31 29 B2 30 A7 |...BM%(T1,S1).0.|
00000240: 8D 37 31 30 3A 4E 55 B2 4E 55 AA 31 3A 8B 4E 55 |.710:NU.NU.1:.NU|
00000250: B1 4E A7 32 33 30 00 76 06 D2 00 53 31 B2 53 31 |.N.230.v...S1.S1|
00000260: AA 31 3A 8B 53 31 B1 32 30 A7 53 31 B2 30 3A 54 |.1:.S1.20.S1.0:T|
00000270: 31 B2 54 31 AA 31 00 87 06 DC 00 8B 54 31 B3 54 |1.T1.1......T1.T|
00000280: 46 AA 31 A7 32 30 30 00 90 06 E6 00 99 22 11 22 |F.1.200......"."|
00000290: 00 97 06 F0 00 A0 33 00 B7 06 FA 00 44 24 B2 22 |......3.....D$."|
000002A0: 44 22 3A 8D 31 32 39 30 3A 8B 49 52 24 B3 B1 49 |D":.1290:.IR$..I|
000002B0: 31 24 A7 89 32 35 30 00 CE 06 04 01 98 31 2C 22 |1$..250......1,"|
000002C0: 49 30 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 E7 |I0":.3,8,3,"#"..|
000002D0: 06 0E 01 99 22 57 52 49 54 49 4E 47 20 42 55 46 |...."WRITING BUF|
000002E0: 46 45 52 20 23 22 3B 00 FA 06 18 01 4E 55 B2 31 |FER #";.....NU.1|
000002F0: 3A 54 31 B2 54 3A 53 31 B2 53 00 23 07 22 01 8B |:T1.T:S1.S.#."..|
00000300: 42 4D 25 28 54 31 2C 53 31 29 B2 30 A7 8D 38 33 |BM%(T1,S1).0..83|
00000310: 30 3A 4E 55 B2 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 |0:NU.NU.1:.NU.N.|
00000320: 33 32 30 00 43 07 2C 01 53 31 B2 53 31 AA 31 3A |320.C.,.S1.S1.1:|
00000330: 8B 53 31 B1 32 30 A7 53 31 B2 30 3A 54 31 B2 54 |.S1.20.S1.0:T1.T|
00000340: 31 AA 31 00 54 07 36 01 8B 54 31 B3 54 46 AA 31 |1.1.T.6..T1.TF.1|
00000350: A7 32 39 30 00 5D 07 40 01 99 22 11 22 00 64 07 |.290.].@..".".d.|
00000360: 4A 01 A0 33 00 81 07 54 01 53 B2 53 31 AA 31 3A |J..3...T.S.S1.1:|
00000370: 8B 53 B1 32 30 A7 53 B2 30 3A 54 31 B2 54 31 AA |.S.20.S.0:T1.T1.|
00000380: 31 00 94 07 5E 01 54 B2 54 31 3A 8B 54 B1 54 46 |1...^.T.T1:.T.TF|
00000390: A7 33 38 30 00 B3 07 68 01 44 24 B2 22 53 22 3A |.380...h.D$."S":|
000003A0: 8D 31 32 39 30 3A 8B 49 52 24 B3 B1 49 32 24 A7 |.1290:.IR$..I2$.|
000003B0: 33 36 30 00 CB 07 72 01 4E 55 B2 31 3A 54 31 B2 |360...r.NU.1:T1.|
000003C0: 54 3A 53 31 B2 53 3A 89 31 38 30 00 E0 07 7C 01 |T:S1.S:.180...|.|
000003D0: 8F 20 46 49 4E 49 53 48 45 44 20 58 46 45 52 53 |. FINISHED XFERS|
000003E0: 00 E7 07 86 01 A0 31 00 F8 07 90 01 97 35 36 2C |......1......56,|
000003F0: C2 28 39 39 39 29 3A 9C 00 11 08 9A 01 99 22 11 |.(999):.......".|
00000400: 11 42 41 43 4B 55 50 20 43 4F 4D 50 4C 45 54 45 |.BACKUP COMPLETE|
00000410: 22 00 21 08 A4 01 9F 31 2C 38 2C 30 2C 22 24 30 |".!....1,8,0,"$0|
00000420: 22 00 39 08 AE 01 A1 23 31 2C 41 24 3A 8B 41 24 |".9....#1,A$:.A$|
00000430: B3 B1 22 12 22 A7 34 33 30 00 47 08 B8 01 99 41 |..".".430.G....A|
00000440: 24 3B 3A 89 34 39 30 00 6B 08 C2 01 A1 23 31 2C |$;:.490.k....#1,|
00000450: 41 24 3A 53 53 B2 53 54 3A 41 B2 C3 28 41 24 29 |A$:SS.ST:A..(A$)|
00000460: 3A 8B 41 A7 41 B2 C6 28 41 24 29 00 8F 08 CC 01 |:.A.A..(A$).....|
00000470: A1 23 31 2C 42 24 3A 53 53 B2 53 54 3A 42 B2 C3 |.#1,B$:SS.ST:B..|
00000480: 28 42 24 29 3A 8B 42 A7 41 B2 C6 28 42 24 29 00 |(B$):.B.A..(B$).|
00000490: 9B 08 D6 01 8B 53 53 A7 35 34 30 00 AD 08 E0 01 |.....SS.540.....|
000004A0: 8B 41 B2 31 AF 42 B2 31 A7 8D 35 31 30 00 C6 08 |.A.1.B.1..510...|
000004B0: EA 01 A1 23 31 2C 41 24 3A 8B 41 24 B2 22 22 A7 |...#1,A$:.A$."".|
000004C0: 99 3A 89 34 35 30 00 D4 08 F4 01 99 41 24 3B 3A |.:.450......A$;:|
000004D0: 89 34 39 30 00 F8 08 FE 01 A1 23 31 2C 41 24 3A |.490......#1,A$:|
000004E0: 53 53 B2 53 54 3A 41 B2 C3 28 41 24 29 3A 8B 41 |SS.ST:A..(A$):.A|
000004F0: A7 41 B2 C6 28 41 24 29 00 1C 09 08 02 A1 23 31 |.A..(A$)......#1|
00000500: 2C 42 24 3A 53 53 B2 53 54 3A 42 B2 C3 28 42 24 |,B$:SS.ST:B..(B$|
00000510: 29 3A 8B 42 A7 42 B2 C6 28 42 24 29 00 30 09 12 |):.B.B..(B$).0..|
00000520: 02 4E B2 42 AC 32 35 36 AA 41 3A 99 4E 3B 3A 8E |.N.B.256.A:.N;:.|
00000530: 00 37 09 1C 02 A0 31 00 3D 09 26 02 80 00 54 09 |.7....1.=.&...T.|
00000540: 30 02 8F 20 48 45 41 44 45 52 20 44 45 53 54 20 |0.. HEADER DEST |
00000550: 44 49 53 4B 00 84 09 3A 02 99 22 11 49 4E 53 45 |DISK...:..".INSE|
00000560: 52 54 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 44 |RT DESTINATION D|
00000570: 49 53 4B 20 54 4F 20 42 45 20 46 4F 52 4D 41 54 |ISK TO BE FORMAT|
00000580: 54 45 44 22 00 C2 09 44 02 85 22 11 11 44 49 53 |TED"...D.."..DIS|
00000590: 4B 20 4E 41 4D 45 1D 1D 1D A0 20 20 20 20 20 20 |K NAME.... |
000005A0: 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D | ......|
000005B0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 44 |.............";D|
000005C0: 4E 24 00 DC 09 4E 02 8B 44 4E 24 B2 22 A0 22 A7 |N$...N..DN$.".".|
000005D0: 99 22 91 91 91 22 3B 3A 89 35 38 30 00 F1 09 58 |."...";:.580...X|
000005E0: 02 8B C3 28 44 4E 24 29 B1 31 36 A7 9C 3A 89 34 |...(DN$).16..:.4|
000005F0: 30 00 14 0A 62 02 46 B2 30 3A 81 4A B2 31 A4 C3 |0...b.F.0:.J.1..|
00000600: 28 44 4E 24 29 3A 53 31 24 B2 CA 28 44 4E 24 2C |(DN$):S1$..(DN$,|
00000610: 4A 2C 31 29 00 2F 0A 6C 02 8B 53 31 24 B2 22 A0 |J,1)./.l..S1$.".|
00000620: 22 B0 53 31 24 B2 C7 28 33 34 29 A7 46 B2 31 00 |".S1$..(34).F.1.|
00000630: 46 0A 76 02 82 4A 3A 8B 46 A7 99 22 91 91 91 22 |F.v..J:.F.."..."|
00000640: 3B 3A 89 35 38 30 00 90 0A 80 02 85 22 11 55 4E |;:.580......".UN|
00000650: 49 51 55 45 20 44 49 53 4B 20 49 44 1D 1D 1D A0 |IQUE DISK ID....|
00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000670: 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ............|
00000680: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 49 31 24 |...........";I1$|
00000690: 00 A9 0A 8A 02 8B 49 31 24 B2 22 A0 22 A7 99 22 |......I1$.".".."|
000006A0: 91 91 22 3B 3A 89 36 34 30 00 C4 0A 94 02 8B C3 |..";:.640.......|
000006B0: 28 49 31 24 29 B3 B1 32 A7 99 22 91 91 22 3B 3A |(I1$)..2.."..";:|
000006C0: 89 36 34 30 00 DD 0A 9E 02 98 31 2C 22 4E 30 3A |.640......1,"N0:|
000006D0: 22 AA 44 4E 24 AA 22 2C 22 AA 49 31 24 00 E7 0A |".DN$.",".I1$...|
000006E0: A8 02 8D 31 32 35 30 00 FA 0A B2 02 8B 45 52 A7 |...1250......ER.|
000006F0: 99 45 52 24 3A 89 34 30 30 30 00 00 0B BC 02 8E |.ER$:.4000......|
00000700: 00 26 0B C6 02 8F 20 52 45 41 44 20 42 4C 4F 43 |.&.... READ BLOC|
00000710: 4B 20 54 31 2C 53 31 20 54 4F 20 42 55 46 46 45 |K T1,S1 TO BUFFE|
00000720: 52 20 23 20 4E 55 00 40 0B D0 02 43 B2 30 3A 98 |R # NU.@...C.0:.|
00000730: 31 2C 22 55 31 22 3B 33 3B 30 3B 54 31 3B 53 31 |1,"U1";3;0;T1;S1|
00000740: 00 53 0B DA 02 8D 31 32 35 30 3A 8B A8 45 52 A7 |.S....1250:..ER.|
00000750: 37 36 30 00 66 0B E4 02 43 B2 43 AA 31 3A 8B 43 |760.f...C.C.1:.C|
00000760: B3 33 89 37 32 30 00 9B 0B EE 02 99 45 52 24 3A |.3.720......ER$:|
00000770: 81 4A B2 28 42 42 AA 4E 55 29 AC 32 35 36 A4 28 |.J.(BB.NU).256.(|
00000780: 42 42 AA 4E 55 29 AC 32 35 36 AA 32 35 35 3A 97 |BB.NU).256.255:.|
00000790: 4A 2C 2E 3A 82 4A 3A 89 38 32 30 00 AC 0B F8 02 |J,.:.J:.820.....|
000007A0: 98 31 2C 22 42 2D 50 22 3B 33 3B 30 00 D8 0B 02 |.1,"B-P";3;0....|
000007B0: 03 8B 4E 55 B3 B1 30 A7 99 22 20 20 20 9D 9D 9D |..NU..0.." ...|
000007C0: 22 3B C9 28 22 20 20 22 AA C4 28 4E 55 29 2C 33 |";.(" "..(NU),3|
000007D0: 29 3B 22 9D 9D 9D 22 3B 00 FD 0B 0C 03 97 39 39 |);"...";......99|
000007E0: 36 2C C2 28 33 29 3A 97 39 39 37 2C C2 28 34 29 |6,.(3):.997,.(4)|
000007F0: 3A 97 34 2C 42 42 AA 4E 55 3A 9E 4D 41 00 15 0C |:.4,BB.NU:.MA...|
00000800: 16 03 97 33 2C C2 28 39 39 36 29 3A 97 34 2C C2 |...3,.(996):.4,.|
00000810: 28 39 39 37 29 00 32 0C 20 03 8B 53 54 B3 B1 2E |(997).2. ..ST...|
00000820: AF 53 54 B3 B1 36 34 A7 8D 31 32 35 30 3A 89 37 |.ST..64..1250:.7|
00000830: 35 30 00 45 0C 2A 03 8D 31 32 35 30 3A 8B 45 52 |50.E.*..1250:.ER|
00000840: A7 99 45 52 24 00 4B 0C 34 03 8E 00 74 0C 3E 03 |..ER$.K.4...t.>.|
00000850: 8F 20 57 52 49 54 45 20 42 4C 4F 43 4B 20 54 31 |. WRITE BLOCK T1|
00000860: 2C 53 31 20 46 52 4F 4D 20 42 55 46 46 45 52 20 |,S1 FROM BUFFER |
00000870: 23 20 4E 55 00 81 0C 48 03 43 B2 2E 3A 8F 43 3D |# NU...H.C..:.C=|
00000880: 30 00 A3 0C 52 03 98 31 2C 22 42 2D 41 22 3B 30 |0...R..1,"B-A";0|
00000890: 3B 54 31 3B 53 31 3A 98 31 2C 22 42 2D 50 22 3B |;T1;S1:.1,"B-P";|
000008A0: 33 3B 30 00 C8 0C 5C 03 99 22 20 20 20 9D 9D 9D |3;0...\.." ...|
000008B0: 22 3B C9 28 22 20 20 22 AA C4 28 4E 55 29 2C 33 |";.(" "..(NU),3|
000008C0: 29 3B 22 9D 9D 9D 22 3B 00 EF 0C 66 03 97 39 39 |);"...";...f..99|
000008D0: 36 2C C2 28 33 29 3A 97 39 39 37 2C C2 28 34 29 |6,.(3):.997,.(4)|
000008E0: 3A 97 34 2C 42 42 AA 4E 55 3A 9E 4D 41 AA 33 00 |:.4,BB.NU:.MA.3.|
000008F0: 07 0D 70 03 97 33 2C C2 28 39 39 36 29 3A 97 34 |..p..3,.(996):.4|
00000900: 2C C2 28 39 39 37 29 00 39 0D 7A 03 8B 53 54 B3 |,.(997).9.z..ST.|
00000910: B1 2E AF 53 54 B3 B1 36 34 A7 99 22 12 49 45 45 |...ST..64..".IEE|
00000920: 45 20 57 52 49 54 45 20 45 52 52 4F 52 22 53 54 |E WRITE ERROR"ST|
00000930: 22 92 22 3A 89 34 30 30 30 00 4C 0D 84 03 8D 31 |".":.4000.L....1|
00000940: 32 35 30 3A 8B 45 52 A7 99 45 52 24 00 62 0D 8E |250:.ER..ER$.b..|
00000950: 03 98 31 2C 22 55 32 22 3B 33 3B 30 3B 54 31 3B |..1,"U2";3;0;T1;|
00000960: 53 31 00 75 0D 98 03 8D 31 32 35 30 3A 8B A8 45 |S1.u....1250:..E|
00000970: 52 A7 39 35 30 00 88 0D A2 03 43 B2 43 AA 31 3A |R.950.....C.C.1:|
00000980: 8B 43 B3 33 A7 39 31 30 00 B3 0D AC 03 99 22 12 |.C.3.910......".|
00000990: 55 4E 52 45 43 4F 56 45 52 41 42 4C 45 20 57 52 |UNRECOVERABLE WR|
000009A0: 49 54 45 20 45 52 52 4F 52 22 45 52 24 3A 89 34 |ITE ERROR"ER$:.4|
000009B0: 30 30 30 00 B9 0D B6 03 8E 00 D3 0D C0 03 8F 20 |000............ |
000009C0: 47 45 54 20 42 41 4D 20 54 4F 20 42 4D 25 28 54 |GET BAM TO BM%(T|
000009D0: 2C 53 29 00 E8 0D CA 03 54 53 B2 31 3A 54 46 B2 |,S).....TS.1:TF.|
000009E0: 2E 3A 8F 20 54 46 3D 30 00 FF 0D D4 03 98 31 2C |.:. TF=0......1,|
000009F0: 22 49 30 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 |"I0":.3,8,3,"#".|
00000A00: 08 0E DE 03 53 39 B2 30 00 29 0E E8 03 99 22 11 |....S9.0.)....".|
00000A10: 54 52 41 43 4B 20 23 20 20 20 42 4C 4F 43 4B 53 |TRACK # BLOCKS|
00000A20: 20 54 4F 20 58 46 45 52 22 00 49 0E F2 03 99 22 | TO XFER".I...."|
00000A30: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000A40: A3 A3 A3 A3 A3 A3 A3 A3 22 00 6B 0E FC 03 4E 55 |........".k...NU|
00000A50: B2 30 3A 54 31 B2 31 38 3A 53 31 B2 30 3A 43 30 |.0:T1.18:S1.0:C0|
00000A60: 24 B2 C7 28 2E 29 3A 8D 37 31 30 00 74 0E 06 04 |$..(.):.710.t...|
00000A70: 42 59 B2 34 00 86 0E 10 04 54 25 B2 28 42 59 AB |BY.4.....T%.(BY.|
00000A80: 34 29 AD 34 AA 31 00 94 0E 1A 04 99 22 20 20 22 |4).4.1......" "|
00000A90: 3B 54 25 3B 00 C8 0E 24 04 8B C2 28 42 41 AA 42 |;T%;...$...(BA.B|
00000AA0: 59 29 B2 2E A7 81 4A B2 2E A4 32 30 3A 42 4D 25 |Y)....J...20:BM%|
00000AB0: 28 54 25 2C 4A 29 B2 2E 3A 82 3A 42 59 B2 42 59 |(T%,J)..:.:BY.BY|
00000AC0: AA 34 3A 89 31 31 31 30 00 D0 0E 2E 04 53 B2 30 |.4:.1110.....S.0|
00000AD0: 00 0A 0F 38 04 42 59 B2 42 59 AA 31 3A 41 30 B2 |...8.BY.BY.1:A0.|
00000AE0: C2 28 42 41 AA 42 59 29 3A 81 4A B2 2E A4 37 3A |.(BA.BY):.J...7:|
00000AF0: 42 4D 25 28 54 25 2C 53 29 B2 41 30 AF 54 41 28 |BM%(T%,S).A0.TA(|
00000B00: 4A 29 3A 53 B2 53 AA 31 3A 82 00 19 0F 42 04 8B |J):S.S.1:....B..|
00000B10: 53 B3 32 32 A7 31 30 38 30 00 25 0F 4C 04 42 59 |S.22.1080.%.L.BY|
00000B20: B2 42 59 AA 31 00 3C 0F 56 04 45 53 B2 32 31 3A |.BY.1.<.V.ES.21:|
00000B30: 8B 54 25 B1 31 37 A7 45 53 B2 31 39 00 4D 0F 60 |.T%.17.ES.19.M.`|
00000B40: 04 8B 54 25 B1 32 34 A7 45 53 B2 31 38 00 5E 0F |..T%.24.ES.18.^.|
00000B50: 6A 04 8B 54 25 B1 33 30 A7 45 53 B2 31 37 00 7A |j..T%.30.ES.17.z|
00000B60: 0F 74 04 81 4A B2 45 53 A4 32 34 3A 42 4D 25 28 |.t..J.ES.24:BM%(|
00000B70: 54 25 2C 4A 29 B2 AB 31 3A 82 00 A0 0F 7E 04 53 |T%,J)..1:....~.S|
00000B80: 4D B2 2E 3A 81 4A B2 2E A4 32 30 3A 8B 42 4D 25 |M..:.J...20:.BM%|
00000B90: 28 54 25 2C 4A 29 B2 2E A7 53 4D B2 53 4D AA 31 |(T%,J)...SM.SM.1|
00000BA0: 00 B8 0F 88 04 82 3A 99 A3 31 32 29 3B 53 4D 3A |......:..12);SM:|
00000BB0: 53 39 B2 53 39 AA 53 4D 00 D6 0F 92 04 8B 53 4D |S9.S9.SM......SM|
00000BC0: B2 2E AF 54 53 B2 54 25 A7 54 53 B2 54 53 AA 31 |...TS.T%.TS.TS.1|
00000BD0: 3A 89 31 31 39 30 00 E7 0F 9C 04 8B 53 4D B3 B1 |:.1190......SM..|
00000BE0: 2E A7 54 46 B2 54 25 00 F8 0F A6 04 8B 42 59 B3 |..TF.T%......BY.|
00000BF0: 31 34 33 A7 31 30 34 30 00 FF 0F B0 04 A0 33 00 |143.1040......3.|
00000C00: 20 10 BA 04 99 22 53 54 41 52 54 20 3D 22 3B 54 | ...."START =";T|
00000C10: 53 3B 22 20 46 49 4E 49 53 48 20 3D 22 3B 54 46 |S;" FINISH =";TF|
00000C20: 00 47 10 C4 04 99 22 11 41 20 54 4F 54 41 4C 20 |.G....".A TOTAL |
00000C30: 4F 46 22 3B 53 39 3B 22 42 4C 4F 43 4B 53 20 54 |OF";S9;"BLOCKS T|
00000C40: 4F 20 58 46 45 52 22 00 76 10 CE 04 99 22 41 50 |O XFER".v...."AP|
00000C50: 50 52 4F 58 22 B5 28 28 32 2E 34 35 AC 53 39 29 |PROX".((2.45.S9)|
00000C60: AD 36 30 29 22 4D 49 4E 55 54 45 53 20 46 4F 52 |.60)"MINUTES FOR|
00000C70: 20 43 4F 50 59 22 00 7C 10 D8 04 8E 00 98 10 E2 | COPY".|........|
00000C80: 04 8F 20 52 45 41 44 20 45 52 52 20 43 48 20 54 |.. READ ERR CH T|
00000C90: 4F 20 45 52 2C 45 52 24 00 CF 10 EC 04 84 31 2C |O ER,ER$......1,|
00000CA0: 45 30 24 2C 45 31 24 2C 45 32 24 2C 45 33 24 3A |E0$,E1$,E2$,E3$:|
00000CB0: 45 52 24 B2 45 30 24 AA 22 2C 22 AA 45 31 24 AA |ER$.E0$.",".E1$.|
00000CC0: 22 2C 22 AA 45 32 24 AA 22 2C 22 AA 45 33 24 00 |",".E2$.",".E3$.|
00000CD0: EB 10 F6 04 45 52 B2 C3 28 45 30 24 29 3A 8B 45 |....ER..(E0$):.E|
00000CE0: 52 A7 45 52 B2 C5 28 45 30 24 29 00 F1 10 00 05 |R.ER..(E0$).....|
00000CF0: 8E 00 1C 11 0A 05 8F 20 49 4E 53 54 52 55 43 54 |....... INSTRUCT|
00000D00: 20 54 4F 20 53 57 41 50 20 54 4F 20 44 49 53 4B | TO SWAP TO DISK|
00000D10: 20 47 49 56 45 4E 20 49 4E 20 44 24 00 40 11 14 | GIVEN IN D$.@..|
00000D20: 05 8B 44 24 B2 22 44 22 A7 53 31 24 B2 22 44 45 |..D$."D".S1$."DE|
00000D30: 53 54 49 4E 41 54 49 4F 4E 22 3A 89 31 33 32 30 |STINATION":.1320|
00000D40: 00 51 11 1E 05 53 31 24 B2 22 53 4F 55 52 43 45 |.Q...S1$."SOURCE|
00000D50: 22 00 7C 11 28 05 99 22 11 49 4E 53 45 52 54 20 |".|.(..".INSERT |
00000D60: 22 3B 53 31 24 3B 22 20 44 49 53 4B 2C 20 50 52 |";S1$;" DISK, PR|
00000D70: 45 53 53 20 12 53 50 41 43 45 92 22 00 92 11 32 |ESS .SPACE."...2|
00000D80: 05 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 31 33 |..A$:.A$.." ".13|
00000D90: 33 30 00 AA 11 3C 05 98 31 2C 22 49 30 22 3A 9F |30...<..1,"I0":.|
00000DA0: 32 2C 38 2C 30 2C 22 24 30 22 00 BF 11 46 05 8D |2,8,0,"$0"...F..|
00000DB0: 31 32 35 30 3A 8B 45 52 B1 30 A7 34 30 30 30 00 |1250:.ER.0.4000.|
00000DC0: D5 11 50 05 81 4A B2 31 A4 32 36 3A A1 23 32 2C |..P..J.1.26:.#2,|
00000DD0: 41 24 3A 82 4A 00 F1 11 5A 05 A1 23 32 2C 41 24 |A$:.J...Z..#2,A$|
00000DE0: 3A A1 23 32 2C 42 24 3A 49 52 24 B2 41 24 AA 42 |:.#2,B$:IR$.A$.B|
00000DF0: 24 00 14 12 64 05 A1 23 32 2C 41 24 3A A1 23 32 |$...d..#2,A$:.#2|
00000E00: 2C 41 24 3A A1 23 32 2C 42 24 3A 44 52 24 B2 41 |,A$:.#2,B$:DR$.A|
00000E10: 24 AA 42 24 00 1D 12 6E 05 A0 32 3A 8E 00 30 12 |$.B$...n..2:..0.|
00000E20: A0 0F 97 35 36 2C C2 28 39 39 39 29 3A 9C 3A 90 |...56,.(999):.:.|
00000E30: 00 71 12 AA 0F 83 37 36 2C 36 36 2C 33 2C 37 36 |.q....76,66,3,76|
00000E40: 2C 39 31 2C 33 2C 31 36 32 2C 33 2C 33 32 2C 31 |,91,3,162,3,32,1|
00000E50: 39 38 2C 32 35 35 2C 31 36 30 2C 30 2C 31 33 32 |98,255,160,0,132|
00000E60: 2C 33 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 34 |,3,32,207,255,14|
00000E70: 35 00 B5 12 B4 0F 83 33 2C 31 36 35 2C 31 34 34 |5......3,165,144|
00000E80: 2C 32 30 38 2C 33 2C 32 30 30 2C 32 30 38 2C 32 |,208,3,200,208,2|
00000E90: 34 34 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 |44,32,204,255,96|
00000EA0: 2C 31 36 32 2C 33 2C 33 32 2C 32 30 31 2C 32 35 |,162,3,32,201,25|
00000EB0: 35 2C 31 36 30 00 FB 12 BE 0F 83 30 2C 31 33 32 |5,160......0,132|
00000EC0: 2C 33 2C 31 37 37 2C 33 2C 33 32 2C 32 31 30 2C |,3,177,3,32,210,|
00000ED0: 32 35 35 2C 31 36 35 2C 31 34 34 2C 32 30 38 2C |255,165,144,208,|
00000EE0: 33 2C 32 30 30 2C 32 30 38 2C 32 34 34 2C 33 32 |3,200,208,244,32|
00000EF0: 2C 32 30 34 2C 32 35 35 2C 39 36 00 00 00 |,204,255,96... |
.......I.828.883:.A:.I,A:.I.B....999,B(5
6):.56,B(46).10:.:BB.B(56).E...N.B(999).
BB.1:BA.BB.256:MA.828.U.(..BM%(35,24)...
2..J.0.7:TA(J).2.J:....<.."..BACKUP 64.
- KEITH HOPE".C.F..".MODIFIED FROM"...P.
.".BACKUP 2031. - JIM LAW / KEITH HOPE".
..Z..".'GOTO4000' IF PROGRAM QUITS ABNOR
MALLY".;.D.."."N"BUFFERS AVAILABLE".G.N.
.1,8,15.P.X..560.I...D$."S":.1290:I2$.IR
$......DR$.."2A"..".ILLEGAL DOS 1.0 DISK
.":.4000.Y....I2$.I1$..".SOURCE AND DEST
INATION HAVE SAME ID CODE.":.4000... ..9
60.....T.TS:S.0:NU.1:T1.T:S1.S......1,"I
0":.3,8,3,"#".-...."READING BLOCK #";.V.
H..BM%(T1,S1).0..710:NU.NU.1:.NU.N.230.V
.R.S1.S1.1:.S1.20.S1.0:T1.T1.1......T1.T
F.1.200......"."..... 3.....D$."D":.1290
:.IR$..I1$..250.N....1,"I0":.3,8,3,"#"..
...."WRITING BUFFER #";.....NU.1:T1.T:S1
.S.#."..BM%(T1,S1).0..830:NU.NU.1:.NU.N.
320.C.,.S1.S1.1:.S1.20.S1.0:T1.T1.1.T.6.
.T1.TF.1.290.].@..".".D.J. 3...T.S.S1.1:
.S.20.S.0:T1.T1.1...^.T.T1:.T.TF.380...H
.D$."S":.1290:.IR$..I2$.360.K.R.NU.1:T1.
T:S1.S:.180...|.. FINISHED XFERS..... 1.
.....56,B(999):......."..BACKUP COMPLETE
".!....1,8,0,"$0".9....#1,A$:.A$..".".43
0.G....A$;:.490.K.B..#1,A$:SS.ST:A.C(A$)
:.A.A.F(A$)...L..#1,B$:SS.ST:B.C(B$):.B.
A.F(B$)...V..SS.540......A.1.B.1..510.F.
...#1,A$:.A$.""..:.450.T....A$;:.490....
..#1,A$:SS.ST:A.C(A$):.A.A.F(A$)......#1
,B$:SS.ST:B.C(B$):.B.B.F(B$).0...N.B.256
.A:.N;:..7... 1.=.&...T.0.. HEADER DEST
DISK...:..".INSERT DESTINATION DISK TO B
E FORMATTED".B.D.."..DISK NAME...
...................";DN$...N..
DN$." ".."...";:.580...X..C(DN$).16..:.4
0...B.F.0:.J.1.C(DN$):S1$.J(DN$,J,1)./.L
..S1$." ".S1$.G(34).F.1.F.V..J:.F.."..."
;:.580......".UNIQUE DISK ID...
.......................";I1$
......I1$." ".."..";:.640.D....C(I1$)..2
.."..";:.640......1,"N0:".DN$.",".I1$...
...1250......ER..ER$:.4000.......&.F.. R
EAD BLOCK T1,S1 TO BUFFER # NU.@.P.C.0:.
1,"U1";3;0;T1;S1.S.Z..1250:..ER.760.F...
C.C.1:.C.3.720......ER$:.J.(BB.NU).256.(
BB.NU).256.255:.J,.:.J:.820......1,"B-P"
;3;0.X....NU..0.." ...";I(" ".D(NU),3
);"...";......996,B(3):.997,B(4):.4,BB.N
U:.MA......3,B(996):.4,B(997).2. ..ST...
.ST..64..1250:.750.E.*..1250:.ER..ER$.K.
4...T.>.. WRITE BLOCK T1,S1 FROM BUFFER
# NU...H.C..:.C=0...R..1,"B-A";0;T1;S1:.
1,"B-P";3;0.H.\.." ...";I(" ".D(NU),3
);"...";...F..996,B(3):.997,B(4):.4,BB.N
U:.MA.3...P..3,B(996):.4,B(997).9.Z..ST.
...ST..64..".IEEE WRITE ERROR"ST".":.400
0.L....1250:.ER..ER$.B....1,"U2";3;0;T1;
S1.U....1250:..ER.950.....C.C.1:.C.3.910
......".UNRECOVERABLE WRITE ERROR"ER$:.4
000.......S.... GET BAM TO BM%(T,S)...J.
TS.1:TF..:. TF=0...T..1,"I0":.3,8,3,"#".
....S9.0.)....".TRACK # BLOCKS TO XFER
".I...."........................".K...NU
.0:T1.18:S1.0:C0$.G(.):.710.T...BY.4....
.T%.(BY.4).4.1......" ";T%;.H.$..B(BA.B
Y)....J...20:BM%(T%,J)..:.:BY.BY.4:.1110
.P...S.0...8.BY.BY.1:A0.B(BA.BY):.J...7:
BM%(T%,S).A0.TA(J):S.S.1:....B..S.22.108
0.%.L.BY.BY.1.<.V.ES.21:.T%.17.ES.19.M.`
..T%.24.ES.18.^.J..T%.30.ES.17.Z.T..J.ES
.24:BM%(T%,J)..1:.. .~.SM..:.J...20:.BM%
(T%,J)...SM.SM.1......:..12);SM:S9.S9.SM
.V....SM...TS.T%.TS.TS.1:.1190......SM..
..TF.T%......BY.143.1040..... 3. ...."ST
ART =";TS;" FINISH =";TF.G.D..".A TOTAL
OF";S9;"BLOCKS TO XFER".V.N.."APPROX".((
2.45.S9).60)"MINUTES FOR COPY".|.X......
.. READ ERR CH TO ER,ER$.O....1,E0$,E1$,
E2$,E3$:ER$.E0$.",".E1$.",".E2$.",".E3$.
....ER.C(E0$):.ER.ER.E(E0$)............
INSTRUCT TO SWAP TO DISK GIVEN IN D$.@..
..D$."D".S1$."DESTINATION":.1320.Q...S1$
."SOURCE".|.(..".INSERT ";S1$;" DISK, PR
ESS .SPACE."...2..A$:.A$.." ".1330...<..
1,"I0":.2,8,0,"$0"...F..1250:.ER.0.4000.
U.P..J.1.26:.#2,A$:.J...Z..#2,A$:.#2,B$:
IR$.A$.B$...D..#2,A$:.#2,A$:.#2,B$:DR$.A
$.B$...N. 2:..0. ..56,B(999):.:..Q....76
,66,3,76,91,3,162,3,32,198,255,160,0,132
,3,32,207,255,145......3,165,144,208,3,2
00,208,244,32,204,255,96,162,3,32,201,25
5,160......0,132,3,177,3,32,210,255,165,
144,208,3,200,208,244,32,204,255,96...