DISK BACKUP
FILE INFORMATION
FILENAME(S): DISK BACKUP
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-12-01 13:50:45
APPEARS ON: 1 disk(s)
FILE HASH
8104e06ed8d897f670953413fccb9b2231e8df0a2756a12119aec41385dc756e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FIL 56 | DISK BACKUP | PRG | hedning, Jonny 1571 | 6 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 01 00 81 49 B2 38 32 38 A4 38 38 33 |.......I.828.883|
00000010: 3A 87 41 3A 97 49 2C 41 3A 82 49 00 43 08 0A 00 |:.A:.I,A:.I.C...|
00000020: 8F 22 44 3D 44 53 41 56 45 22 40 42 41 43 4B 32 |."D=DSAVE"@BACK2|
00000030: 22 2C 44 30 3A 3F 44 53 24 3A 43 41 54 41 4C 4F |",D0:?DS$:CATALO|
00000040: 47 44 30 00 5B 08 14 00 42 42 B2 C2 28 34 34 29 |GD0.[...BB..(44)|
00000050: AA 32 37 3A 97 39 39 35 2C 42 42 00 84 08 1E 00 |.27:.995,BB.....|
00000060: 97 39 39 38 2C C2 28 35 35 29 3A 97 39 39 39 2C |.998,.(55):.999,|
00000070: C2 28 35 36 29 3A 97 35 35 2C 30 3A 97 35 36 2C |.(56):.55,0:.56,|
00000080: 42 42 3A 9C 00 92 08 28 00 42 42 B2 C2 28 39 39 |BB:....(.BB..(99|
00000090: 35 29 00 B5 08 32 00 4E B2 C2 28 39 39 39 29 AB |5)...2.N..(999).|
000000A0: 42 42 AB 31 3A 42 41 B2 42 42 AC 32 35 36 3A 4D |BB.1:BA.BB.256:M|
000000B0: 41 B2 38 32 38 00 C5 08 3C 00 86 42 4D 25 28 33 |A.828...<..BM%(3|
000000C0: 35 2C 32 34 29 00 DC 08 46 00 81 4A B2 30 A4 37 |5,24)...F..J.0.7|
000000D0: 3A 54 41 28 4A 29 B2 32 AE 4A 3A 82 00 F7 08 50 |:TA(J).2.J:....P|
000000E0: 00 99 22 93 1D 1D 1D 1D 1D 12 42 41 43 4B 55 50 |..".......BACKUP|
000000F0: 20 31 35 34 31 92 22 00 27 09 5A 00 99 22 11 27 | 1541.".'.Z..".'|
00000100: 47 4F 54 4F 31 30 30 30 30 27 20 49 46 20 50 52 |GOTO10000' IF PR|
00000110: 4F 47 52 41 4D 20 51 55 49 54 53 20 41 42 4E 4F |OGRAM QUITS ABNO|
00000120: 52 4D 41 4C 4C 59 22 00 43 09 64 00 99 22 11 22 |RMALLY".C.d.."."|
00000130: 4E 22 42 55 46 46 45 52 53 20 41 56 41 49 4C 41 |N"BUFFERS AVAILA|
00000140: 42 4C 45 00 4F 09 6E 00 9F 31 2C 38 2C 31 35 00 |BLE.O.n..1,8,15.|
00000150: 69 09 C8 00 8F 2A 2A 2A 4D 41 49 4E 20 46 55 4E |i....***MAIN FUN|
00000160: 43 54 49 4F 4E 53 2A 2A 2A 00 73 09 D2 00 8D 31 |CTIONS***.s....1|
00000170: 30 30 30 00 8C 09 DC 00 44 24 B2 22 53 22 3A 8D |000.....D$."S":.|
00000180: 33 32 30 30 3A 49 32 24 B2 49 52 24 00 BC 09 E6 |3200:I2$.IR$....|
00000190: 00 8B 44 52 24 B3 B1 22 32 41 22 A7 99 22 12 49 |..DR$.."2A"..".I|
000001A0: 4C 4C 45 47 41 4C 20 44 4F 53 20 31 2E 30 20 44 |LLEGAL DOS 1.0 D|
000001B0: 49 53 4B 92 22 3A 89 31 30 30 30 30 00 FF 09 F0 |ISK.":.10000....|
000001C0: 00 8B 49 32 24 B2 49 31 24 A7 20 99 22 12 53 4F |..I2$.I1$. .".SO|
000001D0: 55 52 43 45 20 41 4E 44 20 44 45 53 54 49 4E 41 |URCE AND DESTINA|
000001E0: 54 49 4F 4E 20 48 41 56 45 20 53 41 4D 45 20 49 |TION HAVE SAME I|
000001F0: 44 20 43 4F 44 45 92 22 3A 89 31 30 30 30 30 00 |D CODE.":.10000.|
00000200: 09 0A FA 00 8D 32 35 30 30 00 25 0A 04 01 54 B2 |.....2500.%...T.|
00000210: 54 53 3A 53 B2 30 3A 4E 55 B2 31 3A 54 31 B2 54 |TS:S.0:NU.1:T1.T|
00000220: 3A 53 31 B2 53 00 3C 0A 0E 01 98 31 2C 22 49 30 |:S1.S.<....1,"I0|
00000230: 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 54 0A 18 |":.3,8,3,"#".T..|
00000240: 01 99 22 52 45 41 44 49 4E 47 20 42 4C 4F 43 4B |.."READING BLOCK|
00000250: 20 23 22 3B 00 7E 0A 22 01 8B 42 4D 25 28 54 31 | #";.~."..BM%(T1|
00000260: 2C 53 31 29 B2 30 A7 8D 32 30 30 30 3A 4E 55 B2 |,S1).0..2000:NU.|
00000270: 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 33 32 30 00 9E |NU.1:.NU.N.320..|
00000280: 0A 2C 01 53 31 B2 53 31 AA 31 3A 8B 53 31 B1 32 |.,.S1.S1.1:.S1.2|
00000290: 30 A7 53 31 B2 30 3A 54 31 B2 54 31 AA 31 00 AF |0.S1.0:T1.T1.1..|
000002A0: 0A 36 01 8B 54 31 B3 54 46 AA 31 A7 32 39 30 00 |.6..T1.TF.1.290.|
000002B0: B8 0A 40 01 99 22 11 22 00 BF 0A 4A 01 A0 33 00 |..@.."."...J..3.|
000002C0: DF 0A 54 01 44 24 B2 22 44 22 3A 8D 33 32 30 30 |..T.D$."D":.3200|
000002D0: 3A 8B 49 52 24 B3 B1 49 31 24 A7 89 33 34 30 00 |:.IR$..I1$..340.|
000002E0: F6 0A 5E 01 98 31 2C 22 49 30 22 3A 9F 33 2C 38 |..^..1,"I0":.3,8|
000002F0: 2C 33 2C 22 23 22 00 0F 0B 68 01 99 22 57 52 49 |,3,"#"...h.."WRI|
00000300: 54 49 4E 47 20 42 55 46 46 45 52 20 23 22 3B 00 |TING BUFFER #";.|
00000310: 22 0B 72 01 4E 55 B2 31 3A 54 31 B2 54 3A 53 31 |".r.NU.1:T1.T:S1|
00000320: B2 53 00 4C 0B 7C 01 8B 42 4D 25 28 54 31 2C 53 |.S.L.|..BM%(T1,S|
00000330: 31 29 B2 30 A7 8D 32 32 30 30 3A 4E 55 B2 4E 55 |1).0..2200:NU.NU|
00000340: AA 31 3A 8B 4E 55 B1 4E A7 34 31 30 00 6C 0B 86 |.1:.NU.N.410.l..|
00000350: 01 53 31 B2 53 31 AA 31 3A 8B 53 31 B1 32 30 A7 |.S1.S1.1:.S1.20.|
00000360: 53 31 B2 30 3A 54 31 B2 54 31 AA 31 00 7D 0B 90 |S1.0:T1.T1.1.}..|
00000370: 01 8B 54 31 B3 54 46 AA 31 A7 33 38 30 00 86 0B |..T1.TF.1.380...|
00000380: 9A 01 99 22 11 22 00 8D 0B A4 01 A0 33 00 AA 0B |..."."......3...|
00000390: AE 01 53 B2 53 31 AA 31 3A 8B 53 B1 32 30 A7 53 |..S.S1.1:.S.20.S|
000003A0: B2 30 3A 54 31 B2 54 31 AA 31 00 BD 0B B8 01 54 |.0:T1.T1.1.....T|
000003B0: B2 54 31 3A 8B 54 B1 54 46 A7 35 30 30 00 DC 0B |.T1:.T.TF.500...|
000003C0: C2 01 44 24 B2 22 53 22 3A 8D 33 32 30 30 3A 8B |..D$."S":.3200:.|
000003D0: 49 52 24 B3 B1 49 32 24 A7 34 35 30 00 F4 0B CC |IR$..I2$.450....|
000003E0: 01 4E 55 B2 31 3A 54 31 B2 54 3A 53 31 B2 53 3A |.NU.1:T1.T:S1.S:|
000003F0: 89 32 37 30 00 09 0C F4 01 8F 20 46 49 4E 49 53 |.270...... FINIS|
00000400: 48 45 44 20 58 46 45 52 53 00 10 0C FE 01 A0 31 |HED XFERS......1|
00000410: 00 2C 0C 08 02 97 35 35 2C C2 28 39 39 38 29 3A |.,....55,.(998):|
00000420: 97 35 36 2C C2 28 39 39 39 29 3A 9C 00 45 0C 12 |.56,.(999):..E..|
00000430: 02 99 22 11 11 42 41 43 4B 55 50 20 43 4F 4D 50 |.."..BACKUP COMP|
00000440: 4C 45 54 45 22 00 55 0C 1C 02 9F 31 2C 38 2C 30 |LETE".U....1,8,0|
00000450: 2C 22 24 30 22 00 6D 0C 26 02 A1 23 31 2C 41 24 |,"$0".m.&..#1,A$|
00000460: 3A 8B 41 24 B3 B1 22 12 22 A7 35 35 30 00 7B 0C |:.A$..".".550.{.|
00000470: 30 02 99 41 24 3B 3A 89 36 31 30 00 9F 0C 3A 02 |0..A$;:.610...:.|
00000480: A1 23 31 2C 41 24 3A 53 53 B2 53 54 3A 41 B2 C3 |.#1,A$:SS.ST:A..|
00000490: 28 41 24 29 3A 8B 41 A7 41 B2 C6 28 41 24 29 00 |(A$):.A.A..(A$).|
000004A0: C3 0C 44 02 A1 23 31 2C 42 24 3A 53 53 B2 53 54 |..D..#1,B$:SS.ST|
000004B0: 3A 42 B2 C3 28 42 24 29 3A 8B 42 A7 41 B2 C6 28 |:B..(B$):.B.A..(|
000004C0: 42 24 29 00 CF 0C 4E 02 8B 53 53 A7 36 36 30 00 |B$)...N..SS.660.|
000004D0: E1 0C 58 02 8B 41 B2 31 AF 42 B2 31 A7 8D 36 33 |..X..A.1.B.1..63|
000004E0: 30 00 FA 0C 62 02 A1 23 31 2C 41 24 3A 8B 41 24 |0...b..#1,A$:.A$|
000004F0: B2 22 22 A7 99 3A 89 35 37 30 00 08 0D 6C 02 99 |.""..:.570...l..|
00000500: 41 24 3B 3A 89 36 31 30 00 2C 0D 76 02 A1 23 31 |A$;:.610.,.v..#1|
00000510: 2C 41 24 3A 53 53 B2 53 54 3A 41 B2 C3 28 41 24 |,A$:SS.ST:A..(A$|
00000520: 29 3A 8B 41 A7 41 B2 C6 28 41 24 29 00 50 0D 80 |):.A.A..(A$).P..|
00000530: 02 A1 23 31 2C 42 24 3A 53 53 B2 53 54 3A 42 B2 |..#1,B$:SS.ST:B.|
00000540: C3 28 42 24 29 3A 8B 42 A7 42 B2 C6 28 42 24 29 |.(B$):.B.B..(B$)|
00000550: 00 64 0D 8A 02 4E B2 42 AC 32 35 36 AA 41 3A 99 |.d...N.B.256.A:.|
00000560: 4E 3B 3A 8E 00 6B 0D 94 02 A0 31 00 71 0D 9E 02 |N;:..k....1.q...|
00000570: 80 00 88 0D E8 03 8F 20 48 45 41 44 45 52 20 44 |....... HEADER D|
00000580: 45 53 54 20 44 49 53 4B 00 BB 0D F2 03 99 22 11 |EST DISK......".|
00000590: 49 4E 53 45 52 54 20 44 45 53 54 49 4E 41 54 49 |INSERT DESTINATI|
000005A0: 4F 4E 20 20 20 20 44 49 53 4B 20 54 4F 20 42 45 |ON DISK TO BE|
000005B0: 20 46 4F 52 4D 41 54 54 45 44 22 00 F8 0D FC 03 | FORMATTED".....|
000005C0: 85 22 11 11 44 49 53 4B 20 4E 41 4D 45 1D 1D 1D |."..DISK NAME...|
000005D0: A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000005E0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000005F0: 9D 9D 9D 22 3B 44 4E 24 00 13 0E 06 04 8B 44 4E |...";DN$......DN|
00000600: 24 B2 22 A0 22 A7 99 22 91 91 91 22 3B 3A 89 31 |$.".".."...";:.1|
00000610: 30 32 30 00 28 0E 10 04 8B C3 28 44 4E 24 29 B1 |020.(.....(DN$).|
00000620: 31 36 A7 9C 3A 89 34 30 00 4B 0E 1A 04 46 B2 30 |16..:.40.K...F.0|
00000630: 3A 81 4A B2 31 A4 C3 28 44 4E 24 29 3A 53 31 24 |:.J.1..(DN$):S1$|
00000640: B2 CA 28 44 4E 24 2C 4A 2C 31 29 00 66 0E 24 04 |..(DN$,J,1).f.$.|
00000650: 8B 53 31 24 B2 22 A0 22 B0 53 31 24 B2 C7 28 33 |.S1$.".".S1$..(3|
00000660: 34 29 A7 46 B2 31 00 7E 0E 2E 04 82 4A 3A 8B 46 |4).F.1.~....J:.F|
00000670: A7 99 22 91 91 91 22 3B 3A 89 31 30 32 30 00 C7 |.."...";:.1020..|
00000680: 0E 38 04 85 22 11 55 4E 49 51 55 45 20 44 49 53 |.8..".UNIQUE DIS|
00000690: 4B 20 49 44 1D 1D 1D A0 20 20 20 20 20 20 20 20 |K ID.... |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D 9D | .....|
000006B0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000006C0: 9D 9D 22 3B 49 31 24 00 E1 0E 42 04 8B 49 31 24 |..";I1$...B..I1$|
000006D0: B2 22 A0 22 A7 99 22 91 91 22 3B 3A 89 31 30 38 |.".".."..";:.108|
000006E0: 30 00 FD 0E 4C 04 8B C3 28 49 31 24 29 B3 B1 32 |0...L...(I1$)..2|
000006F0: A7 99 22 91 91 22 3B 3A 89 31 30 38 30 00 16 0F |.."..";:.1080...|
00000700: 56 04 98 31 2C 22 4E 30 3A 22 AA 44 4E 24 AA 22 |V..1,"N0:".DN$."|
00000710: 2C 22 AA 49 31 24 00 20 0F 60 04 8D 33 30 30 30 |,".I1$. .`..3000|
00000720: 00 34 0F 6A 04 8B 45 52 A7 99 45 52 24 3A 89 31 |.4.j..ER..ER$:.1|
00000730: 30 30 30 30 00 3A 0F 74 04 8E 00 60 0F D0 07 8F |0000.:.t...`....|
00000740: 20 52 45 41 44 20 42 4C 4F 43 4B 20 54 31 2C 53 | READ BLOCK T1,S|
00000750: 31 20 54 4F 20 42 55 46 46 45 52 20 23 20 4E 55 |1 TO BUFFER # NU|
00000760: 00 68 0F DA 07 43 B2 2E 00 7E 0F E4 07 98 31 2C |.h...C...~....1,|
00000770: 22 55 31 22 3B 33 3B 30 3B 54 31 3B 53 31 00 92 |"U1";3;0;T1;S1..|
00000780: 0F EE 07 8D 33 30 30 30 3A 8B A8 45 52 A7 32 30 |....3000:..ER.20|
00000790: 36 30 00 A6 0F F8 07 43 B2 43 AA 31 3A 8B 43 B3 |60.....C.C.1:.C.|
000007A0: 33 A7 32 30 32 30 00 DC 0F 02 08 99 45 52 24 3A |3.2020......ER$:|
000007B0: 81 4A B2 28 42 42 AA 4E 55 29 AC 32 35 36 A4 28 |.J.(BB.NU).256.(|
000007C0: 42 42 AA 4E 55 29 AC 32 35 36 AA 32 35 35 3A 97 |BB.NU).256.255:.|
000007D0: 4A 2C 2E 3A 82 4A 3A 89 32 31 30 30 00 ED 0F 0C |J,.:.J:.2100....|
000007E0: 08 98 31 2C 22 42 2D 50 22 3B 33 3B 30 00 19 10 |..1,"B-P";3;0...|
000007F0: 16 08 8B 4E 55 B3 B1 30 A7 99 22 20 20 20 9D 9D |...NU..0.." ..|
00000800: 9D 22 3B C9 28 22 20 20 22 AA C4 28 4E 55 29 2C |.";.(" "..(NU),|
00000810: 33 29 3B 22 9D 9D 9D 22 3B 00 3E 10 20 08 97 39 |3);"...";.>. ..9|
00000820: 39 36 2C C2 28 33 29 3A 97 39 39 37 2C C2 28 34 |96,.(3):.997,.(4|
00000830: 29 3A 97 34 2C 42 42 AA 4E 55 3A 9E 4D 41 00 56 |):.4,BB.NU:.MA.V|
00000840: 10 25 08 97 33 2C C2 28 39 39 36 29 3A 97 34 2C |.%..3,.(996):.4,|
00000850: C2 28 39 39 37 29 00 74 10 2A 08 8B 53 54 B3 B1 |.(997).t.*..ST..|
00000860: 2E AF 53 54 B3 B1 36 34 A7 8D 33 30 30 30 3A 89 |..ST..64..3000:.|
00000870: 32 30 35 30 00 7A 10 34 08 8E 00 A3 10 98 08 8F |2050.z.4........|
00000880: 20 57 52 49 54 45 20 42 4C 4F 43 4B 20 54 31 2C | WRITE BLOCK T1,|
00000890: 53 31 20 46 52 4F 4D 20 42 55 46 46 45 52 20 23 |S1 FROM BUFFER #|
000008A0: 20 4E 55 00 AB 10 A2 08 43 B2 2E 00 CD 10 AC 08 | NU.....C.......|
000008B0: 98 31 2C 22 42 2D 41 22 3B 30 3B 54 31 3B 53 31 |.1,"B-A";0;T1;S1|
000008C0: 3A 98 31 2C 22 42 2D 50 22 3B 33 3B 30 00 F2 10 |:.1,"B-P";3;0...|
000008D0: B6 08 99 22 20 20 20 9D 9D 9D 22 3B C9 28 22 20 |..." ...";.(" |
000008E0: 20 22 AA C4 28 4E 55 29 2C 33 29 3B 22 9D 9D 9D | "..(NU),3);"...|
000008F0: 22 3B 00 19 11 C0 08 97 39 39 36 2C C2 28 33 29 |";......996,.(3)|
00000900: 3A 97 39 39 37 2C C2 28 34 29 3A 97 34 2C 42 42 |:.997,.(4):.4,BB|
00000910: AA 4E 55 3A 9E 4D 41 AA 33 00 31 11 C5 08 97 33 |.NU:.MA.3.1....3|
00000920: 2C C2 28 39 39 36 29 3A 97 34 2C C2 28 39 39 37 |,.(996):.4,.(997|
00000930: 29 00 64 11 CA 08 8B 53 54 B3 B1 2E AF 53 54 B3 |).d....ST....ST.|
00000940: B1 36 34 A7 99 22 12 49 45 45 45 20 57 52 49 54 |.64..".IEEE WRIT|
00000950: 45 20 45 52 52 4F 52 22 53 54 22 92 22 3A 89 31 |E ERROR"ST".":.1|
00000960: 30 30 30 30 00 7A 11 D4 08 98 31 2C 22 55 32 22 |0000.z....1,"U2"|
00000970: 3B 33 3B 30 3B 54 31 3B 53 31 00 8E 11 DE 08 8D |;3;0;T1;S1......|
00000980: 33 30 30 30 3A 8B A8 45 52 A7 32 33 30 30 00 A2 |3000:..ER.2300..|
00000990: 11 E8 08 43 B2 43 AA 31 3A 8B 43 B3 33 A7 32 32 |...C.C.1:.C.3.22|
000009A0: 36 30 00 D0 11 F2 08 99 22 12 55 4E 52 45 43 4F |60......".UNRECO|
000009B0: 56 45 52 41 42 4C 45 20 57 52 49 54 45 20 20 20 |VERABLE WRITE |
000009C0: 45 52 52 4F 52 22 45 52 24 3A 89 31 30 30 30 30 |ERROR"ER$:.10000|
000009D0: 00 D6 11 FC 08 8E 00 F0 11 C4 09 8F 20 47 45 54 |............ GET|
000009E0: 20 42 41 4D 20 54 4F 20 42 4D 25 28 54 2C 53 29 | BAM TO BM%(T,S)|
000009F0: 00 FE 11 CE 09 54 53 B2 31 3A 54 46 B2 2E 00 15 |.....TS.1:TF....|
00000A00: 12 D8 09 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C |....1,"I0":.3,8,|
00000A10: 33 2C 22 23 22 00 1E 12 E2 09 53 39 B2 30 00 4B |3,"#".....S9.0.K|
00000A20: 12 EC 09 99 22 11 54 52 41 43 4B 20 23 20 20 20 |....".TRACK # |
00000A30: 42 4C 4F 43 4B 53 20 54 4F 20 20 20 20 20 20 20 |BLOCKS TO |
00000A40: 20 20 20 20 20 20 58 46 45 52 22 00 69 12 F6 09 | XFER".i...|
00000A50: 99 22 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |."##############|
00000A60: 23 23 23 23 23 23 23 23 22 00 8C 12 00 0A 4E 55 |########".....NU|
00000A70: B2 30 3A 54 31 B2 31 38 3A 53 31 B2 30 3A 43 30 |.0:T1.18:S1.0:C0|
00000A80: 24 B2 C7 28 2E 29 3A 8D 32 30 30 30 00 95 12 0A |$..(.):.2000....|
00000A90: 0A 42 59 B2 34 00 A7 12 14 0A 54 25 B2 28 42 59 |.BY.4.....T%.(BY|
00000AA0: AB 34 29 AD 34 AA 31 00 B5 12 1E 0A 99 22 20 20 |.4).4.1......" |
00000AB0: 22 3B 54 25 3B 00 E9 12 28 0A 8B C2 28 42 41 AA |";T%;...(...(BA.|
00000AC0: 42 59 29 B2 2E A7 81 4A B2 2E A4 32 30 3A 42 4D |BY)....J...20:BM|
00000AD0: 25 28 54 25 2C 4A 29 B2 2E 3A 82 3A 42 59 B2 42 |%(T%,J)..:.:BY.B|
00000AE0: 59 AA 34 3A 89 32 36 35 30 00 F1 12 32 0A 53 B2 |Y.4:.2650...2.S.|
00000AF0: 30 00 2B 13 3C 0A 42 59 B2 42 59 AA 31 3A 41 30 |0.+.<.BY.BY.1:A0|
00000B00: B2 C2 28 42 41 AA 42 59 29 3A 81 4A B2 2E A4 37 |..(BA.BY):.J...7|
00000B10: 3A 42 4D 25 28 54 25 2C 53 29 B2 41 30 AF 54 41 |:BM%(T%,S).A0.TA|
00000B20: 28 4A 29 3A 53 B2 53 AA 31 3A 82 00 3A 13 46 0A |(J):S.S.1:..:.F.|
00000B30: 8B 53 B3 32 32 A7 32 36 32 30 00 46 13 50 0A 42 |.S.22.2620.F.P.B|
00000B40: 59 B2 42 59 AA 31 00 5D 13 5A 0A 45 53 B2 32 31 |Y.BY.1.].Z.ES.21|
00000B50: 3A 8B 54 25 B1 31 37 A7 45 53 B2 31 39 00 6E 13 |:.T%.17.ES.19.n.|
00000B60: 64 0A 8B 54 25 B1 32 34 A7 45 53 B2 31 38 00 7F |d..T%.24.ES.18..|
00000B70: 13 6E 0A 8B 54 25 B1 33 30 A7 45 53 B2 31 37 00 |.n..T%.30.ES.17.|
00000B80: 9B 13 78 0A 81 4A B2 45 53 A4 32 34 3A 42 4D 25 |..x..J.ES.24:BM%|
00000B90: 28 54 25 2C 4A 29 B2 AB 31 3A 82 00 C1 13 82 0A |(T%,J)..1:......|
00000BA0: 53 4D B2 2E 3A 81 4A B2 2E A4 32 30 3A 8B 42 4D |SM..:.J...20:.BM|
00000BB0: 25 28 54 25 2C 4A 29 B2 2E A7 53 4D B2 53 4D AA |%(T%,J)...SM.SM.|
00000BC0: 31 00 D9 13 8C 0A 82 3A 99 A3 31 32 29 3B 53 4D |1......:..12);SM|
00000BD0: 3A 53 39 B2 53 39 AA 53 4D 00 F7 13 96 0A 8B 53 |:S9.S9.SM......S|
00000BE0: 4D B2 2E AF 54 53 B2 54 25 A7 54 53 B2 54 53 AA |M...TS.T%.TS.TS.|
00000BF0: 31 3A 89 32 37 33 30 00 08 14 A0 0A 8B 53 4D B3 |1:.2730......SM.|
00000C00: B1 2E A7 54 46 B2 54 25 00 19 14 AA 0A 8B 42 59 |...TF.T%......BY|
00000C10: B3 31 34 33 A7 32 35 38 30 00 20 14 B4 0A A0 33 |.143.2580. ....3|
00000C20: 00 41 14 BE 0A 99 22 53 54 41 52 54 20 3D 22 3B |.A...."START =";|
00000C30: 54 53 3B 22 20 46 49 4E 49 53 48 20 3D 22 3B 54 |TS;" FINISH =";T|
00000C40: 46 00 68 14 C8 0A 99 22 11 41 20 54 4F 54 41 4C |F.h....".A TOTAL|
00000C50: 20 4F 46 22 3B 53 39 3B 22 42 4C 4F 43 4B 53 20 | OF";S9;"BLOCKS |
00000C60: 54 4F 20 58 46 45 52 22 00 84 14 D2 0A 53 38 B2 |TO XFER".....S8.|
00000C70: 39 30 AA 32 35 AA 28 2E 36 35 30 AA 2E 39 38 30 |90.25.(.650..980|
00000C80: 29 AC 53 39 00 B9 14 DC 0A 53 37 B2 B5 28 53 38 |).S9.....S7..(S8|
00000C90: AD 36 30 29 3A 99 22 41 50 50 52 4F 58 22 3B 53 |.60):."APPROX";S|
00000CA0: 37 22 3A 22 B5 28 53 38 AB 53 37 AC 36 30 29 3B |7":".(S8.S7.60);|
00000CB0: 22 54 4F 20 43 4F 50 59 22 00 BF 14 E6 0A 8E 00 |"TO COPY".......|
00000CC0: DB 14 B8 0B 8F 20 52 45 41 44 20 45 52 52 20 43 |..... READ ERR C|
00000CD0: 48 20 54 4F 20 45 52 2C 45 52 24 00 12 15 C2 0B |H TO ER,ER$.....|
00000CE0: 84 31 2C 45 30 24 2C 45 31 24 2C 45 32 24 2C 45 |.1,E0$,E1$,E2$,E|
00000CF0: 33 24 3A 45 52 24 B2 45 30 24 AA 22 2C 22 AA 45 |3$:ER$.E0$.",".E|
00000D00: 31 24 AA 22 2C 22 AA 45 32 24 AA 22 2C 22 AA 45 |1$.",".E2$.",".E|
00000D10: 33 24 00 2E 15 CC 0B 45 52 B2 C3 28 45 30 24 29 |3$.....ER..(E0$)|
00000D20: 3A 8B 45 52 A7 45 52 B2 C5 28 45 30 24 29 00 34 |:.ER.ER..(E0$).4|
00000D30: 15 D6 0B 8E 00 5F 15 80 0C 8F 20 49 4E 53 54 52 |....._.... INSTR|
00000D40: 55 43 54 20 54 4F 20 53 57 41 50 20 54 4F 20 44 |UCT TO SWAP TO D|
00000D50: 49 53 4B 20 47 49 56 45 4E 20 49 4E 20 44 24 00 |ISK GIVEN IN D$.|
00000D60: 83 15 8A 0C 8B 44 24 B2 22 44 22 A7 53 31 24 B2 |.....D$."D".S1$.|
00000D70: 22 44 45 53 54 49 4E 41 54 49 4F 4E 22 3A 89 33 |"DESTINATION":.3|
00000D80: 32 33 30 00 94 15 94 0C 53 31 24 B2 22 53 4F 55 |230.....S1$."SOU|
00000D90: 52 43 45 22 00 BE 15 9E 0C 99 22 11 49 4E 53 45 |RCE"......".INSE|
00000DA0: 52 54 20 22 3B 53 31 24 2C 22 44 49 53 4B 2C 20 |RT ";S1$,"DISK, |
00000DB0: 50 52 45 53 53 20 12 53 50 41 43 45 92 22 00 D4 |PRESS .SPACE."..|
00000DC0: 15 A8 0C A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 |....A$:.A$.." ".|
00000DD0: 33 32 34 30 00 E4 15 B2 0C 9F 32 2C 38 2C 30 2C |3240......2,8,0,|
00000DE0: 22 24 30 22 00 FA 15 BC 0C 8D 33 30 30 30 3A 8B |"$0"......3000:.|
00000DF0: 45 52 B1 30 A7 31 30 30 30 30 00 10 16 C6 0C 81 |ER.0.10000......|
00000E00: 4A B2 31 A4 32 36 3A A1 23 32 2C 41 24 3A 82 4A |J.1.26:.#2,A$:.J|
00000E10: 00 2C 16 D0 0C A1 23 32 2C 41 24 3A A1 23 32 2C |.,....#2,A$:.#2,|
00000E20: 42 24 3A 49 52 24 B2 41 24 AA 42 24 00 4F 16 DA |B$:IR$.A$.B$.O..|
00000E30: 0C A1 23 32 2C 41 24 3A A1 23 32 2C 41 24 3A A1 |..#2,A$:.#2,A$:.|
00000E40: 23 32 2C 42 24 3A 44 52 24 B2 41 24 AA 42 24 00 |#2,B$:DR$.A$.B$.|
00000E50: 58 16 E4 0C A0 32 3A 8E 00 67 16 10 27 8F 20 44 |X....2:..g..'. D|
00000E60: 52 4F 50 20 4F 55 54 00 85 16 1A 27 97 35 35 2C |ROP OUT....'.55,|
00000E70: C2 28 39 39 38 29 3A 97 35 36 2C C2 28 39 39 39 |.(998):.56,.(999|
00000E80: 29 3A 9C 3A 90 00 C6 16 98 3A 83 37 36 2C 36 36 |):.:.....:.76,66|
00000E90: 2C 33 2C 37 36 2C 39 31 2C 33 2C 31 36 32 2C 33 |,3,76,91,3,162,3|
00000EA0: 2C 33 32 2C 31 39 38 2C 32 35 35 2C 31 36 30 2C |,32,198,255,160,|
00000EB0: 30 2C 31 33 32 2C 33 2C 33 32 2C 32 30 37 2C 32 |0,132,3,32,207,2|
00000EC0: 35 35 2C 31 34 35 00 0A 17 A2 3A 83 33 2C 31 36 |55,145....:.3,16|
00000ED0: 35 2C 31 34 34 2C 32 30 38 2C 33 2C 32 30 30 2C |5,144,208,3,200,|
00000EE0: 32 30 38 2C 32 34 34 2C 33 32 2C 32 30 34 2C 32 |208,244,32,204,2|
00000EF0: 35 35 2C 39 36 2C 31 36 32 2C 33 2C 33 32 2C 32 |55,96,162,3,32,2|
00000F00: 30 31 2C 32 35 35 2C 31 36 30 00 50 17 AC 3A 83 |01,255,160.P..:.|
00000F10: 30 2C 31 33 32 2C 33 2C 31 37 37 2C 33 2C 33 32 |0,132,3,177,3,32|
00000F20: 2C 32 31 30 2C 32 35 35 2C 31 36 35 2C 31 34 34 |,210,255,165,144|
00000F30: 2C 32 30 38 2C 33 2C 32 30 30 2C 32 30 38 2C 32 |,208,3,200,208,2|
00000F40: 34 34 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 |44,32,204,255,96|
00000F50: 00 00 00 FF 4C |....L |
.......I.828.883:.A:.I,A:.I.C...."D=DSAV
E"@BACK2",D0:?DS$:CATALOGD0.[...BB.B(44)
.27:.995,BB......998,B(55):.999,B(56):.5
5,0:.56,BB:....(.BB.B(995)...2.N.B(999).
BB.1:BA.BB.256:MA.828.E.<..BM%(35,24)...
F..J.0.7:TA(J).2.J:....P..".......BACKUP
1541.".'.Z..".'GOTO10000' IF PROGRAM QU
ITS ABNORMALLY".C.D.."."N"BUFFERS AVAILA
BLE.O.N..1,8,15.I.H..***MAIN FUNCTIONS**
*.S.R..1000.....D$."S":.3200:I2$.IR$....
..DR$.."2A"..".ILLEGAL DOS 1.0 DISK.":.1
0000......I2$.I1$. .".SOURCE AND DESTINA
TION HAVE SAME ID CODE.":.10000......250
0.%...T.TS:S.0:NU.1:T1.T:S1.S.<....1,"I0
":.3,8,3,"#".T...."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.T
F.1.290...@.."."...J. 3...T.D$."D":.3200
:.IR$..I1$..340...^..1,"I0":.3,8,3,"#"..
.H.."WRITING BUFFER #";.".R.NU.1:T1.T:S1
.S.L.|..BM%(T1,S1).0..2200:NU.NU.1:.NU.N
.410.L...S1.S1.1:.S1.20.S1.0:T1.T1.1.}..
..T1.TF.1.380......"."..... 3.....S.S1.1
:.S.20.S.0:T1.T1.1.....T.T1:.T.TF.500...
B.D$."S":.3200:.IR$..I2$.450...L.NU.1:T1
.T:S1.S:.270...... FINISHED XFERS..... 1
.,....55,B(998):.56,B(999):..E...."..BAC
KUP COMPLETE".U....1,8,0,"$0".M.&..#1,A$
:.A$..".".550.{.0..A$;:.610...:..#1,A$:S
S.ST:A.C(A$):.A.A.F(A$).C.D..#1,B$:SS.ST
:B.C(B$):.B.A.F(B$).O.N..SS.660...X..A.1
.B.1..630...B..#1,A$:.A$.""..:.570...L..
A$;:.610.,.V..#1,A$:SS.ST:A.C(A$):.A.A.F
(A$).P....#1,B$:SS.ST:B.C(B$):.B.B.F(B$)
.D...N.B.256.A:.N;:..K... 1.Q..........
HEADER DEST DISK......".INSERT DESTINATI
ON DISK TO BE FORMATTED"......"..DISK
NAME... ................
...";DN$......DN$." ".."...";:.1020.(...
.C(DN$).16..:.40.K...F.0:.J.1.C(DN$):S1$
.J(DN$,J,1).F.$..S1$." ".S1$.G(34).F.1.~
....J:.F.."...";:.1020.G.8..".UNIQUE DIS
K ID... .............
..........";I1$...B..I1$." ".."..";:.108
0...L..C(I1$)..2.."..";:.1080...V..1,"N0
:".DN$.",".I1$. .`..3000.4.J..ER..ER$:.1
0000.:.T...`.P.. READ BLOCK T1,S1 TO BUF
FER # NU.H.Z.C...~....1,"U1";3;0;T1;S1..
....3000:..ER.2060.....C.C.1:.C.3.2020..
....ER$:.J.(BB.NU).256.(BB.NU).256.255:.
J,.:.J:.2100......1,"B-P";3;0......NU..0
.." ...";I(" ".D(NU),3);"...";.>. ..9
96,B(3):.997,B(4):.4,BB.NU:.MA.V.%..3,B(
996):.4,B(997).T.*..ST....ST..64..3000:.
2050.Z.4........ WRITE BLOCK T1,S1 FROM
BUFFER # NU.....C...M....1,"B-A";0;T1;S1
:.1,"B-P";3;0......" ...";I(" ".D(NU)
,3);"...";......996,B(3):.997,B(4):.4,BB
.NU:.MA.3.1.E..3,B(996):.4,B(997).D.J..S
T....ST..64..".IEEE WRITE ERROR"ST".":.1
0000.Z.T..1,"U2";3;0;T1;S1......3000:..E
R.2300.....C.C.1:.C.3.2260.P....".UNRECO
VERABLE WRITE ERROR"ER$:.10000.V......
.D.. GET BAM TO BM%(T,S)...N.TS.1:TF....
.X..1,"I0":.3,8,3,"#".....S9.0.K....".TR
ACK # BLOCKS TO XFER".I...
."######################".....NU.0:T1.18
:S1.0:C0$.G(.):.2000.....BY.4.....T%.(BY
.4).4.1......" ";T%;...(..B(BA.BY)....J
...20:BM%(T%,J)..:.:BY.BY.4:.2650...2.S.
0.+.<.BY.BY.1:A0.B(BA.BY):.J...7:BM%(T%,
S).A0.TA(J):S.S.1:..:.F..S.22.2620.F.P.B
Y.BY.1.].Z.ES.21:.T%.17.ES.19.N.D..T%.24
.ES.18..N..T%.30.ES.17...X..J.ES.24:BM%
(T%,J)..1:..A...SM..:.J...20:.BM%(T%,J).
..SM.SM.1.Y....:..12);SM:S9.S9.SM......S
M...TS.T%.TS.TS.1:.2730... ..SM....TF.T%
......BY.143.2580. ... 3.A...."START =";
TS;" FINISH =";TF.H.H..".A TOTAL OF";S9;
"BLOCKS TO XFER"...R.S8.90.25.(.650..980
).S9.....S7..(S8.60):."APPROX";S7":".(S8
.S7.60);"TO COPY"............ READ ERR C
H TO ER,ER$...B..1,E0$,E1$,E2$,E3$:ER$.E
0$.",".E1$.",".E2$.",".E3$...L.ER.C(E0$)
:.ER.ER.E(E0$).4.V..._.... INSTRUCT TO S
WAP TO DISK GIVEN IN D$......D$."D".S1$.
"DESTINATION":.3230.....S1$."SOURCE"....
..".INSERT ";S1$,"DISK, PRESS .SPACE.".T
....A$:.A$.." ".3240......2,8,0,"$0"....
..3000:.ER.0.10000...F..J.1.26:.#2,A$:.J
.,.P..#2,A$:.#2,B$:IR$.A$.B$.O.Z..#2,A$:
.#2,A$:.#2,B$:DR$.A$.B$.X... 2:..G..'. D
ROP OUT....'.55,B(998):.56,B(999):.:..F.
.:.76,66,3,76,91,3,162,3,32,198,255,160,
0,132,3,32,207,255,145....:.3,165,144,20
8,3,200,208,244,32,204,255,96,162,3,32,2
01,255,160.P..:.0,132,3,177,3,32,210,255
,165,144,208,3,200,208,244,32,204,255,96
....L
> CLICK IMAGE PREVIEW FOR FULL MODAL