4040 DUAL COPY
FILE INFORMATION
FILENAME(S): 4040 DUAL COPY
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 21:23:21
APPEARS ON: 1 disk(s)
FILE HASH
cc0c91135071f7bf257a63858b3ddf6949d5c9b8a45745ec58c5fbe75abee123
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 10 2 | 4040 DUAL COPY | PRG | DuncanTwain | 31 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 05 00 86 42 42 24 28 38 38 29 00 17 |.......BB$(88)..|
00000010: 08 0A 00 99 22 93 22 00 49 08 14 00 99 22 13 12 |....".".I...."..|
00000020: 20 44 55 41 4C 20 43 4F 50 59 20 20 20 20 20 20 | DUAL COPY |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 22 00 53 08 19 00 99 22 | ".S...."|
00000050: 91 22 3B 00 7B 08 1E 00 81 41 B2 31 A4 32 33 3A |.";.{....A.1.23:|
00000060: 99 22 12 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00000070: 1D 1D 1D 1D 1D 1D 20 22 3A 82 41 00 86 08 23 00 |...... ":.A...#.|
00000080: 99 22 13 11 22 3B 00 A0 08 28 00 81 41 B2 36 35 |."..";...(..A.65|
00000090: A4 38 37 3A 99 22 12 22 3B C7 28 41 29 3A 82 41 |.87:.".";.(A):.A|
000000A0: 00 BF 08 32 00 51 51 24 B2 22 1D 1D 1D 1D 1D 1D |...2.QQ$."......|
000000B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 |..............".|
000000C0: CA 08 3C 00 99 22 13 11 22 3B 00 E8 08 46 00 81 |..<.."..";...F..|
000000D0: 41 B2 33 37 A4 35 39 3A 99 51 51 24 3B 22 12 22 |A.37.59:.QQ$;"."|
000000E0: 3B C7 28 41 29 3A 82 41 00 FB 08 C8 00 9F 31 2C |;.(A):.A......1,|
000000F0: 38 2C 31 35 2C 22 49 22 3A A0 31 00 1D 09 D2 00 |8,15,"I":.1.....|
00000100: 4E 52 B2 36 34 3A 41 41 24 B2 22 22 3A 42 B2 33 |NR.64:AA$."":B.3|
00000110: 30 3A 9F 32 2C 38 2C 30 2C 22 24 30 22 00 35 09 |0:.2,8,0,"$0".5.|
00000120: DC 00 A1 23 32 2C 41 24 3A A1 23 32 2C 41 24 3A |...#2,A$:.#2,A$:|
00000130: 49 24 B2 22 22 00 44 09 E6 00 8B 53 54 B3 B1 30 |I$."".D....ST..0|
00000140: A7 34 30 30 00 56 09 F0 00 81 41 B2 31 A4 42 3A |.400.V....A.1.B:|
00000150: A1 23 32 2C 41 24 00 6B 09 FA 00 8B 41 24 B2 22 |.#2,A$.k....A$."|
00000160: 20 22 A7 41 24 B2 C7 28 33 32 29 00 85 09 04 01 | ".A$..(32).....|
00000170: 49 24 B2 49 24 AA 41 24 3A 82 3A 49 24 B2 49 24 |I$.I$.A$:.:I$.I$|
00000180: AA 22 20 20 22 00 A9 09 18 01 8B CA 28 C8 28 49 |." ".......(.(I|
00000190: 24 2C 35 29 2C 35 29 B2 C7 28 33 34 29 A7 49 24 |$,5),5)..(34).I$|
000001A0: B2 C9 28 49 24 2C 32 39 29 00 D2 09 1D 01 8B CA |..(I$,29).......|
000001B0: 28 C8 28 49 24 2C 33 29 2C 33 29 B2 C7 28 33 34 |(.(I$,3),3)..(34|
000001C0: 29 A7 49 24 B2 C9 28 49 24 2C 33 31 29 3A 89 33 |).I$..(I$,31):.3|
000001D0: 32 30 00 FC 09 1F 01 8B 4E 52 B2 36 34 A7 99 22 |20......NR.64.."|
000001E0: 13 22 3B 51 51 24 3B 22 12 20 20 22 3B CA 28 49 |.";QQ$;". ";.(I|
000001F0: 24 2C 35 2C 31 36 29 3A 89 32 39 33 00 25 0A 22 |$,5,16):.293.%."|
00000200: 01 8B 4E 52 B3 38 38 AF 4E 52 B1 36 34 A7 99 22 |..NR.88.NR.64.."|
00000210: 13 22 3B 41 41 24 3B 22 1D 22 3B CA 28 49 24 2C |.";AA$;".";.(I$,|
00000220: 35 2C 31 37 29 00 3E 0A 25 01 8B 4E 52 B2 38 38 |5,17).>.%..NR.88|
00000230: A7 41 41 24 B2 22 11 22 3A 4E 52 B2 33 37 00 66 |.AA$.".":NR.37.f|
00000240: 0A 27 01 8B 4E 52 B3 36 33 A7 3A 99 22 13 22 3B |.'..NR.63.:.".";|
00000250: 41 41 24 3B 51 51 24 3B 22 1D 22 3B CA 28 49 24 |AA$;QQ$;".";.(I$|
00000260: 2C 35 2C 31 37 29 00 7D 0A 2A 01 42 42 24 28 4E |,5,17).}.*.BB$(N|
00000270: 52 29 B2 CA 28 49 24 2C 35 2C 31 37 29 00 8D 0A |R)..(I$,5,17)...|
00000280: 2C 01 41 41 24 B2 41 41 24 AA 22 11 22 00 9E 0A |,.AA$.AA$."."...|
00000290: 36 01 4E 52 B2 4E 52 AA 31 3A 89 32 32 30 00 C7 |6.NR.NR.1:.220..|
000002A0: 0A 40 01 8B 4E 52 B3 38 38 AF 4E 52 B1 36 34 A7 |.@..NR.88.NR.64.|
000002B0: 99 22 13 22 3B 41 41 24 3B 22 1D 22 3B CA 28 49 |.".";AA$;".";.(I|
000002C0: 24 2C 34 2C 31 37 29 00 E0 0A 41 01 8B 4E 52 B2 |$,4,17)...A..NR.|
000002D0: 38 38 A7 41 41 24 B2 22 11 22 3A 4E 52 B2 33 37 |88.AA$.".":NR.37|
000002E0: 00 08 0B 42 01 8B 4E 52 B3 36 33 A7 3A 99 22 13 |...B..NR.63.:.".|
000002F0: 22 3B 41 41 24 3B 51 51 24 3B 22 1D 22 3B CA 28 |";AA$;QQ$;".";.(|
00000300: 49 24 2C 34 2C 31 37 29 00 24 0B 43 01 42 42 24 |I$,4,17).$.C.BB$|
00000310: 28 4E 52 29 B2 CA 28 49 24 2C 34 2C 31 37 29 3A |(NR)..(I$,4,17):|
00000320: 89 33 30 30 00 39 0B 90 01 A1 50 52 24 3A 8B 50 |.300.9....PR$:.P|
00000330: 52 24 B2 22 22 A7 34 30 30 00 46 0B 9A 01 4C B2 |R$."".400.F...L.|
00000340: C6 28 50 52 24 29 00 59 0B A4 01 8B 4C B1 38 37 |.(PR$).Y....L.87|
00000350: B0 4C B3 33 37 A7 34 30 30 00 66 0B AE 01 81 42 |.L.37.400.f....B|
00000360: 42 B2 31 A4 31 37 00 A4 0B AF 01 8B CA 28 C8 28 |B.1.17.......(.(|
00000370: 42 42 24 28 4C 29 2C 42 42 29 2C 42 42 29 B2 C7 |BB$(L),BB),BB)..|
00000380: 28 33 34 29 A7 42 42 24 28 4C 29 B2 CA 28 C8 28 |(34).BB$(L)..(.(|
00000390: 42 42 24 28 4C 29 2C 42 42 AB 31 29 2C 31 29 3A |BB$(L),BB.1),1):|
000003A0: 89 34 39 30 00 AC 0B B8 01 82 42 42 00 B6 0B EA |.490......BB....|
000003B0: 01 8D 31 30 31 30 00 BF 0B F4 01 89 34 30 30 00 |..1010......400.|
000003C0: E5 0B E8 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 |.....********* |
000003D0: 43 4F 50 59 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |COPY **********|
000003E0: 2A 2A 2A 2A 2A 00 06 0C F2 03 47 24 B2 22 43 31 |*****.....G$."C1|
000003F0: 3A 22 AA 42 42 24 28 4C 29 AA 22 3D 30 3A 22 AA |:".BB$(L)."=0:".|
00000400: 42 42 24 28 4C 29 00 12 0C FC 03 9F 39 2C 38 2C |BB$(L)......9,8,|
00000410: 31 35 00 1C 0C 06 04 98 39 2C 47 24 00 27 0C 10 |15......9,G$.'..|
00000420: 04 8D 31 30 30 30 30 00 2E 0C 1A 04 A0 39 00 34 |..10000......9.4|
00000430: 0C 4C 04 8E 00 41 0C 10 27 9F 31 35 2C 38 2C 31 |.L...A..'.15,8,1|
00000440: 35 00 55 0C 1A 27 84 31 35 2C 41 24 2C 42 24 2C |5.U..'.15,A$,B$,|
00000450: 43 24 2C 44 24 00 88 0C 24 27 99 22 13 1D 1D 1D |C$,D$...$'."....|
00000460: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 |..............."|
00000470: 3B 41 24 3B 22 20 22 3B 42 24 3B 22 20 22 3B 43 |;A$;" ";B$;" ";C|
00000480: 24 3B 22 20 22 3B 44 24 00 92 0C 2E 27 A0 31 35 |$;" ";D$....'.15|
00000490: 3A 8E 00 00 00 |:.... |
.......BB$(88)......".".I....".. DUAL CO
PY ".S...."
.";.{....A.1.23:.".................... "
:.A...#.."..";. .(..A.65.87:.".";G(A):.A
...2.QQ$."....................".J.<.."..
";...F..A.37.59:.QQ$;".";G(A):.A...H..1,
8,15,"I": 1...R.NR.64:AA$."":B.30:.2,8,0
,"$0".5....#2,A$:.#2,A$:I$."".D....ST..0
.400.V....A.1.B:.#2,A$.K....A$." ".A$.G(
32).....I$.I$.A$:.:I$.I$." "......J(H(I
$,5),5).G(34).I$.I(I$,29).R....J(H(I$,3)
,3).G(34).I$.I(I$,31):.320......NR.64.."
.";QQ$;". ";J(I$,5,16):.293.%."..NR.88.
NR.64..".";AA$;".";J(I$,5,17).>.%..NR.88
.AA$.".":NR.37.F.'..NR.63.:.".";AA$;QQ$;
".";J(I$,5,17).}.*.BB$(NR).J(I$,5,17)...
,.AA$.AA$."."...6.NR.NR.1:.220.G.@..NR.8
8.NR.64..".";AA$;".";J(I$,4,17)...A..NR.
88.AA$.".":NR.37...B..NR.63.:.".";AA$;QQ
$;".";J(I$,4,17).$.C.BB$(NR).J(I$,4,17):
.300.9....PR$:.PR$."".400.F...L.F(PR$).Y
....L.87.L.37.400.F....BB.1.17......J(H(
BB$(L),BB),BB).G(34).BB$(L).J(H(BB$(L),B
B.1),1):.490......BB......1010......400.
.....********* COPY ***************...
..G$."C1:".BB$(L)."=0:".BB$(L)......9,8,
15......9,G$.'....10000..... 9.4.L...A..
'.15,8,15.U..'.15,A$,B$,C$,D$...$'."....
...............";A$;" ";B$;" ";C$;" ";D$
....' 15:....
> CLICK IMAGE PREVIEW FOR FULL MODAL