NEW NAME
FILE INFORMATION
FILENAME(S): NEW NAME
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-10-19 22:35:44
APPEARS ON: 1 disk(s)
FILE HASH
21414e6a56511f46be14c30e0ab9604e8157570979f20719474975f346f5ad8b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COPIER | NEW NAME | PRG | Radd Maxx | 27 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 02 00 8F 20 2A 2A 2A 20 4E 45 57 20 |..*.... *** NEW | 00000010: 4E 41 4D 45 20 2A 2A 2A 20 44 49 53 4B 20 4E 41 |NAME *** DISK NA| 00000020: 4D 45 20 43 48 41 4E 47 45 52 00 4F 08 03 00 8F |ME CHANGER.O....| 00000030: 20 50 41 47 45 20 31 32 30 20 20 43 4F 4D 4D 41 | PAGE 120 COMMA| 00000040: 4E 44 45 52 20 20 53 45 50 54 20 31 39 38 33 00 |NDER SEPT 1983.| 00000050: 74 08 04 00 8F 20 4D 4F 44 49 46 49 45 44 20 54 |t.... MODIFIED T| 00000060: 4F 20 57 4F 52 4B 20 42 59 20 41 20 46 20 48 41 |O WORK BY A F HA| 00000070: 52 53 43 48 00 88 08 0A 00 9F 39 2C 30 2C 30 3A |RSCH......9,0,0:| 00000080: 9F 31 35 2C 38 2C 31 35 00 A5 08 0F 00 97 35 33 |.15,8,15......53| 00000090: 32 38 30 2C 31 34 3A 8F 20 42 4F 52 44 45 52 20 |280,14:. BORDER | 000000A0: 43 4F 4C 4F 52 00 C2 08 10 00 97 35 33 32 38 31 |COLOR......53281| 000000B0: 2C 31 35 3A 8F 20 53 43 52 45 45 4E 20 43 4F 4C |,15:. SCREEN COL| 000000C0: 4F 52 00 D0 08 14 00 97 35 39 34 36 38 2C 31 32 |OR......59468,12| 000000D0: 00 F2 08 1E 00 4D 44 24 B2 22 13 22 3A 81 49 B2 |.....MD$.".":.I.| 000000E0: 31 A4 32 30 3A 4D 44 24 B2 4D 44 24 AA 22 11 22 |1.20:MD$.MD$."."| 000000F0: 3A 82 00 0C 09 28 00 81 49 B2 31 A4 33 39 3A 42 |:....(..I.1.39:B| 00000100: 4C 24 B2 42 4C 24 AA 22 20 22 3A 82 00 3E 09 32 |L$.BL$." ":..>.2| 00000110: 00 50 30 24 B2 22 93 1D 1D 1D 1D 12 1C 4E 45 57 |.P0$.".......NEW| 00000120: 20 4E 41 4D 45 20 20 20 20 28 44 49 53 4B 20 4E | NAME (DISK N| 00000130: 41 4D 45 20 43 48 41 4E 47 45 52 29 1F 22 00 5C |AME CHANGER).".\| 00000140: 09 3C 00 52 45 24 B2 22 50 52 45 53 53 20 20 20 |.<.RE$."PRESS | 00000150: 20 1F 12 52 45 54 55 52 4E 92 20 22 00 79 09 46 | ..RETURN. ".y.F| 00000160: 00 83 32 2C 4F 55 54 20 4F 46 20 52 41 4E 47 45 |..2,OUT OF RANGE| 00000170: 2C 54 4F 4F 20 4C 4F 4E 47 00 99 09 50 00 87 41 |,TOO LONG...P..A| 00000180: 3A 86 45 4D 24 28 41 29 3A 81 49 B2 31 A4 41 3A |:.EM$(A):.I.1.A:| 00000190: 87 45 4D 24 28 49 29 3A 82 00 A3 09 63 00 89 31 |.EM$(I):....c..1| 000001A0: 30 30 30 00 B6 09 64 00 84 31 35 2C 45 52 3A 8B |000...d..15,ER:.| 000001B0: 45 52 B2 30 A7 8E 00 CD 09 6E 00 84 31 35 2C 45 |ER.0.....n..15,E| 000001C0: 52 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 FC 09 |R,EM$,ET$,ES$...| 000001D0: 78 00 99 4D 44 24 22 12 44 49 53 4B 20 45 52 52 |x..MD$".DISK ERR| 000001E0: 4F 52 21 92 20 23 22 45 52 22 20 22 45 4D 24 22 |OR!. #"ER" "EM$"| 000001F0: 20 22 45 54 24 22 2C 20 22 45 53 24 00 02 0A 82 | "ET$", "ES$....| 00000200: 00 80 00 1C 0A C8 00 84 39 2C 51 24 3A 99 3A 51 |........9,Q$:.:Q| 00000210: 31 24 B2 C8 28 51 24 2C 31 29 3A 8E 00 46 0A 2C |1$..(Q$,1):..F.,| 00000220: 01 A0 32 3A A0 31 35 3A 97 35 39 34 36 38 2C 50 |..2:.15:.59468,P| 00000230: 4B 3A 99 22 93 22 3A 99 22 1F 1D 1D 1D 1D 1D 1D |K:.".":.".......| 00000240: 45 4E 44 22 3A 80 00 5D 0A 90 01 99 C8 28 4D 44 |END":..].....(MD| 00000250: 24 2C 4D 44 29 42 4C 24 3A 99 42 4C 24 00 6F 0A |$,MD)BL$:.BL$.o.| 00000260: 9A 01 99 C8 28 4D 44 24 2C 4D 44 29 3B 3A 8E 00 |....(MD$,MD);:..| 00000270: 7E 0A F4 01 4D 44 B2 32 31 3A 8D 34 30 30 00 A4 |~...MD.21:.400..| 00000280: 0A FE 01 99 22 12 55 4E 41 43 43 45 50 54 41 42 |....".UNACCEPTAB| 00000290: 4C 45 20 45 4E 54 52 59 20 2D 2D 20 22 45 4D 24 |LE ENTRY -- "EM$| 000002A0: 28 45 4D 29 00 B2 0A 08 02 99 52 45 24 3A 8D 32 |(EM)......RE$:.2| 000002B0: 30 30 00 B8 0A 12 02 8E 00 C5 0A E8 03 46 B2 30 |00...........F.0| 000002C0: 3A 99 50 30 24 00 F7 0A ED 03 99 22 11 4F 4E 20 |:.P0$......".ON | 000002D0: 57 48 49 43 48 20 44 52 49 56 45 20 46 4F 52 20 |WHICH DRIVE FOR | 000002E0: 43 48 41 4E 47 45 53 3F 20 28 30 2F 31 29 20 12 |CHANGES? (0/1) .| 000002F0: 22 3B 3A 8D 32 30 30 00 1A 0B FC 03 44 56 B2 C5 |";:.200.....DV..| 00000300: 28 51 24 29 3A 8B 44 56 B3 30 B0 44 56 B1 31 A7 |(Q$):.DV.0.DV.1.| 00000310: 45 4D B2 31 3A 89 31 30 30 30 00 32 0B 06 04 8B |EM.1:.1000.2....| 00000320: 44 56 B2 30 AF 51 31 24 B3 B1 22 30 22 A7 45 4D |DV.0.Q1$.."0".EM| 00000330: B2 31 00 58 0B 10 04 99 50 30 24 3A 99 22 11 50 |.1.X....P0$:.".P| 00000340: 4C 41 43 45 20 44 49 53 4B 20 49 4E 20 44 52 49 |LACE DISK IN DRI| 00000350: 56 45 22 44 56 22 11 22 00 66 0B 1A 04 99 52 45 |VE"DV".".f....RE| 00000360: 24 3A 8D 32 30 30 00 7D 0B 24 04 98 31 35 2C 22 |$:.200.}.$..15,"| 00000370: 49 22 AA C4 28 44 56 29 3A 8D 31 30 30 00 A7 0B |I"..(DV):.100...| 00000380: 2E 04 9F 32 2C 38 2C 32 2C 22 23 22 3A 98 31 35 |...2,8,2,"#":.15| 00000390: 2C 22 55 31 3A 32 22 3B 44 56 3B 22 2C 31 38 2C |,"U1:2";DV;",18,| 000003A0: 30 22 3A 8D 31 30 30 00 C7 0B 38 04 98 31 35 2C |0":.100...8..15,| 000003B0: 22 42 2D 50 3A 32 2C 31 34 34 22 3A 8D 31 30 30 |"B-P:2,144":.100| 000003C0: 3A 44 4E 24 B2 22 22 00 E7 0B 42 04 81 49 B2 31 |:DN$.""...B..I.1| 000003D0: A4 31 36 3A A1 23 32 2C 41 24 3A 44 4E 24 B2 44 |.16:.#2,A$:DN$.D| 000003E0: 4E 24 AA 41 24 3A 82 00 FA 0B 4C 04 4D 44 B2 37 |N$.A$:....L.MD.7| 000003F0: 3A 8D 34 30 30 3A 8B 46 A7 8E 00 1C 0C 56 04 99 |:.400:.F.....V..| 00000400: 22 54 48 45 20 50 52 45 53 45 4E 54 20 44 49 53 |"THE PRESENT DIS| 00000410: 4B 20 4E 41 4D 45 20 49 53 22 3A 99 00 35 0C 60 |K NAME IS":..5.`| 00000420: 04 99 A3 35 29 22 90 22 C7 28 33 34 29 44 4E 24 |...5)".".(34)DN$| 00000430: C7 28 33 34 29 00 44 0C 6A 04 4D 44 B2 31 31 3A |.(34).D.j.MD.11:| 00000440: 8D 34 30 30 00 74 0C 74 04 99 22 1F 44 4F 20 59 |.400.t.t..".DO Y| 00000450: 4F 55 20 57 49 53 48 20 54 4F 20 43 48 41 4E 47 |OU WISH TO CHANG| 00000460: 45 20 49 54 3F 20 28 59 2F 4E 29 20 12 22 3B 3A |E IT? (Y/N) .";:| 00000470: 8D 32 30 30 00 86 0C 7E 04 8B 51 31 24 B2 22 4E |.200...~..Q1$."N| 00000480: 22 A7 31 33 35 30 00 99 0C 88 04 8B 51 31 24 B3 |".1350......Q1$.| 00000490: B1 22 59 22 A7 31 31 33 30 00 A8 0C 92 04 4D 44 |."Y".1130.....MD| 000004A0: B2 31 33 3A 8D 34 30 30 00 EF 0C 9C 04 99 22 45 |.13:.400......"E| 000004B0: 4E 54 45 52 20 4E 45 57 20 44 49 53 4B 20 4E 41 |NTER NEW DISK NA| 000004C0: 4D 45 20 28 4C 49 4D 49 54 20 4E 41 4D 45 20 54 |ME (LIMIT NAME T| 000004D0: 4F 20 41 20 4D 41 58 4F 46 20 31 36 20 43 48 41 |O A MAXOF 16 CHA| 000004E0: 52 41 43 54 45 52 53 29 22 3A 99 22 12 22 3B 00 |RACTERS)":.".";.| 000004F0: 12 0D A6 04 8D 32 30 30 3A 8B C3 28 51 24 29 B1 |.....200:..(Q$).| 00000500: 31 36 A7 45 4D B2 32 3A 8D 35 30 30 3A 89 31 31 |16.EM.2:.500:.11| 00000510: 37 30 00 28 0D B0 04 4E 44 4E 24 B2 C8 28 51 24 |70.(...NDN$..(Q$| 00000520: AA 42 4C 24 2C 31 36 29 00 37 0D BA 04 4D 44 B2 |.BL$,16).7...MD.| 00000530: 32 31 3A 8D 34 30 30 00 5A 0D C4 04 99 22 53 48 |21:.400.Z...."SH| 00000540: 41 4C 4C 20 49 20 53 45 4E 44 20 54 48 45 20 4E |ALL I SEND THE N| 00000550: 41 4D 45 20 12 22 4E 44 4E 24 00 8D 0D CE 04 99 |AME ."NDN$......| 00000560: 22 54 4F 20 54 48 45 20 44 49 53 4B 45 54 54 45 |"TO THE DISKETTE| 00000570: 20 4F 4E 20 44 52 49 56 45 22 44 56 22 3F 20 28 | ON DRIVE"DV"? (| 00000580: 59 2F 4E 29 20 12 22 3B 3A 8D 32 30 30 00 9D 0D |Y/N) .";:.200...| 00000590: D0 04 8B 51 24 B2 22 4E 22 89 33 30 30 00 AE 0D |...Q$."N".300...| 000005A0: D3 04 8B 51 24 B2 22 59 22 89 31 32 37 30 00 B8 |...Q$."Y".1270..| 000005B0: 0D D8 04 89 31 32 31 30 00 D7 0D E2 04 8B 51 31 |....1210......Q1| 000005C0: 24 B3 B1 22 4E 22 A7 8D 34 30 30 3A 4D 44 B2 31 |$.."N"..400:MD.1| 000005D0: 38 3A 89 31 31 37 30 00 E1 0D EC 04 89 31 32 31 |8:.1170......121| 000005E0: 30 00 02 0E F6 04 4D 44 B2 32 34 3A 8D 34 30 30 |0.....MD.24:.400| 000005F0: 3A 99 22 12 42 45 20 50 41 54 49 45 4E 54 2E 2E |:.".BE PATIENT..| 00000600: 2E 22 00 1B 0E 00 05 98 31 35 2C 22 42 2D 50 3A |."......15,"B-P:| 00000610: 32 2C 31 34 34 22 3A 8D 31 30 30 00 2D 0E 0A 05 |2,144":.100.-...| 00000620: 98 32 2C 4E 44 4E 24 3B 3A 8D 31 30 30 00 4C 0E |.2,NDN$;:.100.L.| 00000630: 14 05 98 31 35 2C 22 55 32 3A 32 22 3B 44 56 3B |...15,"U2:2";DV;| 00000640: 22 2C 31 38 2C 30 22 3A 8D 31 30 30 00 66 0E 1E |",18,0":.100.f..| 00000650: 05 98 31 35 2C 22 49 22 AA C4 28 44 56 29 3A 8D |..15,"I"..(DV):.| 00000660: 31 30 30 3A A0 32 00 7D 0E 28 05 46 B2 31 3A 99 |100:.2.}.(.F.1:.| 00000670: 50 30 24 3A 8D 31 30 36 30 3A 46 B2 30 00 9B 0E |P0$:.1060:F.0...| 00000680: 32 05 99 22 54 48 45 20 4E 45 57 20 44 49 53 4B |2.."THE NEW DISK| 00000690: 20 4E 41 4D 45 20 49 53 22 3A 99 00 B4 0E 3C 05 | NAME IS":....<.| 000006A0: 99 A3 35 29 22 90 22 C7 28 33 34 29 44 4E 24 C7 |..5)".".(34)DN$.| 000006B0: 28 33 34 29 00 C6 0E 46 05 A0 32 3A 4D 44 B2 32 |(34)...F..2:MD.2| 000006C0: 31 3A 8D 34 30 30 00 EE 0E 50 05 99 22 1F 41 4E |1:.400...P..".AN| 000006D0: 4F 54 48 45 52 20 44 49 53 4B 45 54 54 45 3F 20 |OTHER DISKETTE? | 000006E0: 28 59 2F 4E 29 20 12 22 3B 3A 8D 32 30 30 00 FF |(Y/N) .";:.200..| 000006F0: 0E 5A 05 8B 51 24 B2 22 59 22 A7 31 30 34 30 00 |.Z..Q$."Y".1040.| 00000700: 0F 0F 64 05 8B 51 24 B2 22 4E 22 A7 33 30 30 00 |..d..Q$."N".300.| 00000710: 19 0F 6E 05 89 31 33 35 30 00 00 00 |..n..1350... |
..*.... *** NEW NAME *** DISK NAME CHANG ER.O.... PAGE 120 COMMANDER SEPT 1983. T.... MODIFIED TO WORK BY A F HARSCH.... ..9,0,0:.15,8,15......53280,14:. BORDER COLOR.B....53281,15:. SCREEN COLOR.P.... 59468,12.....MD$.".":.I.1.20:MD$.MD$."." :....(..I.1.39:BL$.BL$." ":..>.2.P0$.".. .....NEW NAME (DISK NAME CHANGER).".\ .<.RE$."PRESS ..RETURN. ".Y.F..2,OUT OF RANGE,TOO LONG...P..A:.EM$(A):.I.1.A: .EM$(I):....C..1000...D..15,ER:.ER.0...M .N..15,ER,EM$,ET$,ES$...X..MD$".DISK ERR OR!. #"ER" "EM$" "ET$", "ES$.........H.. 9,Q$:.:Q1$.H(Q$,1):..F.,. 2: 15:.59468,P K:.".":.".......END":..]....H(MD$,MD)BL$ :.BL$.O....H(MD$,MD);:..~...MD.21:.400.. ....".UNACCEPTABLE ENTRY -- "EM$(EM).... ..RE$:.200.......E...F.0:.P0$......".ON WHICH DRIVE FOR CHANGES? (0/1) .";:.200. ....DV.E(Q$):.DV.0.DV.1.EM.1:.1000.2.... DV.0.Q1$.."0".EM.1.X....P0$:.".PLACE DIS K IN DRIVE"DV".".F....RE$:.200.}.$..15," I".D(DV):.100......2,8,2,"#":.15,"U1:2"; DV;",18,0":.100.G.8..15,"B-P:2,144":.100 :DN$.""...B..I.1.16:.#2,A$:DN$.DN$.A$:.. ..L.MD.7:.400:.F.....V.."THE PRESENT DIS K NAME IS":..5.`...5)"."G(34)DN$G(34).D. J.MD.11:.400.T.T..".DO YOU WISH TO CHANG E IT? (Y/N) .";:.200...~..Q1$."N".1350.. ....Q1$.."Y".1130.....MD.13:.400......"E NTER NEW DISK NAME (LIMIT NAME TO A MAXO F 16 CHARACTERS)":.".";......200:.C(Q$). 16.EM.2:.500:.1170.(...NDN$.H(Q$.BL$,16) .7...MD.21:.400.Z.D.."SHALL I SEND THE N AME ."NDN$...N.."TO THE DISKETTE ON DRIV E"DV"? (Y/N) .";:.200...P..Q$."N".300... S..Q$."Y".1270...X..1210.W....Q1$.."N".. 400:MD.18:.1170......1210.....MD.24:.400 :.".BE PATIENT..."......15,"B-P:2,144":. 100.-....2,NDN$;:.100.L....15,"U2:2";DV; ",18,0":.100.F....15,"I".D(DV):.100: 2.} .(.F.1:.P0$:.1060:F.0...2.."THE NEW DISK NAME IS":....<...5)"."G(34)DN$G(34).F.F . 2:MD.21:.400...P..".ANOTHER DISKETTE? (Y/N) .";:.200...Z..Q$."Y".1040...D..Q$. "N".300...N..1350...
> CLICK IMAGE PREVIEW FOR FULL MODAL