DISKCHANGE
FILE INFORMATION
FILENAME(S): DISKCHANGE
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-12-02 23:08:21
APPEARS ON: 2 disk(s)
FILE HASH
3f2a4af6393129be1db15baf09a93d938c8939df3db455da2e8381d26a016899
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ROLANDO DISK | DISKCHANGE | PRG | swasti, misc | 25 | 1 | DOWNLOAD FILE |
| TEST | DISKCHANGE | PRG | swasti, misc | 16 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 EC 08 01 00 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |......::::::::::| 00000010: 3A 3A 3A 3A 3A 3A 3A 3A 4E 4D 24 B2 22 2A 2A 20 |::::::::NM$."** | 00000020: C4 A0 C9 A0 D3 A0 CB A0 C3 A0 C8 A0 C1 A0 CE A0 |................| 00000030: C7 A0 C5 A0 2A 2A 20 28 43 29 20 31 39 38 34 20 |....** (C) 1984 | 00000040: 20 42 59 20 2D CB D3 CB 2D 20 2A 2A 20 57 49 54 | BY -...- ** WIT| 00000050: 48 20 54 48 49 53 20 50 52 4F 47 52 41 4D 22 3A |H THIS PROGRAM":| 00000060: 4E 4D 24 B2 4E 4D 24 AA 22 4D 20 59 4F 55 20 43 |NM$.NM$."M YOU C| 00000070: 41 4E 20 43 48 41 4E 47 45 20 54 48 45 20 44 49 |AN CHANGE THE DI| 00000080: 53 4B 4E 41 4D 45 20 41 4E 44 20 54 48 45 20 49 |SKNAME AND THE I| 00000090: 44 20 57 49 54 48 4F 55 54 20 46 4F 52 4D 41 22 |D WITHOUT FORMA"| 000000A0: 3A 4E 4D 24 B2 4E 4D 24 AA 22 54 49 4E 47 20 54 |:NM$.NM$."TING T| 000000B0: 48 45 20 44 49 53 4B 20 2A 2A 20 59 4F 55 20 41 |HE DISK ** YOU A| 000000C0: 4C 53 4F 20 48 41 56 45 20 41 20 49 44 20 57 49 |LSO HAVE A ID WI| 000000D0: 54 48 20 46 49 56 45 20 4C 45 54 54 45 52 53 2C |TH FIVE LETTERS,| 000000E0: 20 4C 49 4B 45 20 2D 4B 53 4B 2D 22 00 23 09 02 | LIKE -KSK-".#..| 000000F0: 00 4E 4D 24 B2 4E 4D 24 AA 22 20 2A 2A 20 C4 20 |.NM$.NM$." ** . | 00000100: C9 20 D3 20 CB A0 C3 A0 C8 A0 C1 A0 CE A0 C7 A0 |. . ............| 00000110: C5 A0 2A 2A 22 3A 8D 32 30 3A 8D 32 31 3A 45 32 |..**":.20:.21:E2| 00000120: B2 33 38 00 F4 09 03 00 97 36 34 36 2C 30 3A 97 |.38......646,0:.| 00000130: 35 33 32 38 31 2C 31 31 3A 97 35 33 32 38 30 2C |53281,11:.53280,| 00000140: 30 3A 3A 99 22 08 0E 93 12 20 20 20 20 3D 2D 3D |0::.".... =-=| 00000150: 20 20 20 20 C4 20 C9 A0 D3 A0 CB A0 C3 A0 C8 A0 | . ..........| 00000160: C1 A0 CE A0 C7 A0 C5 20 20 20 3D 2D 3D 20 20 20 |....... =-= | 00000170: 20 22 3B 3A 3A 99 22 12 20 20 20 20 20 20 20 20 | ";::.". | 00000180: 20 20 20 28 C3 29 20 31 39 38 34 20 20 20 C2 D9 | (.) 1984 ..| 00000190: 20 2D CB D3 CB 2D 20 20 20 20 20 20 20 20 20 20 | -...- | 000001A0: 22 3B 3A 99 22 12 20 20 20 20 20 20 20 20 20 20 |";:.". | 000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":| 000001D0: 99 22 20 C9 4E 53 45 52 54 20 44 49 53 4B 20 21 |." .NSERT DISK !| 000001E0: 21 22 3A 99 22 11 20 3C 3C 20 D2 C5 D4 D5 D2 CE |!":.". << ......| 000001F0: 20 3E 3E 22 00 04 0A 04 00 8B 41 55 B3 B1 AB 31 | >>"......AU...1| 00000200: A7 8D 32 31 00 19 0A 05 00 8B 41 55 B2 AB 31 A7 |..21......AU..1.| 00000210: 45 31 B2 30 3A 41 55 B2 31 00 4A 0A 06 00 99 22 |E1.0:AU.1.J...."| 00000220: 13 11 11 12 20 22 3B 41 55 24 3B 22 20 22 3A 81 |.... ";AU$;" ":.| 00000230: 53 B2 31 A4 31 30 30 3A 82 3A A1 41 24 3A 8B 41 |S.1.100:.:.A$:.A| 00000240: 24 B3 B1 C7 28 31 33 29 A7 34 00 2A 0B 07 00 99 |$...(13).4.*....| 00000250: 22 13 11 11 11 11 11 11 11 11 20 C4 49 53 4B 4E |"......... .ISKN| 00000260: 41 4D 45 3A 20 20 20 20 20 20 20 20 20 20 20 20 |AME: | 00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000280: 20 20 20 20 20 20 20 20 20 22 3A 99 22 20 C4 49 | ":." .I| 00000290: 53 4B 2D 49 44 20 3A 22 3A 99 22 13 11 11 11 11 |SK-ID :":.".....| 000002A0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................| 000002B0: 22 3B 3A 9F 31 2C 38 2C 31 35 3A 98 31 2C 22 49 |";:.1,8,15:.1,"I| 000002C0: 30 22 3A 9F 38 2C 38 2C 38 2C 22 23 22 3A 98 31 |0":.8,8,8,"#":.1| 000002D0: 2C 22 55 31 3A 22 3B 38 3B 30 3B 31 38 3B 30 3A |,"U1:";8;0;18;0:| 000002E0: 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 34 34 3A |.1,"B-P:";8;144:| 000002F0: 51 24 B2 22 22 3A 81 49 B2 31 A4 31 36 3A A1 23 |Q$."":.I.1.16:.#| 00000300: 38 2C 43 48 24 3A 99 43 48 24 3B 3A 51 24 B2 51 |8,CH$:.CH$;:Q$.Q| 00000310: 24 AA 43 48 24 3A 82 49 3A 99 3A 98 31 2C 22 42 |$.CH$:.I:.:.1,"B| 00000320: 2D 50 3A 22 3B 38 3B 31 36 32 00 A4 0B 08 00 A1 |-P:";8;162......| 00000330: 23 38 2C 43 31 24 2C 43 32 24 2C 43 33 24 2C 43 |#8,C1$,C2$,C3$,C| 00000340: 34 24 2C 43 35 24 3A 99 22 1D 1D 12 1D 1D 1D 1D |4$,C5$:.".......| 00000350: 1D 1D 1D 1D 1D 22 3B 43 31 24 3B 43 32 24 3B 43 |.....";C1$;C2$;C| 00000360: 33 24 3B 43 34 24 3B 43 35 24 3A 99 22 13 11 11 |3$;C4$;C5$:."...| 00000370: 11 11 11 11 11 11 11 11 11 11 20 C3 48 41 4E 47 |.......... .HANG| 00000380: 45 20 CE 41 4D 45 20 28 4A 2F 4E 29 20 3F 22 3A |E .AME (J/N) ?":| 00000390: 47 25 B2 30 3A 8D 31 36 3A 8B 57 24 B3 B1 22 4A |G%.0:.16:.W$.."J| 000003A0: 22 A7 31 30 00 11 0C 09 00 85 22 13 11 11 11 11 |".10......".....| 000003B0: 11 11 11 11 11 11 11 11 11 11 20 CE 45 57 20 C4 |.......... .EW .| 000003C0: 49 53 4B 4E 4E 41 4D 45 20 3A 22 3B 44 4E 24 3A |ISKNNAME :";DN$:| 000003D0: 44 4E 24 B2 C8 28 44 4E 24 AA 22 20 20 20 20 20 |DN$..(DN$." | 000003E0: 20 20 20 20 20 20 20 20 20 20 20 22 2C 31 36 29 | ",16)| 000003F0: 3A 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 34 34 |:.1,"B-P:";8;144| 00000400: 3A 98 38 2C 44 4E 24 3B 3A 47 25 B2 31 3A 89 31 |:.8,DN$;:G%.1:.1| 00000410: 31 00 3C 0C 0A 00 99 22 13 11 11 11 11 11 11 11 |1.<...."........| 00000420: 11 11 11 11 11 11 11 20 CE 45 57 20 C4 49 53 4B |....... .EW .ISK| 00000430: 4E 41 4D 45 20 3A 20 12 22 3B 51 24 00 79 0C 0B |NAME : .";Q$.y..| 00000440: 00 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............| 00000450: 11 11 11 11 20 C3 48 41 4E 47 45 20 2D C9 C4 2D |.... .HANGE -..-| 00000460: 20 28 4A 2F 4E 29 20 3F 22 3A 8D 31 36 3A 8B 57 | (J/N) ?":.16:.W| 00000470: 24 B3 B1 22 4A 22 A7 31 33 00 D7 0C 0C 00 85 22 |$.."J".13......"| 00000480: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000490: 11 11 11 20 CE 45 57 20 2D C9 C4 2D 22 3B 49 44 |... .EW -..-";ID| 000004A0: 24 3A 49 44 24 B2 C8 28 49 44 24 AA 22 20 20 20 |$:ID$..(ID$." | 000004B0: 20 20 22 2C 35 29 3A 98 31 2C 22 42 2D 50 3A 22 | ",5):.1,"B-P:"| 000004C0: 3B 38 3B 31 36 32 3A 98 38 2C 49 44 24 3B 3A 47 |;8;162:.8,ID$;:G| 000004D0: 25 B2 31 3A 89 31 34 00 13 0D 0D 00 99 22 13 11 |%.1:.14......"..| 000004E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000004F0: 11 20 CE 45 57 20 2D C9 C4 2D 20 3A 20 12 22 3B |. .EW -..- : .";| 00000500: 43 31 24 3B 43 32 24 3B 43 33 24 3B 43 34 24 3B |C1$;C2$;C3$;C4$;| 00000510: 43 35 24 00 2F 0D 0E 00 8B 47 25 B2 31 A7 98 31 |C5$./....G%.1..1| 00000520: 2C 22 55 32 3A 22 3B 38 3B 30 3B 31 38 3B 30 00 |,"U2:";8;0;18;0.| 00000530: 44 0D 0F 00 98 31 2C 22 49 30 22 3A A0 38 3A A0 |D....1,"I0":.8:.| 00000540: 31 3A 89 33 00 54 0D 10 00 8B 41 55 B3 B1 AB 31 |1:.3.T....AU...1| 00000550: A7 8D 32 31 00 69 0D 11 00 8B 41 55 B2 AB 31 A7 |..21.i....AU..1.| 00000560: 45 31 B2 30 3A 41 55 B2 31 00 A1 0D 12 00 99 22 |E1.0:AU.1......"| 00000570: 13 11 11 12 20 22 3B 41 55 24 3B 22 20 22 3A 81 |.... ";AU$;" ":.| 00000580: 53 B2 31 A4 31 30 30 3A 82 3A A1 57 24 3A 8B 57 |S.1.100:.:.W$:.W| 00000590: 24 B3 B1 22 4A 22 AF 57 24 B3 B1 22 4E 22 A7 31 |$.."J".W$.."N".1| 000005A0: 36 00 A7 0D 13 00 8E 00 F3 0D 14 00 47 45 24 B2 |6...........GE$.| 000005B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" | 000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000005D0: 20 20 20 20 20 20 20 20 20 22 AA 4E 4D 24 AA 22 | ".NM$."| 000005E0: 20 22 3A 45 4E B2 C3 28 47 45 24 29 3A 45 31 B2 | ":EN..(GE$):E1.| 000005F0: 30 3A 8E 00 21 0E 15 00 45 31 B2 45 31 AA 31 3A |0:..!...E1.E1.1:| 00000600: 41 55 24 B2 CA 28 47 45 24 2C 45 31 2C 45 32 29 |AU$..(GE$,E1,E2)| 00000610: 3A 8B 45 31 B2 45 4E AA 31 A7 41 55 B2 AB 31 3A |:.E1.EN.1.AU..1:| 00000620: 8E 00 2C 0E 16 00 41 55 B2 31 3A 8E 00 63 0E C8 |..,...AU.1:..c..| 00000630: 00 4E 4D 24 B2 4E 4D 24 AA 22 20 2A 2A 20 C4 20 |.NM$.NM$." ** . | 00000640: C9 20 D3 20 CB A0 C3 A0 C8 A0 C1 A0 CE A0 C7 A0 |. . ............| 00000650: C5 A0 2A 2A 22 3A 8D 32 30 3A 8D 32 31 3A 45 32 |..**":.20:.21:E2| 00000660: B2 33 38 00 A7 0E 2C 01 97 36 34 36 2C 30 3A 97 |.38...,..646,0:.| 00000670: 35 33 32 38 31 2C 31 31 3A 97 35 33 32 38 30 2C |53281,11:.53280,| 00000680: 30 3A 3A 99 22 08 0E 93 12 20 20 20 20 3D 2D 3D |0::.".... =-=| 00000690: 20 20 20 20 C4 20 C9 A0 D3 A0 CB A0 C3 A0 C8 A0 | . ..........| 000006A0: C1 A0 CE A0 C7 A0 C5 00 00 00 00 20 |........... |
......::::::::::::::::::NM$."** D I S K
C H A N G E ** (C) 1984 BY -KSK- ** WIT
H THIS PROGRAM":NM$.NM$."M YOU CAN CHANG
E THE DISKNAME AND THE ID WITHOUT FORMA"
:NM$.NM$."TING THE DISK ** YOU ALSO HAVE
A ID WITH FIVE LETTERS, LIKE -KSK-".#..
.NM$.NM$." ** D I S K C H A N G E **":.2
0:.21:E2.38......646,0:.53281,11:.53280,
0::.".... =-= D I S K C H A N G E
=-= ";::.". (C) 1984 BY
-KSK- ";:.".
":." INSERT DISK !
!":.". << RETURN >>"......AU...1..21....
..AU..1.E1.0:AU.1.J....".... ";AU$;" ":.
S.1.100:.:.A$:.A$..G(13).4.*....".......
.. DISKNAME:
":." DISK-ID :":.".............
........";:.1,8,15:.1,"I0":.8,8,8,"#":.1
,"U1:";8;0;18;0:.1,"B-P:";8;144:Q$."":.I
.1.16:.#8,CH$:.CH$;:Q$.Q$.CH$:.I:.:.1,"B
-P:";8;162......#8,C1$,C2$,C3$,C4$,C5$:.
"............";C1$;C2$;C3$;C4$;C5$:."...
.......... CHANGE NAME (J/N) ?":G%.0:.16
:.W$.."J".10......"............... NEW D
ISKNNAME :";DN$:DN$.H(DN$."
",16):.1,"B-P:";8;144:.8,DN$;:G%.1:.1
1.<...."............... NEW DISKNAME : .
";Q$.Y...."................. CHANGE -ID-
(J/N) ?":.16:.W$.."J".13.W...."........
........... NEW -ID-";ID$:ID$.H(ID$."
",5):.1,"B-P:";8;162:.8,ID$;:G%.1:.14.
....."................... NEW -ID- : .";
C1$;C2$;C3$;C4$;C5$./....G%.1..1,"U2:";8
;0;18;0.D....1,"I0": 8: 1:.3.T....AU...1
..21.I....AU..1.E1.0:AU.1......".... ";A
U$;" ":.S.1.100:.:.W$:.W$.."J".W$.."N".1
6...........GE$."
".NM$." ":EN.C(GE$):E1.
0:..!...E1.E1.1:AU$.J(GE$,E1,E2):.E1.EN.
1.AU..1:..,...AU.1:..C.H.NM$.NM$." ** D
I S K C H A N G E **":.20:.21:E2.38...,.
.646,0:.53281,11:.53280,0::.".... =-=
D I S K C H A N G E....
> CLICK IMAGE PREVIEW FOR FULL MODAL