CHANGE ID & NAME
FILE INFORMATION
FILENAME(S): CHANGE ID & NAME
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-12-01 01:10:00
APPEARS ON: 1 disk(s)
FILE HASH
78726b0112935470cbc689c0678b71593fce1ea359f4096ae3580095358eb85c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MAZZE S NYTTO | CHANGE ID & NAME | PRG | hedning, Martin L0fgren | 24 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 09 08 04 00 52 B2 30 00 17 08 05 00 4F 24 |......R.0.....O$| 00000010: B2 22 22 3A 4B B2 30 00 48 08 06 00 44 24 B2 22 |."":K.0.H...D$."| 00000020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000040: 2D 2D 2D 2D 2D 2D 2D 22 00 6A 08 0A 00 99 22 93 |-------".j....".| 00000050: 22 3A 97 35 33 32 38 30 2C 31 3A 97 36 34 36 2C |":.53280,1:.646,| 00000060: 30 3A 97 35 33 32 38 31 2C 31 00 9C 08 0F 00 43 |0:.53281,1.....C| 00000070: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 20 20 20 20 20 20 20 20 20 20 20 22 00 C3 08 13 | "....| 000000A0: 00 99 22 20 20 20 20 20 20 20 CF B7 B7 B7 B7 B7 |.." ......| 000000B0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................| 000000C0: B7 D0 22 00 EA 08 14 00 99 22 20 20 20 20 20 20 |.."......" | 000000D0: 20 B4 43 48 41 4E 47 45 20 44 49 53 4B 4E 41 4D | .CHANGE DISKNAM| 000000E0: 45 20 41 4E 44 20 49 44 AA 22 00 11 09 15 00 99 |E AND ID."......| 000000F0: 22 20 20 20 20 20 20 20 A5 2D 2D 2D 2D 2D 2D 2D |" .-------| 00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D AA |---------------.| 00000110: 22 00 38 09 16 00 99 22 20 20 20 20 20 20 20 B4 |".8...." .| 00000120: 43 4F 50 59 52 49 47 48 54 20 4D 2E 20 4D 4F 42 |COPYRIGHT M. MOB| 00000130: 45 52 47 20 38 36 AA 22 00 65 09 17 00 99 22 20 |ERG 86.".e...." | 00000140: 20 20 20 20 20 20 CC AF AF AF AF AF AF AF AF AF | ..........| 00000150: AF AF AF AF AF AF AF AF AF AF AF AF AF 22 AA C7 |............."..| 00000160: 28 31 38 36 29 00 6F 09 18 00 99 3A 99 44 24 00 |(186).o....:.D$.| 00000170: 97 09 19 00 99 22 20 20 20 20 20 20 20 49 4E 53 |....." INS| 00000180: 45 52 54 20 44 49 53 4B 20 54 4F 20 4D 4F 44 49 |ERT DISK TO MODI| 00000190: 46 59 20 41 4E 44 22 00 C3 09 1A 00 99 22 20 20 |FY AND"......" | 000001A0: 20 20 20 20 20 50 52 45 53 53 20 41 4E 59 20 4B | PRESS ANY K| 000001B0: 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3A |EY TO CONTINUE":| 000001C0: 99 44 24 00 D5 09 1E 00 A1 41 24 3A 8B 41 24 B2 |.D$......A$:.A$.| 000001D0: 22 22 A7 33 30 00 F4 09 64 00 8F 20 52 45 41 44 |"".30...d.. READ| 000001E0: 49 4E 47 20 50 52 45 53 45 4E 54 20 44 49 53 4B |ING PRESENT DISK| 000001F0: 4E 41 4D 45 00 07 0A 6E 00 54 B2 31 38 3A 53 B2 |NAME...n.T.18:S.| 00000200: 30 3A 8D 31 30 30 30 00 1E 0A 78 00 9F 31 2C 38 |0:.1000...x..1,8| 00000210: 2C 31 35 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 37 |,15:.2,8,2,"#".7| 00000220: 0A 82 00 98 31 2C 22 55 31 22 3B 32 3B 30 3B 54 |....1,"U1";2;0;T| 00000230: 3B 53 3A 8D 38 30 30 00 53 0A 8C 00 98 31 2C 22 |;S:.800.S....1,"| 00000240: 42 2D 50 3A 22 3B 32 3B 31 34 34 3A 81 58 B2 31 |B-P:";2;144:.X.1| 00000250: A4 31 36 00 6A 0A 96 00 A1 23 32 2C 54 24 3A 48 |.16.j....#2,T$:H| 00000260: 24 B2 48 24 AA 54 24 3A 82 58 00 98 0A B4 00 8D |$.H$.T$:.X......| 00000270: 37 30 30 3A 99 22 91 91 91 20 20 20 20 20 20 20 |700:."... | 00000280: 20 20 20 50 52 45 53 45 4E 54 20 44 49 53 4B 4E | PRESENT DISKN| 00000290: 41 4D 45 20 20 20 20 22 00 C4 0A B5 00 99 22 91 |AME "......".| 000002A0: 20 20 45 4E 54 45 52 20 4E 45 57 20 4E 41 4D 45 | ENTER NEW NAME| 000002B0: 20 4F 52 20 55 53 45 20 4F 4C 44 28 4D 41 58 20 | OR USE OLD(MAX | 000002C0: 31 36 29 22 00 D2 0A BE 00 99 3A 99 3A 8D 31 30 |16)"......:.:.10| 000002D0: 30 30 00 DE 0A C3 00 99 A3 37 29 3B 48 24 00 F7 |00.......7);H$..| 000002E0: 0A C8 00 8F 20 49 4E 50 55 54 20 4E 45 57 20 44 |.... INPUT NEW D| 000002F0: 49 53 4B 4E 41 4D 45 00 0E 0B E6 00 85 22 91 1D |ISKNAME......"..| 00000300: 4E 41 4D 45 22 3B 4E 24 3A 8D 31 30 30 30 00 1F |NAME";N$:.1000..| 00000310: 0B E9 00 8B 4E 24 B2 22 22 A7 4E 24 B2 48 24 00 |....N$."".N$.H$.| 00000320: 32 0B EA 00 8B C3 28 4E 24 29 B2 31 36 A7 89 32 |2.....(N$).16..2| 00000330: 34 30 00 52 0B EB 00 8B C3 28 4E 24 29 B1 31 36 |40.R.....(N$).16| 00000340: B0 C3 28 4E 24 29 B3 30 A7 8D 39 30 30 3A 89 32 |..(N$).0..900:.2| 00000350: 33 30 00 75 0B EC 00 4C B2 C3 28 4E 24 29 3A 81 |30.u...L..(N$):.| 00000360: 58 B2 4C A4 31 35 3A 4E 24 B2 4E 24 AA C7 28 31 |X.L.15:N$.N$..(1| 00000370: 36 30 29 3A 82 00 A3 0B F0 00 8D 37 30 30 3A 99 |60):.......700:.| 00000380: 22 91 91 91 20 20 20 20 20 20 20 20 20 20 50 52 |"... PR| 00000390: 45 53 45 4E 54 20 44 49 53 4B 20 49 44 20 20 20 |ESENT DISK ID | 000003A0: 20 20 22 00 CE 0B FA 00 99 22 91 20 20 20 20 45 | "......". E| 000003B0: 4E 54 45 52 20 4E 45 57 20 49 44 20 4F 52 20 55 |NTER NEW ID OR U| 000003C0: 53 45 20 4F 4C 44 28 4D 41 58 32 29 20 22 00 D6 |SE OLD(MAX2) "..| 000003D0: 0B 04 01 99 3A 99 00 DF 0B 0E 01 99 A3 37 29 00 |....:........7).| 000003E0: F2 0B 13 01 8F 20 49 4E 50 55 54 20 4E 45 57 20 |..... INPUT NEW | 000003F0: 49 44 00 15 0C 18 01 8B 4B B2 30 A7 A1 23 32 2C |ID......K.0..#2,| 00000400: 58 24 2C 58 24 2C 41 24 2C 42 24 3A 49 44 24 B2 |X$,X$,A$,B$:ID$.| 00000410: 41 24 AA 42 24 00 23 0C 22 01 99 22 11 11 22 AA |A$.B$.#.".."..".| 00000420: 49 44 24 00 3B 0C 2C 01 85 22 91 1D 20 20 49 44 |ID$.;.,..".. ID| 00000430: 22 3B 49 49 24 3A 8D 31 30 30 30 00 5C 0C 3B 01 |";II$:.1000.\.;.| 00000440: 8B C3 28 49 49 24 29 B1 32 B0 C3 28 49 49 24 29 |..(II$).2..(II$)| 00000450: B3 30 A7 8D 39 31 30 3A 89 33 30 30 00 68 0C 40 |.0..910:.300.h.@| 00000460: 01 49 44 24 B2 49 49 24 00 84 0C C2 01 4E 24 B2 |.ID$.II$.....N$.| 00000470: 4E 24 AA C7 28 31 36 30 29 AA C7 28 31 36 30 29 |N$..(160)..(160)| 00000480: AA 49 44 24 00 B9 0C C7 01 8F 20 53 4B 52 49 56 |.ID$...... SKRIV| 00000490: 45 52 20 4E 41 4D 4E 2B 49 44 20 46 52 5D 4E 20 |ER NAMN+ID FR]N | 000004A0: 4D 49 4E 4E 45 20 54 49 4C 4C 20 42 55 46 46 45 |MINNE TILL BUFFE| 000004B0: 52 20 49 20 44 52 49 56 45 00 C3 0C CC 01 50 B2 |R I DRIVE.....P.| 000004C0: 31 34 34 00 CD 0C D5 01 A0 32 3A A0 31 00 E4 0C |144......2:.1...| 000004D0: D6 01 9F 32 2C 38 2C 32 2C 22 23 22 3A 9F 31 2C |...2,8,2,"#":.1,| 000004E0: 38 2C 31 35 00 F7 0C DD 01 98 31 2C 22 42 2D 50 |8,15......1,"B-P| 000004F0: 22 3B 32 3B 31 34 34 00 01 0D E0 01 98 32 2C 4E |";2;144......2,N| 00000500: 24 00 0A 0D E5 01 8D 37 30 30 00 42 0D E6 01 85 |$......700.B....| 00000510: 22 91 91 91 20 20 20 20 20 20 20 4F 4B 20 54 4F |"... OK TO| 00000520: 20 57 52 49 54 45 20 54 48 49 53 20 28 59 2F 4E | WRITE THIS (Y/N| 00000530: 29 20 3F 20 59 9D 9D 9D 22 3B 58 24 3A 8D 31 30 |) ? Y...";X$:.10| 00000540: 30 30 00 58 0D E7 01 8B 58 24 B3 B1 22 59 22 A7 |00.X....X$.."Y".| 00000550: 4B B2 31 3A 89 31 38 30 00 8C 0D EB 01 8D 37 30 |K.1:.180......70| 00000560: 30 3A 99 22 91 91 91 20 20 20 20 20 57 52 49 54 |0:."... WRIT| 00000570: 49 4E 47 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 |ING INFORMATION | 00000580: 54 4F 20 44 49 53 4B 20 20 20 20 22 00 A7 0D EF |TO DISK "....| 00000590: 01 98 31 2C 22 55 32 3A 22 3B 32 3B 30 3B 31 38 |..1,"U2:";2;0;18| 000005A0: 3B 30 3A 8D 38 30 30 00 E1 0D F4 01 8D 37 30 30 |;0:.800......700| 000005B0: 3A 85 22 91 91 91 20 20 20 20 20 43 48 41 4E 47 |:."... CHANG| 000005C0: 45 20 41 4E 4F 54 48 45 52 4F 4E 45 20 28 59 2F |E ANOTHERONE (Y/| 000005D0: 4E 29 20 59 9D 9D 9D 22 3B 58 24 3A 8D 31 30 30 |N) Y...";X$:.100| 000005E0: 30 00 20 0E FE 01 8B 58 24 B3 B1 22 59 22 A7 99 |0. ....X$.."Y"..| 000005F0: 22 93 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |"...............| 00000600: 1D 1D 57 45 4C 4C 20 46 55 43 4B 20 59 4F 55 20 |..WELL FUCK YOU | 00000610: 54 4F 22 3A 8D 31 30 30 30 3A 9E 36 34 37 33 38 |TO":.1000:.64738| 00000620: 00 26 0E 08 02 8A 00 4D 0E BC 02 99 22 13 11 11 |.&.....M...."...| 00000630: 11 11 11 11 11 11 22 AA 43 24 3A 99 22 13 11 11 |......".C$:."...| 00000640: 11 11 11 11 11 11 11 22 AA 43 24 3A 8E 00 64 0E |.......".C$:..d.| 00000650: 20 03 84 31 2C 45 2C 4D 24 2C 4A 2C 4B 3A 8B 45 | ..1,E,M$,J,K:.E| 00000660: B2 30 A7 8E 00 6D 0E 2A 03 8D 37 30 30 00 7C 0E |.0...m.*..700.|.| 00000670: 2B 03 8B 45 B3 B1 32 36 A7 38 35 30 00 BD 0E 2C |+..E..26.850...,| 00000680: 03 8B 45 B2 32 36 A7 99 22 91 91 91 20 20 20 20 |..E.26.."... | 00000690: 20 20 20 20 20 22 3B 4D 24 3A 99 22 91 20 20 20 | ";M$:.". | 000006A0: 20 52 45 4D 4F 56 45 20 49 54 20 41 4E 44 20 50 | REMOVE IT AND P| 000006B0: 52 45 53 53 20 41 4E 59 20 4B 45 59 22 00 D0 0E |RESS ANY KEY"...| 000006C0: 2D 03 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 38 31 33 |-..K$:.K$."".813| 000006D0: 00 D6 0E 2E 03 8A 00 EF 0E 52 03 99 22 91 91 91 |.........R.."...| 000006E0: 20 20 45 52 52 4F 52 3A 20 22 2C 45 2C 4D 24 00 | ERROR: ",E,M$.| 000006F0: 12 0F 57 03 99 22 91 20 20 20 20 41 4E 59 20 4B |..W..". ANY K| 00000700: 45 59 20 54 4F 20 53 54 41 52 54 20 41 47 41 49 |EY TO START AGAI| 00000710: 4E 22 00 24 0F 5C 03 A1 4B 24 3A 4B 24 B2 22 22 |N".$.\..K$:K$.""| 00000720: A7 38 36 30 00 2A 0F 66 03 8A 00 30 0F 83 03 80 |.860.*.f...0....| 00000730: 00 6D 0F 84 03 99 22 13 11 11 11 11 11 11 11 11 |.m....".........| 00000740: 11 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.... | 00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000760: 20 20 20 20 20 20 20 20 20 20 22 3A 8E 00 AC 0F | ":....| 00000770: 8E 03 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............| 00000780: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007A0: 20 20 20 20 20 20 20 20 20 22 3A 8E 00 BA 0F E8 | ":.....| 000007B0: 03 97 35 34 32 39 36 2C 31 35 00 C8 0F ED 03 97 |..54296,15......| 000007C0: 35 34 32 37 36 2C 33 33 00 D3 0F EF 03 81 41 B2 |54276,33......A.| 000007D0: 31 A4 32 00 E1 0F F2 03 97 35 34 32 37 32 2C 31 |1.2......54272,1| 000007E0: 37 00 F0 0F FC 03 97 35 34 32 37 33 2C 31 30 33 |7......54273,103| 000007F0: 00 FE 0F FD 03 97 35 34 32 37 32 2C 31 39 00 0D |......54272,19..| 00000800: 10 FE 03 97 35 34 32 37 33 2C 31 33 37 00 1B 10 |....54273,137...| 00000810: FF 03 97 35 34 32 37 32 2C 32 33 00 29 10 00 04 |...54272,23.)...| 00000820: 97 35 34 32 37 33 2C 35 39 00 36 10 06 04 97 36 |.54273,59.6....6| 00000830: 34 32 37 37 2C 30 00 45 10 10 04 97 35 34 32 37 |4277,0.E....5427| 00000840: 38 2C 32 34 30 00 4C 10 15 04 82 41 00 5C 10 1A |8,240.L....A.\..| 00000850: 04 97 35 34 32 37 36 2C 33 32 3A 8E 00 00 00 |..54276,32:.... |
......R.0.....O$."":K.0.H...D$."--------
-------------------------------".J....".
":.53280,1:.646,0:.53281,1.....C$."
".C..
.." O......................P".....
." .CHANGE DISKNAME AND ID."......
" .----------------------.".8...."
.COPYRIGHT M. MOBERG 86.".E...."
L......................".G(186).O.
...:.D$......" INSERT DISK TO MODI
FY AND".C...." PRESS ANY KEY TO CO
NTINUE":.D$.U....A$:.A$."".30...D.. READ
ING PRESENT DISKNAME...N.T.18:S.0:.1000.
..X..1,8,15:.2,8,2,"#".7....1,"U1";2;0;T
;S:.800.S....1,"B-P:";2;144:.X.1.16.J...
.#2,T$:H$.H$.T$:.X......700:."...
PRESENT DISKNAME ".D....". ENTER
NEW NAME OR USE OLD(MAX 16)".R....:.:.10
00...C...7);H$...H.. INPUT NEW DISKNAME.
....."..NAME";N$:.1000......N$."".N$.H$.
2....C(N$).16..240.R....C(N$).16.C(N$).0
..900:.230.U...L.C(N$):.X.L.15:N$.N$.G(1
60):.......700:."... PRESENT DI
SK ID ".N....". ENTER NEW ID OR U
SE OLD(MAX2) ".V....:........7)...... IN
PUT NEW ID......K.0..#2,X$,X$,A$,B$:ID$.
A$.B$.#.".."..".ID$.;.,..".. ID";II$:.1
000.\.;..C(II$).2.C(II$).0..910:.300.H.@
.ID$.II$...B.N$.N$.G(160).G(160).ID$...G
.. SKRIVER NAMN+ID FR]N MINNE TILL BUFFE
R I DRIVE.C.L.P.144.M.U. 2: 1...V..2,8,2
,"#":.1,8,15......1,"B-P";2;144......2,N
$......700.B...."... OK TO WRITE T
HIS (Y/N) ? Y...";X$:.1000.X....X$.."Y".
K.1:.180......700:."... WRITING INFO
RMATION TO DISK "......1,"U2:";2;0;18
;0:.800......700:."... CHANGE ANOTHE
RONE (Y/N) Y...";X$:.1000. ....X$.."Y"..
".................WELL FUCK YOU TO":.100
0:.64738.&.....M....".........".C$:."...
.......".C$:..D. ..1,E,M$,J,K:.E.0...M.*
..700.|.+..E..26.850...,..E.26.."...
";M$:.". REMOVE IT AND PRESS ANY
KEY".P.-..K$:.K$."".813.V.......R.."...
ERROR: ",E,M$...W..". ANY KEY TO ST
ART AGAIN".$.\..K$:K$."".860.*.F...0....
.M....".............
":......."............
...
":.......54296,15.H....54276,33.S....A.
1.2......54272,17......54273,103......54
272,19......54273,137......54272,23.)...
.54273,59.6....64277,0.E....54278,240.L.
...A.\....54276,32:....
> CLICK IMAGE PREVIEW FOR FULL MODAL