EDIT DISK ID
FILE INFORMATION
FILENAME(S): EDIT DISK ID
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 21:23:31
APPEARS ON: 1 disk(s)
FILE HASH
bf93c411c09ee1e3b8f0da6cfa812f0d6a549d68774cbf6777b46062587b85f7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 43 1 | EDIT DISK ID | PRG | DuncanTwain | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 64 00 8F 20 45 44 49 54 20 44 49 53 |....d.. EDIT DIS|
00000010: 4B 20 49 44 00 30 08 6E 00 99 22 93 45 44 49 54 |K ID.0.n..".EDIT|
00000020: 20 44 49 53 4B 20 49 44 20 2D 20 31 35 34 31 22 | DISK ID - 1541"|
00000030: 00 53 08 78 00 99 22 11 52 45 4D 4F 56 45 20 12 |.S.x..".REMOVE .|
00000040: 57 52 49 54 45 20 50 52 4F 54 45 43 54 20 54 41 |WRITE PROTECT TA|
00000050: 42 92 22 00 74 08 82 00 99 22 11 49 4E 53 45 52 |B.".t....".INSER|
00000060: 54 20 44 49 53 4B 45 54 54 45 20 49 4E 20 44 52 |T DISKETTE IN DR|
00000070: 49 56 45 22 00 97 08 8C 00 99 22 11 50 52 45 53 |IVE"......".PRES|
00000080: 53 20 12 52 45 54 55 52 4E 20 92 54 4F 20 43 4F |S .RETURN .TO CO|
00000090: 4E 54 49 4E 55 45 22 00 AA 08 96 00 A1 43 24 3A |NTINUE"......C$:|
000000A0: 8B 43 24 B2 22 22 A7 31 35 30 00 BD 08 A0 00 8B |.C$."".150......|
000000B0: 43 24 B3 B1 C7 28 31 33 29 89 31 35 30 00 C7 08 |C$...(13).150...|
000000C0: AA 00 99 22 4F 4B 22 00 D4 08 B4 00 9F 31 35 2C |..."OK"......15,|
000000D0: 38 2C 31 35 00 E1 08 BE 00 98 31 35 2C 22 49 30 |8,15......15,"I0|
000000E0: 22 00 F9 08 C8 00 84 31 35 2C 45 4E 24 2C 45 4D |"......15,EN$,EM|
000000F0: 24 2C 45 54 24 2C 45 53 24 00 0B 09 D2 00 8B 45 |$,ET$,ES$......E|
00000100: 4E 24 B2 22 30 30 22 89 32 35 30 00 2A 09 DC 00 |N$."00".250.*...|
00000110: 99 22 11 22 45 4E 24 22 2C 20 22 45 4D 24 22 2C |."."EN$", "EM$",|
00000120: 22 45 54 24 22 2C 22 45 53 24 00 32 09 E6 00 A0 |"ET$","ES$.2....|
00000130: 31 35 00 38 09 F0 00 80 00 47 09 FA 00 9F 32 2C |15.8.....G....2,|
00000140: 38 2C 32 2C 22 23 22 00 5D 09 04 01 98 31 35 2C |8,2,"#".]....15,|
00000150: 22 55 31 22 3B 32 3B 30 3B 31 38 3B 30 00 75 09 |"U1";2;0;18;0.u.|
00000160: 0E 01 84 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 |...15,EN$,EM$,ET|
00000170: 24 2C 45 53 24 00 87 09 18 01 98 31 35 2C 22 42 |$,ES$......15,"B|
00000180: 2D 50 22 3B 32 3B 32 00 92 09 22 01 A1 23 32 2C |-P";2;2..."..#2,|
00000190: 42 24 00 A5 09 2C 01 8B 42 24 B2 22 22 A7 42 24 |B$...,..B$."".B$|
000001A0: B2 C7 28 30 29 00 B3 09 36 01 44 4F 53 B2 C6 28 |..(0)...6.DOS..(|
000001B0: 42 24 29 00 C3 09 40 01 8B 44 4F 53 B2 36 35 89 |B$)...@..DOS.65.|
000001C0: 33 36 30 00 E6 09 4A 01 99 22 11 37 33 2C 43 4D |360...J..".73,CM|
000001D0: 44 20 44 4F 53 20 56 32 2E 36 20 31 35 34 31 2C |D DOS V2.6 1541,|
000001E0: 30 30 2C 30 30 22 00 F7 09 54 01 99 22 11 12 46 |00,00"...T.."..F|
000001F0: 41 49 4C 45 44 92 22 00 00 0A 5E 01 89 36 39 30 |AILED."...^..690|
00000200: 00 14 0A 68 01 98 31 35 2C 22 42 2D 50 22 3B 32 |...h..15,"B-P";2|
00000210: 3B 31 36 32 00 1F 0A 72 01 81 49 B2 31 A4 32 00 |;162...r..I.1.2.|
00000220: 2A 0A 7C 01 A1 23 32 2C 42 24 00 3D 0A 86 01 8B |*.|..#2,B$.=....|
00000230: 42 24 B2 22 22 A7 42 24 B2 C7 28 30 29 00 49 0A |B$."".B$..(0).I.|
00000240: 90 01 41 B2 C6 28 42 24 29 00 5C 0A 9A 01 8B 41 |..A..(B$).\....A|
00000250: B1 31 32 37 A7 41 B2 41 AB 31 32 38 00 70 0A A4 |.127.A.A.128.p..|
00000260: 01 8B 41 B3 33 32 B0 41 B1 39 35 A7 41 B2 36 33 |..A.32.A.95.A.63|
00000270: 00 7F 0A AE 01 8B 41 B2 33 34 A7 41 B2 36 33 00 |......A.34.A.63.|
00000280: 92 0A B8 01 4F 44 49 24 B2 4F 44 49 24 AA C7 28 |....ODI$.ODI$..(|
00000290: 41 29 00 99 0A C2 01 82 49 00 B4 0A CC 01 99 22 |A)......I......"|
000002A0: 11 4F 4C 44 20 44 49 53 4B 20 49 44 3A 20 22 3B |.OLD DISK ID: ";|
000002B0: 4F 44 49 24 00 CD 0A D6 01 85 22 11 4E 45 57 20 |ODI$......".NEW |
000002C0: 44 49 53 4B 20 49 44 22 3B 4E 44 49 24 00 EB 0A |DISK ID";NDI$...|
000002D0: E0 01 8B C3 28 4E 44 49 24 29 B3 B1 30 AF C3 28 |....(NDI$)..0..(|
000002E0: 4E 44 49 24 29 B3 33 89 35 30 30 00 F4 0A EA 01 |NDI$).3.500.....|
000002F0: 89 36 39 30 00 18 0B F4 01 85 22 11 41 52 45 20 |.690......".ARE |
00000300: 59 4F 55 20 53 55 52 45 20 28 59 2F 4E 29 20 20 |YOU SURE (Y/N) |
00000310: 59 9D 9D 9D 22 3B 51 24 00 29 0B FE 01 8B 51 24 |Y...";Q$.)....Q$|
00000320: B3 B1 22 59 22 89 36 39 30 00 44 0B 08 02 4E 44 |.."Y".690.D...ND|
00000330: 49 24 B2 C8 28 4E 44 49 24 AA 43 4E 52 24 28 30 |I$..(NDI$.CNR$(0|
00000340: 29 2C 32 29 00 58 0B 12 02 98 31 35 2C 22 42 2D |),2).X....15,"B-|
00000350: 50 22 3B 32 3B 31 36 32 00 65 0B 1C 02 98 32 2C |P";2;162.e....2,|
00000360: 4E 44 49 24 3B 00 7B 0B 26 02 98 31 35 2C 22 55 |NDI$;.{.&..15,"U|
00000370: 32 22 3B 32 3B 30 3B 31 38 3B 30 00 93 0B 30 02 |2";2;0;18;0...0.|
00000380: 84 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 24 2C |.15,EN$,EM$,ET$,|
00000390: 45 53 24 00 A5 0B 3A 02 8B 45 4E 24 B2 22 30 30 |ES$...:..EN$."00|
000003A0: 22 89 36 31 30 00 C4 0B 44 02 99 22 11 22 45 4E |".610...D.."."EN|
000003B0: 24 22 2C 20 22 45 4D 24 22 2C 22 45 54 24 22 2C |$", "EM$","ET$",|
000003C0: 22 45 53 24 00 D5 0B 4E 02 99 22 11 12 46 41 49 |"ES$...N.."..FAI|
000003D0: 4C 45 44 92 22 00 DE 0B 58 02 89 36 39 30 00 E5 |LED."...X..690..|
000003E0: 0B 62 02 A0 32 00 FD 0B 6C 02 84 31 35 2C 45 4E |.b..2...l..15,EN|
000003F0: 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 0A 0C |$,EM$,ET$,ES$...|
00000400: 76 02 98 31 35 2C 22 49 30 22 00 22 0C 80 02 84 |v..15,"I0"."....|
00000410: 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 24 2C 45 |15,EN$,EM$,ET$,E|
00000420: 53 24 00 2A 0C 8A 02 A0 31 35 00 38 0C 94 02 99 |S$.*....15.8....|
00000430: 22 11 44 4F 4E 45 21 22 00 3E 0C 9E 02 80 00 4A |".DONE!".>.....J|
00000440: 0C A8 02 8F 20 43 4C 4F 53 45 00 51 0C B2 02 A0 |.... CLOSE.Q....|
00000450: 32 00 69 0C BC 02 84 31 35 2C 45 4E 24 2C 45 4D |2.i....15,EN$,EM|
00000460: 24 2C 45 54 24 2C 45 53 24 00 71 0C C6 02 A0 31 |$,ET$,ES$.q....1|
00000470: 35 00 77 0C D0 02 80 00 00 00 |5.w....... |
....D.. EDIT DISK ID.0.N..".EDIT DISK ID
- 1541".S.X..".REMOVE .WRITE PROTECT TA
B.".T....".INSERT DISKETTE IN DRIVE"....
..".PRESS .RETURN .TO CONTINUE"......C$:
.C$."".150... ..C$..G(13).150.G...."OK".
T....15,8,15......15,"I0"...H..15,EN$,EM
$,ET$,ES$...R..EN$."00".250.*...."."EN$"
, "EM$","ET$","ES$.2... 15.8.....G....2,
8,2,"#".]....15,"U1";2;0;18;0.U....15,EN
$,EM$,ET$,ES$......15,"B-P";2;2..."..#2,
B$...,..B$."".B$.G(0)...6.DOS.F(B$).C.@.
.DOS.65.360...J..".73,CMD DOS V2.6 1541,
00,00"...T.."..FAILED."...^..690...H..15
,"B-P";2;162...R..I.1.2.*.|..#2,B$.=....
B$."".B$.G(0).I...A.F(B$).\....A.127.A.A
.128.P....A.32.A.95.A.63.....A.34.A.63.
....ODI$.ODI$.G(A)...B..I...L..".OLD DIS
K ID: ";ODI$.M.V..".NEW DISK ID";NDI$...
...C(NDI$)..0.C(NDI$).3.500......690....
..".ARE YOU SURE (Y/N) Y...";Q$.)....Q$
.."Y".690.D...NDI$.H(NDI$.CNR$(0),2).X..
..15,"B-P";2;162.E....2,NDI$;.{.&..15,"U
2";2;0;18;0...0..15,EN$,EM$,ET$,ES$...:.
.EN$."00".610.D.D.."."EN$", "EM$","ET$",
"ES$.U.N.."..FAILED."...X..690...B. 2...
L..15,EN$,EM$,ET$,ES$...V..15,"I0"."....
15,EN$,EM$,ET$,ES$.*... 15.8....".DONE!"
.>.....J.... CLOSE.Q... 2.I....15,EN$,EM
$,ET$,ES$.Q.F. 15.W.P.....
> CLICK IMAGE PREVIEW FOR FULL MODAL