00000000: 01 08 29 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 3A 97 33 36 38 |:.A:.I,A:.I:.368|
00000020: 37 39 2C 38 3A 99 22 9E 22 00 50 08 0A 00 8F 22 |79,8:.".".P...."|
00000030: 44 3D 53 41 56 45 22 40 42 41 43 4B 32 22 2C 44 |D=SAVE"@BACK2",D|
00000040: 30 3A 3F 44 53 24 3A 43 41 54 41 4C 4F 47 44 30 |0:?DS$:CATALOGD0|
00000050: 00 68 08 14 00 42 42 B2 C2 28 34 34 29 AA 32 37 |.h...BB..(44).27|
00000060: 3A 97 39 39 35 2C 42 42 00 91 08 1E 00 97 39 39 |:.995,BB......99|
00000070: 38 2C C2 28 35 35 29 3A 97 39 39 39 2C C2 28 35 |8,.(55):.999,.(5|
00000080: 36 29 3A 97 35 35 2C 30 3A 97 35 36 2C 42 42 3A |6):.55,0:.56,BB:|
00000090: 9C 00 9F 08 28 00 42 42 B2 C2 28 39 39 35 29 00 |....(.BB..(995).|
000000A0: C2 08 32 00 4E B2 C2 28 39 39 39 29 AB 42 42 AB |..2.N..(999).BB.|
000000B0: 31 3A 42 41 B2 42 42 AC 32 35 36 3A 4D 41 B2 38 |1:BA.BB.256:MA.8|
000000C0: 32 38 00 D2 08 3C 00 86 42 4D 25 28 33 35 2C 32 |28...<..BM%(35,2|
000000D0: 34 29 00 E9 08 46 00 81 4A B2 30 A4 37 3A 54 41 |4)...F..J.0.7:TA|
000000E0: 28 4A 29 B2 32 AE 4A 3A 82 00 05 09 50 00 99 22 |(J).2.J:....P.."|
000000F0: 93 1D 1D 1D 12 4B 49 44 53 20 32 30 20 42 41 43 |.....KIDS 20 BAC|
00000100: 4B 55 50 92 22 00 35 09 5A 00 99 22 11 27 47 4F |KUP.".5.Z..".'GO|
00000110: 54 4F 31 30 30 30 30 27 20 49 46 20 50 52 4F 47 |TO10000' IF PROG|
00000120: 52 41 4D 20 51 55 49 54 53 20 41 42 4E 4F 52 4D |RAM QUITS ABNORM|
00000130: 41 4C 4C 59 22 00 52 09 64 00 99 22 11 22 4E 22 |ALLY".R.d.."."N"|
00000140: 42 55 46 46 45 52 53 20 41 56 41 49 4C 41 42 4C |BUFFERS AVAILABL|
00000150: 45 22 00 5E 09 6E 00 9F 31 2C 38 2C 31 35 00 7C |E".^.n..1,8,15.||
00000160: 09 C8 00 8F 20 2A 2A 2A 20 4D 41 49 4E 20 46 55 |.... *** MAIN FU|
00000170: 4E 43 54 49 4F 4E 53 20 2A 2A 2A 2A 00 86 09 D2 |NCTIONS ****....|
00000180: 00 8D 31 30 30 30 00 9F 09 DC 00 44 24 B2 22 53 |..1000.....D$."S|
00000190: 22 3A 8D 33 32 30 30 3A 49 32 24 B2 49 52 24 00 |":.3200:I2$.IR$.|
000001A0: CF 09 E6 00 8B 44 52 24 B3 B1 22 32 41 22 A7 99 |.....DR$.."2A"..|
000001B0: 22 12 49 4C 4C 45 47 41 4C 20 44 4F 53 20 31 2E |".ILLEGAL DOS 1.|
000001C0: 30 20 44 49 53 4B 92 3A 47 CF 31 30 30 30 30 00 |0 DISK.:G.10000.|
000001D0: 11 0A F0 00 8B 49 32 24 B2 49 31 24 A7 99 22 12 |.....I2$.I1$..".|
000001E0: 53 4F 55 52 43 45 20 41 4E 44 20 44 45 53 54 49 |SOURCE AND DESTI|
000001F0: 4E 41 54 49 4F 4E 20 48 41 56 45 20 53 41 4D 45 |NATION HAVE SAME|
00000200: 20 49 44 20 43 4F 44 45 92 22 3A 89 31 30 30 30 | ID CODE.":.1000|
00000210: 30 00 1B 0A FA 00 8D 32 35 30 30 00 37 0A 04 01 |0......2500.7...|
00000220: 54 B2 54 53 3A 53 B2 30 3A 4E 55 B2 31 3A 54 31 |T.TS:S.0:NU.1:T1|
00000230: B2 54 3A 53 31 B2 53 00 4E 0A 0E 01 98 31 2C 22 |.T:S1.S.N....1,"|
00000240: 49 30 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 66 |I0":.3,8,3,"#".f|
00000250: 0A 18 01 99 22 52 45 41 44 49 4E 47 20 42 4C 4F |...."READING BLO|
00000260: 43 4B 20 23 22 3B 00 90 0A 22 01 8B 42 4D 25 28 |CK #";..."..BM%(|
00000270: 54 31 2C 53 31 29 B2 30 A7 8D 32 30 30 30 3A 4E |T1,S1).0..2000:N|
00000280: 55 B2 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 33 32 30 |U.NU.1:.NU.N.320|
00000290: 00 B0 0A 2C 01 53 31 B2 53 31 AA 31 3A 8B 53 31 |...,.S1.S1.1:.S1|
000002A0: B1 32 30 A7 53 31 B2 30 3A 54 31 B2 54 31 AA 31 |.20.S1.0:T1.T1.1|
000002B0: 00 C1 0A 36 01 8B 54 31 B3 54 46 AA 31 A7 32 39 |...6..T1.TF.1.29|
000002C0: 30 00 CA 0A 40 01 99 22 11 22 00 D1 0A 4A 01 A0 |0...@.."."...J..|
000002D0: 33 00 F1 0A 54 01 44 24 B2 22 44 22 3A 8D 33 32 |3...T.D$."D":.32|
000002E0: 30 30 3A 8B 49 52 24 B3 B1 49 31 24 A7 89 33 34 |00:.IR$..I1$..34|
000002F0: 30 00 08 0B 5E 01 98 31 2C 22 49 30 22 3A 9F 33 |0...^..1,"I0":.3|
00000300: 2C 38 2C 33 2C 22 23 22 00 21 0B 68 01 99 22 57 |,8,3,"#".!.h.."W|
00000310: 52 49 54 49 4E 47 20 42 55 46 46 45 52 20 23 22 |RITING BUFFER #"|
00000320: 3B 00 34 0B 72 01 4E 55 B2 31 3A 54 31 B2 54 3A |;.4.r.NU.1:T1.T:|
00000330: 53 31 B2 53 00 5E 0B 7C 01 8B 42 4D 25 28 54 31 |S1.S.^.|..BM%(T1|
00000340: 2C 53 31 29 B2 30 A7 8D 32 32 30 30 3A 4E 55 B2 |,S1).0..2200:NU.|
00000350: 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 34 31 30 00 7E |NU.1:.NU.N.410.~|
00000360: 0B 86 01 53 31 B2 53 31 AA 31 3A 8B 53 31 B1 32 |...S1.S1.1:.S1.2|
00000370: 30 A7 53 31 B2 30 3A 54 31 B2 54 31 AA 31 00 8F |0.S1.0:T1.T1.1..|
00000380: 0B 90 01 8B 54 31 B3 54 46 AA 31 A7 33 38 30 00 |....T1.TF.1.380.|
00000390: 98 0B 9A 01 99 22 11 22 00 9F 0B A4 01 A0 33 00 |....."."......3.|
000003A0: BC 0B AE 01 53 B2 53 31 AA 31 3A 8B 53 B1 32 30 |....S.S1.1:.S.20|
000003B0: A7 53 B2 30 3A 54 31 B2 54 31 AA 31 00 CF 0B B8 |.S.0:T1.T1.1....|
000003C0: 01 54 B2 54 31 3A 8B 54 B1 54 46 A7 35 30 30 00 |.T.T1:.T.TF.500.|
000003D0: EE 0B C2 01 44 24 B2 22 53 22 3A 8D 33 32 30 30 |....D$."S":.3200|
000003E0: 3A 8B 49 52 24 B3 B1 49 32 24 A7 34 35 30 00 06 |:.IR$..I2$.450..|
000003F0: 0C CC 01 4E 55 B2 31 3A 54 31 B2 54 3A 53 31 B2 |...NU.1:T1.T:S1.|
00000400: 53 3A 89 32 37 30 00 1B 0C F4 01 8F 20 46 49 4E |S:.270...... FIN|
00000410: 49 53 48 45 44 20 58 46 45 52 53 00 22 0C FE 01 |ISHED XFERS."...|
00000420: A0 31 00 3E 0C 08 02 97 35 35 2C C2 28 39 39 38 |.1.>....55,.(998|
00000430: 29 3A 97 35 36 2C C2 28 39 39 39 29 3A 9C 00 5D |):.56,.(999):..]|
00000440: 0C 12 02 99 22 11 11 42 41 43 4B 55 50 20 43 4F |...."..BACKUP CO|
00000450: 4D 50 4C 45 54 45 22 3A 8D 34 30 30 30 00 6D 0C |MPLETE":.4000.m.|
00000460: 1C 02 9F 31 2C 38 2C 30 2C 22 24 30 22 00 85 0C |...1,8,0,"$0"...|
00000470: 26 02 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 12 |&..#1,A$:.A$..".|
00000480: 22 A7 35 35 30 00 93 0C 30 02 99 41 24 3B 3A 89 |".550...0..A$;:.|
00000490: 36 31 30 00 B7 0C 3A 02 A1 23 31 2C 41 24 3A 53 |610...:..#1,A$:S|
000004A0: 53 B2 53 54 3A 41 B2 C3 28 41 24 29 3A 8B 41 A7 |S.ST:A..(A$):.A.|
000004B0: 41 B2 C6 28 41 24 29 00 DB 0C 44 02 A1 23 31 2C |A..(A$)...D..#1,|
000004C0: 42 24 3A 53 53 B2 53 54 3A 42 B2 C3 28 42 24 29 |B$:SS.ST:B..(B$)|
000004D0: 3A 8B 42 A7 41 B2 C6 28 42 24 29 00 E7 0C 4E 02 |:.B.A..(B$)...N.|
000004E0: 8B 53 53 A7 36 36 30 00 F9 0C 58 02 8B 41 B2 31 |.SS.660...X..A.1|
000004F0: AF 42 B2 31 A7 8D 36 33 30 00 12 0D 62 02 A1 23 |.B.1..630...b..#|
00000500: 31 2C 41 24 3A 8B 41 24 B2 22 22 A7 99 3A 89 35 |1,A$:.A$.""..:.5|
00000510: 37 30 00 20 0D 6C 02 99 41 24 3B 3A 89 36 31 30 |70. .l..A$;:.610|
00000520: 00 44 0D 76 02 A1 23 31 2C 41 24 3A 53 53 B2 53 |.D.v..#1,A$:SS.S|
00000530: 54 3A 41 B2 C3 28 41 24 29 3A 8B 41 A7 41 B2 C6 |T:A..(A$):.A.A..|
00000540: 28 41 24 29 00 68 0D 80 02 A1 23 31 2C 42 24 3A |(A$).h....#1,B$:|
00000550: 53 53 B2 53 54 3A 42 B2 C3 28 42 24 29 3A 8B 42 |SS.ST:B..(B$):.B|
00000560: A7 41 B2 C6 28 42 24 29 00 7B 0D 8A 02 4E B2 42 |.A..(B$).{...N.B|
00000570: AC 32 35 36 AA 41 3A 99 4E 3A 8E 00 82 0D 94 02 |.256.A:.N:......|
00000580: A0 31 00 88 0D 9E 02 80 00 9F 0D E8 03 8F 20 48 |.1............ H|
00000590: 45 41 44 45 52 20 44 45 53 54 20 44 49 53 4B 00 |EADER DEST DISK.|
000005A0: A9 0D ED 03 8D 34 30 30 30 00 DC 0D F2 03 99 22 |.....4000......"|
000005B0: 11 49 4E 53 45 52 54 20 44 45 53 54 49 4E 41 54 |.INSERT DESTINAT|
000005C0: 49 4F 4E 20 20 20 20 44 49 53 4B 20 54 4F 20 42 |ION DISK TO B|
000005D0: 45 20 46 4F 52 4D 41 54 54 45 44 22 00 19 0E FC |E FORMATTED"....|
000005E0: 03 85 22 11 11 44 49 53 4B 20 4E 41 4D 45 1D 1D |.."..DISK NAME..|
000005F0: 1D A4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000600: 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ...............|
00000610: 9D 9D 9D 9D 22 3B 44 4E 24 00 34 0E 06 04 8B 44 |....";DN$.4....D|
00000620: 4E 24 B2 22 A4 22 A7 99 22 91 91 91 22 3B 3A 89 |N$.".".."...";:.|
00000630: 31 30 32 30 00 49 0E 10 04 8B C3 28 44 4E 24 29 |1020.I.....(DN$)|
00000640: B1 31 36 A7 9C 3A 89 34 30 00 6C 0E 1A 04 46 B2 |.16..:.40.l...F.|
00000650: 30 3A 81 4A B2 31 A4 C3 28 44 4E 24 29 3A 53 31 |0:.J.1..(DN$):S1|
00000660: 24 B2 CA 28 44 4E 24 2C 4A 2C 31 29 00 87 0E 24 |$..(DN$,J,1)...$|
00000670: 04 8B 53 31 24 B2 22 A4 22 B0 53 31 24 B2 C7 28 |..S1$.".".S1$..(|
00000680: 33 34 29 A7 46 B2 31 00 9F 0E 2E 04 82 4A 3A 8B |34).F.1......J:.|
00000690: 46 A7 99 22 91 91 91 22 3B 3A 89 31 30 32 30 00 |F.."...";:.1020.|
000006A0: E8 0E 38 04 85 22 11 55 4E 49 51 55 45 20 44 49 |..8..".UNIQUE DI|
000006B0: 53 4B 20 49 44 1D 1D 1D A4 20 20 20 20 20 20 20 |SK ID.... |
000006C0: 20 20 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D | ....|
000006D0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000006E0: 9D 9D 9D 22 3B 49 31 24 00 02 0F 42 04 8B 49 31 |...";I1$...B..I1|
000006F0: 24 B2 22 A4 22 A7 99 22 91 91 22 3B 3A 89 31 30 |$.".".."..";:.10|
00000700: 38 30 00 1E 0F 4C 04 8B C3 28 49 31 24 29 B3 B1 |80...L...(I1$)..|
00000710: 32 A7 99 22 91 91 22 3B 3A 89 31 30 38 30 00 37 |2.."..";:.1080.7|
00000720: 0F 56 04 98 31 2C 22 4E 30 3A 22 AA 44 4E 24 AA |.V..1,"N0:".DN$.|
00000730: 22 2C 22 AA 49 31 24 00 41 0F 60 04 8D 33 30 30 |",".I1$.A.`..300|
00000740: 30 00 55 0F 6A 04 8B 45 52 A7 99 45 52 24 3A 89 |0.U.j..ER..ER$:.|
00000750: 31 30 30 30 30 00 5B 0F 74 04 8E 00 81 0F D0 07 |10000.[.t.......|
00000760: 8F 20 52 45 41 44 20 42 4C 4F 43 4B 20 54 31 2C |. READ BLOCK T1,|
00000770: 53 31 20 54 4F 20 42 55 46 46 45 52 20 23 20 4E |S1 TO BUFFER # N|
00000780: 55 00 89 0F DA 07 43 B2 2E 00 9F 0F E4 07 98 31 |U.....C........1|
00000790: 2C 22 55 31 22 3B 33 3B 30 3B 54 31 3B 53 31 00 |,"U1";3;0;T1;S1.|
000007A0: B3 0F EE 07 8D 33 30 30 30 3A 8B A8 45 52 A7 32 |.....3000:..ER.2|
000007B0: 30 36 30 00 C7 0F F8 07 43 B2 43 AA 31 3A 8B 43 |060.....C.C.1:.C|
000007C0: B3 33 A7 32 30 32 30 00 FD 0F 02 08 99 45 52 24 |.3.2020......ER$|
000007D0: 3A 81 4A B2 28 42 42 AA 4E 55 29 AC 32 35 36 A4 |:.J.(BB.NU).256.|
000007E0: 28 42 42 AA 4E 55 29 AC 32 35 36 AA 32 35 35 3A |(BB.NU).256.255:|
000007F0: 97 4A 2C 2E 3A 82 4A 3A 89 32 31 30 30 00 0E 10 |.J,.:.J:.2100...|
00000800: 0C 08 98 31 2C 22 42 2D 50 22 3B 33 3B 30 00 3A |...1,"B-P";3;0.:|
00000810: 10 16 08 8B 4E 55 B3 B1 30 A7 99 22 20 20 20 9D |....NU..0.." .|
00000820: 9D 9D 22 3B C9 28 22 20 20 22 AA C4 28 4E 55 29 |..";.(" "..(NU)|
00000830: 2C 33 29 3B 22 9D 9D 9D 22 3B 00 5F 10 20 08 97 |,3);"...";._. ..|
00000840: 39 39 36 2C C2 28 33 29 3A 97 39 39 37 2C C2 28 |996,.(3):.997,.(|
00000850: 34 29 3A 97 34 2C 42 42 AA 4E 55 3A 9E 4D 41 00 |4):.4,BB.NU:.MA.|
00000860: 77 10 25 08 97 33 2C C2 28 39 39 36 29 3A 97 34 |w.%..3,.(996):.4|
00000870: 2C C2 28 39 39 37 29 00 95 10 2A 08 8B 53 54 B3 |,.(997)...*..ST.|
00000880: B1 2E AF 53 54 B3 B1 36 34 A7 8D 33 30 30 30 3A |...ST..64..3000:|
00000890: 89 32 30 35 30 00 9B 10 34 08 8E 00 C4 10 98 08 |.2050...4.......|
000008A0: 8F 20 57 52 49 54 45 20 42 4C 4F 43 4B 20 54 31 |. WRITE BLOCK T1|
000008B0: 2C 53 31 20 46 52 4F 4D 20 42 55 46 46 45 52 20 |,S1 FROM BUFFER |
000008C0: 23 20 4E 55 00 CC 10 A2 08 43 B2 2E 00 EE 10 AC |# NU.....C......|
000008D0: 08 98 31 2C 22 42 2D 41 22 3B 30 3B 54 31 3B 53 |..1,"B-A";0;T1;S|
000008E0: 31 3A 98 31 2C 22 42 2D 50 22 3B 33 3B 30 00 13 |1:.1,"B-P";3;0..|
000008F0: 11 B6 08 99 22 20 20 20 9D 9D 9D 22 3B C9 28 22 |...." ...";.("|
00000900: 20 20 22 AA C4 28 4E 55 29 2C 33 29 3B 22 9D 9D | "..(NU),3);"..|
00000910: 9D 22 3B 00 3A 11 C0 08 97 39 39 36 2C C2 28 33 |.";.:....996,.(3|
00000920: 29 3A 97 39 39 37 2C C2 28 34 29 3A 97 34 2C 42 |):.997,.(4):.4,B|
00000930: 42 AA 4E 55 3A 9E 4D 41 AA 33 00 52 11 C5 08 97 |B.NU:.MA.3.R....|
00000940: 33 2C C2 28 39 39 36 29 3A 97 34 2C C2 28 39 39 |3,.(996):.4,.(99|
00000950: 37 29 00 85 11 CA 08 8B 53 54 B3 B1 2E AF 53 54 |7)......ST....ST|
00000960: B3 B1 36 34 A7 99 22 12 49 45 45 45 20 57 52 49 |..64..".IEEE WRI|
00000970: 54 45 20 45 52 52 4F 52 22 53 54 22 92 3A 47 CF |TE ERROR"ST".:G.|
00000980: 31 30 30 30 30 00 9B 11 D4 08 98 31 2C 22 55 32 |10000......1,"U2|
00000990: 22 3B 33 3B 30 3B 54 31 3B 53 31 00 AF 11 DE 08 |";3;0;T1;S1.....|
000009A0: 8D 33 30 30 30 3A 8B A8 45 52 A7 32 33 30 30 00 |.3000:..ER.2300.|
000009B0: C3 11 E8 08 43 B2 43 AA 31 3A 8B 43 B3 33 A7 32 |....C.C.1:.C.3.2|
000009C0: 32 36 30 00 EF 11 F2 08 99 22 12 55 4E 52 45 43 |260......".UNREC|
000009D0: 4F 56 45 52 41 42 4C 45 20 57 52 49 54 45 20 45 |OVERABLE WRITE E|
000009E0: 52 52 4F 52 22 45 52 24 3A 89 31 30 30 30 30 00 |RROR"ER$:.10000.|
000009F0: F5 11 FC 08 8E 00 0F 12 C4 09 8F 20 47 45 54 20 |........... GET |
00000A00: 42 41 4D 20 54 4F 20 42 4D 24 28 54 2C 53 29 00 |BAM TO BM$(T,S).|
00000A10: 1D 12 CE 09 54 53 B2 31 3A 54 46 B2 2E 00 34 12 |....TS.1:TF...4.|
00000A20: D8 09 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C 33 |...1,"I0":.3,8,3|
00000A30: 2C 22 23 22 00 3D 12 E2 09 53 39 B2 30 00 5E 12 |,"#".=...S9.0.^.|
00000A40: EC 09 99 22 11 54 52 41 43 4B 20 23 20 20 20 42 |...".TRACK # B|
00000A50: 4C 4F 43 4B 53 20 54 4F 20 58 46 45 52 22 00 7E |LOCKS TO XFER".~|
00000A60: 12 F6 09 99 22 23 23 23 23 23 23 23 23 23 23 23 |...."###########|
00000A70: 23 23 23 23 23 23 23 23 23 23 23 23 23 22 00 A1 |#############"..|
00000A80: 12 00 0A 4E 55 B2 30 3A 54 31 B2 31 38 3A 53 31 |...NU.0:T1.18:S1|
00000A90: B2 30 3A 43 30 24 B2 C7 28 2E 29 3A 8D 32 30 30 |.0:C0$..(.):.200|
00000AA0: 30 00 AA 12 0A 0A 42 59 B2 34 00 BC 12 14 0A 54 |0.....BY.4.....T|
00000AB0: 25 B2 28 42 59 AB 34 29 AD 34 AA 31 00 CA 12 1E |%.(BY.4).4.1....|
00000AC0: 0A 99 22 20 20 22 3B 54 25 3B 00 FE 12 28 0A 8B |.." ";T%;...(..|
00000AD0: C2 28 42 41 AA 42 59 29 B2 2E A7 81 4A B2 2E A4 |.(BA.BY)....J...|
00000AE0: 32 30 3A 42 4D 25 28 54 25 2C 4A 29 B2 2E 3A 82 |20:BM%(T%,J)..:.|
00000AF0: 3A 42 59 B2 42 59 AA 34 3A 89 32 36 35 30 00 06 |:BY.BY.4:.2650..|
00000B00: 13 32 0A 53 B2 30 00 40 13 3C 0A 42 59 B2 42 59 |.2.S.0.@.<.BY.BY|
00000B10: AA 31 3A 41 30 B2 C2 28 42 41 AA 42 59 29 3A 81 |.1:A0..(BA.BY):.|
00000B20: 4A B2 2E A4 37 3A 42 4D 25 28 54 25 2C 53 29 B2 |J...7:BM%(T%,S).|
00000B30: 41 30 AF 54 41 28 4A 29 3A 53 B2 53 AA 31 3A 82 |A0.TA(J):S.S.1:.|
00000B40: 00 4F 13 46 0A 8B 53 B3 32 32 A7 32 36 32 30 00 |.O.F..S.22.2620.|
00000B50: 5B 13 50 0A 42 59 B2 42 59 AA 31 00 72 13 5A 0A |[.P.BY.BY.1.r.Z.|
00000B60: 45 53 B2 32 31 3A 8B 54 25 B1 31 37 A7 45 53 B2 |ES.21:.T%.17.ES.|
00000B70: 31 39 00 83 13 64 0A 8B 54 25 B1 32 34 A7 45 53 |19...d..T%.24.ES|
00000B80: B2 31 38 00 94 13 6E 0A 8B 54 25 B1 33 30 A7 45 |.18...n..T%.30.E|
00000B90: 53 B2 31 37 00 B0 13 78 0A 81 4A B2 45 53 A4 32 |S.17...x..J.ES.2|
00000BA0: 34 3A 42 4D 25 28 54 25 2C 4A 29 B2 AB 31 3A 82 |4:BM%(T%,J)..1:.|
00000BB0: 00 D6 13 82 0A 53 4D B2 2E 3A 81 4A B2 2E A4 32 |.....SM..:.J...2|
00000BC0: 30 3A 8B 42 4D 25 28 54 25 2C 4A 29 B2 2E A7 53 |0:.BM%(T%,J)...S|
00000BD0: 4D B2 53 4D AA 31 00 EE 13 8C 0A 82 3A 99 A3 31 |M.SM.1......:..1|
00000BE0: 32 29 3B 53 4D 3A 53 39 B2 53 39 AA 53 4D 00 0C |2);SM:S9.S9.SM..|
00000BF0: 14 96 0A 8B 53 4D B2 2E AF 54 53 B2 54 25 A7 54 |....SM...TS.T%.T|
00000C00: 53 B2 54 53 AA 31 3A 89 32 37 33 30 00 1D 14 A0 |S.TS.1:.2730....|
00000C10: 0A 8B 53 4D B3 B1 2E A7 54 46 B2 54 25 00 2E 14 |..SM....TF.T%...|
00000C20: AA 0A 8B 42 59 B3 31 34 33 A7 32 35 38 30 00 35 |...BY.143.2580.5|
00000C30: 14 B4 0A A0 33 00 56 14 BE 0A 99 22 53 54 41 52 |....3.V...."STAR|
00000C40: 54 20 3D 22 3B 54 53 3B 22 20 46 49 4E 49 53 48 |T =";TS;" FINISH|
00000C50: 20 3D 22 3B 54 46 00 7D 14 C8 0A 99 22 11 41 20 | =";TF.}....".A |
00000C60: 54 4F 54 41 4C 20 4F 46 22 3B 53 39 3B 22 42 4C |TOTAL OF";S9;"BL|
00000C70: 4F 43 4B 53 20 54 4F 20 58 46 45 52 22 00 99 14 |OCKS TO XFER"...|
00000C80: D2 0A 53 38 B2 39 30 AA 32 35 AA 28 2E 36 35 30 |..S8.90.25.(.650|
00000C90: AA 2E 39 38 30 29 AC 53 39 00 CF 14 DC 0A 53 37 |..980).S9.....S7|
00000CA0: B2 B5 28 53 38 AD 36 30 29 3A 99 22 41 50 50 52 |..(S8.60):."APPR|
00000CB0: 4F 58 22 3B 53 37 22 3A 22 B5 28 53 38 AB 53 37 |OX";S7":".(S8.S7|
00000CC0: AC 36 30 29 3B 22 46 4F 52 20 43 4F 50 59 22 00 |.60);"FOR COPY".|
00000CD0: D5 14 E6 0A 8E 00 F1 14 B8 0B 8F 20 52 45 41 44 |........... READ|
00000CE0: 20 45 52 52 20 43 48 20 54 4F 20 45 52 2C 45 52 | ERR CH TO ER,ER|
00000CF0: 24 00 28 15 C2 0B 84 31 2C 45 30 24 2C 45 31 24 |$.(....1,E0$,E1$|
00000D00: 2C 45 32 24 2C 45 33 24 3A 45 52 24 B2 45 30 24 |,E2$,E3$:ER$.E0$|
00000D10: AA 22 2C 22 AA 45 31 24 AA 22 2C 22 AA 45 32 24 |.",".E1$.",".E2$|
00000D20: AA 22 2C 22 AA 45 33 24 00 44 15 CC 0B 45 52 B2 |.",".E3$.D...ER.|
00000D30: C3 28 45 30 24 29 3A 8B 45 52 A7 45 52 B2 C5 28 |.(E0$):.ER.ER..(|
00000D40: 45 30 24 29 00 4A 15 D6 0B 8E 00 75 15 80 0C 8F |E0$).J.....u....|
00000D50: 20 49 4E 53 54 52 55 43 54 20 54 4F 20 53 57 41 | INSTRUCT TO SWA|
00000D60: 50 20 54 4F 20 44 49 53 4B 20 47 49 56 45 4E 20 |P TO DISK GIVEN |
00000D70: 49 4E 20 44 24 00 99 15 8A 0C 8B 44 24 B2 22 44 |IN D$......D$."D|
00000D80: 22 A7 53 31 24 B2 22 44 45 53 54 49 4E 41 54 49 |".S1$."DESTINATI|
00000D90: 4F 4E 22 3A 89 33 32 33 30 00 AA 15 94 0C 53 31 |ON":.3230.....S1|
00000DA0: 24 B2 22 53 4F 55 52 43 45 22 00 B4 15 99 0C 8D |$."SOURCE"......|
00000DB0: 34 30 30 30 00 E1 15 9E 0C 99 22 93 11 05 49 4E |4000......"...IN|
00000DC0: 53 45 52 54 20 22 3B 53 31 24 3B 22 20 44 49 53 |SERT ";S1$;" DIS|
00000DD0: 4B 2C 20 50 52 45 53 53 12 53 50 41 43 45 92 9E |K, PRESS.SPACE..|
00000DE0: 22 00 F7 15 A8 0C A1 41 24 3A 8B 41 24 B3 B1 22 |"......A$:.A$.."|
00000DF0: 20 22 A7 33 32 34 30 00 07 16 B2 0C 9F 32 2C 38 | ".3240......2,8|
00000E00: 2C 30 2C 22 24 30 22 00 1D 16 BC 0C 8D 33 30 30 |,0,"$0"......300|
00000E10: 30 3A 8B 45 52 B1 30 A7 31 30 30 30 30 00 33 16 |0:.ER.0.10000.3.|
00000E20: C6 0C 81 4A B2 31 A4 32 36 3A A1 23 32 2C 41 24 |...J.1.26:.#2,A$|
00000E30: 3A 82 4A 00 4F 16 D0 0C A1 23 32 2C 41 24 3A A1 |:.J.O....#2,A$:.|
00000E40: 23 32 2C 42 24 3A 49 52 24 B2 41 24 AA 42 24 00 |#2,B$:IR$.A$.B$.|
00000E50: 72 16 DA 0C A1 23 32 2C 41 24 3A A1 23 32 2C 41 |r....#2,A$:.#2,A|
00000E60: 24 3A A1 23 32 2C 42 24 3A 44 52 24 B2 41 24 AA |$:.#2,B$:DR$.A$.|
00000E70: 42 24 00 7B 16 E4 0C A0 32 3A 8E 00 9E 16 A0 0F |B$.{....2:......|
00000E80: 56 4F B2 33 36 38 37 38 3A 56 4A B2 33 36 38 37 |VO.36878:VJ.3687|
00000E90: 35 3A 58 54 B2 30 3A 97 56 4A 2C 32 32 30 00 C9 |5:XT.0:.VJ,220..|
00000EA0: 16 A1 0F 97 56 4F 2C 31 35 3A 81 54 55 B2 31 A4 |....VO,15:.TU.1.|
00000EB0: 34 30 3A 82 54 55 3A 97 56 4F 2C 30 3A 81 54 51 |40:.TU:.VO,0:.TQ|
00000EC0: B2 31 A4 34 30 3A 82 54 51 00 DE 16 A2 0F 58 54 |.1.40:.TQ.....XT|
00000ED0: B2 58 54 AA 31 3A 8B 58 54 B1 B2 35 A7 8E 00 E8 |.XT.1:.XT..5....|
00000EE0: 16 A3 0F 89 34 30 30 31 00 F7 16 10 27 8F 20 44 |....4001....'. D|
00000EF0: 52 4F 50 20 4F 55 54 00 15 17 1A 27 97 35 35 2C |ROP OUT....'.55,|
00000F00: C2 28 39 39 38 29 3A 97 35 36 2C C2 28 39 39 39 |.(998):.56,.(999|
00000F10: 29 3A 9C 3A 90 00 56 17 98 3A 83 37 36 2C 36 36 |):.:..V..:.76,66|
00000F20: 2C 33 2C 37 36 2C 39 31 2C 33 2C 31 36 32 2C 33 |,3,76,91,3,162,3|
00000F30: 2C 33 32 2C 31 39 38 2C 32 35 35 2C 31 36 30 2C |,32,198,255,160,|
00000F40: 30 2C 31 33 32 2C 33 2C 33 32 2C 32 30 37 2C 32 |0,132,3,32,207,2|
00000F50: 35 35 2C 31 34 35 00 9A 17 A2 3A 83 33 2C 31 36 |55,145....:.3,16|
00000F60: 35 2C 31 34 34 2C 32 30 38 2C 33 2C 32 30 30 2C |5,144,208,3,200,|
00000F70: 32 30 38 2C 32 34 34 2C 33 32 2C 32 30 34 2C 32 |208,244,32,204,2|
00000F80: 35 35 2C 39 36 2C 31 36 32 2C 33 2C 33 32 2C 32 |55,96,162,3,32,2|
00000F90: 30 31 2C 32 35 35 2C 31 36 30 00 E0 17 AC 3A 83 |01,255,160....:.|
00000FA0: 30 2C 31 33 32 2C 33 2C 31 37 37 2C 33 2C 33 32 |0,132,3,177,3,32|
00000FB0: 2C 32 31 30 2C 32 35 35 2C 31 36 35 2C 31 34 34 |,210,255,165,144|
00000FC0: 2C 32 30 38 2C 33 2C 32 30 30 2C 32 30 38 2C 32 |,208,3,200,208,2|
00000FD0: 34 34 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 |44,32,204,255,96|
00000FE0: 00 00 00 |... |
..)....I.828.883:.A:.I,A:.I:.36879,8:.".
".P...."D=SAVE"@BACK2",D0:?DS$:CATALOGD0
.H...BB.B(44).27:.995,BB......998,B(55):
.999,B(56):.55,0:.56,BB:....(.BB.B(995).
B.2.N.B(999).BB.1:BA.BB.256:MA.828.R.<..
BM%(35,24)...F..J.0.7:TA(J).2.J:....P.."
.....KIDS 20 BACKUP.".5.Z..".'GOTO10000'
IF PROGRAM QUITS ABNORMALLY".R.D.."."N"
BUFFERS AVAILABLE".^.N..1,8,15.|.H.. ***
MAIN FUNCTIONS ****...R..1000.....D$."S
":.3200:I2$.IR$.O....DR$.."2A"..".ILLEGA
L DOS 1.0 DISK.:GO10000......I2$.I1$..".
SOURCE AND DESTINATION HAVE SAME ID CODE
.":.10000......2500.7...T.TS:S.0:NU.1:T1
.T:S1.S.N....1,"I0":.3,8,3,"#".F...."REA
DING BLOCK #";..."..BM%(T1,S1).0..2000:N
U.NU.1:.NU.N.320...,.S1.S1.1:.S1.20.S1.0
:T1.T1.1.A.6..T1.TF.1.290.J.@..".".Q.J.
3...T.D$."D":.3200:.IR$..I1$..340...^..1
,"I0":.3,8,3,"#".!.H.."WRITING BUFFER #"
;.4.R.NU.1:T1.T:S1.S.^.|..BM%(T1,S1).0..
2200:NU.NU.1:.NU.N.410.~...S1.S1.1:.S1.2
0.S1.0:T1.T1.1......T1.TF.1.380......"."
..... 3.....S.S1.1:.S.20.S.0:T1.T1.1.O..
.T.T1:.T.TF.500...B.D$."S":.3200:.IR$..I
2$.450...L.NU.1:T1.T:S1.S:.270...... FIN
ISHED XFERS."... 1.>....55,B(998):.56,B(
999):..]...."..BACKUP COMPLETE":.4000.M.
...1,8,0,"$0"...&..#1,A$:.A$..".".550...
0..A$;:.610...:..#1,A$:SS.ST:A.C(A$):.A.
A.F(A$)...D..#1,B$:SS.ST:B.C(B$):.B.A.F(
B$)...N..SS.660...X..A.1.B.1..630...B..#
1,A$:.A$.""..:.570. .L..A$;:.610.D.V..#1
,A$:SS.ST:A.C(A$):.A.A.F(A$).H....#1,B$:
SS.ST:B.C(B$):.B.A.F(B$).{...N.B.256.A:.
N:...... 1............ HEADER DEST DISK.
.....4000......".INSERT DESTINATION D
ISK TO BE FORMATTED"......"..DISK NAME..
.. ...................";DN
$.4....DN$.".".."...";:.1020.I....C(DN$)
.16..:.40.L...F.0:.J.1.C(DN$):S1$.J(DN$,
J,1)...$..S1$.".".S1$.G(34).F.1......J:.
F.."...";:.1020...8..".UNIQUE DISK ID...
. ....................
...";I1$...B..I1$.".".."..";:.1080...L..
C(I1$)..2.."..";:.1080.7.V..1,"N0:".DN$.
",".I1$.A.`..3000.U.J..ER..ER$:.10000.[.
T.....P.. READ BLOCK T1,S1 TO BUFFER # N
U...Z.C........1,"U1";3;0;T1;S1......300
0:..ER.2060.G...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);"...";._. ..996,B(3)
:.997,B(4):.4,BB.NU:.MA.W.%..3,B(996):.4
,B(997)...*..ST....ST..64..3000:.2050...
4...D.... WRITE BLOCK T1,S1 FROM BUFFER
# NU.L...C........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.R.E..3,B(996):.4,B(997)...J..ST....ST
..64..".IEEE WRITE ERROR"ST".:GO10000...
T..1,"U2";3;0;T1;S1......3000:..ER.2300.
C...C.C.1:.C.3.2260......".UNRECOVERABLE
WRITE ERROR"ER$:.10000.........D.. GET
BAM TO BM$(T,S)...N.TS.1:TF...4.X..1,"I0
":.3,8,3,"#".=...S9.0.^....".TRACK # B
LOCKS TO XFER".~...."###################
#####".....NU.0:T1.18:S1.0:C0$.G(.):.200
0.....BY.4.....T%.(BY.4).4.1.J...." ";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:.
.O.F..S.22.2620.[.P.BY.BY.1.R.Z.ES.21:.T
%.17.ES.19...D..T%.24.ES.18...N..T%.30.E
S.17...X..J.ES.24:BM%(T%,J)..1:..V...SM.
.:.J...20:.BM%(T%,J)...SM.SM.1......:..1
2);SM:S9.S9.SM......SM...TS.T%.TS.TS.1:.
2730... ..SM....TF.T%......BY.143.2580.5
... 3.V...."START =";TS;" FINISH =";TF.}
.H..".A TOTAL OF";S9;"BLOCKS TO XFER"...
R.S8.90.25.(.650..980).S9.O...S7..(S8.60
):."APPROX";S7":".(S8.S7.60);"FOR COPY".
U.......... READ ERR CH TO ER,ER$.(.B..1
,E0$,E1$,E2$,E3$:ER$.E0$.",".E1$.",".E2$
.",".E3$.D.L.ER.C(E0$):.ER.ER.E(E0$).J.V
...U.... INSTRUCT TO SWAP TO DISK GIVEN
IN D$......D$."D".S1$."DESTINATION":.323
0.....S1$."SOURCE"......4000......"...IN
SERT ";S1$;" DISK, PRESS.SPACE.."......A
$:.A$.." ".3240......2,8,0,"$0"......300
0:.ER.0.10000.3.F..J.1.26:.#2,A$:.J.O.P.
.#2,A$:.#2,B$:IR$.A$.B$.R.Z..#2,A$:.#2,A
$:.#2,B$:DR$.A$.B$.{... 2:.... .VO.36878
:VJ.36875:XT.0:.VJ,220.I....VO,15:.TU.1.
40:.TU:.VO,0:.TQ.1.40:.TQ.....XT.XT.1:.X
T..5........4001....'. DROP OUT....'.55,
B(998):.56,B(999):.:..V..:.76,66,3,76,91
,3,162,3,32,198,255,160,0,132,3,32,207,2
55,145....:.3,165,144,208,3,200,208,244,
32,204,255,96,162,3,32,201,255,160....:.
0,132,3,177,3,32,210,255,165,144,208,3,2
00,208,244,32,204,255,96...