DISK COPIER
FILE INFORMATION
FILENAME(S): DISK COPIER
FILE TYPE(S): PRG
FILE SIZE: 4.2K
FIRST SEEN: 2025-12-01 01:48:30
APPEARS ON: 1 disk(s)
FILE HASH
8d3d88204845947933c426a0ee81c3a8118c78112000e26be54ece6d7a41119b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD187 DCB 6 88 | DISK COPIER | PRG | hedning, Mattias H00r | 28 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 0B 00 99 22 90 2A 22 3A 9E 34 39 31 |.......".*":.491|
00000010: 35 35 00 2B 08 0F 00 81 49 B2 38 32 38 A4 38 39 |55.+....I.828.89|
00000020: 38 3A 87 41 3A 97 49 2C 41 3A 82 00 43 08 14 00 |8:.A:.I,A:..C...|
00000030: 42 42 B2 C2 28 34 34 29 AA 32 37 3A 97 39 39 35 |BB..(44).27:.995|
00000040: 2C 42 42 00 66 08 1E 00 97 39 39 38 2C 30 3A 97 |,BB.f....998,0:.|
00000050: 39 39 39 2C 31 36 30 3A 97 35 35 2C 30 3A 97 35 |999,160:.55,0:.5|
00000060: 36 2C 42 42 3A 9C 00 74 08 28 00 42 42 B2 C2 28 |6,BB:..t.(.BB..(|
00000070: 39 39 35 29 00 8F 08 32 00 4E B2 32 32 30 3A 42 |995)...2.N.220:B|
00000080: 41 B2 42 42 AC 32 35 36 3A 4D 41 B2 38 32 38 00 |A.BB.256:MA.828.|
00000090: 9F 08 3C 00 86 42 4D 25 28 33 35 2C 32 34 29 00 |..<..BM%(35,24).|
000000A0: B6 08 46 00 81 4A B2 30 A4 37 3A 54 41 28 4A 29 |..F..J.0.7:TA(J)|
000000B0: B2 32 AE 4A 3A 82 00 E9 08 50 00 99 22 93 11 9A |.2.J:....P.."...|
000000C0: 12 20 20 20 20 20 20 20 20 20 44 20 49 20 53 20 |. D I S |
000000D0: 4B 20 20 20 43 20 4F 20 50 20 49 20 45 20 52 20 |K C O P I E R |
000000E0: 20 20 20 20 20 20 20 20 22 00 18 09 5A 00 99 22 | "...Z.."|
000000F0: 9E 11 54 59 50 45 20 27 9A 47 4F 54 4F 31 30 30 |..TYPE '.GOTO100|
00000100: 30 30 9E 27 20 49 46 20 43 4F 50 49 45 52 20 43 |00.' IF COPIER C|
00000110: 52 41 53 48 45 53 21 22 00 24 09 6E 00 9F 31 2C |RASHES!".$.n..1,|
00000120: 38 2C 31 35 00 33 09 C8 00 8D 31 30 30 30 3A 99 |8,15.3....1000:.|
00000130: 22 93 22 00 4C 09 DC 00 44 24 B2 22 53 22 3A 8D |".".L...D$."S":.|
00000140: 33 32 30 30 3A 49 32 24 B2 49 52 24 00 6E 09 04 |3200:I2$.IR$.n..|
00000150: 01 8D 32 35 30 30 3A 54 B2 54 53 3A 53 B2 30 3A |..2500:T.TS:S.0:|
00000160: 4E 55 B2 31 3A 54 31 B2 54 3A 53 31 B2 53 00 85 |NU.1:T1.T:S1.S..|
00000170: 09 0E 01 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C |....1,"I0":.3,8,|
00000180: 33 2C 22 23 22 00 AF 09 22 01 8B 42 4D 25 28 54 |3,"#"..."..BM%(T|
00000190: 31 2C 53 31 29 B2 30 A7 8D 32 30 30 30 3A 4E 55 |1,S1).0..2000:NU|
000001A0: B2 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 33 32 30 00 |.NU.1:.NU.N.320.|
000001B0: CF 09 2C 01 53 31 B2 53 31 AA 31 3A 8B 53 31 B1 |..,.S1.S1.1:.S1.|
000001C0: 32 30 A7 53 31 B2 30 3A 54 31 B2 54 31 AA 31 00 |20.S1.0:T1.T1.1.|
000001D0: E0 09 36 01 8B 54 31 B3 54 46 AA 31 A7 32 39 30 |..6..T1.TF.1.290|
000001E0: 00 EB 09 40 01 99 22 22 3A A0 33 00 FC 09 54 01 |...@.."":.3...T.|
000001F0: 44 24 B2 22 44 22 3A 8D 33 32 30 30 00 13 0A 5E |D$."D":.3200...^|
00000200: 01 98 31 2C 22 49 30 22 3A 9F 33 2C 38 2C 33 2C |..1,"I0":.3,8,3,|
00000210: 22 23 22 00 26 0A 72 01 4E 55 B2 31 3A 54 31 B2 |"#".&.r.NU.1:T1.|
00000220: 54 3A 53 31 B2 53 00 50 0A 7C 01 8B 42 4D 25 28 |T:S1.S.P.|..BM%(|
00000230: 54 31 2C 53 31 29 B2 30 A7 8D 32 32 30 30 3A 4E |T1,S1).0..2200:N|
00000240: 55 B2 4E 55 AA 31 3A 8B 4E 55 B1 4E A7 34 32 30 |U.NU.1:.NU.N.420|
00000250: 00 70 0A 86 01 53 31 B2 53 31 AA 31 3A 8B 53 31 |.p...S1.S1.1:.S1|
00000260: B1 32 30 A7 53 31 B2 30 3A 54 31 B2 54 31 AA 31 |.20.S1.0:T1.T1.1|
00000270: 00 81 0A 90 01 8B 54 31 B3 54 46 AA 31 A7 33 38 |......T1.TF.1.38|
00000280: 30 00 88 0A A4 01 A0 33 00 A5 0A AE 01 53 B2 53 |0......3.....S.S|
00000290: 31 AA 31 3A 8B 53 B1 32 30 A7 53 B2 30 3A 54 31 |1.1:.S.20.S.0:T1|
000002A0: B2 54 31 AA 31 00 B8 0A B8 01 54 B2 54 31 3A 8B |.T1.1.....T.T1:.|
000002B0: 54 B1 54 46 A7 35 30 30 00 C9 0A C2 01 44 24 B2 |T.TF.500.....D$.|
000002C0: 22 53 22 3A 8D 33 32 30 30 00 E1 0A CC 01 4E 55 |"S":.3200.....NU|
000002D0: B2 31 3A 54 31 B2 54 3A 53 31 B2 53 3A 89 32 37 |.1:T1.T:S1.S:.27|
000002E0: 30 00 E8 0A F4 01 A0 31 00 04 0B 08 02 97 35 35 |0......1......55|
000002F0: 2C C2 28 39 39 38 29 3A 97 35 36 2C C2 28 39 39 |,.(998):.56,.(99|
00000300: 39 29 3A 9C 00 38 0B 12 02 99 22 93 11 11 11 11 |9):..8....".....|
00000310: 11 11 11 11 11 1C 20 20 20 20 20 20 20 20 20 2A |...... *|
00000320: 2A 2A 9E 20 43 4F 50 59 20 43 4F 4D 50 4C 45 54 |**. COPY COMPLET|
00000330: 45 44 20 1C 2A 2A 2A 22 00 6E 0B 1C 02 99 22 11 |ED .***".n....".|
00000340: 11 9E 20 44 4F 20 59 4F 55 20 57 49 53 48 20 54 |.. DO YOU WISH T|
00000350: 4F 20 43 4F 50 59 20 41 4E 4F 54 48 45 52 20 44 |O COPY ANOTHER D|
00000360: 49 53 4B 3F 28 1C 59 9E 2F 1C 4E 9E 29 22 00 85 |ISK?(.Y./.N.)"..|
00000370: 0B 2B 02 8D 33 34 30 30 3A 8B 41 4E 24 B2 22 4E |.+..3400:.AN$."N|
00000380: 22 A7 35 37 30 00 9A 0B 2C 02 8B 41 4E 24 B2 22 |".570...,..AN$."|
00000390: 59 22 A7 9C 3A 8C 3A 89 31 31 00 A3 0B 30 02 89 |Y"..:.:.11...0..|
000003A0: 35 35 30 00 D6 0B 3A 02 99 22 11 11 9E 20 20 20 |550...:.."... |
000003B0: 20 49 4E 53 45 52 54 20 9A 48 2E 41 2E 4C 2E 9E | INSERT .H.A.L..|
000003C0: 20 44 49 53 4B 2C 20 50 52 45 53 53 20 1C 12 52 | DISK, PRESS ..R|
000003D0: 45 54 55 52 4E 22 00 EF 0B 44 02 A1 41 4E 24 3A |ETURN"...D..AN$:|
000003E0: 8B 41 4E 24 B3 B1 C7 28 31 33 29 A7 35 38 30 00 |.AN$...(13).580.|
000003F0: FA 0B 4E 02 89 31 36 30 30 30 00 20 0C E8 03 99 |..N..16000. ....|
00000400: 22 11 9E 49 4E 53 45 52 54 20 1C 12 44 45 53 54 |"..INSERT ..DEST|
00000410: 49 4E 41 54 49 4F 4E 92 9E 20 44 49 53 4B 2E 22 |INATION.. DISK."|
00000420: 00 4C 0C E9 03 99 22 11 9E 46 4F 52 4D 41 54 20 |.L...."..FORMAT |
00000430: 44 45 53 54 49 4E 41 54 49 4F 4E 20 44 49 53 4B |DESTINATION DISK|
00000440: 3F 20 28 1C 59 9E 2F 1C 4E 9E 29 22 00 64 0C EB |? (.Y./.N.)".d..|
00000450: 03 8D 33 34 30 30 3A 8B 41 4E 24 B2 22 59 22 A7 |..3400:.AN$."Y".|
00000460: 31 30 32 30 00 77 0C EC 03 8B 41 4E 24 B3 B1 22 |1020.w....AN$.."|
00000470: 4E 22 A7 31 30 30 33 00 A5 0C ED 03 A0 31 35 3A |N".1003......15:|
00000480: 9F 31 35 2C 38 2C 31 35 3A 98 31 35 2C 22 49 30 |.15,8,15:.15,"I0|
00000490: 22 3A A0 35 3A 9F 35 2C 38 2C 35 2C 22 23 22 3A |":.5:.5,8,5,"#":|
000004A0: 48 24 B2 22 22 00 CB 0C EE 03 98 31 35 2C 22 55 |H$.""......15,"U|
000004B0: 31 3A 35 2C 30 2C 31 38 2C 30 22 3A 98 31 35 2C |1:5,0,18,0":.15,|
000004C0: 22 42 2D 50 3A 35 2C 31 34 34 22 00 FD 0C EF 03 |"B-P:5,144".....|
000004D0: 81 4B B2 31 A4 31 36 3A A1 23 35 2C 47 24 3A 47 |.K.1.16:.#5,G$:G|
000004E0: 24 B2 C7 28 C6 28 47 24 AA C7 28 30 29 29 29 3A |$..(.(G$..(0))):|
000004F0: 48 24 B2 48 24 AA 47 24 3A 82 3A A0 35 00 1D 0D |H$.H$.G$:.:.5...|
00000500: F0 03 99 22 11 9E 44 49 53 4B 20 4E 41 4D 45 20 |..."..DISK NAME |
00000510: 49 53 20 4E 4F 57 3A 20 1C 22 3B 48 24 00 4A 0D |IS NOW: .";H$.J.|
00000520: F7 03 99 22 11 9E 52 45 2D 4E 41 4D 45 20 44 45 |..."..RE-NAME DE|
00000530: 53 54 49 4E 41 54 49 4F 4E 20 44 49 53 4B 3F 20 |STINATION DISK? |
00000540: 28 1C 59 9E 2F 1C 4E 9E 29 22 00 68 0D F9 03 8D |(.Y./.N.)".h....|
00000550: 33 34 30 30 3A 8B 41 4E 24 B2 22 59 22 A7 4E 46 |3400:.AN$."Y".NF|
00000560: B2 31 3A 89 31 30 32 30 00 7B 0D FA 03 8B 41 4E |.1:.1020.{....AN|
00000570: 24 B3 B1 22 4E 22 A7 31 30 31 37 00 91 0D FB 03 |$.."N".1017.....|
00000580: 44 4E 24 B2 48 24 3A 4E 46 B2 31 3A 89 31 30 37 |DN$.H$:NF.1:.107|
00000590: 35 00 B5 0D FC 03 85 22 11 4E 41 4D 45 20 46 4F |5......".NAME FO|
000005A0: 52 20 44 49 53 4B 28 1C 31 36 9E 4D 41 58 29 3A |R DISK(.16.MAX):|
000005B0: 22 3B 44 4E 24 00 CC 0D 06 04 8B 44 4E 24 B2 22 |";DN$......DN$."|
000005C0: 22 A7 99 22 22 3B 3A 89 31 30 32 30 00 E1 0D 10 |".."";:.1020....|
000005D0: 04 8B C3 28 44 4E 24 29 B1 31 36 A7 9C 3A 89 34 |...(DN$).16..:.4|
000005E0: 30 00 04 0E 1A 04 46 B2 30 3A 81 4A B2 31 A4 C3 |0.....F.0:.J.1..|
000005F0: 28 44 4E 24 29 3A 53 31 24 B2 CA 28 44 4E 24 2C |(DN$):S1$..(DN$,|
00000600: 4A 2C 31 29 00 1E 0E 24 04 8B 53 31 24 B2 22 22 |J,1)...$..S1$.""|
00000610: B0 53 31 24 B2 C7 28 33 34 29 A7 46 B2 31 00 33 |.S1$..(34).F.1.3|
00000620: 0E 2E 04 82 4A 3A 8B 46 A7 99 22 22 3B 3A 89 31 |....J:.F.."";:.1|
00000630: 30 32 30 00 5B 0E 33 04 8B 4E 46 B2 31 A7 4E 46 |020.[.3..NF.1.NF|
00000640: B2 30 3A 98 31 2C 22 4E 30 3A 22 AA 44 4E 24 3A |.0:.1,"N0:".DN$:|
00000650: 8D 33 30 30 30 3A 89 31 31 33 30 00 86 0E 38 04 |.3000:.1130...8.|
00000660: 85 22 11 49 4E 50 55 54 20 55 4E 49 51 55 45 20 |.".INPUT UNIQUE |
00000670: 44 49 53 4B 20 49 44 28 1C 32 9E 43 48 41 52 29 |DISK ID(.2.CHAR)|
00000680: 3A 22 3B 49 31 24 00 9D 0E 42 04 8B 49 31 24 B2 |:";I1$...B..I1$.|
00000690: 22 22 A7 99 22 22 3B 3A 89 31 30 38 30 00 B7 0E |"".."";:.1080...|
000006A0: 4C 04 8B C3 28 49 31 24 29 B3 B1 32 A7 99 22 22 |L...(I1$)..2..""|
000006B0: 3B 3A 89 31 30 38 30 00 D0 0E 56 04 98 31 2C 22 |;:.1080...V..1,"|
000006C0: 4E 30 3A 22 AA 44 4E 24 AA 22 2C 22 AA 49 31 24 |N0:".DN$.",".I1$|
000006D0: 00 F9 0E 60 04 99 22 11 1C 46 4F 52 4D 41 54 54 |...`.."..FORMATT|
000006E0: 49 4E 47 2E 2E 2E 50 4C 45 41 53 45 20 57 41 49 |ING...PLEASE WAI|
000006F0: 54 22 3B 3A 8D 33 30 30 30 00 0D 0F 6A 04 8B 45 |T";:.3000...j..E|
00000700: 52 A7 99 45 52 24 3A 89 31 30 30 30 30 00 18 0F |R..ER$:.10000...|
00000710: 74 04 99 22 93 22 3A 8E 00 2F 0F D0 07 43 B2 2E |t..".":../...C..|
00000720: 3A 8B 4E 55 B2 31 37 33 A7 4E 55 B2 31 38 39 00 |:.NU.173.NU.189.|
00000730: 45 0F E4 07 98 31 2C 22 55 31 22 3B 33 3B 30 3B |E....1,"U1";3;0;|
00000740: 54 31 3B 53 31 00 59 0F EE 07 8D 33 30 30 30 3A |T1;S1.Y....3000:|
00000750: 8B A8 45 52 A7 32 30 36 30 00 6D 0F F8 07 43 B2 |..ER.2060.m...C.|
00000760: 43 AA 31 3A 8B 43 B3 33 89 32 30 32 30 00 A3 0F |C.1:.C.3.2020...|
00000770: 02 08 99 45 52 24 3A 81 4A B2 28 42 42 AA 4E 55 |...ER$:.J.(BB.NU|
00000780: 29 AC 32 35 36 A4 28 42 42 AA 4E 55 29 AC 32 35 |).256.(BB.NU).25|
00000790: 36 AA 32 35 35 3A 97 4A 2C 2E 3A 82 4A 3A 89 32 |6.255:.J,.:.J:.2|
000007A0: 32 30 30 00 B4 0F 0C 08 98 31 2C 22 42 2D 50 22 |200......1,"B-P"|
000007B0: 3B 33 3B 30 00 D9 0F 16 08 8B 4E 55 B3 B1 30 A7 |;3;0......NU..0.|
000007C0: 97 36 34 36 2C 37 3A 97 31 31 30 37 AA 53 31 AC |.646,7:.1107.S1.|
000007D0: 34 30 AA 54 31 2C 31 32 37 00 FE 0F 20 08 97 39 |40.T1,127... ..9|
000007E0: 39 36 2C C2 28 33 29 3A 97 39 39 37 2C C2 28 34 |96,.(3):.997,.(4|
000007F0: 29 3A 97 34 2C 42 42 AA 4E 55 3A 9E 4D 41 00 16 |):.4,BB.NU:.MA..|
00000800: 10 25 08 97 33 2C C2 28 39 39 36 29 3A 97 34 2C |.%..3,.(996):.4,|
00000810: C2 28 39 39 37 29 00 34 10 2A 08 8B 53 54 B3 B1 |.(997).4.*..ST..|
00000820: 2E AF 53 54 B3 B1 36 34 A7 8D 33 30 30 30 3A 89 |..ST..64..3000:.|
00000830: 32 30 35 30 00 3A 10 34 08 8E 00 60 10 98 08 43 |2050.:.4...`...C|
00000840: B2 2E 3A 98 31 2C 22 42 2D 41 22 3B 30 3B 54 31 |..:.1,"B-A";0;T1|
00000850: 3B 53 31 3A 98 31 2C 22 42 2D 50 22 3B 33 3B 30 |;S1:.1,"B-P";3;0|
00000860: 00 7D 10 B6 08 8B 4E 55 B3 B1 30 A7 97 31 31 30 |.}....NU..0..110|
00000870: 37 AA 53 31 AC 34 30 AA 54 31 2C 33 32 00 90 10 |7.S1.40.T1,32...|
00000880: BB 08 8B 4E 55 B2 31 37 33 A7 4E 55 B2 31 38 39 |...NU.173.NU.189|
00000890: 00 B7 10 C0 08 97 39 39 36 2C C2 28 33 29 3A 97 |......996,.(3):.|
000008A0: 39 39 37 2C C2 28 34 29 3A 97 34 2C 42 42 AA 4E |997,.(4):.4,BB.N|
000008B0: 55 3A 9E 4D 41 AA 33 00 CF 10 C5 08 97 33 2C C2 |U:.MA.3......3,.|
000008C0: 28 39 39 36 29 3A 97 34 2C C2 28 39 39 37 29 00 |(996):.4,.(997).|
000008D0: FA 10 CA 08 8B 53 54 B3 B1 2E AF 53 54 B3 B1 36 |.....ST....ST..6|
000008E0: 34 A7 99 22 49 45 45 45 20 57 52 49 54 45 22 53 |4.."IEEE WRITE"S|
000008F0: 54 22 22 3A 89 31 30 30 30 30 00 10 11 D4 08 98 |T"":.10000......|
00000900: 31 2C 22 55 32 22 3B 33 3B 30 3B 54 31 3B 53 31 |1,"U2";3;0;T1;S1|
00000910: 00 24 11 DE 08 8D 33 30 30 30 3A 8B A8 45 52 A7 |.$....3000:..ER.|
00000920: 32 33 30 30 00 38 11 E8 08 43 B2 43 AA 31 3A 8B |2300.8...C.C.1:.|
00000930: 43 B3 33 A7 32 32 36 30 00 63 11 F2 08 99 22 55 |C.3.2260.c...."U|
00000940: 4E 52 45 43 4F 56 45 52 41 42 4C 45 20 57 52 49 |NRECOVERABLE WRI|
00000950: 54 45 20 45 52 52 4F 52 22 45 52 24 3A 89 31 30 |TE ERROR"ER$:.10|
00000960: 30 30 30 00 69 11 FC 08 8E 00 77 11 C4 09 54 53 |000.i.....w...TS|
00000970: B2 31 3A 54 46 B2 2E 00 8E 11 D8 09 98 31 2C 22 |.1:TF........1,"|
00000980: 49 30 22 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 97 |I0":.3,8,3,"#"..|
00000990: 11 E2 09 53 39 B2 30 00 B9 11 EC 09 99 22 93 1C |...S9.0......"..|
000009A0: 20 20 20 20 20 20 52 45 41 44 49 4E 47 20 42 4C | READING BL|
000009B0: 4F 43 4B 20 4D 41 50 22 3B 00 DC 11 00 0A 4E 55 |OCK MAP";.....NU|
000009C0: B2 30 3A 54 31 B2 31 38 3A 53 31 B2 30 3A 43 30 |.0:T1.18:S1.0:C0|
000009D0: 24 B2 C7 28 2E 29 3A 8D 32 30 30 30 00 07 12 01 |$..(.):.2000....|
000009E0: 0A 99 22 1E 22 3A 81 49 B2 30 A4 32 30 3A 97 31 |..".":.I.0.20:.1|
000009F0: 31 30 34 AA 49 AC 34 30 2C C6 28 C9 28 C4 28 49 |104.I.40,.(.(.(I|
00000A00: 29 2C 31 29 29 3A 82 00 2A 12 02 0A 81 49 B2 31 |),1)):..*....I.1|
00000A10: A4 33 35 3A 97 31 39 38 37 AA 49 2C C6 28 C9 28 |.35:.1987.I,.(.(|
00000A20: C4 28 49 29 2C 31 29 29 3A 82 00 33 12 0A 0A 42 |.(I),1)):..3...B|
00000A30: 59 B2 34 00 45 12 14 0A 54 25 B2 28 42 59 AB 34 |Y.4.E...T%.(BY.4|
00000A40: 29 AD 34 AA 31 00 79 12 28 0A 8B C2 28 42 41 AA |).4.1.y.(...(BA.|
00000A50: 42 59 29 B2 2E A7 81 4A B2 2E A4 32 30 3A 42 4D |BY)....J...20:BM|
00000A60: 25 28 54 25 2C 4A 29 B2 2E 3A 82 3A 42 59 B2 42 |%(T%,J)..:.:BY.B|
00000A70: 59 AA 34 3A 89 32 36 35 30 00 81 12 32 0A 53 B2 |Y.4:.2650...2.S.|
00000A80: 30 00 BB 12 3C 0A 42 59 B2 42 59 AA 31 3A 41 30 |0...<.BY.BY.1:A0|
00000A90: B2 C2 28 42 41 AA 42 59 29 3A 81 4A B2 2E A4 37 |..(BA.BY):.J...7|
00000AA0: 3A 42 4D 25 28 54 25 2C 53 29 B2 41 30 AF 54 41 |:BM%(T%,S).A0.TA|
00000AB0: 28 4A 29 3A 53 B2 53 AA 31 3A 82 00 CA 12 46 0A |(J):S.S.1:....F.|
00000AC0: 8B 53 B3 32 32 A7 32 36 32 30 00 D6 12 50 0A 42 |.S.22.2620...P.B|
00000AD0: 59 B2 42 59 AA 31 00 ED 12 5A 0A 45 53 B2 32 31 |Y.BY.1...Z.ES.21|
00000AE0: 3A 8B 54 25 B1 31 37 A7 45 53 B2 31 39 00 FE 12 |:.T%.17.ES.19...|
00000AF0: 64 0A 8B 54 25 B1 32 34 A7 45 53 B2 31 38 00 0F |d..T%.24.ES.18..|
00000B00: 13 6E 0A 8B 54 25 B1 33 30 A7 45 53 B2 31 37 00 |.n..T%.30.ES.17.|
00000B10: 2B 13 78 0A 81 4A B2 45 53 A4 32 34 3A 42 4D 25 |+.x..J.ES.24:BM%|
00000B20: 28 54 25 2C 4A 29 B2 AB 31 3A 82 00 68 13 82 0A |(T%,J)..1:..h...|
00000B30: 53 4D B2 2E 3A 81 4A B2 2E A4 32 30 3A 53 4C 25 |SM..:.J...20:SL%|
00000B40: B2 31 31 30 37 AA 4A AC 34 30 AA 54 25 3A 97 53 |.1107.J.40.T%:.S|
00000B50: 4C 25 2C 34 35 3A 8B 42 4D 25 28 54 25 2C 4A 29 |L%,45:.BM%(T%,J)|
00000B60: B3 B1 2E A7 32 37 30 30 00 7D 13 87 0A 53 4D B2 |....2700.}...SM.|
00000B70: 53 4D AA 31 3A 97 53 4C 25 2C 31 36 30 00 8C 13 |SM.1:.SL%,160...|
00000B80: 8C 0A 82 3A 53 39 B2 53 39 AA 53 4D 00 9D 13 8E |...:S9.S9.SM....|
00000B90: 0A 8B 54 25 B3 B2 31 37 A7 32 37 31 30 00 C6 13 |..T%..17.2710...|
00000BA0: 90 0A 97 31 39 30 37 AA 54 25 2C 34 36 3A 97 31 |...1907.T%,46:.1|
00000BB0: 38 36 37 AA 54 25 2C 34 36 3A 8B 54 25 B3 B2 32 |867.T%,46:.T%..2|
00000BC0: 34 A7 32 37 31 30 00 E3 13 92 0A 97 31 38 32 37 |4.2710......1827|
00000BD0: AA 54 25 2C 34 36 3A 8B 54 25 B3 B2 33 30 A7 32 |.T%,46:.T%..30.2|
00000BE0: 37 31 30 00 F3 13 94 0A 97 31 37 38 37 AA 54 25 |710......1787.T%|
00000BF0: 2C 34 36 00 11 14 96 0A 8B 53 4D B2 2E AF 54 53 |,46......SM...TS|
00000C00: B2 54 25 A7 54 53 B2 54 53 AA 31 3A 89 32 37 33 |.T%.TS.TS.1:.273|
00000C10: 30 00 22 14 A0 0A 8B 53 4D B3 B1 2E A7 54 46 B2 |0."....SM....TF.|
00000C20: 54 25 00 33 14 AA 0A 8B 42 59 B3 31 34 33 A7 32 |T%.3....BY.143.2|
00000C30: 35 38 30 00 3A 14 B4 0A A0 33 00 63 14 C8 0A 99 |580.:....3.c....|
00000C40: 22 13 1C 22 53 39 3B 22 1E 20 42 4C 4F 43 4B 53 |".."S9;". BLOCKS|
00000C50: 20 54 4F 20 43 4F 50 59 20 20 20 20 20 20 20 20 | TO COPY |
00000C60: 1C 22 3B 00 8C 14 D2 0A 53 38 B2 39 30 AA 32 35 |.";.....S8.90.25|
00000C70: AA 28 2E 36 35 30 AA 2E 39 38 30 29 AC 53 39 3A |.(.650..980).S9:|
00000C80: 53 37 B2 B5 28 53 38 AD 20 36 30 29 00 A3 14 DC |S7..(S8. 60)....|
00000C90: 0A 99 53 37 22 3A 22 B5 28 53 38 AB 53 37 AC 36 |..S7":".(S8.S7.6|
00000CA0: 30 29 3B 00 A9 14 E6 0A 8E 00 E0 14 B8 0B 84 31 |0);............1|
00000CB0: 2C 45 30 24 2C 45 31 24 2C 45 32 24 2C 45 33 24 |,E0$,E1$,E2$,E3$|
00000CC0: 3A 45 52 24 B2 45 30 24 AA 22 2C 22 AA 45 31 24 |:ER$.E0$.",".E1$|
00000CD0: AA 22 2C 22 AA 45 32 24 AA 22 2C 22 AA 45 33 24 |.",".E2$.",".E3$|
00000CE0: 00 FC 14 CC 0B 45 52 B2 C3 28 45 30 24 29 3A 8B |.....ER..(E0$):.|
00000CF0: 45 52 A7 45 52 B2 C5 28 45 30 24 29 00 02 15 D6 |ER.ER..(E0$)....|
00000D00: 0B 8E 00 26 15 80 0C 8B 44 24 B2 22 44 22 A7 53 |...&....D$."D".S|
00000D10: 31 24 B2 22 44 45 53 54 49 4E 41 54 49 4F 4E 22 |1$."DESTINATION"|
00000D20: 3A 89 33 32 33 30 00 37 15 94 0C 53 31 24 B2 22 |:.3230.7...S1$."|
00000D30: 53 4F 55 52 43 45 22 00 6E 15 9E 0C 99 22 13 11 |SOURCE".n...."..|
00000D40: 9E 49 4E 53 45 52 54 20 9A 12 22 3B 53 31 24 3B |.INSERT ..";S1$;|
00000D50: 22 92 9E 20 44 49 53 4B 2C 50 52 45 53 53 20 1C |".. DISK,PRESS .|
00000D60: 12 52 45 54 55 52 4E 92 99 20 20 9D 22 3B 00 8E |.RETURN.. .";..|
00000D70: 15 A8 0C A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 |....A$:.A$...(13|
00000D80: 29 A7 97 32 30 34 2C 30 3A 89 33 32 34 30 00 A5 |)..204,0:.3240..|
00000D90: 15 B2 0C 97 32 30 34 2C 31 3A 9F 32 2C 38 2C 30 |....204,1:.2,8,0|
00000DA0: 2C 22 24 30 22 00 C4 15 BC 0C 8D 33 30 30 30 3A |,"$0"......3000:|
00000DB0: 8B 45 52 B1 30 A7 A0 32 3A 99 22 12 22 3B 3A 89 |.ER.0..2:.".";:.|
00000DC0: 33 32 33 30 00 DA 15 C6 0C 81 4A B2 31 A4 32 36 |3230......J.1.26|
00000DD0: 3A A1 23 32 2C 41 24 3A 82 4A 00 F6 15 D0 0C A1 |:.#2,A$:.J......|
00000DE0: 23 32 2C 41 24 3A A1 23 32 2C 42 24 3A 49 52 24 |#2,A$:.#2,B$:IR$|
00000DF0: B2 41 24 AA 42 24 00 19 16 DA 0C A1 23 32 2C 41 |.A$.B$......#2,A|
00000E00: 24 3A A1 23 32 2C 41 24 3A A1 23 32 2C 42 24 3A |$:.#2,A$:.#2,B$:|
00000E10: 44 52 24 B2 41 24 AA 42 24 00 4A 16 DF 0C 99 22 |DR$.A$.B$.J...."|
00000E20: 13 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E40: 20 20 20 20 20 20 20 20 22 3B 00 53 16 E4 0C A0 | ";.S....|
00000E50: 32 3A 8E 00 69 16 48 0D A1 41 4E 24 3A 8B 41 4E |2:..i.H..AN$:.AN|
00000E60: 24 B2 22 22 A7 33 34 30 30 00 6F 16 52 0D 8E 00 |$."".3400.o.R...|
00000E70: 75 16 10 27 3A 00 90 16 1A 27 97 35 35 2C 30 3A |u..':....'.55,0:|
00000E80: 97 35 36 2C 31 36 30 3A 9C 3A 89 31 36 30 30 30 |.56,160:.:.16000|
00000E90: 00 D1 16 98 3A 83 37 36 2C 36 36 2C 33 2C 37 36 |....:.76,66,3,76|
00000EA0: 2C 39 31 2C 33 2C 31 36 32 2C 33 2C 33 32 2C 31 |,91,3,162,3,32,1|
00000EB0: 39 38 2C 32 35 35 2C 31 36 30 2C 30 2C 31 33 32 |98,255,160,0,132|
00000EC0: 2C 33 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 34 |,3,32,207,255,14|
00000ED0: 35 00 00 17 A2 3A 83 33 2C 31 36 35 2C 31 34 34 |5....:.3,165,144|
00000EE0: 2C 32 30 38 2C 33 2C 32 30 30 2C 32 30 38 2C 32 |,208,3,200,208,2|
00000EF0: 34 34 2C 33 32 2C 32 30 34 2C 32 35 35 2C 39 36 |44,32,204,255,96|
00000F00: 00 48 17 AC 3A 83 31 36 32 2C 33 2C 33 32 2C 32 |.H..:.162,3,32,2|
00000F10: 30 31 2C 32 35 35 2C 31 36 30 2C 30 2C 31 33 32 |01,255,160,0,132|
00000F20: 2C 33 2C 31 32 30 2C 31 36 35 2C 31 2C 34 31 2C |,3,120,165,1,41,|
00000F30: 32 35 33 2C 31 33 33 2C 31 2C 31 37 37 2C 33 2C |253,133,1,177,3,|
00000F40: 37 32 2C 31 36 35 2C 31 00 8E 17 B6 3A 83 39 2C |72,165,1....:.9,|
00000F50: 32 2C 31 33 33 2C 31 2C 31 30 34 2C 38 38 2C 33 |2,133,1,104,88,3|
00000F60: 32 2C 32 31 30 2C 32 35 35 2C 31 36 35 2C 31 34 |2,210,255,165,14|
00000F70: 34 2C 32 30 38 2C 33 2C 32 30 30 2C 32 30 38 2C |4,208,3,200,208,|
00000F80: 32 32 38 2C 37 36 2C 32 30 34 2C 32 35 35 00 B5 |228,76,204,255..|
00000F90: 17 80 3E 99 22 93 22 3A A0 31 35 3A 9F 31 35 2C |..>.".":.15:.15,|
00000FA0: 38 2C 31 35 3A 98 31 35 2C 22 49 30 22 3A A0 31 |8,15:.15,"I0":.1|
00000FB0: 35 3A 41 B2 30 00 C6 17 85 3E 99 22 93 90 11 11 |5:A.0....>."....|
00000FC0: 11 20 4E 45 57 22 00 F2 17 8A 3E 99 22 11 11 49 |. NEW"....>."..I|
00000FD0: 46 41 3D 30 54 48 45 4E 41 3D 31 3A 4C 4F 41 44 |FA=0THENA=1:LOAD|
00000FE0: 22 C7 28 33 34 29 22 51 55 49 43 4B 4C 4F 41 44 |".(34)"QUICKLOAD|
00000FF0: 22 3B 00 04 18 94 3E 99 20 C7 28 33 34 29 22 2C |";....>. .(34)",|
00001000: 38 2C 31 22 00 18 18 9E 3E 99 22 11 11 11 11 53 |8,1"....>."....S|
00001010: 59 53 34 39 31 35 32 22 00 27 18 A3 3E 99 22 11 |YS49152".'..>.".|
00001020: 11 11 11 4E 45 57 22 00 43 18 A8 3E 99 22 11 11 |...NEW".C..>."..|
00001030: 4C 4F 41 44 22 C7 28 33 34 29 22 48 2E 41 2E 4C |LOAD".(34)"H.A.L|
00001040: 2E 22 3B 00 54 18 B2 3E 99 20 C7 28 33 34 29 22 |.";.T..>. .(34)"|
00001050: 2C 38 13 22 00 66 18 BC 3E 97 31 39 38 2C 30 3A |,8.".f..>.198,0:|
00001060: 97 31 39 38 2C 38 00 9A 18 C6 3E 97 36 33 31 2C |.198,8....>.631,|
00001070: 31 33 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C |13:.632,13:.633,|
00001080: 31 33 3A 97 36 33 34 2C 31 33 3A 97 36 33 35 2C |13:.634,13:.635,|
00001090: 31 33 3A 97 36 33 36 2C 38 32 00 AF 18 CB 3E 97 |13:.636,82....>.|
000010A0: 36 33 37 2C 31 31 37 3A 97 36 33 38 2C 31 33 00 |637,117:.638,13.|
000010B0: B5 18 D0 3E 80 00 00 00 CA |...>..... |
.......".*":.49155.+....I.828.898:.A:.I,
A:..C...BB.B(44).27:.995,BB.F....998,0:.
999,160:.55,0:.56,BB:..T.(.BB.B(995)...2
.N.220:BA.BB.256:MA.828...<..BM%(35,24).
..F..J.0.7:TA(J).2.J:....P.."....
D I S K C O P I E R "...Z.."
..TYPE '.GOTO10000.' IF COPIER CRASHES!"
.$.N..1,8,15.3.H..1000:.".".L...D$."S":.
3200:I2$.IR$.N....2500:T.TS:S.0:NU.1:T1.
T:S1.S......1,"I0":.3,8,3,"#"..."..BM%(T
1,S1).0..2000:NU.NU.1:.NU.N.320.O.,.S1.S
1.1:.S1.20.S1.0:T1.T1.1...6..T1.TF.1.290
...@.."": 3...T.D$."D":.3200...^..1,"I0"
:.3,8,3,"#".&.R.NU.1:T1.T:S1.S.P.|..BM%(
T1,S1).0..2200:NU.NU.1:.NU.N.420.P...S1.
S1.1:.S1.20.S1.0:T1.T1.1......T1.TF.1.38
0..... 3.....S.S1.1:.S.20.S.0:T1.T1.1...
..T.T1:.T.TF.500.I.B.D$."S":.3200...L.NU
.1:T1.T:S1.S:.270..... 1......55,B(998):
.56,B(999):..8...."........... *
**. COPY COMPLETED .***".N...."... DO YO
U WISH TO COPY ANOTHER DISK?(.Y./.N.)"..
.+..3400:.AN$."N".570...,..AN$."Y"..:.:.
11...0..550.V.:.."... INSERT .H.A.L..
DISK, PRESS ..RETURN"...D..AN$:.AN$..G(
13).580...N..16000. ...."..INSERT ..DEST
INATION.. DISK.".L...."..FORMAT DESTINAT
ION DISK? (.Y./.N.)".D....3400:.AN$."Y".
1020.W....AN$.."N".1003..... 15:.15,8,15
:.15,"I0": 5:.5,8,5,"#":H$."".K....15,"U
1:5,0,18,0":.15,"B-P:5,144"......K.1.16:
.#5,G$:G$.G(F(G$.G(0))):H$.H$.G$:.: 5...
..."..DISK NAME IS NOW: .";H$.J...."..RE
-NAME DESTINATION DISK? (.Y./.N.)".H....
3400:.AN$."Y".NF.1:.1020.{....AN$.."N".1
017.....DN$.H$:NF.1:.1075......".NAME FO
R DISK(.16.MAX):";DN$.L....DN$."".."";:.
1020......C(DN$).16..:.40.....F.0:.J.1.C
(DN$):S1$.J(DN$,J,1)...$..S1$."".S1$.G(3
4).F.1.3....J:.F.."";:.1020.[.3..NF.1.NF
.0:.1,"N0:".DN$:.3000:.1130...8..".INPUT
UNIQUE DISK ID(.2.CHAR):";I1$...B..I1$.
"".."";:.1080...L..C(I1$)..2.."";:.1080.
P.V..1,"N0:".DN$.",".I1$...`.."..FORMATT
ING...PLEASE WAIT";:.3000...J..ER..ER$:.
10000...T..".":../.P.C..:.NU.173.NU.189.
E....1,"U1";3;0;T1;S1.Y....3000:..ER.206
0.M...C.C.1:.C.3.2020......ER$:.J.(BB.NU
).256.(BB.NU).256.255:.J,.:.J:.2200.....
.1,"B-P";3;0.Y....NU..0..646,7:.1107.S1.
40.T1,127... ..996,B(3):.997,B(4):.4,BB.
NU:.MA...%..3,B(996):.4,B(997).4.*..ST..
..ST..64..3000:.2050.:.4...`...C..:.1,"B
-A";0;T1;S1:.1,"B-P";3;0.}....NU..0..110
7.S1.40.T1,32......NU.173.NU.189......99
6,B(3):.997,B(4):.4,BB.NU:.MA.3.O.E..3,B
(996):.4,B(997)...J..ST....ST..64.."IEEE
WRITE"ST"":.10000...T..1,"U2";3;0;T1;S1
.$....3000:..ER.2300.8...C.C.1:.C.3.2260
.C...."UNRECOVERABLE WRITE ERROR"ER$:.10
000.I.....W.D.TS.1:TF.....X..1,"I0":.3,8
,3,"#".....S9.0......".. READING BL
OCK MAP";.....NU.0:T1.18:S1.0:C0$.G(.):.
2000......".":.I.0.20:.1104.I.40,F(I(D(I
),1)):..*....I.1.35:.1987.I,F(I(D(I),1))
:..3...BY.4.E...T%.(BY.4).4.1.Y.(..B(BA.
BY)....J...20:BM%(T%,J)..:.:BY.BY.4:.265
0...2.S.0...<.BY.BY.1:A0.B(BA.BY):.J...7
:BM%(T%,S).A0.TA(J):S.S.1:..J.F..S.22.26
20.V.P.BY.BY.1...Z.ES.21:.T%.17.ES.19...
D..T%.24.ES.18...N..T%.30.ES.17.+.X..J.E
S.24:BM%(T%,J)..1:..H...SM..:.J...20:SL%
.1107.J.40.T%:.SL%,45:.BM%(T%,J)....2700
.}...SM.SM.1:.SL%,160......:S9.S9.SM....
..T%..17.2710.F....1907.T%,46:.1867.T%,4
6:.T%..24.2710......1827.T%,46:.T%..30.2
710......1787.T%,46......SM...TS.T%.TS.T
S.1:.2730.". ..SM....TF.T%.3....BY.143.2
580.:... 3.C.H..".."S9;". BLOCKS TO COPY
.";...R.S8.90.25.(.650..980).S9:
S7..(S8. 60)......S7":".(S8.S7.60);.....
.......1,E0$,E1$,E2$,E3$:ER$.E0$.",".E1$
.",".E2$.",".E3$...L.ER.C(E0$):.ER.ER.E(
E0$)...V...&....D$."D".S1$."DESTINATION"
:.3230.7...S1$."SOURCE".N...."...INSERT
..";S1$;".. DISK,PRESS ..RETURN.. .";..
....A$:.A$..G(13)..204,0:.3240......204,
1:.2,8,0,"$0".D....3000:.ER.0. 2:.".";:.
3230.Z.F..J.1.26:.#2,A$:.J...P..#2,A$:.#
2,B$:IR$.A$.B$...Z..#2,A$:.#2,A$:.#2,B$:
DR$.A$.B$.J...."..
";.S... 2:..I.H..AN$:.AN
$."".3400.O.R...U..':....'.55,0:.56,160:
.:.16000.Q..:.76,66,3,76,91,3,162,3,32,1
98,255,160,0,132,3,32,207,255,145....:.3
,165,144,208,3,200,208,244,32,204,255,96
.H..:.162,3,32,201,255,160,0,132,3,120,1
65,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....>.".": 15:.15,
8,15:.15,"I0": 15:A.0.F..>."..... NEW"..
..>."..IFA=0THENA=1:LOAD"G(34)"QUICKLOAD
";....>. G(34)",8,1"....>."....SYS49152"
.'..>."....NEW".C..>."..LOAD"G(34)"H.A.L
.";.T..>. G(34)",8.".F..>.198,0:.198,8..
.F>.631,13:.632,13:.633,13:.634,13:.635,
13:.636,82...K>.637,117:.638,13...P>....
J
> CLICK IMAGE PREVIEW FOR FULL MODAL