EDIT DISK ID

FILE INFORMATION

FILENAME(S): EDIT DISK ID

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-12-01 02:25:40

APPEARS ON: 1 disk(s)

FILE HASH

cf96beb4afd4da64cc8399a559b1ffe33c2b5b8a8d980367c1abc312e0922a3d

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
INSIDE C DOS 1	EDIT DISK ID	PRG	hedning, shine	17	17	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 25 08 0A 00 8F 20  2A 49 4E 53 49 44 45 20  |..%.... *INSIDE |
00000010: 43 4F 4D 4D 4F 44 4F 52  45 20 44 4F 53 20 50 47  |COMMODORE DOS PG|
00000020: 2E 20 37 39 2A 00 3C 08  14 00 8F 20 2A 4A 4A 4D  |. 79*.<.... *JJM|
00000030: 2A 20 20 20 2A 30 34 30  37 38 37 2A 00 4F 08 64  |*   *040787*.O.d|
00000040: 00 8F 20 45 44 49 54 20  44 49 53 4B 20 49 44 00  |.. EDIT DISK ID.|
00000050: 6B 08 6E 00 99 22 93 45  44 49 54 20 44 49 53 4B  |k.n..".EDIT DISK|
00000060: 20 49 44 20 2D 20 31 35  34 31 22 00 8E 08 78 00  | ID - 1541"...x.|
00000070: 99 22 11 52 45 4D 4F 56  45 20 12 57 52 49 54 45  |.".REMOVE .WRITE|
00000080: 20 50 52 4F 54 45 43 54  20 54 41 42 92 22 00 AF  | PROTECT TAB."..|
00000090: 08 82 00 99 22 11 49 4E  53 45 52 54 20 44 49 53  |....".INSERT DIS|
000000A0: 4B 45 54 54 45 20 49 4E  20 44 52 49 56 45 22 00  |KETTE IN DRIVE".|
000000B0: D2 08 8C 00 99 22 11 50  52 45 53 53 20 12 52 45  |.....".PRESS .RE|
000000C0: 54 55 52 4E 92 20 54 4F  20 43 4F 4E 54 49 4E 55  |TURN. TO CONTINU|
000000D0: 45 22 00 E6 08 96 00 A1  43 24 3A 8B 43 24 B2 22  |E"......C$:.C$."|
000000E0: 22 A7 20 31 35 30 00 F9  08 A0 00 8B 43 24 B3 B1  |". 150......C$..|
000000F0: C7 28 31 33 29 89 31 35  30 00 03 09 AA 00 99 22  |.(13).150......"|
00000100: 4F 4B 22 00 10 09 B4 00  9F 31 35 2C 38 2C 31 35  |OK"......15,8,15|
00000110: 00 1D 09 BE 00 98 31 35  2C 22 49 30 22 00 35 09  |......15,"I0".5.|
00000120: C8 00 84 31 35 2C 45 4E  24 2C 45 4D 24 2C 45 54  |...15,EN$,EM$,ET|
00000130: 24 2C 45 53 24 00 47 09  D2 00 8B 45 4E 24 B2 22  |$,ES$.G....EN$."|
00000140: 30 30 22 89 32 35 30 00  66 09 DC 00 99 22 11 22  |00".250.f...."."|
00000150: 45 4E 24 22 2C 20 22 45  4D 24 22 2C 22 45 54 24  |EN$", "EM$","ET$|
00000160: 22 2C 22 45 53 24 00 6E  09 E6 00 A0 31 35 00 74  |","ES$.n....15.t|
00000170: 09 F0 00 80 00 83 09 FA  00 9F 32 2C 38 2C 32 2C  |..........2,8,2,|
00000180: 22 23 22 00 99 09 04 01  98 31 35 2C 22 55 31 22  |"#"......15,"U1"|
00000190: 3B 32 3B 30 3B 31 38 3B  30 00 B1 09 0E 01 84 31  |;2;0;18;0......1|
000001A0: 35 2C 45 4E 24 2C 45 4D  24 2C 45 54 24 2C 45 53  |5,EN$,EM$,ET$,ES|
000001B0: 24 00 C3 09 18 01 98 31  35 2C 22 42 2D 50 22 3B  |$......15,"B-P";|
000001C0: 32 3B 32 00 CE 09 22 01  A1 23 32 2C 42 24 00 E1  |2;2..."..#2,B$..|
000001D0: 09 2C 01 8B 42 24 B2 22  22 A7 42 24 B2 C7 28 30  |.,..B$."".B$..(0|
000001E0: 29 00 EF 09 36 01 44 4F  53 B2 C6 28 42 24 29 00  |)...6.DOS..(B$).|
000001F0: FF 09 40 01 8B 44 4F 53  B2 36 35 89 33 36 30 00  |..@..DOS.65.360.|
00000200: 22 0A 4A 01 99 22 11 37  33 2C 43 42 4D 20 44 4F  |".J..".73,CBM DO|
00000210: 53 20 56 32 2E 36 20 31  35 34 31 2C 30 30 2C 30  |S V2.6 1541,00,0|
00000220: 30 22 00 33 0A 54 01 99  22 11 12 46 41 49 4C 45  |0".3.T.."..FAILE|
00000230: 44 92 22 00 3C 0A 5E 01  89 36 39 30 00 50 0A 68  |D.".<.^..690.P.h|
00000240: 01 98 31 35 2C 22 42 2D  50 22 3B 32 3B 31 36 32  |..15,"B-P";2;162|
00000250: 00 5B 0A 72 01 81 49 B2  31 A4 32 00 66 0A 7C 01  |.[.r..I.1.2.f.|.|
00000260: A1 23 32 2C 42 24 00 79  0A 86 01 8B 42 24 B2 22  |.#2,B$.y....B$."|
00000270: 22 A7 42 24 B2 C7 28 30  29 00 85 0A 90 01 41 B2  |".B$..(0).....A.|
00000280: C6 28 42 24 29 00 98 0A  9A 01 8B 41 B1 31 32 37  |.(B$)......A.127|
00000290: A7 41 B2 41 AB 31 32 38  00 AC 0A A4 01 8B 41 B3  |.A.A.128......A.|
000002A0: 33 32 B0 41 B1 39 35 A7  41 B2 36 33 00 BB 0A AE  |32.A.95.A.63....|
000002B0: 01 8B 41 B2 33 34 A7 41  B2 36 33 00 CE 0A B8 01  |..A.34.A.63.....|
000002C0: 4F 44 49 24 B2 4F 44 49  24 AA C7 28 41 29 00 D5  |ODI$.ODI$..(A)..|
000002D0: 0A C2 01 82 49 00 F0 0A  CC 01 99 22 11 4F 4C 44  |....I......".OLD|
000002E0: 20 44 49 53 4B 20 49 44  3A 20 22 3B 4F 44 49 24  | DISK ID: ";ODI$|
000002F0: 00 0A 0B D6 01 85 22 11  4E 45 57 20 44 49 53 4B  |......".NEW DISK|
00000300: 20 49 44 3A 22 3B 4E 44  49 24 00 28 0B E0 01 8B  | ID:";NDI$.(....|
00000310: C3 28 4E 44 49 24 29 B3  B1 30 AF C3 28 4E 44 49  |.(NDI$)..0..(NDI|
00000320: 24 29 B3 33 89 35 30 30  00 31 0B EA 01 89 36 39  |$).3.500.1....69|
00000330: 30 00 55 0B F4 01 85 22  11 41 52 45 20 59 4F 55  |0.U....".ARE YOU|
00000340: 20 53 55 52 45 20 28 59  2F 4E 29 20 20 59 9D 9D  | SURE (Y/N)  Y..|
00000350: 9D 22 3B 51 24 00 66 0B  FE 01 8B 51 24 B3 B1 22  |.";Q$.f....Q$.."|
00000360: 59 22 89 36 39 30 00 7E  0B 08 02 4E 44 49 24 B2  |Y".690.~...NDI$.|
00000370: C8 28 4E 44 49 24 AA C7  28 30 29 2C 32 29 00 92  |.(NDI$..(0),2)..|
00000380: 0B 12 02 98 31 35 2C 22  42 2D 50 22 3B 32 3B 31  |....15,"B-P";2;1|
00000390: 36 32 00 9F 0B 1C 02 98  32 2C 4E 44 49 24 3B 00  |62......2,NDI$;.|
000003A0: B5 0B 26 02 98 31 35 2C  22 55 32 22 3B 32 3B 30  |..&..15,"U2";2;0|
000003B0: 3B 31 38 3B 30 00 CD 0B  30 02 84 31 35 2C 45 4E  |;18;0...0..15,EN|
000003C0: 24 2C 45 4D 24 2C 45 54  24 2C 45 53 24 00 DF 0B  |$,EM$,ET$,ES$...|
000003D0: 3A 02 8B 45 4E 24 B2 22  30 30 22 89 36 31 30 00  |:..EN$."00".610.|
000003E0: FE 0B 44 02 99 22 11 22  45 4E 24 22 2C 20 22 45  |..D.."."EN$", "E|
000003F0: 4D 24 22 2C 22 45 54 24  22 2C 22 45 53 24 00 0F  |M$","ET$","ES$..|
00000400: 0C 4E 02 99 22 11 12 46  41 49 4C 45 44 92 22 00  |.N.."..FAILED.".|
00000410: 18 0C 58 02 89 36 39 30  00 1F 0C 62 02 A0 32 00  |..X..690...b..2.|
00000420: 37 0C 6C 02 84 31 35 2C  45 4E 24 2C 45 4D 24 2C  |7.l..15,EN$,EM$,|
00000430: 45 54 24 2C 45 53 24 00  44 0C 76 02 98 31 35 2C  |ET$,ES$.D.v..15,|
00000440: 22 49 30 22 00 5C 0C 80  02 84 31 35 2C 45 4E 24  |"I0".\....15,EN$|
00000450: 2C 45 4D 24 2C 45 54 24  2C 45 53 24 00 64 0C 8A  |,EM$,ET$,ES$.d..|
00000460: 02 A0 31 35 00 72 0C 94  02 99 22 11 44 4F 4E 45  |..15.r....".DONE|
00000470: 21 22 00 78 0C 9E 02 80  00 84 0C A8 02 8F 20 43  |!".x.......... C|
00000480: 4C 4F 53 45 00 8B 0C B2  02 A0 32 00 A3 0C BC 02  |LOSE......2.....|
00000490: 84 31 35 2C 45 4E 24 2C  45 4D 24 2C 45 54 24 2C  |.15,EN$,EM$,ET$,|
000004A0: 45 53 24 00 AB 0C C6 02  A0 31 35 00 B1 0C D0 02  |ES$......15.....|
000004B0: 80 00 00 00                                       |....            |

..%.... *INSIDE COMMODORE DOS PG. 79*.<.
... *JJM*   *040787*.O.D.. EDIT DISK ID.
K.N..".EDIT DISK ID - 1541"...X..".REMOV
E .WRITE PROTECT TAB."......".INSERT DIS
KETTE IN DRIVE".R....".PRESS .RETURN. TO
 CONTINUE"......C$:.C$."". 150... ..C$..
G(13).150......"OK"......15,8,15......15
,"I0".5.H..15,EN$,EM$,ET$,ES$.G.R..EN$."
00".250.F...."."EN$", "EM$","ET$","ES$.N
... 15.T..........2,8,2,"#"......15,"U1"
;2;0;18;0......15,EN$,EM$,ET$,ES$.C....1
5,"B-P";2;2.N."..#2,B$...,..B$."".B$.G(0
)...6.DOS.F(B$)...@..DOS.65.360.".J..".7
3,CBM DOS V2.6 1541,00,00".3.T.."..FAILE
D.".<.^..690.P.H..15,"B-P";2;162.[.R..I.
1.2.F.|..#2,B$.Y....B$."".B$.G(0).....A.
F(B$)......A.127.A.A.128......A.32.A.95.
A.63......A.34.A.63.N...ODI$.ODI$.G(A).U
.B..I...L..".OLD DISK ID: ";ODI$...V..".
NEW DISK ID:";NDI$.(....C(NDI$)..0.C(NDI
$).3.500.1....690.U....".ARE YOU SURE (Y
/N)  Y...";Q$.F....Q$.."Y".690.~...NDI$.
H(NDI$.G(0),2)......15,"B-P";2;162......
2,NDI$;...&..15,"U2";2;0;18;0.M.0..15,EN
$,EM$,ET$,ES$...:..EN$."00".610...D.."."
EN$", "EM$","ET$","ES$...N.."..FAILED.".
..X..690...B. 2.7.L..15,EN$,EM$,ET$,ES$.
D.V..15,"I0".\....15,EN$,EM$,ET$,ES$.D..
. 15.R....".DONE!".X.......... CLOSE....
. 2......15,EN$,EM$,ET$,ES$...F. 15...P.
....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL