BEST COPY
FILE INFORMATION
FILENAME(S): BEST COPY
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-10-19 22:48:23
APPEARS ON: 1 disk(s)
FILE HASH
774c94fca15b12375061cbe23abdd3c4392e2e370e08844ff4e8d7eb286d5dd8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK BACKUP | BEST COPY | PRG | Radd Maxx | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 37 08 01 00 81 49 B2 38 32 38 A4 38 39 38 |..7....I.828.898| 00000010: 3A 87 41 3A 97 49 2C 41 3A 82 3A 99 22 9F 22 3B |:.A:.I,A:.:.".";| 00000020: 3A 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 |:.53281,6:.53280| 00000030: 2C 31 30 3A 89 31 39 00 42 08 02 00 97 31 39 38 |,10:.19.B....198| 00000040: 2C 30 00 67 08 03 00 97 20 35 33 32 38 31 2C 36 |,0.g.... 53281,6| 00000050: 3A A1 58 51 24 3A 8B 58 51 24 B3 B1 22 22 A7 97 |:.XQ$:.XQ$..""..| 00000060: 31 39 38 2C 30 3A 8E 00 90 08 04 00 81 58 51 B2 |198,0:.......XQ.| 00000070: 31 A4 35 30 30 3A 82 3A 97 35 33 32 38 31 2C 31 |1.500:.:.53281,1| 00000080: 35 3A 81 58 51 B2 31 A4 35 30 30 3A 82 3A 89 33 |5:.XQ.1.500:.:.3| 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 E0 08 13 00 8F 22 44 |ATALOGD0......"D| 000000C0: 3D 44 53 41 56 45 22 40 42 41 43 4B 32 22 2C 44 |=DSAVE"@BACK2",D| 000000D0: 30 3A 3F 44 53 24 3A 43 41 54 41 4C 4F 47 44 30 |0:?DS$:CATALOGD0| 000000E0: 00 F8 08 14 00 42 42 B2 C2 28 34 34 29 AA 32 37 |.....BB..(44).27| 000000F0: 3A 97 39 39 35 2C 42 42 00 1B 09 1E 00 97 39 39 |:.995,BB......99| 00000100: 38 2C 30 3A 97 39 39 39 2C 31 36 30 3A 97 35 35 |8,0:.999,160:.55| 00000110: 2C 30 3A 97 35 36 2C 42 42 3A 9C 00 29 09 28 00 |,0:.56,BB:..).(.| 00000120: 42 42 B2 C2 28 39 39 35 29 00 44 09 32 00 4E B2 |BB..(995).D.2.N.| 00000130: 32 32 30 3A 42 41 B2 42 42 AC 32 35 36 3A 4D 41 |220:BA.BB.256:MA| 00000140: B2 38 32 38 00 54 09 3C 00 86 42 4D 25 28 33 35 |.828.T.<..BM%(35| 00000150: 2C 32 34 29 00 6B 09 46 00 81 4A B2 30 A4 37 3A |,24).k.F..J.0.7:| 00000160: 54 41 28 4A 29 B2 32 AE 4A 3A 82 00 7F 09 50 00 |TA(J).2.J:....P.| 00000170: 99 22 93 42 41 43 4B 55 50 20 31 35 34 31 22 00 |.".BACKUP 1541".| 00000180: AE 09 5A 00 99 22 27 47 4F 54 4F 31 30 30 30 30 |..Z.."'GOTO10000| 00000190: 27 20 49 46 20 50 52 4F 47 52 41 4D 20 51 55 49 |' IF PROGRAM QUI| 000001A0: 54 53 20 41 42 4E 4F 52 4D 41 4C 4C 59 22 00 BA |TS ABNORMALLY"..| 000001B0: 09 6E 00 9F 31 2C 38 2C 31 35 00 C0 09 C8 00 8F |.n..1,8,15......| 000001C0: 00 CA 09 D2 00 8D 31 30 30 30 00 E3 09 DC 00 44 |......1000.....D| 000001D0: 24 B2 22 53 22 3A 8D 33 32 30 30 3A 49 32 24 B2 |$."S":.3200:I2$.| 000001E0: 49 52 24 00 11 0A E6 00 8B 44 52 24 B3 B1 22 32 |IR$......DR$.."2| 000001F0: 41 22 A7 99 22 49 4C 4C 45 47 41 4C 20 44 4F 53 |A".."ILLEGAL DOS| 00000200: 20 31 2E 30 20 44 49 53 4B 22 3A 89 31 30 30 30 | 1.0 DISK":.1000| 00000210: 30 00 51 0A F0 00 8B 49 32 24 B2 49 31 24 A7 99 |0.Q....I2$.I1$..| 00000220: 22 53 4F 55 52 43 45 20 41 4E 44 20 44 45 53 54 |"SOURCE AND DEST| 00000230: 49 4E 41 54 49 4F 4E 20 48 41 56 45 20 53 41 4D |INATION HAVE SAM| 00000240: 45 20 49 44 20 43 4F 44 45 22 3A 89 31 30 30 30 |E ID CODE":.1000| 00000250: 30 00 5B 0A FA 00 8D 32 35 30 30 00 77 0A 04 01 |0.[....2500.w...| 00000260: 54 B2 54 53 3A 53 B2 30 3A 4E 55 B2 31 3A 54 31 |T.TS:S.0:NU.1:T1| 00000270: B2 54 3A 53 31 B2 53 00 8E 0A 0E 01 98 31 2C 22 |.T:S1.S......1,"| 00000280: 49 30 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 B8 |I0":.3,8,3,"#"..| 00000290: 0A 22 01 8B 42 4D 25 28 54 31 2C 53 31 29 B2 30 |."..BM%(T1,S1).0| 000002A0: A7 8D 32 30 30 30 3A 4E 55 B2 4E 55 AA 31 3A 8B |..2000:NU.NU.1:.| 000002B0: 4E 55 B1 4E A7 33 32 30 00 D8 0A 2C 01 53 31 B2 |NU.N.320...,.S1.| 000002C0: 53 31 AA 31 3A 8B 53 31 B1 32 30 A7 53 31 B2 30 |S1.1:.S1.20.S1.0| 000002D0: 3A 54 31 B2 54 31 AA 31 00 E9 0A 36 01 8B 54 31 |:T1.T1.1...6..T1| 000002E0: B3 54 46 AA 31 A7 32 39 30 00 F1 0A 40 01 99 22 |.TF.1.290...@.."| 000002F0: 22 00 F8 0A 4A 01 A0 33 00 1E 0B 54 01 44 24 B2 |"...J..3...T.D$.| 00000300: 22 44 22 3A 8D 33 32 30 30 3A 8B 49 52 24 B3 B1 |"D":.3200:.IR$..| 00000310: 49 31 24 A7 99 22 12 22 3B 3A 89 33 34 30 00 35 |I1$..".";:.340.5| 00000320: 0B 5E 01 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C |.^..1,"I0":.3,8,| 00000330: 33 2C 22 23 22 00 48 0B 72 01 4E 55 B2 31 3A 54 |3,"#".H.r.NU.1:T| 00000340: 31 B2 54 3A 53 31 B2 53 00 72 0B 7C 01 8B 42 4D |1.T:S1.S.r.|..BM| 00000350: 25 28 54 31 2C 53 31 29 B2 30 A7 8D 32 32 30 30 |%(T1,S1).0..2200| 00000360: 3A 4E 55 B2 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 34 |:NU.NU.1:.NU.N.4| 00000370: 32 30 00 92 0B 86 01 53 31 B2 53 31 AA 31 3A 8B |20.....S1.S1.1:.| 00000380: 53 31 B1 32 30 A7 53 31 B2 30 3A 54 31 B2 54 31 |S1.20.S1.0:T1.T1| 00000390: AA 31 00 A3 0B 90 01 8B 54 31 B3 54 46 AA 31 A7 |.1......T1.TF.1.| 000003A0: 33 38 30 00 AA 0B A4 01 A0 33 00 C7 0B AE 01 53 |380......3.....S| 000003B0: B2 53 31 AA 31 3A 8B 53 B1 32 30 A7 53 B2 30 3A |.S1.1:.S.20.S.0:| 000003C0: 54 31 B2 54 31 AA 31 00 DA 0B B8 01 54 B2 54 31 |T1.T1.1.....T.T1| 000003D0: 3A 8B 54 B1 54 46 A7 35 30 30 00 00 0C C2 01 44 |:.T.TF.500.....D| 000003E0: 24 B2 22 53 22 3A 8D 33 32 30 30 3A 8B 49 52 24 |$."S":.3200:.IR$| 000003F0: B3 B1 49 32 24 A7 99 22 12 22 3B 3A 89 34 35 30 |..I2$..".";:.450| 00000400: 00 18 0C CC 01 4E 55 B2 31 3A 54 31 B2 54 3A 53 |.....NU.1:T1.T:S| 00000410: 31 B2 53 3A 89 32 37 30 00 1E 0C F4 01 8F 00 25 |1.S:.270.......%| 00000420: 0C FE 01 A0 31 00 41 0C 08 02 97 35 35 2C C2 28 |....1.A....55,.(| 00000430: 39 39 38 29 3A 97 35 36 2C C2 28 39 39 39 29 3A |998):.56,.(999):| 00000440: 9C 00 5A 0C 12 02 97 35 33 32 38 30 2C 36 3A 99 |..Z....53280,6:.| 00000450: 22 93 46 49 4E 49 53 48 45 44 00 6A 0C 1C 02 9F |".FINISHED.j....| 00000460: 31 2C 38 2C 30 2C 22 24 30 22 00 81 0C 26 02 A1 |1,8,0,"$0"...&..| 00000470: 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 22 A7 35 35 |#1,A$:.A$.."".55| 00000480: 30 00 8F 0C 30 02 99 41 24 3B 3A 89 36 31 30 00 |0...0..A$;:.610.| 00000490: B3 0C 3A 02 A1 23 31 2C 41 24 3A 53 53 B2 53 54 |..:..#1,A$:SS.ST| 000004A0: 3A 41 B2 C3 28 41 24 29 3A 8B 41 A7 41 B2 C6 28 |:A..(A$):.A.A..(| 000004B0: 41 24 29 00 D7 0C 44 02 A1 23 31 2C 42 24 3A 53 |A$)...D..#1,B$:S| 000004C0: 53 B2 53 54 3A 42 B2 C3 28 42 24 29 3A 8B 42 A7 |S.ST:B..(B$):.B.| 000004D0: 41 B2 C6 28 42 24 29 00 E3 0C 4E 02 8B 53 53 A7 |A..(B$)...N..SS.| 000004E0: 36 36 30 00 F5 0C 58 02 8B 41 B2 31 AF 42 B2 31 |660...X..A.1.B.1| 000004F0: A7 8D 36 33 30 00 0E 0D 62 02 A1 23 31 2C 41 24 |..630...b..#1,A$| 00000500: 3A 8B 41 24 B2 22 22 A7 99 3A 89 35 37 30 00 1C |:.A$.""..:.570..| 00000510: 0D 6C 02 99 41 24 3B 3A 89 36 31 30 00 40 0D 76 |.l..A$;:.610.@.v| 00000520: 02 A1 23 31 2C 41 24 3A 53 53 B2 53 54 3A 41 B2 |..#1,A$:SS.ST:A.| 00000530: C3 28 41 24 29 3A 8B 41 A7 41 B2 C6 28 41 24 29 |.(A$):.A.A..(A$)| 00000540: 00 64 0D 80 02 A1 23 31 2C 42 24 3A 53 53 B2 53 |.d....#1,B$:SS.S| 00000550: 54 3A 42 B2 C3 28 42 24 29 3A 8B 42 A7 42 B2 C6 |T:B..(B$):.B.B..| 00000560: 28 42 24 29 00 78 0D 8A 02 4E B2 42 AC 32 35 36 |(B$).x...N.B.256| 00000570: AA 41 3A 99 4E 3B 3A 8E 00 7F 0D 94 02 A0 31 00 |.A:.N;:.......1.| 00000580: 85 0D 9E 02 80 00 8B 0D E8 03 8F 00 BF 0D F2 03 |................| 00000590: 99 22 11 11 05 49 4E 53 45 52 54 20 44 45 53 54 |."...INSERT DEST| 000005A0: 49 4E 41 54 49 4F 4E 20 44 49 53 4B 20 54 4F 20 |INATION DISK TO | 000005B0: 42 45 20 46 4F 52 4D 41 54 54 45 44 9F 11 22 00 |BE FORMATTED..".| 000005C0: E3 0D FC 03 85 22 44 49 53 4B 20 4E 41 4D 45 20 |....."DISK NAME | 000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";| 000005E0: 44 4E 24 00 FA 0D 06 04 8B 44 4E 24 B2 22 22 A7 |DN$......DN$."".| 000005F0: 99 22 22 3B 3A 89 31 30 32 30 00 0F 0E 10 04 8B |."";:.1020......| 00000600: C3 28 44 4E 24 29 B1 31 36 A7 9C 3A 89 34 30 00 |.(DN$).16..:.40.| 00000610: 32 0E 1A 04 46 B2 30 3A 81 4A B2 31 A4 C3 28 44 |2...F.0:.J.1..(D| 00000620: 4E 24 29 3A 53 31 24 B2 CA 28 44 4E 24 2C 4A 2C |N$):S1$..(DN$,J,| 00000630: 31 29 00 4C 0E 24 04 8B 53 31 24 B2 22 22 B0 53 |1).L.$..S1$."".S| 00000640: 31 24 B2 C7 28 33 34 29 A7 46 B2 31 00 61 0E 2E |1$..(34).F.1.a..| 00000650: 04 82 4A 3A 8B 46 A7 99 22 22 3B 3A 89 31 30 32 |..J:.F.."";:.102| 00000660: 30 00 8E 0E 38 04 85 22 55 4E 49 51 55 45 20 44 |0...8.."UNIQUE D| 00000670: 49 53 4B 20 49 44 20 20 20 20 20 20 20 20 20 20 |ISK ID | 00000680: 20 20 20 20 20 20 20 20 20 22 3B 49 31 24 00 A5 | ";I1$..| 00000690: 0E 42 04 8B 49 31 24 B2 22 22 A7 99 22 22 3B 3A |.B..I1$."".."";:| 000006A0: 89 31 30 38 30 00 BF 0E 4C 04 8B C3 28 49 31 24 |.1080...L...(I1$| 000006B0: 29 B3 B1 32 A7 99 22 22 3B 3A 89 31 30 38 30 00 |)..2.."";:.1080.| 000006C0: D8 0E 56 04 98 31 2C 22 4E 30 3A 22 AA 44 4E 24 |..V..1,"N0:".DN$| 000006D0: AA 22 2C 22 AA 49 31 24 00 17 0F 57 04 99 22 93 |.",".I1$...W..".| 000006E0: 41 52 45 20 59 4F 55 20 53 55 52 45 20 59 4F 55 |ARE YOU SURE YOU| 000006F0: 20 48 41 56 45 20 43 4F 52 52 45 43 54 20 44 49 | HAVE CORRECT DI| 00000700: 53 4B 20 20 20 20 20 20 20 20 20 20 49 4E 53 45 |SK INSE| 00000710: 52 54 45 44 3F 3F 22 00 1F 0F 58 04 A1 41 24 00 |RTED??"...X..A$.| 00000720: 30 0F 59 04 8B 41 24 B2 22 59 22 A7 31 31 32 30 |0.Y..A$."Y".1120| 00000730: 00 41 0F 5A 04 8B 41 24 B2 22 4E 22 A7 31 31 31 |.A.Z..A$."N".111| 00000740: 38 00 4B 0F 5B 04 89 31 31 31 33 00 89 0F 5E 04 |8.K.[..1113...^.| 00000750: 99 22 11 11 50 4C 45 41 53 45 20 49 4E 53 45 52 |."..PLEASE INSER| 00000760: 54 20 43 4F 52 52 45 43 54 20 44 49 53 4B 20 4E |T CORRECT DISK N| 00000770: 4F 57 2C 54 48 45 4E 20 48 49 54 20 20 20 20 52 |OW,THEN HIT R| 00000780: 45 54 55 52 4E 2E 2E 2E 22 00 A6 0F 60 04 99 22 |ETURN..."...`.."| 00000790: 93 46 4F 52 4D 41 54 54 49 4E 47 2E 2E 2E 22 3B |.FORMATTING...";| 000007A0: 3A 8D 33 30 30 30 00 BA 0F 6A 04 8B 45 52 A7 99 |:.3000...j..ER..| 000007B0: 45 52 24 3A 89 31 30 30 30 30 00 C0 0F 74 04 8E |ER$:.10000...t..| 000007C0: 00 C6 0F D0 07 8F 00 CE 0F DA 07 43 B2 2E 00 E1 |...........C....| 000007D0: 0F DF 07 8B 4E 55 B2 31 37 33 A7 4E 55 B2 31 38 |....NU.173.NU.18| 000007E0: 39 00 F7 0F E4 07 98 31 2C 22 55 31 22 3B 33 3B |9......1,"U1";3;| 000007F0: 30 3B 54 31 3B 53 31 00 0B 10 EE 07 8D 33 30 30 |0;T1;S1......300| 00000800: 30 3A 8B A8 45 52 A7 32 30 36 30 00 1F 10 F8 07 |0:..ER.2060.....| 00000810: 43 B2 43 AA 31 3A 8B 43 B3 33 89 32 30 32 30 00 |C.C.1:.C.3.2020.| 00000820: 55 10 02 08 99 45 52 24 3A 81 4A B2 28 42 42 AA |U....ER$:.J.(BB.| 00000830: 4E 55 29 AC 32 35 36 A4 28 42 42 AA 4E 55 29 AC |NU).256.(BB.NU).| 00000840: 32 35 36 AA 32 35 35 3A 97 4A 2C 2E 3A 82 4A 3A |256.255:.J,.:.J:| 00000850: 89 32 32 30 30 00 66 10 0C 08 98 31 2C 22 42 2D |.2200.f....1,"B-| 00000860: 50 22 3B 33 3B 30 00 84 10 16 08 8B 4E 55 B3 B1 |P";3;0......NU..| 00000870: 30 A7 97 31 31 30 37 AA 53 31 AC 34 30 AA 54 31 |0..1107.S1.40.T1| 00000880: 2C 31 32 37 00 A9 10 20 08 97 39 39 36 2C C2 28 |,127... ..996,.(| 00000890: 33 29 3A 97 39 39 37 2C C2 28 34 29 3A 97 34 2C |3):.997,.(4):.4,| 000008A0: 42 42 AA 4E 55 3A 9E 4D 41 00 C1 10 25 08 97 33 |BB.NU:.MA...%..3| 000008B0: 2C C2 28 39 39 36 29 3A 97 34 2C C2 28 39 39 37 |,.(996):.4,.(997| 000008C0: 29 00 DF 10 2A 08 8B 53 54 B3 B1 2E AF 53 54 B3 |)...*..ST....ST.| 000008D0: B1 36 34 A7 8D 33 30 30 30 3A 89 32 30 35 30 00 |.64..3000:.2050.| 000008E0: E5 10 34 08 8E 00 EB 10 98 08 8F 00 F3 10 A2 08 |..4.............| 000008F0: 43 B2 2E 00 15 11 AC 08 98 31 2C 22 42 2D 41 22 |C........1,"B-A"| 00000900: 3B 30 3B 54 31 3B 53 31 3A 98 31 2C 22 42 2D 50 |;0;T1;S1:.1,"B-P| 00000910: 22 3B 33 3B 30 00 32 11 B6 08 8B 4E 55 B3 B1 30 |";3;0.2....NU..0| 00000920: A7 97 31 31 30 37 AA 53 31 AC 34 30 AA 54 31 2C |..1107.S1.40.T1,| 00000930: 33 32 00 45 11 BB 08 8B 4E 55 B2 31 37 33 A7 4E |32.E....NU.173.N| 00000940: 55 B2 31 38 39 00 6C 11 C0 08 97 39 39 36 2C C2 |U.189.l....996,.| 00000950: 28 33 29 3A 97 39 39 37 2C C2 28 34 29 3A 97 34 |(3):.997,.(4):.4| 00000960: 2C 42 42 AA 4E 55 3A 9E 4D 41 AA 33 00 84 11 C5 |,BB.NU:.MA.3....| 00000970: 08 97 33 2C C2 28 39 39 36 29 3A 97 34 2C C2 28 |..3,.(996):.4,.(| 00000980: 39 39 37 29 00 AF 11 CA 08 8B 53 54 B3 B1 2E AF |997)......ST....| 00000990: 53 54 B3 B1 36 34 A7 99 22 49 45 45 45 20 57 52 |ST..64.."IEEE WR| 000009A0: 49 54 45 22 53 54 22 22 3A 89 31 30 30 30 30 00 |ITE"ST"":.10000.| 000009B0: C5 11 D4 08 98 31 2C 22 55 32 22 3B 33 3B 30 3B |.....1,"U2";3;0;| 000009C0: 54 31 3B 53 31 00 D9 11 DE 08 8D 33 30 30 30 3A |T1;S1......3000:| 000009D0: 8B A8 45 52 A7 32 33 30 30 00 ED 11 E8 08 43 B2 |..ER.2300.....C.| 000009E0: 43 AA 31 3A 8B 43 B3 33 A7 32 32 36 30 00 0A 12 |C.1:.C.3.2260...| 000009F0: F2 08 99 22 57 52 49 54 45 20 45 52 52 4F 52 22 |..."WRITE ERROR"| 00000A00: 45 52 24 3A 89 31 30 30 30 30 00 10 12 FC 08 8E |ER$:.10000......| 00000A10: 00 16 12 C4 09 8F 00 24 12 CE 09 54 53 B2 31 3A |.......$...TS.1:| 00000A20: 54 46 B2 2E 00 3B 12 D8 09 98 31 2C 22 49 30 22 |TF...;....1,"I0"| 00000A30: 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 44 12 E2 09 |:.3,8,3,"#".D...| 00000A40: 53 39 B2 30 00 60 12 EC 09 97 35 33 32 38 31 2C |S9.0.`....53281,| 00000A50: 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 |1:.".";:.53281,6| 00000A60: 00 83 12 00 0A 4E 55 B2 30 3A 54 31 B2 31 38 3A |.....NU.0:T1.18:| 00000A70: 53 31 B2 30 3A 43 30 24 B2 C7 28 2E 29 3A 8D 32 |S1.0:C0$..(.):.2| 00000A80: 30 30 30 00 A9 12 01 0A 81 49 B2 30 A4 32 30 3A |000......I.0.20:| 00000A90: 97 31 31 30 34 AA 49 AC 34 30 2C C6 28 C9 28 C4 |.1104.I.40,.(.(.| 00000AA0: 28 49 29 2C 31 29 29 3A 82 00 CC 12 02 0A 81 49 |(I),1)):.......I| 00000AB0: B2 31 A4 33 35 3A 97 31 39 38 37 AA 49 2C C6 28 |.1.35:.1987.I,.(| 00000AC0: C9 28 C4 28 49 29 2C 31 29 29 3A 82 00 D5 12 0A |.(.(I),1)):.....| 00000AD0: 0A 42 59 B2 34 00 E7 12 14 0A 54 25 B2 28 42 59 |.BY.4.....T%.(BY| 00000AE0: AB 34 29 AD 34 AA 31 00 1B 13 28 0A 8B C2 28 42 |.4).4.1...(...(B| 00000AF0: 41 AA 42 59 29 B2 2E A7 81 4A B2 2E A4 32 30 3A |A.BY)....J...20:| 00000B00: 42 4D 25 28 54 25 2C 4A 29 B2 2E 3A 82 3A 42 59 |BM%(T%,J)..:.:BY| 00000B10: B2 42 59 AA 34 3A 89 32 36 35 30 00 23 13 32 0A |.BY.4:.2650.#.2.| 00000B20: 53 B2 30 00 5D 13 3C 0A 42 59 B2 42 59 AA 31 3A |S.0.].<.BY.BY.1:| 00000B30: 41 30 B2 C2 28 42 41 AA 42 59 29 3A 81 4A B2 2E |A0..(BA.BY):.J..| 00000B40: A4 37 3A 42 4D 25 28 54 25 2C 53 29 B2 41 30 AF |.7:BM%(T%,S).A0.| 00000B50: 54 41 28 4A 29 3A 53 B2 53 AA 31 3A 82 00 6C 13 |TA(J):S.S.1:..l.| 00000B60: 46 0A 8B 53 B3 32 32 A7 32 36 32 30 00 78 13 50 |F..S.22.2620.x.P| 00000B70: 0A 42 59 B2 42 59 AA 31 00 8F 13 5A 0A 45 53 B2 |.BY.BY.1...Z.ES.| 00000B80: 32 31 3A 8B 54 25 B1 31 37 A7 45 53 B2 31 39 00 |21:.T%.17.ES.19.| 00000B90: A0 13 64 0A 8B 54 25 B1 32 34 A7 45 53 B2 31 38 |..d..T%.24.ES.18| 00000BA0: 00 B1 13 6E 0A 8B 54 25 B1 33 30 A7 45 53 B2 31 |...n..T%.30.ES.1| 00000BB0: 37 00 CD 13 78 0A 81 4A B2 45 53 A4 32 34 3A 42 |7...x..J.ES.24:B| 00000BC0: 4D 25 28 54 25 2C 4A 29 B2 AB 31 3A 82 00 0A 14 |M%(T%,J)..1:....| 00000BD0: 82 0A 53 4D B2 2E 3A 81 4A B2 2E A4 32 30 3A 53 |..SM..:.J...20:S| 00000BE0: 4C 25 B2 31 31 30 37 AA 4A AC 34 30 AA 54 25 3A |L%.1107.J.40.T%:| 00000BF0: 97 53 4C 25 2C 34 35 3A 8B 42 4D 25 28 54 25 2C |.SL%,45:.BM%(T%,| 00000C00: 4A 29 B3 B1 2E A7 32 37 30 30 00 1F 14 87 0A 53 |J)....2700.....S| 00000C10: 4D B2 53 4D AA 31 3A 97 53 4C 25 2C 31 36 30 00 |M.SM.1:.SL%,160.| 00000C20: 2E 14 8C 0A 82 3A 53 39 B2 53 39 AA 53 4D 00 3F |.....:S9.S9.SM.?| 00000C30: 14 8E 0A 8B 54 25 B3 B2 31 37 A7 32 37 31 30 00 |....T%..17.2710.| 00000C40: 68 14 90 0A 97 31 39 30 37 AA 54 25 2C 34 36 3A |h....1907.T%,46:| 00000C50: 97 31 38 36 37 AA 54 25 2C 34 36 3A 8B 54 25 B3 |.1867.T%,46:.T%.| 00000C60: B2 32 34 A7 32 37 31 30 00 85 14 92 0A 97 31 38 |.24.2710......18| 00000C70: 32 37 AA 54 25 2C 34 36 3A 8B 54 25 B3 B2 33 30 |27.T%,46:.T%..30| 00000C80: A7 32 37 31 30 00 95 14 94 0A 97 31 37 38 37 AA |.2710......1787.| 00000C90: 54 25 2C 34 36 00 B3 14 96 0A 8B 53 4D B2 2E AF |T%,46......SM...| 00000CA0: 54 53 B2 54 25 A7 54 53 B2 54 53 AA 31 3A 89 32 |TS.T%.TS.TS.1:.2| 00000CB0: 37 33 30 00 C4 14 A0 0A 8B 53 4D B3 B1 2E A7 54 |730......SM....T| 00000CC0: 46 B2 54 25 00 D5 14 AA 0A 8B 42 59 B3 31 34 33 |F.T%......BY.143| 00000CD0: A7 32 35 38 30 00 DC 14 B4 0A A0 33 00 F9 14 C8 |.2580......3....| 00000CE0: 0A 99 22 13 22 53 39 3B 22 42 4C 4F 43 4B 53 20 |.."."S9;"BLOCKS | 00000CF0: 54 4F 20 58 46 45 52 22 3B 00 22 15 D2 0A 53 38 |TO XFER";."...S8| 00000D00: B2 39 30 AA 32 35 AA 28 2E 36 35 30 AA 2E 39 38 |.90.25.(.650..98| 00000D10: 30 29 AC 53 39 3A 53 37 B2 B5 28 53 38 AD 20 36 |0).S9:S7..(S8. 6| 00000D20: 30 29 00 39 15 DC 0A 99 53 37 22 3A 22 B5 28 53 |0).9....S7":".(S| 00000D30: 38 AB 53 37 AC 36 30 29 3B 00 3F 15 E6 0A 8E 00 |8.S7.60);.?.....| 00000D40: 45 15 B8 0B 8F 00 7C 15 C2 0B 84 31 2C 45 30 24 |E.....|....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 A4 |R..(E0$)........| 00000DA0: 15 80 0C 8F 00 D1 15 8A 0C 8B 44 24 B2 22 44 22 |..........D$."D"| 00000DB0: A7 53 31 24 B2 22 44 45 53 54 49 4E 41 54 49 4F |.S1$."DESTINATIO| 00000DC0: 4E 22 3A 97 35 33 32 38 30 2C 32 3A 89 33 32 33 |N":.53280,2:.323| 00000DD0: 30 00 EB 15 94 0C 53 31 24 B2 22 53 4F 55 52 43 |0.....S1$."SOURC| 00000DE0: 45 22 3A 97 35 33 32 38 30 2C 35 00 1C 16 9E 0C |E":.53280,5.....| 00000DF0: 99 22 13 11 49 4E 53 45 52 54 20 22 3B 53 31 24 |."..INSERT ";S1$| 00000E00: 3B 22 20 44 49 53 4B 2C 20 50 52 45 53 53 20 53 |;" DISK, PRESS S| 00000E10: 50 41 43 45 92 BF 9D 22 3B 3A 8D 32 00 3A 16 A8 |PACE...";:.2.:..| 00000E20: 0C A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 97 32 |..A$:.A$.." "..2| 00000E30: 30 34 2C 30 3A 89 33 32 34 30 00 51 16 B2 0C 97 |04,0:.3240.Q....| 00000E40: 32 30 34 2C 31 3A 9F 32 2C 38 2C 30 2C 22 24 30 |204,1:.2,8,0,"$0| 00000E50: 22 00 70 16 BC 0C 8D 33 30 30 30 3A 8B 45 52 B1 |".p....3000:.ER.| 00000E60: 30 A7 A0 32 3A 99 22 12 22 3B 3A 89 33 32 33 30 |0..2:.".";:.3230| 00000E70: 00 86 16 C6 0C 81 4A B2 31 A4 32 36 3A A1 23 32 |......J.1.26:.#2| 00000E80: 2C 41 24 3A 82 4A 00 A2 16 D0 0C A1 23 32 2C 41 |,A$:.J......#2,A| 00000E90: 24 3A A1 23 32 2C 42 24 3A 49 52 24 B2 41 24 AA |$:.#2,B$:IR$.A$.| 00000EA0: 42 24 00 C5 16 DA 0C A1 23 32 2C 41 24 3A A1 23 |B$......#2,A$:.#| 00000EB0: 32 2C 41 24 3A A1 23 32 2C 42 24 3A 44 52 24 B2 |2,A$:.#2,B$:DR$.| 00000EC0: 41 24 AA 42 24 00 F5 16 DF 0C 99 22 13 11 20 20 |A$.B$......".. | 00000ED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000EE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000EF0: 20 20 20 22 3B 00 FE 16 E4 0C A0 32 3A 8E 00 04 | ";......2:...| 00000F00: 17 10 27 8F 00 1A 17 1A 27 97 35 35 2C 30 3A 97 |..'.....'.55,0:.| 00000F10: 35 36 2C 31 36 30 3A 9C 3A 90 00 5B 17 98 3A 83 |56,160:.:..[..:.| 00000F20: 37 36 2C 36 36 2C 33 2C 37 36 2C 39 31 2C 33 2C |76,66,3,76,91,3,| 00000F30: 31 36 32 2C 33 2C 33 32 2C 31 39 38 2C 32 35 35 |162,3,32,198,255| 00000F40: 2C 31 36 30 2C 30 2C 31 33 32 2C 33 2C 33 32 2C |,160,0,132,3,32,| 00000F50: 32 30 37 2C 32 35 35 2C 31 34 35 00 8A 17 A2 3A |207,255,145....:| 00000F60: 83 33 2C 31 36 35 2C 31 34 34 2C 32 30 38 2C 33 |.3,165,144,208,3| 00000F70: 2C 32 30 30 2C 32 30 38 2C 32 34 34 2C 33 32 2C |,200,208,244,32,| 00000F80: 32 30 34 2C 32 35 35 2C 39 36 00 D2 17 AC 3A 83 |204,255,96....:.| 00000F90: 31 36 32 2C 33 2C 33 32 2C 32 30 31 2C 32 35 35 |162,3,32,201,255| 00000FA0: 2C 31 36 30 2C 30 2C 31 33 32 2C 33 2C 31 32 30 |,160,0,132,3,120| 00000FB0: 2C 31 36 35 2C 31 2C 34 31 2C 32 35 33 2C 31 33 |,165,1,41,253,13| 00000FC0: 33 2C 31 2C 31 37 37 2C 33 2C 37 32 2C 31 36 35 |3,1,177,3,72,165| 00000FD0: 2C 31 00 18 18 B6 3A 83 39 2C 32 2C 31 33 33 2C |,1....:.9,2,133,| 00000FE0: 31 2C 31 30 34 2C 38 38 2C 33 32 2C 32 31 30 2C |1,104,88,32,210,| 00000FF0: 32 35 35 2C 31 36 35 2C 31 34 34 2C 32 30 38 2C |255,165,144,208,| 00001000: 33 2C 32 30 30 2C 32 30 38 2C 32 32 38 2C 37 36 |3,200,208,228,76| 00001010: 2C 32 30 34 2C 32 35 35 00 00 00 |,204,255... |
..7....I.828.898:.A:.I,A:.:.".";:.53281,
6:.53280,10:.19.B....198,0.G.... 53281,6
:.XQ$:.XQ$..""..198,0:.......XQ.1.500:.:
.53281,15:.XQ.1.500:.:.3......"D=DSAVE"@
BACK2",D0:?DS$:CATALOGD0......"D=DSAVE"@
BACK2",D0:?DS$:CATALOGD0.....BB.B(44).27
:.995,BB......998,0:.999,160:.55,0:.56,B
B:..).(.BB.B(995).D.2.N.220:BA.BB.256:MA
.828.T.<..BM%(35,24).K.F..J.0.7:TA(J).2.
J:...P..".BACKUP 1541"...Z.."'GOTO10000
' IF PROGRAM QUITS ABNORMALLY"...N..1,8,
15...H...J.R..1000.....D$."S":.3200:I2$.
IR$......DR$.."2A".."ILLEGAL DOS 1.0 DIS
K":.10000.Q....I2$.I1$.."SOURCE AND DEST
INATION HAVE SAME ID CODE":.10000.[....2
500.W...T.TS:S.0:NU.1:T1.T:S1.S......1,"
I0":.3,8,3,"#"..."..BM%(T1,S1).0..2000:N
U.NU.1:.NU.N.320.X.,.S1.S1.1:.S1.20.S1.0
:T1.T1.1...6..T1.TF.1.290...@..""...J. 3
...T.D$."D":.3200:.IR$..I1$..".";:.340.5
.^..1,"I0":.3,8,3,"#".H.R.NU.1:T1.T:S1.S
.R.|..BM%(T1,S1).0..2200:NU.NU.1:.NU.N.4
20.....S1.S1.1:.S1.20.S1.0:T1.T1.1......
T1.TF.1.380..... 3.G...S.S1.1:.S.20.S.0:
T1.T1.1.Z...T.T1:.T.TF.500...B.D$."S":.3
200:.IR$..I2$..".";:.450...L.NU.1:T1.T:S
1.S:.270.......%... 1.A....55,B(998):.56
,B(999):..Z....53280,6:.".FINISHED.J....
1,8,0,"$0"...&..#1,A$:.A$.."".550...0..A
$;:.610...:..#1,A$:SS.ST:A.C(A$):.A.A.F(
A$).W.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.@.V..#1,A$:
SS.ST:A.C(A$):.A.A.F(A$).D....#1,B$:SS.S
T:B.C(B$):.B.B.F(B$).X...N.B.256.A:.N;:.
.... 1.................."...INSERT DEST
INATION DISK TO BE FORMATTED.."......"DI
SK NAME ";DN$......DN$."".
."";:.1020......C(DN$).16..:.40.2...F.0:
.J.1.C(DN$):S1$.J(DN$,J,1).L.$..S1$."".S
1$.G(34).F.1.A....J:.F.."";:.1020...8.."
UNIQUE DISK ID ";I1$..
.B..I1$."".."";:.1080...L..C(I1$)..2..""
;:.1080.X.V..1,"N0:".DN$.",".I1$...W..".
ARE YOU SURE YOU HAVE CORRECT DISK
INSERTED??"...X..A$.0.Y..A$."Y".1120
.A.Z..A$."N".1118.K.[..1113...^.."..PLEA
SE INSERT CORRECT DISK NOW,THEN HIT R
ETURN..."...`..".FORMATTING...";:.3000..
.J..ER..ER$:.10000...T...F.P...N.Z.C....
....NU.173.NU.189......1,"U1";3;0;T1;S1.
.....3000:..ER.2060.....C.C.1:.C.3.2020.
U....ER$:.J.(BB.NU).256.(BB.NU).256.255:
.J,.:.J:.2200.F....1,"B-P";3;0......NU..
0..1107.S1.40.T1,127... ..996,B(3):.997,
B(4):.4,BB.NU:.MA.A.%..3,B(996):.4,B(997
)...*..ST....ST..64..3000:.2050...4.....
........C........1,"B-A";0;T1;S1:.1,"B-P
";3;0.2....NU..0..1107.S1.40.T1,32.E....
NU.173.NU.189.L....996,B(3):.997,B(4):.4
,BB.NU:.MA.3...E..3,B(996):.4,B(997)...J
..ST....ST..64.."IEEE WRITE"ST"":.10000.
E.T..1,"U2";3;0;T1;S1.Y....3000:..ER.230
0.....C.C.1:.C.3.2260......"WRITE ERROR"
ER$:.10000.........D...$.N.TS.1:TF...;.X
..1,"I0":.3,8,3,"#".D...S9.0.`....53281,
1:.".";:.53281,6.....NU.0:T1.18:S1.0:C0$
.G(.):.2000......I.0.20:.1104.I.40,F(I(D
(I),1)):..L....I.1.35:.1987.I,F(I(D(I),1
)):..U...BY.4.....T%.(BY.4).4.1...(..B(B
A.BY)....J...20:BM%(T%,J)..:.:BY.BY.4:.2
650.#.2.S.0.].<.BY.BY.1:A0.B(BA.BY):.J..
.7:BM%(T%,S).A0.TA(J):S.S.1:..L.F..S.22.
2620.X.P.BY.BY.1...Z.ES.21:.T%.17.ES.19.
.D..T%.24.ES.18...N..T%.30.ES.17.M.X..J
.ES.24:BM%(T%,J)..1:......SM..:.J...20:S
L%.1107.J.40.T%:.SL%,45:.BM%(T%,J)....27
00.....SM.SM.1:.SL%,160......:S9.S9.SM.?
....T%..17.2710.H....1907.T%,46:.1867.T%
,46:.T%..24.2710......1827.T%,46:.T%..30
.2710......1787.T%,46......SM...TS.T%.TS
.TS.1:.2730.D. ..SM....TF.T%.U....BY.143
.2580..... 3...H.."."S9;"BLOCKS TO XFER"
;.".R.S8.90.25.(.650..980).S9:S7..(S8. 6
0).9....S7":".(S8.S7.60);.?.....E.....|.
B..1,E0$,E1$,E2$,E3$:ER$.E0$.",".E1$.","
.E2$.",".E3$...L.ER.C(E0$):.ER.ER.E(E0$)
...V.........Q....D$."D".S1$."DESTINATIO
N":.53280,2:.3230.....S1$."SOURCE":.5328
0,5......"..INSERT ";S1$;" DISK, PRESS S
PACE...";:.2.:....A$:.A$.." "..204,0:.32
40.Q....204,1:.2,8,0,"$0".P....3000:.ER.
0. 2:.".";:.3230...F..J.1.26:.#2,A$:.J..
.P..#2,A$:.#2,B$:IR$.A$.B$.E.Z..#2,A$:.#
2,A$:.#2,B$:DR$.A$.B$......"..
";..... 2:...
..'.....'.55,0:.56,160:.:..[..:.76,66,3,
76,91,3,162,3,32,198,255,160,0,132,3,32,
207,255,145....:.3,165,144,208,3,200,208
,244,32,204,255,96.R..:.162,3,32,201,255
,160,0,132,3,120,165,1,41,253,133,1,177,
3,72,165,1....:.9,2,133,1,104,88,32,210,
255,165,144,208,3,200,208,228,76,204,255
...
> CLICK IMAGE PREVIEW FOR FULL MODAL