DISK NAME CHANGE
FILE INFORMATION
FILENAME(S): DISK NAME CHANGE
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-11-30 21:11:27
APPEARS ON: 1 disk(s)
FILE HASH
abafbdbc3e50263b6450744ba93e292fd06d0645677e979f7ebc36b0718f34c5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| VERZAMEL 22 5 | DISK NAME CHANGE | PRG | DuncanTwain | 2 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 97 35 33 32 38 30 2C 30 32 3A |.......53280,02:| 00000010: 97 35 33 32 38 31 2C 20 31 00 4D 08 05 00 99 20 |.53281, 1.M.... | 00000020: 22 90 93 12 20 20 20 20 20 20 20 20 20 20 20 4D |"... M| 00000030: 45 47 41 53 4F 46 54 20 28 43 29 20 31 39 38 34 |EGASOFT (C) 1984| 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 81 08 | "...| 00000050: 06 00 99 22 90 12 20 20 20 20 20 20 20 20 20 20 |...".. | 00000060: 20 20 44 49 53 4B 20 49 44 20 43 48 41 4E 47 45 | DISK ID CHANGE| 00000070: 52 20 20 20 20 20 20 20 20 20 20 20 20 20 11 1C |R ..| 00000080: 22 00 95 08 0A 00 9F 39 2C 30 2C 30 3A 9F 31 35 |"......9,0,0:.15| 00000090: 2C 38 2C 31 35 00 A3 08 14 00 97 35 39 34 36 38 |,8,15......59468| 000000A0: 2C 31 32 00 C5 08 1E 00 4D 44 24 B2 22 13 22 3A |,12.....MD$.".":| 000000B0: 81 49 B2 31 A4 32 30 3A 4D 44 24 B2 4D 44 24 AA |.I.1.20:MD$.MD$.| 000000C0: 22 11 22 3A 82 00 DF 08 28 00 81 49 B2 31 A4 33 |".":....(..I.1.3| 000000D0: 39 3A 42 4C 24 B2 42 4C 24 AA 22 20 22 3A 82 00 |9:BL$.BL$." ":..| 000000E0: 02 09 32 00 50 30 24 B2 22 90 11 11 11 1D 1D 12 |..2.P0$.".......| 000000F0: 44 49 53 4B 20 4E 41 4D 45 20 43 48 41 4E 47 45 |DISK NAME CHANGE| 00000100: 52 3A 00 24 09 3C 00 52 45 24 B2 22 90 20 20 20 |R:.$.<.RE$.". | 00000110: 20 20 20 20 20 20 20 50 52 45 53 53 20 12 52 45 | PRESS .RE| 00000120: 54 55 52 4E 00 41 09 46 00 83 32 2C 4F 55 54 20 |TURN.A.F..2,OUT | 00000130: 4F 46 20 52 41 4E 47 45 2C 54 4F 4F 20 4C 4F 4E |OF RANGE,TOO LON| 00000140: 47 00 61 09 50 00 87 41 3A 86 45 4D 24 28 41 29 |G.a.P..A:.EM$(A)| 00000150: 3A 81 49 B2 31 A4 41 3A 87 45 4D 24 28 49 29 3A |:.I.1.A:.EM$(I):| 00000160: 82 00 6B 09 63 00 89 31 30 30 30 00 7E 09 64 00 |..k.c..1000.~.d.| 00000170: 84 31 35 2C 45 52 3A 8B 45 52 B2 30 A7 8E 00 95 |.15,ER:.ER.0....| 00000180: 09 6E 00 84 31 35 2C 45 52 2C 45 4D 24 2C 45 54 |.n..15,ER,EM$,ET| 00000190: 24 2C 45 53 24 00 CB 09 78 00 99 4D 44 24 22 12 |$,ES$...x..MD$".| 000001A0: 20 20 20 44 49 53 4B 20 45 52 52 4F 52 21 92 20 | DISK ERROR!. | 000001B0: 20 20 20 20 23 22 45 52 22 20 22 45 4D 24 22 20 | #"ER" "EM$" | 000001C0: 22 45 54 24 22 2C 20 22 45 53 24 00 D1 09 82 00 |"ET$", "ES$.....| 000001D0: 80 00 EB 09 C8 00 84 39 2C 51 24 3A 99 3A 51 31 |.......9,Q$:.:Q1| 000001E0: 24 B2 C8 28 51 24 2C 31 29 3A 8E 00 07 0A 2C 01 |$..(Q$,1):....,.| 000001F0: A0 32 3A A0 31 35 3A 97 35 39 34 36 38 2C 50 4B |.2:.15:.59468,PK| 00000200: 3A 99 22 93 22 3A 80 00 1E 0A 90 01 99 C8 28 4D |:.".":........(M| 00000210: 44 24 2C 4D 44 29 42 4C 24 3A 99 42 4C 24 00 30 |D$,MD)BL$:.BL$.0| 00000220: 0A 9A 01 99 C8 28 4D 44 24 2C 4D 44 29 3B 3A 8E |.....(MD$,MD);:.| 00000230: 00 3F 0A F4 01 4D 44 B2 32 31 3A 8D 34 30 30 00 |.?...MD.21:.400.| 00000240: 65 0A FE 01 99 22 12 55 4E 41 43 43 45 50 54 41 |e....".UNACCEPTA| 00000250: 42 4C 45 20 45 4E 54 52 59 20 2D 2D 20 22 45 4D |BLE ENTRY -- "EM| 00000260: 24 28 45 4D 29 00 78 0A 08 02 99 52 45 24 3A 8D |$(EM).x....RE$:.| 00000270: 32 30 30 3A 8D 34 30 30 00 7E 0A 12 02 8E 00 8B |200:.400.~......| 00000280: 0A E8 03 46 B2 30 3A 99 50 30 24 00 BA 0A ED 03 |...F.0:.P0$.....| 00000290: 99 22 11 4F 4E 20 57 48 49 43 48 20 44 52 49 56 |.".ON WHICH DRIV| 000002A0: 45 20 46 4F 52 20 43 48 41 4E 47 45 53 3F 28 30 |E FOR CHANGES?(0| 000002B0: 2F 31 29 12 22 3B 3A 85 51 24 00 E3 0A FC 03 44 |/1).";:.Q$.....D| 000002C0: 56 B2 C5 28 51 24 29 3A 8F 20 49 46 44 56 3C 30 |V..(Q$):. IFDV<0| 000002D0: 4F 52 44 56 3E 31 54 C8 45 4D 3D 31 3A 47 CF 31 |ORDV>1T.EM=1:G.1| 000002E0: 30 30 30 00 FB 0A 06 04 8B 44 56 B2 30 AF 51 31 |000......DV.0.Q1| 000002F0: 24 B3 B1 22 30 22 A7 45 4D B2 31 00 21 0B 10 04 |$.."0".EM.1.!...| 00000300: 99 50 30 24 3A 99 22 11 50 4C 41 43 45 20 44 49 |.P0$:.".PLACE DI| 00000310: 53 4B 20 49 4E 20 44 52 49 56 45 22 44 56 22 11 |SK IN DRIVE"DV".| 00000320: 22 00 2F 0B 1A 04 99 52 45 24 3A 8D 32 30 30 00 |"./....RE$:.200.| 00000330: 46 0B 24 04 98 31 35 2C 22 49 22 AA C4 28 44 56 |F.$..15,"I"..(DV| 00000340: 29 3A 8D 31 30 30 00 70 0B 2E 04 9F 32 2C 38 2C |):.100.p....2,8,| 00000350: 32 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A 32 22 |2,"#":.15,"U1:2"| 00000360: 3B 44 56 3B 22 2C 31 38 2C 30 22 3A 8D 31 30 30 |;DV;",18,0":.100| 00000370: 00 90 0B 38 04 98 31 35 2C 22 42 2D 50 3A 32 2C |...8..15,"B-P:2,| 00000380: 31 34 34 22 3A 8D 31 30 30 3A 44 4E 24 B2 22 22 |144":.100:DN$.""| 00000390: 00 B0 0B 42 04 81 49 B2 31 A4 31 36 3A A1 23 32 |...B..I.1.16:.#2| 000003A0: 2C 41 24 3A 44 4E 24 B2 44 4E 24 AA 41 24 3A 82 |,A$:DN$.DN$.A$:.| 000003B0: 00 C6 0B 4C 04 4D 44 B2 31 30 3A 8D 34 30 30 3A |...L.MD.10:.400:| 000003C0: 8B 20 46 20 A7 8E 00 FA 0B 4D 04 99 20 22 90 93 |. F .....M.. "..| 000003D0: 12 20 20 20 20 20 20 20 20 20 20 20 4D 45 47 41 |. MEGA| 000003E0: 53 4F 46 54 20 28 43 29 20 31 39 38 34 20 20 20 |SOFT (C) 1984 | 000003F0: 20 20 20 20 20 20 20 20 20 22 00 2E 0C 4E 04 99 | "...N..| 00000400: 22 90 12 20 20 20 20 20 20 20 20 20 20 20 20 44 |".. D| 00000410: 49 53 4B 20 49 44 20 43 48 41 4E 47 45 52 20 20 |ISK ID CHANGER | 00000420: 20 20 20 20 20 20 20 20 20 20 20 11 1C 22 00 48 | ..".H| 00000430: 0C 56 04 99 22 54 48 45 20 44 49 53 4B 20 4E 41 |.V.."THE DISK NA| 00000440: 4D 45 20 49 53 3A 91 90 00 5F 0C 60 04 99 A3 31 |ME IS:..._.`...1| 00000450: 38 29 C7 28 33 34 29 44 4E 24 C7 28 33 34 29 00 |8).(34)DN$.(34).| 00000460: 69 0C 6A 04 4D 44 B2 31 33 00 73 0C 92 04 4D 44 |i.j.MD.13.s...MD| 00000470: B2 31 36 00 8B 0C 97 04 99 22 11 11 1C 22 2C 22 |.16......"...","| 00000480: 20 20 20 20 20 45 4E 54 45 52 11 00 C3 0C 9C 04 | ENTER......| 00000490: 99 22 90 45 4E 54 45 52 1D 4E 45 57 20 44 49 53 |.".ENTER.NEW DIS| 000004A0: 4B 20 4E 41 4D 45 22 3A 99 22 4C 49 4D 49 54 20 |K NAME":."LIMIT | 000004B0: 54 4F 20 31 36 20 43 48 41 52 41 43 54 45 52 53 |TO 16 CHARACTERS| 000004C0: 20 12 22 00 F1 0C A6 04 8D 32 30 30 3A 8B C3 28 | ."......200:..(| 000004D0: 51 24 29 B1 31 36 A7 45 4D B2 32 3A 8D 35 30 30 |Q$).16.EM.2:.500| 000004E0: 3A 4D 44 B2 31 38 3A 8D 34 30 30 3A 89 31 31 39 |:MD.18:.400:.119| 000004F0: 30 00 07 0D B0 04 4E 44 4E 24 B2 C8 28 51 24 AA |0.....NDN$..(Q$.| 00000500: 42 4C 24 2C 31 36 29 00 16 0D BA 04 4D 44 B2 32 |BL$,16).....MD.2| 00000510: 31 3A 8D 34 30 30 00 30 0D C4 04 99 22 53 48 41 |1:.400.0...."SHA| 00000520: 4C 4C 20 49 20 53 45 4E 44 20 12 22 4E 44 4E 24 |LL I SEND ."NDN$| 00000530: 00 62 0D CE 04 99 22 54 4F 20 54 48 45 20 44 49 |.b...."TO THE DI| 00000540: 53 4B 45 54 54 45 20 4F 4E 20 44 52 49 56 45 22 |SKETTE ON DRIVE"| 00000550: 44 56 22 3F 20 28 59 2F 4E 29 12 22 3B 3A 8D 32 |DV"? (Y/N).";:.2| 00000560: 30 30 00 6C 0D D8 04 89 31 32 37 30 00 8B 0D E2 |00.l....1270....| 00000570: 04 8B 51 31 24 B3 B1 22 4E 22 A7 8D 34 30 30 3A |..Q1$.."N"..400:| 00000580: 4D 44 B2 31 38 3A 89 31 31 37 30 00 95 0D EC 04 |MD.18:.1170.....| 00000590: 89 31 32 31 30 00 AF 0D F6 04 4D 44 B2 32 31 3A |.1210.....MD.21:| 000005A0: 99 22 42 45 20 50 41 54 49 45 4E 54 2E 2E 2E 00 |."BE PATIENT....| 000005B0: C8 0D 00 05 98 31 35 2C 22 42 2D 50 3A 32 2C 31 |.....15,"B-P:2,1| 000005C0: 34 34 22 3A 8D 31 30 30 00 DA 0D 0A 05 98 32 2C |44":.100......2,| 000005D0: 4E 44 4E 24 3B 3A 8D 31 30 30 00 F9 0D 14 05 98 |NDN$;:.100......| 000005E0: 31 35 2C 22 55 32 3A 32 22 3B 44 56 3B 22 2C 31 |15,"U2:2";DV;",1| 000005F0: 38 2C 30 22 3A 8D 31 30 30 00 13 0E 1E 05 98 31 |8,0":.100......1| 00000600: 35 2C 22 49 22 AA C4 28 44 56 29 3A 8D 31 30 30 |5,"I"..(DV):.100| 00000610: 3A A0 32 00 2A 0E 28 05 46 B2 31 3A 99 50 30 24 |:.2.*.(.F.1:.P0$| 00000620: 3A 8D 31 30 36 30 3A 46 B2 30 00 46 0E 32 05 99 |:.1060:F.0.F.2..| 00000630: 22 54 48 45 20 4E 45 57 20 44 49 53 4B 20 4E 41 |"THE NEW DISK NA| 00000640: 4D 45 20 49 53 3A 00 5C 0E 3C 05 99 22 90 22 C7 |ME IS:.\.<..".".| 00000650: 28 33 34 29 44 4E 24 C7 28 33 34 29 00 83 0E 46 |(34)DN$.(34)...F| 00000660: 05 A0 32 3A 4D 44 B2 32 31 3A 8D 34 30 30 3A 99 |..2:MD.21:.400:.| 00000670: 22 93 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F |".DO YOU WISH TO| 00000680: 20 44 4F 00 A8 0E 50 05 99 22 41 4E 4F 54 48 45 | DO...P.."ANOTHE| 00000690: 52 20 44 49 53 4B 45 54 54 45 3F 20 28 59 2F 4E |R DISKETTE? (Y/N| 000006A0: 29 12 22 3B 3A 85 46 24 00 B9 0E 5A 05 8B 46 24 |).";:.F$...Z..F$| 000006B0: B2 22 59 22 A7 31 30 34 30 00 CC 0E 64 05 8B 46 |."Y".1040...d..F| 000006C0: 24 B2 22 4E 22 A7 9E 36 34 37 33 38 00 D6 0E 6E |$."N"..64738...n| 000006D0: 05 89 31 30 34 30 00 00 00 |..1040... |
.......53280,02:.53281, 1.M.... "...
MEGASOFT (C) 1984 "...
...".. DISK ID CHANGER
.."......9,0,0:.15,8,15......59468
,12.E...MD$.".":.I.1.20:MD$.MD$.".":....
(..I.1.39:BL$.BL$." ":....2.P0$.".......
DISK NAME CHANGER:.$.<.RE$.". P
RESS .RETURN.A.F..2,OUT OF RANGE,TOO LON
G.A.P..A:.EM$(A):.I.1.A:.EM$(I):..K.C..1
000.~.D..15,ER:.ER.0.....N..15,ER,EM$,ET
$,ES$.K.X..MD$". DISK ERROR!. #"ER
" "EM$" "ET$", "ES$.Q.......H..9,Q$:.:Q1
$.H(Q$,1):....,. 2: 15:.59468,PK:.".":..
.....H(MD$,MD)BL$:.BL$.0....H(MD$,MD);:.
.?...MD.21:.400.E....".UNACCEPTABLE ENTR
Y -- "EM$(EM).X....RE$:.200:.400.~......
...F.0:.P0$......".ON WHICH DRIVE FOR CH
ANGES?(0/1).";:.Q$.....DV.E(Q$):. IFDV<0
ORDV>1THEM=1:GO1000......DV.0.Q1$.."0".E
M.1.!....P0$:.".PLACE DISK IN DRIVE"DV".
"./....RE$:.200.F.$..15,"I".D(DV):.100.P
....2,8,2,"#":.15,"U1:2";DV;",18,0":.100
...8..15,"B-P:2,144":.100:DN$.""...B..I.
1.16:.#2,A$:DN$.DN$.A$:..F.L.MD.10:.400:
. F .....M.. "... MEGASOFT (C)
1984 "...N..".. D
ISK ID CHANGER ..".H.V.."THE
DISK NAME IS:..._.`...18)G(34)DN$G(34).
I.J.MD.13.S...MD.16......"..."," ENT
ER..C....".ENTER.NEW DISK NAME":."LIMIT
TO 16 CHARACTERS ."......200:.C(Q$).16.E
M.2:.500:MD.18:.400:.1190.....NDN$.H(Q$.
BL$,16).....MD.21:.400.0.D.."SHALL I SEN
D ."NDN$.B.N.."TO THE DISKETTE ON DRIVE"
DV"? (Y/N).";:.200.L.X..1270......Q1$.."
N"..400:MD.18:.1170......1210.....MD.21:
."BE PATIENT....H....15,"B-P:2,144":.100
.Z....2,NDN$;:.100......15,"U2:2";DV;",1
8,0":.100......15,"I".D(DV):.100: 2.*.(.
F.1:.P0$:.1060:F.0.F.2.."THE NEW DISK NA
ME IS:.\.<.."."G(34)DN$G(34)...F. 2:MD.2
1:.400:.".DO YOU WISH TO DO...P.."ANOTHE
R DISKETTE? (Y/N).";:.F$...Z..F$."Y".104
0.L.D..F$."N"..64738.V.N..1040...
> CLICK IMAGE PREVIEW FOR FULL MODAL