> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 9E 32 30 36 31 00 00 00 A9 09 |.......2061.....|
00000010: 85 2C 85 2B 85 C6 A9 52 8D 77 02 A9 D5 8D 78 02 |.,.+...R.w....x.|
00000020: A9 0D 8D 79 02 60 A2 02 A4 FB 20 C6 FF 20 CF FF |...y.`.... .. ..|
00000030: 20 70 08 91 FB 20 7C 08 24 90 70 07 C8 D0 EE E6 | p... |.$.p.....|
00000040: FC D0 EA 84 FB 4C CC FF A2 02 A4 FB 20 C9 FF 20 |.....L...... .. |
00000050: 70 08 B1 FB 20 7C 08 20 D2 FF C8 D0 02 E6 FC A5 |p... |. ........|
00000060: FC C5 FE 90 EA F0 02 B0 DC C4 FD 90 E2 F0 E0 B0 |................|
00000070: D4 48 A5 01 85 02 29 FC 78 85 01 68 60 A6 02 86 |.H....).x..h`...|
00000080: 01 58 60 A9 08 85 BA 20 B4 FF A9 6F 85 B9 20 96 |.X`.... ...o.. .|
00000090: FF 20 A5 FF 20 D2 FF C9 0D D0 F6 4C AB FF A9 24 |. .. ......L...$|
000000A0: 85 FF A9 FF 85 BB A9 00 85 BC A9 01 85 B7 A9 08 |................|
000000B0: 85 BA A9 60 85 B9 20 D5 F3 A5 BA 20 B4 FF A5 B9 |...`.. .... ....|
000000C0: 20 96 FF A9 00 85 90 A0 03 84 FB 20 A5 FF 85 FC | .......... ....|
000000D0: A4 90 D0 2F 20 A5 FF A4 90 D0 28 A4 FB 88 D0 E9 |.../ .....(.....|
000000E0: A6 FC 20 CD BD A9 20 20 D2 FF 20 A5 FF A6 90 D0 |.. ... .. .....|
000000F0: 12 AA F0 06 20 D2 FF 4C E9 08 A9 0D 20 D2 FF A0 |.... ..L.... ...|
00000100: 02 D0 C6 20 42 F6 4C 82 08 00 41 09 02 00 97 35 |... B.L...A....5|
00000110: 36 2C 32 30 3A 9C 3A 86 4E 24 28 34 30 29 2C 42 |6,20:.:.N$(40),B|
00000120: 25 28 34 30 29 2C 55 25 28 34 30 29 2C 56 25 28 |%(40),U%(40),V%(|
00000130: 34 30 29 2C 57 25 28 34 30 29 2C 54 24 28 34 30 |40),W%(40),T$(40|
00000140: 29 00 81 09 03 00 97 35 33 32 38 30 2C 30 20 3A |)......53280,0 :|
00000150: 97 35 33 32 38 31 2C 30 20 3A 99 22 93 9A 20 20 |.53281,0 :.".. |
00000160: 20 20 43 4F 50 59 49 4E 47 20 53 59 53 54 45 4D | COPYING SYSTEM|
00000170: 20 46 4F 52 20 20 43 36 34 20 26 20 31 35 34 31 | FOR C64 & 1541|
00000180: 22 00 AC 09 04 00 99 22 20 20 20 20 2D 2D 2D 2D |"......" ----|
00000190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000001A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 11 22 00 F8 09 05 |----------."....|
000001B0: 00 99 22 20 20 20 20 20 12 28 43 29 92 20 20 20 |.." .(C). |
000001C0: 20 31 39 38 33 20 20 56 4F 4E 20 20 2A 4D 44 2E | 1983 VON *MD.|
000001D0: 53 4F 46 54 49 2A 11 22 3A 99 22 20 20 20 20 20 |SOFTI*.":." |
000001E0: 4D 4F 44 49 46 49 45 44 20 4D 41 52 43 48 20 31 |MODIFIED MARCH 1|
000001F0: 39 38 34 20 4A 4C 4C 22 00 29 0A 06 00 99 22 11 |984 JLL".)....".|
00000200: 11 20 20 20 20 20 31 2E 20 20 43 41 54 41 4C 4F |. 1. CATALO|
00000210: 47 22 3A 99 22 11 11 20 20 20 20 20 32 2E 20 20 |G":.".. 2. |
00000220: 43 4F 4D 4D 41 4E 44 20 22 00 68 0A 07 00 99 22 |COMMAND ".h...."|
00000230: 11 11 20 20 20 20 20 33 2E 20 20 45 52 52 4F 52 |.. 3. ERROR|
00000240: 20 22 3A 99 22 11 11 20 20 20 20 20 34 2E 20 20 | ":.".. 4. |
00000250: 43 4F 50 59 22 3A 99 22 11 11 20 20 20 20 20 35 |COPY":.".. 5|
00000260: 2E 20 20 51 55 49 54 22 00 90 0A 08 00 8D 33 37 |. QUIT"......37|
00000270: 3A 99 22 11 11 22 3A 41 B2 C5 28 41 24 29 3A 91 |:."..":A..(A$):.|
00000280: 41 8D 34 37 2C 34 39 2C 35 34 2C 31 31 2C 31 30 |A.47,49,54,11,10|
00000290: 00 97 0A 09 00 89 32 00 A2 0A 0A 00 9E 36 34 37 |......2......647|
000002A0: 33 38 00 AC 0A 0B 00 8D 33 35 3A 99 00 C3 0A 0C |38......35:.....|
000002B0: 00 8D 35 35 3A 9F 32 2C 38 2C 30 2C 22 24 22 3A |..55:.2,8,0,"$":|
000002C0: 8D 34 32 00 E0 0A 0D 00 8D 34 32 3A 8D 34 31 3A |.42......42:.41:|
000002D0: 99 42 3B 3A 8D 34 33 3A 8D 34 32 3A 99 22 11 22 |.B;:.43:.42:."."|
000002E0: 00 00 0B 0E 00 8D 34 31 3A 99 22 9A 22 42 3B 3A |......41:."."B;:|
000002F0: 43 24 B2 22 22 3A 8D 34 33 3A 99 A3 33 32 29 3B |C$."":.43:..32);|
00000300: 00 1D 0B 0F 00 8D 34 30 3A 54 B2 41 3A 8D 34 30 |......40:T.A:.40|
00000310: 3A 8B 41 AA 54 B2 30 A7 99 3A 89 32 32 00 45 0B |:.A.T.0..:.22.E.|
00000320: 10 00 8B 42 B1 32 33 36 A7 99 3A 99 22 20 12 1C |...B.236..:." ..|
00000330: 5E 92 9A 20 46 49 4C 45 20 5A 55 20 4C 41 4E 47 |^.. FILE ZU LANG|
00000340: 22 3A 89 31 34 00 7C 0B 11 00 99 22 1C 59 45 53 |":.14.|....".YES|
00000350: 2F 4E 4F 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 8D 33 37 |/NO.......";:.37|
00000360: 3A 8B 41 24 B3 B1 22 59 22 A7 99 22 1E 12 4E 4F |:.A$.."Y".."..NO|
00000370: 92 20 20 20 20 20 20 22 3A 89 31 34 00 BB 0B 12 |. ":.14....|
00000380: 00 54 B2 31 3A 42 25 28 52 29 B2 42 3A 8D 34 35 |.T.1:B%(R).B:.45|
00000390: 3A 42 B2 54 3A 8D 34 35 3A 4E 24 28 52 29 B2 CA |:B.T:.45:N$(R)..|
000003A0: 28 43 24 2C 42 2C 54 AB 42 AB 31 29 3A 99 22 12 |(C$,B,T.B.1):.".|
000003B0: 1E 59 45 53 92 20 20 20 20 20 22 00 FA 0B 13 00 |.YES. ".....|
000003C0: 54 B2 54 AA 31 3A 91 AB 28 CA 28 43 24 2C 54 2C |T.T.1:..(.(C$,T,|
000003D0: 31 29 B3 B1 22 50 22 AF CA 28 43 24 2C 54 2C 31 |1).."P"..(C$,T,1|
000003E0: 29 B3 B1 22 53 22 29 89 31 39 3A 54 24 28 52 29 |).."S").19:T$(R)|
000003F0: B2 CA 28 43 24 2C 54 2C 31 29 00 28 0C 14 00 52 |..(C$,T,1).(...R|
00000400: B2 52 AA 31 3A 8B 52 B2 34 31 A7 99 22 11 12 1C |.R.1:.R.41.."...|
00000410: 54 4F 4F 20 4D 41 4E 59 20 46 49 4C 45 53 92 9A |TOO MANY FILES..|
00000420: 20 21 11 22 3A 89 32 32 00 30 0C 15 00 89 31 34 | !.":.22.0....14|
00000430: 00 68 0C 16 00 A0 32 3A 8B 52 B2 30 A7 99 22 11 |.h....2:.R.0..".|
00000440: 11 20 20 20 20 20 20 20 12 20 41 4E 59 20 54 4F |. . ANY TO|
00000450: 20 43 4F 50 59 20 92 20 3F 22 3A 81 54 B2 30 A4 | COPY . ?":.T.0.|
00000460: 32 30 30 30 3A 82 3A 8E 00 89 0C 17 00 81 54 B2 |2000:.:.......T.|
00000470: 30 A4 52 AB 31 3A 55 25 28 54 29 B2 32 34 3A 41 |0.R.1:U%(T).24:A|
00000480: B2 30 3A 8B 54 A7 8D 33 35 00 A0 0C 18 00 99 22 |.0:.T..35......"|
00000490: 11 52 45 41 44 49 4E 47 20 22 4E 24 28 54 29 3B |.READING "N$(T);|
000004A0: 00 D8 0C 19 00 9F 32 2C 38 2C 32 2C 4E 24 28 54 |......2,8,2,N$(T|
000004B0: 29 AA 22 2C 22 AA 54 24 28 54 29 AA 22 2C 52 22 |).",".T$(T).",R"|
000004C0: 3A 97 32 35 31 2C 30 3A 97 32 35 32 2C 55 25 28 |:.251,0:.252,U%(|
000004D0: 54 29 3A 9E 32 30 38 35 00 FA 0C 1A 00 56 25 28 |T):.2085.....V%(|
000004E0: 54 29 B2 C2 28 32 35 32 29 3A 57 25 28 54 29 B2 |T)..(252):W%(T).|
000004F0: C2 28 32 35 31 29 3A 8D 34 38 00 37 0D 1B 00 8B |.(251):.48.7....|
00000500: 54 B3 52 AB 31 AF 56 25 28 54 29 AA 42 25 28 54 |T.R.1.V%(T).B%(T|
00000510: AA 31 29 B3 32 35 36 A7 54 B2 54 AA 31 3A 41 B2 |.1).256.T.T.1:A.|
00000520: 41 AA 31 3A 55 25 28 54 29 B2 56 25 28 54 AB 31 |A.1:U%(T).V%(T.1|
00000530: 29 AA 31 3A 89 32 34 00 4A 0D 1C 00 54 B2 54 AB |).1:.24.J...T.T.|
00000540: 41 3A 41 41 B2 41 3A 8D 33 36 00 61 0D 1D 00 99 |A:AA.A:.36.a....|
00000550: 22 11 57 52 49 54 49 4E 47 20 22 4E 24 28 54 29 |".WRITING "N$(T)|
00000560: 3B 00 9E 0D 1E 00 9F 32 2C 38 2C 32 2C 4E 24 28 |;......2,8,2,N$(|
00000570: 54 29 AA 22 2C 22 AA 54 24 28 54 29 AA 22 2C 57 |T).",".T$(T).",W|
00000580: 22 3A 97 32 35 31 2C 30 3A 97 32 35 32 2C 55 25 |":.251,0:.252,U%|
00000590: 28 54 29 3A 97 32 35 33 2C 57 25 28 54 29 00 CA |(T):.253,W%(T)..|
000005A0: 0D 1F 00 97 32 35 34 2C 56 25 28 54 29 3A 9E 32 |....254,V%(T):.2|
000005B0: 31 31 39 3A 8D 34 38 3A 8B 41 A7 41 B2 41 AB 31 |119:.48:.A.A.A.1|
000005C0: 3A 54 B2 54 AA 31 3A 89 32 39 00 02 0E 20 00 99 |:T.T.1:.29... ..|
000005D0: 22 11 11 20 20 20 20 20 20 20 12 43 4F 50 59 20 |".. .COPY |
000005E0: 54 4F 20 41 4E 4F 54 48 45 52 20 28 59 2F 4E 29 |TO ANOTHER (Y/N)|
000005F0: 92 22 3A 8D 33 37 3A 8B 41 24 B3 B1 22 59 22 A7 |.":.37:.A$.."Y".|
00000600: 33 34 00 0F 0E 21 00 41 B2 41 41 3A 89 32 38 00 |34...!.A.AA:.28.|
00000610: 1B 0E 22 00 82 3A A0 31 3A 89 32 00 48 0E 23 00 |.."..:.1:.2.H.#.|
00000620: 99 22 11 49 4E 53 45 52 54 20 12 1C 20 53 4F 55 |.".INSERT .. SOU|
00000630: 52 43 45 20 92 9A 20 44 49 53 4B 45 54 54 45 22 |RCE .. DISKETTE"|
00000640: 3A 8D 33 37 3A 89 35 35 00 7A 0E 24 00 99 22 11 |:.37:.55.z.$..".|
00000650: 49 4E 53 45 52 54 20 12 1C 20 44 45 53 54 49 4E |INSERT .. DESTIN|
00000660: 41 54 49 4F 4E 20 92 9A 20 44 49 53 4B 45 54 54 |ATION .. DISKETT|
00000670: 45 22 3A 8D 33 37 3A 89 35 35 00 85 0E 25 00 97 |E":.37:.55...%..|
00000680: 31 39 38 2C 30 00 97 0E 26 00 A1 41 24 3A 8B 41 |198,0...&..A$:.A|
00000690: 24 B2 22 22 A7 33 38 00 9D 0E 27 00 8E 00 C2 0E |$."".38...'.....|
000006A0: 28 00 A1 23 32 2C 41 24 3A 41 24 B2 C8 28 41 24 |(..#2,A$:A$..(A$|
000006B0: AA C7 28 30 29 2C 31 29 3A 41 B2 C6 28 41 24 29 |..(0),1):A..(A$)|
000006C0: 3A 8E 00 DE 0E 29 00 8D 34 30 3A 42 B2 41 3A 8D |:....)..40:B.A:.|
000006D0: 34 30 3A 42 B2 42 AA 32 35 36 AC 41 3A 8E 00 F2 |40:B.B.256.A:...|
000006E0: 0E 2A 00 A1 23 32 2C 41 24 3A A1 23 32 2C 41 24 |.*..#2,A$:.#2,A$|
000006F0: 3A 8E 00 0F 0F 2B 00 8D 34 30 3A 8B 41 A7 99 41 |:....+..40:.A..A|
00000700: 24 3B 3A 43 24 B2 43 24 AA 41 24 3A 89 34 33 00 |$;:C$.C$.A$:.43.|
00000710: 15 0F 2C 00 8E 00 35 0F 2D 00 8B CA 28 43 24 2C |..,...5.-...(C$,|
00000720: 54 2C 31 29 B3 B1 C7 28 33 34 29 A7 54 B2 54 AA |T,1)...(34).T.T.|
00000730: 31 3A 89 34 35 00 41 0F 2E 00 54 B2 54 AA 31 3A |1:.45.A...T.T.1:|
00000740: 8E 00 4F 0F 2F 00 9E 32 32 30 35 3A 89 33 37 00 |..O./..2205:.37.|
00000750: 65 0F 30 00 A0 32 3A 99 A3 32 37 29 3B 3A 9E 32 |e.0..2:..27);:.2|
00000760: 31 37 38 3A 8E 00 8F 0F 31 00 99 22 11 11 20 20 |178:....1..".. |
00000770: 20 20 20 50 4C 45 41 53 45 20 45 4E 54 45 52 20 | PLEASE ENTER |
00000780: 44 49 53 4B 20 43 4F 4D 4D 41 4E 44 22 3A 99 00 |DISK COMMAND":..|
00000790: AD 0F 32 00 A0 31 3A 9F 31 2C 38 2C 31 35 3A 97 |..2..1:.1,8,15:.|
000007A0: 36 33 31 2C 33 34 3A 97 31 39 38 2C 31 00 BE 0F |631,34:.198,1...|
000007B0: 33 00 85 22 20 20 20 20 20 20 22 3B 41 24 00 C8 |3.." ";A$..|
000007C0: 0F 34 00 98 31 2C 41 24 00 D9 0F 35 00 99 22 11 |.4..1,A$...5..".|
000007D0: 11 20 20 20 20 20 20 22 3B 00 E7 0F 36 00 9E 32 |. ";...6..2|
000007E0: 31 37 38 3A 89 33 37 00 FC 0F 37 00 A0 31 3A 9F |178:.37...7..1:.|
000007F0: 31 2C 38 2C 31 35 2C 22 49 22 3A 8E 00 D9 00 00 |1,8,15,"I":.....|
.......2061......,.+.F.R.W..U.X....Y.`..
.. F. O. P... |.$.P.HP...P...LL..... I.
P... |. R.HP.....E.......D......TH....).
X..H`....X`.... ...O.. .. .. R.I.P.L...$
...................`.. U... .... ......
... ......P/ ....P(...P... M.. R. ....P
.... R.L.... R. .PF B.L...A....56,20:.:.
N$(40),B%(40),U%(40),V%(40),W%(40),T$(40
)......53280,0 :.53281,0 :.".. COPYIN
G SYSTEM FOR C64 & 1541"......" ----
--------------------------."......"
.(C). 1983 VON *MD.SOFTI*.":."
MODIFIED MARCH 1984 JLL".)....".. 1.
CATALOG":.".. 2. COMMAND ".H...."
.. 3. ERROR ":.".. 4. COPY":."
.. 5. QUIT"......37:."..":A.E(A$):.
A.47,49,54,11,10......2......64738......
35:..C....55:.2,8,0,"$":.42......42:.41:
.B;:.43:.42:."."......41:."."B;:C$."":.4
3:..32);......40:T.A:.40:.A.T.0..:.22.E.
...B.236..:." ..^.. FILE ZU LANG":.14.|.
...".YES/NO.......";:.37:.A$.."Y".."..NO
. ":.14.....T.1:B%(R).B:.45:B.T:.45
:N$(R).J(C$,B,T.B.1):."..YES. ".....
T.T.1:..(J(C$,T,1).."P".J(C$,T,1).."S").
19:T$(R).J(C$,T,1).(...R.R.1:.R.41.."...
TOO MANY FILES.. !.":.22.0....14.H... 2:
.R.0..".. . ANY TO COPY . ?":.T.0.
2000:.:.......T.0.R.1:U%(T).24:A.0:.T..3
5. ....".READING "N$(T);.X....2,8,2,N$(T
).",".T$(T).",R":.251,0:.252,U%(T):.2085
.....V%(T).B(252):W%(T).B(251):.48.7....
T.R.1.V%(T).B%(T.1).256.T.T.1:A.A.1:U%(T
).V%(T.1).1:.24.J...T.T.A:AA.A:.36.A....
".WRITING "N$(T);......2,8,2,N$(T).",".T
$(T).",W":.251,0:.252,U%(T):.253,W%(T).J
....254,V%(T):.2119:.48:.A.A.A.1:T.T.1:.
29... ..".. .COPY TO ANOTHER (Y/N)
.":.37:.A$.."Y".34...!.A.AA:.28..."..: 1
:.2.H.#..".INSERT .. SOURCE .. DISKETTE"
:.37:.55.Z.$..".INSERT .. DESTINATION ..
DISKETTE":.37:.55...%..198,0...&..A$:.A
$."".38...'...B.(..#2,A$:A$.H(A$.G(0),1)
:A.F(A$):....)..40:B.A:.40:B.B.256.A:...
.*..#2,A$:.#2,A$:....+..40:.A..A$;:C$.C$
.A$:.43...,...5.-..J(C$,T,1)..G(34).T.T.
1:.45.A...T.T.1:..O./..2205:.37.E.0. 2:.
.27);:.2178:....1..".. PLEASE ENTER
DISK COMMAND":....2. 1:.1,8,15:.631,34:.
198,1...3.." ";A$.H.4..1,A$.Y.5..".
. ";...6..2178:.37...7. 1:.1,8,15,"
I":..Y..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL