D4040-JT-DUAL
FILE INFORMATION
FILENAME(S): D4040-JT-DUAL
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-11-30 21:23:12
APPEARS ON: 1 disk(s)
FILE HASH
f7e7e65840af696d0dc24568af3f496770f47dc670aa7043bf5b99268c89a43c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 11 1 | D4040-JT-DUAL | PRG | DuncanTwain | 6 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 0A 00 86 42 42 24 28 38 38 29 3A 58 |.......BB$(88):X|
00000010: 58 B2 33 33 00 22 08 14 00 8B 58 58 B2 31 31 A7 |X.33."....XX.11.|
00000020: 35 30 00 2E 08 1E 00 89 20 31 30 30 30 30 00 41 |50...... 10000.A|
00000030: 08 28 00 A1 20 5A 24 3A 8B 5A 24 B2 22 22 A7 34 |.(.. Z$:.Z$."".4|
00000040: 30 00 74 08 32 00 99 22 93 12 20 20 44 34 30 34 |0.t.2..".. D404|
00000050: 30 2D 44 55 41 4C 20 43 4F 50 59 20 20 20 20 20 |0-DUAL COPY |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 22 00 7E 08 3C 00 99 22 91 22 3B 00 A6 | ".~.<..".";..|
00000080: 08 46 00 81 41 B2 31 A4 32 33 3A 99 22 12 1D 1D |.F..A.1.23:."...|
00000090: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000000A0: 1D 20 22 3A 82 41 00 B1 08 50 00 99 22 13 11 22 |. ":.A...P..".."|
000000B0: 3B 00 CB 08 5A 00 81 41 B2 36 35 A4 38 37 3A 99 |;...Z..A.65.87:.|
000000C0: 22 12 22 3B C7 28 41 29 3A 82 41 00 EA 08 64 00 |".";.(A):.A...d.|
000000D0: 51 51 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |QQ$."...........|
000000E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 F5 08 6E 00 99 |........."...n..|
000000F0: 22 13 11 22 3B 00 13 09 78 00 81 41 B2 33 37 A4 |"..";...x..A.37.|
00000100: 35 39 3A 99 51 51 24 3B 22 12 22 3B C7 28 41 29 |59:.QQ$;".";.(A)|
00000110: 3A 82 41 00 37 09 82 00 49 24 B2 22 24 30 22 3A |:.A.7...I$."$0":|
00000120: 54 24 B2 22 43 4F 50 59 20 30 20 54 4F 20 31 20 |T$."COPY 0 TO 1 |
00000130: 20 20 20 20 20 20 22 00 63 09 8C 00 8B 58 58 B2 | ".c....XX.|
00000140: 35 35 A7 49 24 B2 22 24 31 22 3A 54 24 B2 22 43 |55.I$."$1":T$."C|
00000150: 41 54 41 4C 4F 47 20 44 31 20 20 20 20 20 20 20 |ATALOG D1 |
00000160: 20 20 22 00 76 09 96 00 9F 31 2C 38 2C 31 35 2C | ".v....1,8,15,|
00000170: 22 49 22 3A A0 31 00 97 09 A0 00 4E 52 B2 36 34 |"I":.1.....NR.64|
00000180: 3A 41 41 24 B2 22 22 3A 42 B2 33 30 3A 9F 32 2C |:AA$."":B.30:.2,|
00000190: 38 2C 30 2C AA 49 24 00 AF 09 AA 00 A1 23 32 2C |8,0,.I$......#2,|
000001A0: 41 24 3A A1 23 32 2C 41 24 3A 49 24 B2 22 22 00 |A$:.#2,A$:I$."".|
000001B0: BE 09 B4 00 8B 53 54 B3 B1 30 A7 33 36 30 00 D0 |.....ST..0.360..|
000001C0: 09 BE 00 81 41 B2 31 A4 42 3A A1 23 32 2C 41 24 |....A.1.B:.#2,A$|
000001D0: 00 E5 09 C8 00 8B 41 24 B2 22 20 22 A7 41 24 B2 |......A$." ".A$.|
000001E0: C7 28 33 32 29 00 FF 09 D2 00 49 24 B2 49 24 AA |.(32).....I$.I$.|
000001F0: 41 24 3A 82 3A 49 24 B2 49 24 AA 22 20 20 22 00 |A$:.:I$.I$." ".|
00000200: 23 0A DC 00 8B CA 28 C8 28 49 24 2C 35 29 2C 35 |#.....(.(I$,5),5|
00000210: 29 B2 C7 28 33 34 29 A7 49 24 B2 C9 28 49 24 2C |)..(34).I$..(I$,|
00000220: 32 39 29 00 4C 0A E6 00 8B CA 28 C8 28 49 24 2C |29).L.....(.(I$,|
00000230: 33 29 2C 33 29 B2 C7 28 33 34 29 A7 49 24 B2 C9 |3),3)..(34).I$..|
00000240: 28 49 24 2C 33 31 29 3A 89 33 32 30 00 76 0A F0 |(I$,31):.320.v..|
00000250: 00 8B 4E 52 B2 36 34 A7 99 22 13 22 3B 51 51 24 |..NR.64..".";QQ$|
00000260: 3B 22 12 20 20 22 3B CA 28 49 24 2C 35 2C 31 36 |;". ";.(I$,5,16|
00000270: 29 3A 89 32 37 30 00 85 0A FA 00 8B 53 54 B3 B1 |):.270......ST..|
00000280: 30 A7 33 36 30 00 AF 0A 04 01 8B 4E 52 B3 38 38 |0.360......NR.88|
00000290: AF 4E 52 B1 36 34 A7 99 22 13 22 3B 41 41 24 3B |.NR.64..".";AA$;|
000002A0: 22 1D 1D 22 3B CA 28 49 24 2C 35 2C 31 37 29 00 |"..";.(I$,5,17).|
000002B0: C8 0A 0E 01 8B 4E 52 B2 38 38 A7 41 41 24 B2 22 |.....NR.88.AA$."|
000002C0: 11 22 3A 4E 52 B2 33 37 00 F1 0A 18 01 8B 4E 52 |.":NR.37......NR|
000002D0: B3 36 33 A7 3A 99 22 13 22 3B 41 41 24 3B 51 51 |.63.:.".";AA$;QQ|
000002E0: 24 3B 22 1D 1D 22 3B CA 28 49 24 2C 35 2C 31 37 |$;"..";.(I$,5,17|
000002F0: 29 00 08 0B 22 01 42 42 24 28 4E 52 29 B2 CA 28 |)...".BB$(NR)..(|
00000300: 49 24 2C 35 2C 31 37 29 00 18 0B 2C 01 41 41 24 |I$,5,17)...,.AA$|
00000310: B2 41 41 24 AA 22 11 22 00 29 0B 36 01 4E 52 B2 |.AA$.".".).6.NR.|
00000320: 4E 52 AA 31 3A 89 31 37 30 00 52 0B 40 01 8B 4E |NR.1:.170.R.@..N|
00000330: 52 B3 38 38 AF 4E 52 B1 36 34 A7 99 22 13 22 3B |R.88.NR.64..".";|
00000340: 41 41 24 3B 22 1D 22 3B CA 28 49 24 2C 34 2C 31 |AA$;".";.(I$,4,1|
00000350: 37 29 00 6B 0B 4A 01 8B 4E 52 B2 38 38 A7 41 41 |7).k.J..NR.88.AA|
00000360: 24 B2 22 11 22 3A 4E 52 B2 33 37 00 93 0B 54 01 |$.".":NR.37...T.|
00000370: 8B 4E 52 B3 36 33 A7 3A 99 22 13 22 3B 41 41 24 |.NR.63.:.".";AA$|
00000380: 3B 51 51 24 3B 22 1D 22 3B CA 28 49 24 2C 34 2C |;QQ$;".";.(I$,4,|
00000390: 31 37 29 00 AF 0B 5E 01 42 42 24 28 4E 52 29 B2 |17)...^.BB$(NR).|
000003A0: CA 28 49 24 2C 34 2C 31 37 29 3A 89 33 30 30 00 |.(I$,4,17):.300.|
000003B0: BE 0B 68 01 8B 58 58 B2 39 39 A7 36 36 30 00 E0 |..h..XX.99.660..|
000003C0: 0B 72 01 99 22 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.r.."...........|
000003D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 3B 54 24 |............";T$|
000003E0: 00 F5 0B 7C 01 A1 50 52 24 3A 8B 50 52 24 B2 22 |...|..PR$:.PR$."|
000003F0: 22 A7 33 38 30 00 0D 0C 81 01 8B 50 52 24 B2 C7 |".380......PR$..|
00000400: 28 31 34 30 29 A7 89 20 31 30 30 30 30 00 22 0C |(140).. 10000.".|
00000410: 86 01 8B 50 52 24 B2 C7 28 31 33 33 29 A7 89 36 |...PR$..(133)..6|
00000420: 34 30 00 38 0C 8B 01 8B 50 52 24 B2 C7 28 31 33 |40.8....PR$..(13|
00000430: 37 29 A7 89 31 30 30 30 00 57 0C 90 01 8B 50 52 |7)..1000.W....PR|
00000440: 24 B2 C7 28 31 33 36 29 A7 99 22 93 22 3A A0 32 |$..(136)..".":.2|
00000450: 3A 99 22 93 22 3A 80 00 6D 0C 95 01 8B 50 52 24 |:.".":..m....PR$|
00000460: B2 C7 28 31 33 38 29 A7 89 32 30 30 30 00 8A 0C |..(138)..2000...|
00000470: 9A 01 8B 50 52 24 B2 C7 28 31 33 35 29 A7 58 58 |...PR$..(135).XX|
00000480: B2 35 35 3A A0 32 3A 89 35 30 00 A0 0C 9F 01 8B |.55:.2:.50......|
00000490: 50 52 24 B2 C7 28 31 33 39 29 A7 89 33 30 30 30 |PR$..(139)..3000|
000004A0: 00 BD 0C A4 01 8B 50 52 24 B2 C7 28 31 33 34 29 |......PR$..(134)|
000004B0: A7 58 58 B2 31 31 3A A0 32 3A 89 35 30 00 CA 0C |.XX.11:.2:.50...|
000004C0: AE 01 4C B2 C6 28 50 52 24 29 00 DD 0C B8 01 8B |..L..(PR$)......|
000004D0: 4C B1 38 37 B0 4C B3 33 37 A7 33 37 30 00 EA 0C |L.87.L.37.370...|
000004E0: C2 01 81 42 42 B2 31 A4 31 37 00 28 0D CC 01 8B |...BB.1.17.(....|
000004F0: CA 28 C8 28 42 42 24 28 4C 29 2C 42 42 29 2C 42 |.(.(BB$(L),BB),B|
00000500: 42 29 B2 C7 28 33 34 29 A7 42 42 24 28 4C 29 B2 |B)..(34).BB$(L).|
00000510: CA 28 C8 28 42 42 24 28 4C 29 2C 42 42 AB 31 29 |.(.(BB$(L),BB.1)|
00000520: 2C 31 29 3A 89 34 38 30 00 30 0D D6 01 82 42 42 |,1):.480.0....BB|
00000530: 00 39 0D E0 01 8D 35 31 30 00 42 0D EA 01 89 33 |.9....510.B....3|
00000540: 37 30 00 68 0D F4 01 8F 2A 2A 2A 2A 2A 2A 2A 2A |70.h....********|
00000550: 2A 20 20 43 4F 50 59 20 20 2A 2A 2A 2A 2A 2A 2A |* COPY *******|
00000560: 2A 2A 2A 2A 2A 2A 2A 2A 00 9D 0D FE 01 99 22 13 |********......".|
00000570: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000580: 1D 1D 1D 1D 1D 12 22 3B 22 20 20 20 20 20 20 20 |......";" |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 C8 0D | "...|
000005A0: 08 02 99 22 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
000005B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 3B 22 43 3D |...........";"C=|
000005C0: 22 3B 42 42 24 28 4C 29 00 E9 0D 12 02 47 24 B2 |";BB$(L).....G$.|
000005D0: 22 43 31 3A 22 AA 42 42 24 28 4C 29 AA 22 3D 30 |"C1:".BB$(L)."=0|
000005E0: 3A 22 AA 42 42 24 28 4C 29 00 F5 0D 1C 02 9F 39 |:".BB$(L)......9|
000005F0: 2C 38 2C 31 35 00 FF 0D 26 02 98 39 2C 47 24 00 |,8,15...&..9,G$.|
00000600: 08 0E 30 02 8D 35 39 30 00 0F 0E 3A 02 A0 39 00 |..0..590...:..9.|
00000610: 15 0E 44 02 8E 00 22 0E 4E 02 9F 31 35 2C 38 2C |..D...".N..15,8,|
00000620: 31 35 00 33 0E 58 02 84 31 35 2C 41 24 2C 42 24 |15.3.X..15,A$,B$|
00000630: 2C 43 24 00 68 0E 62 02 99 22 13 1D 1D 1D 1D 1D |,C$.h.b.."......|
00000640: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000650: 12 22 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 |.";" |
00000660: 20 20 20 20 20 20 20 22 00 90 0E 6C 02 99 22 13 | "...l..".|
00000670: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000680: 1D 1D 1D 1D 1D 12 22 3B 41 24 3B 42 24 3B 43 24 |......";A$;B$;C$|
00000690: 00 A6 0E 76 02 A0 31 35 3A 81 54 B2 31 A4 32 30 |...v..15:.T.1.20|
000006A0: 30 30 3A 82 3A 8E 00 B6 0E 80 02 8B 58 58 B2 33 |00:.:.......XX.3|
000006B0: 33 A7 89 36 36 30 00 C7 0E 8A 02 58 58 B2 39 39 |3..660.....XX.99|
000006C0: 3A A0 32 3A 89 35 30 00 FC 0E 94 02 99 22 13 1D |:.2:.50......"..|
000006D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000006E0: 1D 1D 1D 1D 12 22 3B 22 44 45 4C 45 54 45 20 46 |.....";"DELETE F|
000006F0: 49 4C 45 20 30 20 20 20 20 20 20 22 00 11 0F 9E |ILE 0 "....|
00000700: 02 A1 50 52 24 3A 8B 50 52 24 B2 22 22 A7 36 37 |..PR$:.PR$."".67|
00000710: 30 00 29 0F A3 02 8B 50 52 24 B2 C7 28 31 34 30 |0.)....PR$..(140|
00000720: 29 A7 89 20 31 30 30 30 30 00 48 0F A8 02 8B 50 |).. 10000.H....P|
00000730: 52 24 B2 C7 28 31 33 36 29 A7 99 22 93 22 3A A0 |R$..(136)..".":.|
00000740: 32 3A 99 22 93 22 3A 80 00 5E 0F AD 02 8B 50 52 |2:.".":..^....PR|
00000750: 24 B2 C7 28 31 33 37 29 A7 89 31 30 30 30 00 7B |$..(137)..1000.{|
00000760: 0F B2 02 8B 50 52 24 B2 C7 28 31 33 34 29 A7 58 |....PR$..(134).X|
00000770: 58 B2 31 31 3A A0 32 3A 89 35 30 00 91 0F B7 02 |X.11:.2:.50.....|
00000780: 8B 50 52 24 B2 C7 28 31 33 38 29 A7 89 32 30 30 |.PR$..(138)..200|
00000790: 30 00 AE 0F BC 02 8B 50 52 24 B2 C7 28 31 33 35 |0......PR$..(135|
000007A0: 29 A7 58 58 B2 35 35 3A A0 32 3A 89 35 30 00 C4 |).XX.55:.2:.50..|
000007B0: 0F C1 02 8B 50 52 24 B2 C7 28 31 33 39 29 A7 89 |....PR$..(139)..|
000007C0: 33 30 30 30 00 D1 0F C6 02 4C B2 C6 28 50 52 24 |3000.....L..(PR$|
000007D0: 29 00 E4 0F D0 02 8B 4C B1 38 37 B0 4C B3 33 37 |)......L.87.L.37|
000007E0: A7 36 37 30 00 F1 0F DA 02 81 42 42 B2 31 A4 31 |.670......BB.1.1|
000007F0: 37 00 2F 10 E4 02 8B CA 28 C8 28 42 42 24 28 4C |7./.....(.(BB$(L|
00000800: 29 2C 42 42 29 2C 42 42 29 B2 C7 28 33 34 29 A7 |),BB),BB)..(34).|
00000810: 42 42 24 28 4C 29 B2 CA 28 C8 28 42 42 24 28 4C |BB$(L)..(.(BB$(L|
00000820: 29 2C 42 42 AB 31 29 2C 31 29 3A 89 37 36 30 00 |),BB.1),1):.760.|
00000830: 37 10 EE 02 82 42 42 00 40 10 F8 02 8D 37 38 30 |7....BB.@....780|
00000840: 00 49 10 02 03 89 36 36 30 00 83 10 0C 03 99 22 |.I....660......"|
00000850: 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000860: 1D 1D 1D 1D 1D 1D 12 22 3B 22 44 45 4C 20 30 20 |.......";"DEL 0 |
00000870: 3D 20 22 3B 50 52 24 3B 22 20 20 53 55 52 45 20 |= ";PR$;" SURE |
00000880: 3F 22 3B 00 A0 10 16 03 A1 58 24 3A 8B 58 24 B3 |?";......X$:.X$.|
00000890: B1 22 59 22 AF 58 24 B3 B1 22 4E 22 A7 37 39 30 |."Y".X$.."N".790|
000008A0: 00 B0 10 20 03 8B 58 24 B2 22 59 22 A7 38 32 30 |... ..X$."Y".820|
000008B0: 00 B9 10 2A 03 89 36 36 30 00 EE 10 34 03 99 22 |...*..660...4.."|
000008C0: 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000008D0: 1D 1D 1D 1D 1D 1D 12 22 3B 22 20 20 20 20 20 20 |.......";" |
000008E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 19 | "..|
000008F0: 11 3E 03 99 22 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.>.."...........|
00000900: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 3B 22 44 |............";"D|
00000910: 3D 22 3B 42 42 24 28 4C 29 00 2D 11 48 03 4B 24 |=";BB$(L).-.H.K$|
00000920: B2 22 53 30 3A 22 AA 42 42 24 28 4C 29 00 39 11 |."S0:".BB$(L).9.|
00000930: 52 03 9F 36 2C 38 2C 31 35 00 43 11 5C 03 98 36 |R..6,8,15.C.\..6|
00000940: 2C 4B 24 00 4C 11 66 03 8D 35 39 30 00 53 11 70 |,K$.L.f..590.S.p|
00000950: 03 A0 36 00 59 11 7A 03 8E 00 8B 11 E8 03 99 22 |..6.Y.z........"|
00000960: 93 12 20 20 44 34 30 34 30 2D 44 55 41 4C 20 43 |.. D4040-DUAL C|
00000970: 4F 50 59 20 20 20 20 20 20 4E 45 57 2D 44 49 53 |OPY NEW-DIS|
00000980: 43 20 44 31 20 20 20 20 20 20 22 00 A7 11 F2 03 |C D1 ".....|
00000990: 85 22 11 11 11 11 20 20 20 44 49 53 43 20 4E 41 |.".... DISC NA|
000009A0: 41 4D 22 3B 44 49 24 00 C1 11 FC 03 85 22 11 11 |AM";DI$......"..|
000009B0: 20 20 20 49 44 20 4E 55 4D 4D 45 52 22 3B 49 44 | ID NUMMER";ID|
000009C0: 24 00 F0 11 01 04 99 22 11 11 20 20 20 56 45 52 |$......".. VER|
000009D0: 57 49 53 53 45 4C 20 44 49 53 4B 45 54 54 45 20 |WISSEL DISKETTE |
000009E0: 44 31 20 2D 20 44 52 55 4B 20 54 4F 45 54 53 22 |D1 - DRUK TOETS"|
000009F0: 00 08 12 02 04 A1 54 54 54 24 3A 8B 54 54 54 24 |......TTT$:.TTT$|
00000A00: B2 22 22 A7 31 30 32 36 00 22 12 06 04 4E 57 24 |."".1026."...NW$|
00000A10: B2 22 4E 31 3A 22 AA 44 49 24 AA 22 2C 22 AA 49 |."N1:".DI$.",".I|
00000A20: 44 24 00 2E 12 10 04 9F 39 2C 38 2C 31 35 00 39 |D$......9,8,15.9|
00000A30: 12 1A 04 98 39 2C 4E 57 24 00 42 12 24 04 8D 35 |....9,NW$.B.$..5|
00000A40: 39 30 00 4C 12 2E 04 A0 39 3A A0 32 00 8D 12 33 |90.L....9:.2...3|
00000A50: 04 99 22 11 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000A60: 11 11 11 11 11 20 20 20 12 56 45 52 57 49 53 53 |..... .VERWISS|
00000A70: 45 4C 20 44 49 53 4B 45 54 54 45 53 20 3F 20 2D |EL DISKETTES ? -|
00000A80: 20 44 52 55 4B 20 54 4F 45 54 53 92 22 00 A5 12 | DRUK TOETS."...|
00000A90: 34 04 A1 54 54 54 24 3A 8B 54 54 54 24 B2 22 22 |4..TTT$:.TTT$.""|
00000AA0: A7 31 30 37 36 00 AE 12 38 04 89 20 35 30 00 E0 |.1076...8.. 50..|
00000AB0: 12 D0 07 99 22 93 12 20 20 44 34 30 34 30 2D 44 |....".. D4040-D|
00000AC0: 55 41 4C 20 43 4F 50 59 20 20 20 20 20 43 4F 50 |UAL COPY COP|
00000AD0: 59 20 41 4C 4C 20 44 30 20 54 4F 20 44 31 20 22 |Y ALL D0 TO D1 "|
00000AE0: 00 0F 13 DA 07 99 22 11 11 20 20 20 56 45 52 57 |......".. VERW|
00000AF0: 49 53 53 45 4C 20 44 49 53 4B 45 54 54 45 53 20 |ISSEL DISKETTES |
00000B00: 20 2D 20 20 44 52 55 4B 20 54 4F 45 54 53 22 00 | - DRUK TOETS".|
00000B10: 27 13 E4 07 A1 54 54 54 24 3A 8B 54 54 54 24 B2 |'....TTT$:.TTT$.|
00000B20: 22 22 A7 32 30 32 30 00 3A 13 EE 07 9F 39 2C 38 |"".2020.:....9,8|
00000B30: 2C 31 35 2C 22 43 31 3D 30 22 00 43 13 F8 07 8D |,15,"C1=0".C....|
00000B40: 35 39 30 00 4D 13 02 08 A0 39 3A A0 32 00 8E 13 |590.M....9:.2...|
00000B50: 07 08 99 22 11 11 11 11 11 11 11 11 11 11 11 11 |..."............|
00000B60: 11 11 11 11 11 11 20 20 20 12 56 45 52 57 49 53 |...... .VERWIS|
00000B70: 53 45 4C 20 44 49 53 4B 45 54 54 45 53 20 3F 20 |SEL DISKETTES ? |
00000B80: 2D 20 44 52 55 4B 20 54 4F 45 54 53 92 22 00 A6 |- DRUK TOETS."..|
00000B90: 13 08 08 A1 54 54 54 24 3A 8B 54 54 54 24 B2 22 |....TTT$:.TTT$."|
00000BA0: 22 A7 32 30 35 36 00 AE 13 0C 08 89 35 30 00 E0 |".2056......50..|
00000BB0: 13 B8 0B 99 22 93 12 20 20 44 34 30 34 30 2D 44 |....".. D4040-D|
00000BC0: 55 41 4C 20 43 4F 50 59 20 20 20 20 20 42 41 43 |UAL COPY BAC|
00000BD0: 4B 55 50 20 20 44 30 20 54 4F 20 44 31 20 20 22 |KUP D0 TO D1 "|
00000BE0: 00 0F 14 C2 0B 99 22 11 11 20 20 20 56 45 52 57 |......".. VERW|
00000BF0: 49 53 53 45 4C 20 44 49 53 4B 45 54 54 45 53 20 |ISSEL DISKETTES |
00000C00: 20 2D 20 20 44 52 55 4B 20 54 4F 45 54 53 22 00 | - DRUK TOETS".|
00000C10: 27 14 CC 0B A1 54 54 54 24 3A 8B 54 54 54 24 B2 |'....TTT$:.TTT$.|
00000C20: 22 22 A7 33 30 32 30 00 3A 14 D6 0B 9F 39 2C 38 |"".3020.:....9,8|
00000C30: 2C 31 35 2C 22 44 31 3D 30 22 00 43 14 E0 0B 8D |,15,"D1=0".C....|
00000C40: 35 39 30 00 4D 14 EA 0B A0 39 3A A0 32 00 8E 14 |590.M....9:.2...|
00000C50: EF 0B 99 22 11 11 11 11 11 11 11 11 11 11 11 11 |..."............|
00000C60: 11 11 11 11 11 11 20 20 20 12 56 45 52 57 49 53 |...... .VERWIS|
00000C70: 53 45 4C 20 44 49 53 4B 45 54 54 45 53 20 3F 20 |SEL DISKETTES ? |
00000C80: 2D 20 44 52 55 4B 20 54 4F 45 54 53 92 22 00 A6 |- DRUK TOETS."..|
00000C90: 14 F0 0B A1 54 54 54 24 3A 8B 54 54 54 24 B2 22 |....TTT$:.TTT$."|
00000CA0: 22 A7 32 30 35 36 00 AE 14 F4 0B 89 35 30 00 D6 |".2056......50..|
00000CB0: 14 10 27 99 22 93 20 20 20 20 20 20 20 20 20 20 |..'.". |
00000CC0: 20 12 4D 45 4E 55 20 44 34 30 34 30 2D 4A 54 20 | .MENU D4040-JT |
00000CD0: 44 55 41 4C 92 22 00 FF 14 1A 27 99 22 20 20 20 |DUAL."....'." |
00000CE0: 20 20 20 20 20 20 11 11 46 31 20 3D 20 44 45 4C | ..F1 = DEL|
00000CF0: 45 54 45 20 46 49 4C 45 20 4F 50 20 44 30 22 00 |ETE FILE OP D0".|
00000D00: 24 15 24 27 99 22 20 20 20 20 20 20 20 20 20 11 |$.$'." .|
00000D10: 46 32 20 3D 20 4E 45 57 20 44 49 53 43 20 4F 50 |F2 = NEW DISC OP|
00000D20: 20 44 31 22 00 4C 15 2E 27 99 22 20 20 20 20 20 | D1".L..'." |
00000D30: 20 20 20 20 11 46 33 20 3D 20 4E 49 45 55 57 45 | .F3 = NIEUWE|
00000D40: 20 43 41 54 41 4C 4F 47 20 44 30 22 00 74 15 38 | CATALOG D0".t.8|
00000D50: 27 99 22 20 20 20 20 20 20 20 20 20 11 46 34 20 |'." .F4 |
00000D60: 3D 20 43 4F 50 59 20 41 4C 4C 20 44 30 20 54 4F |= COPY ALL D0 TO|
00000D70: 20 44 31 22 00 95 15 42 27 99 22 20 20 20 20 20 | D1"...B'." |
00000D80: 20 20 20 20 11 46 35 20 3D 20 43 41 54 41 4C 4F | .F5 = CATALO|
00000D90: 47 20 44 31 22 00 BB 15 4C 27 99 22 20 20 20 20 |G D1"...L'." |
00000DA0: 20 20 20 20 20 11 46 36 20 3D 20 42 41 43 4B 55 | .F6 = BACKU|
00000DB0: 50 20 44 30 20 54 30 20 44 31 22 00 D6 15 56 27 |P D0 T0 D1"...V'|
00000DC0: 99 22 20 20 20 20 20 20 20 20 20 11 46 37 20 3D |." .F7 =|
00000DD0: 20 45 49 4E 44 22 00 F1 15 60 27 99 22 20 20 20 | EIND"...`'." |
00000DE0: 20 20 20 20 20 20 11 46 38 20 3D 20 4D 45 4E 55 | .F8 = MENU|
00000DF0: 22 00 23 16 65 27 99 22 11 11 11 1D 44 49 53 4B |".#.e'."....DISK|
00000E00: 45 54 54 45 20 57 49 53 53 45 4C 45 4E 20 3F 20 |ETTE WISSELEN ? |
00000E10: 20 20 4B 4C 41 41 52 20 44 52 55 4B 20 54 4F 45 | KLAAR DRUK TOE|
00000E20: 54 53 22 00 2E 16 6A 27 A0 32 3A 89 34 30 00 00 |TS"...j'.2:.40..|
00000E30: 00 |. |
.......BB$(88):XX.33."....XX.11.50......
10000.A.(.. Z$:.Z$."".40.T.2..".. D404
0-DUAL COPY ".~.<
..".";...F..A.1.23:."...................
. ":.A...P.."..";.K.Z..A.65.87:.".";G(A)
:.A...D.QQ$."...................."...N..
"..";...X..A.37.59:.QQ$;".";G(A):.A.7...
I$."$0":T$."COPY 0 TO 1 ".C....XX.
55.I$."$1":T$."CATALOG D1 ".V...
.1,8,15,"I": 1... .NR.64:AA$."":B.30:.2,
8,0,.I$......#2,A$:.#2,A$:I$.""......ST.
.0.360.P....A.1.B:.#2,A$...H..A$." ".A$.
G(32)...R.I$.I$.A$:.:I$.I$." ".#....J(H
(I$,5),5).G(34).I$.I(I$,29).L....J(H(I$,
3),3).G(34).I$.I(I$,31):.320.V....NR.64.
.".";QQ$;". ";J(I$,5,16):.270......ST..
0.360......NR.88.NR.64..".";AA$;"..";J(I
$,5,17).H....NR.88.AA$.".":NR.37......NR
.63.:.".";AA$;QQ$;"..";J(I$,5,17)...".BB
$(NR).J(I$,5,17)...,.AA$.AA$.".".).6.NR.
NR.1:.170.R.@..NR.88.NR.64..".";AA$;".";
J(I$,4,17).K.J..NR.88.AA$.".":NR.37...T.
.NR.63.:.".";AA$;QQ$;".";J(I$,4,17)...^.
BB$(NR).J(I$,4,17):.300...H..XX.99.660..
.R..".......................";T$...|..PR
$:.PR$."".380......PR$.G(140).. 10000.".
...PR$.G(133)..640.8....PR$.G(137)..1000
.W....PR$.G(136)..".": 2:.".":..M....PR$
.G(138)..2000......PR$.G(135).XX.55: 2:.
50. ....PR$.G(139)..3000......PR$.G(134)
.XX.11: 2:.50.J...L.F(PR$)......L.87.L.3
7.370...B..BB.1.17.(.L..J(H(BB$(L),BB),B
B).G(34).BB$(L).J(H(BB$(L),BB.1),1):.480
.0.V..BB.9....510.B....370.H....********
* COPY ***************......".........
..............";" ".H.
...".......................";"C=";BB$(L)
.....G$."C1:".BB$(L)."=0:".BB$(L)......9
,8,15...&..9,G$...0..590...:. 9...D...".
N..15,8,15.3.X..15,A$,B$,C$.H.B.."......
.................";" "
...L..".......................";A$;B$;C$
...V. 15:.T.1.2000:.:.......XX.33..660.G
...XX.99: 2:.50......"..................
.....";"DELETE FILE 0 "......PR$:.P
R$."".670.)....PR$.G(140).. 10000.H....P
R$.G(136)..".": 2:.".":..^....PR$.G(137)
..1000.{....PR$.G(134).XX.11: 2:.50.....
.PR$.G(138)..2000......PR$.G(135).XX.55:
2:.50.D.A..PR$.G(139)..3000.Q.F.L.F(PR$
)...P..L.87.L.37.670...Z..BB.1.17./....J
(H(BB$(L),BB),BB).G(34).BB$(L).J(H(BB$(L
),BB.1),1):.760.7....BB.@....780.I....66
0......".......................";"DEL 0
= ";PR$;" SURE ?";. ....X$:.X$.."Y".X$.
."N".790... ..X$."Y".820...*..660...4.."
.......................";"
"...>..".......................";"D
=";BB$(L).-.H.K$."S0:".BB$(L).9.R..6,8,1
5.C.\..6,K$.L.F..590.S.P. 6.Y.Z........"
.. D4040-DUAL COPY NEW-DISC D1
"......".... DISC NAAM";DI$.A...."..
ID NUMMER";ID$......".. VERWISSEL D
ISKETTE D1 - DRUK TOETS"......TTT$:.TTT$
."".1026."...NW$."N1:".DI$.",".ID$......
9,8,15.9....9,NW$.B.$..590.L... 9: 2...3
..".................. .VERWISSEL DISKE
TTES ? - DRUK TOETS."...4..TTT$:.TTT$.""
.1076...8.. 50...P..".. D4040-DUAL COPY
COPY ALL D0 TO D1 "...Z..".. VERW
ISSEL DISKETTES - DRUK TOETS".'....TTT
$:.TTT$."".2020.:....9,8,15,"C1=0".C....
590.M... 9: 2......"..................
.VERWISSEL DISKETTES ? - DRUK TOETS."..
....TTT$:.TTT$."".2056......50......"..
D4040-DUAL COPY BACKUP D0 TO D1 "
...B..".. VERWISSEL DISKETTES - DRUK
TOETS".'.L..TTT$:.TTT$."".3020.:.V..9,8
,15,"D1=0".C....590.M... 9: 2......"....
.............. .VERWISSEL DISKETTES ?
- DRUK TOETS."......TTT$:.TTT$."".2056..
....50.V..'.". .MENU D4040-JT
DUAL."....'." ..F1 = DELETE FILE
OP D0".$.$'." .F2 = NEW DISC OP
D1".L..'." .F3 = NIEUWE CATALOG
D0".T.8'." .F4 = COPY ALL D0 TO
D1"...B'." .F5 = CATALOG D1"...
L'." .F6 = BACKUP D0 T0 D1".V.V'
." .F7 = EIND"...`'." .F
8 = MENU".#.E'."....DISKETTE WISSELEN ?
KLAAR DRUK TOETS"...J' 2:.40...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL