DISKETTEN-NAME

FILE INFORMATION

FILENAME(S): DISKETTEN-NAME

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-12-02 22:47:37

APPEARS ON: 2 disk(s)

FILE HASH

005f9bbce303f2dc7002354db11be8747826be344f35d9aec3ed949a65bead1d

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
FLOPPY PROGRAMME	DISKETTEN-NAME	PRG	swasti, charly	19	0	DOWNLOAD FILE
HILFSPROGRAMME 1	DISKETTEN-NAME	PRG	swasti, charly	16	3	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 2C 08 0A 00 99 20  22 93 11 20 44 49 53 4B  |..,.... ".. DISK|
00000010: 45 54 54 45 4E 2D 4E 41  4D 45 4E 2D 41 45 4E 44  |ETTEN-NAMEN-AEND|
00000020: 45 52 2D 50 52 4F 47 52  41 4D 4D 22 00 57 08 14  |ER-PROGRAMM".W..|
00000030: 00 99 20 22 11 20 44 49  53 4B 20 47 45 52 41 45  |.. ". DISK GERAE|
00000040: 54 45 2D 4E 52 20 28 38  2D 31 35 29 20 3F A0 38  |TE-NR (8-15) ?.8|
00000050: 20 9D 9D 9D 9D 22 3B 00  7D 08 1E 00 85 20 55 3A  | ....";.}.... U:|
00000060: 20 8B 20 55 B3 38 20 B0  20 55 B1 31 35 20 A7 20  | . U.8 . U.15 . |
00000070: 99 20 22 91 91 91 22 3A  20 89 20 32 30 00 A3 08  |. "...": . 20...|
00000080: 28 00 99 20 22 11 20 44  49 53 4B 20 44 52 49 56  |(.. ". DISK DRIV|
00000090: 45 20 4E 52 20 28 30 2F  31 29 20 3F A0 30 9D 9D  |E NR (0/1) ?.0..|
000000A0: 9D 22 3B 00 C8 08 32 00  85 20 44 3A 20 8B 20 44  |.";...2.. D: . D|
000000B0: B3 30 20 B0 20 44 B1 31  20 A7 20 99 20 22 91 91  |.0 . D.1 . . "..|
000000C0: 91 22 3A 20 89 20 34 30  00 F7 08 3C 00 99 20 22  |.": . 40...<.. "|
000000D0: 11 11 20 44 49 53 4B 45  54 54 45 20 49 4E 20 44  |.. DISKETTE IN D|
000000E0: 49 45 20 46 4C 4F 50 50  59 22 3B 55 3B 22 20 44  |IE FLOPPY";U;" D|
000000F0: 52 49 56 45 22 3B 44 00  1C 09 46 00 99 20 22 11  |RIVE";D...F.. ".|
00000100: 20 44 41 4E 41 43 48 20  45 49 4E 45 20 54 41 53  | DANACH EINE TAS|
00000110: 54 45 20 44 52 55 45 43  4B 45 4E 22 00 32 09 50  |TE DRUECKEN".2.P|
00000120: 00 A1 20 58 24 3A 20 8B  20 58 24 B2 22 22 A7 20  |.. X$: . X$."". |
00000130: 38 30 00 55 09 5A 00 41  B2 31 3A 20 56 B2 31 36  |80.U.Z.A.1: V.16|
00000140: 3A 20 51 24 B2 C7 28 33  34 29 3A 20 50 24 B2 C7  |: Q$..(34): P$..|
00000150: 28 31 36 30 29 00 75 09  64 00 54 B2 31 38 3A 20  |(160).u.d.T.18: |
00000160: 53 B2 30 3A 20 49 24 B2  22 49 22 AA C9 28 C4 28  |S.0: I$."I"..(.(|
00000170: 44 29 2C 31 29 00 8C 09  6E 00 9F 20 31 2C 55 2C  |D),1)...n.. 1,U,|
00000180: 31 35 2C 49 24 3A 20 8D  20 33 35 30 00 AE 09 78  |15,I$: . 350...x|
00000190: 00 8D 20 33 31 30 3A 20  46 24 B2 48 24 3A 20 A1  |.. 310: F$.H$: .|
000001A0: 23 32 2C 58 24 2C 58 24  2C 41 24 2C 42 24 00 D7  |#2,X$,X$,A$,B$..|
000001B0: 09 82 00 99 20 22 93 11  11 20 4A 45 54 5A 49 47  |.... "... JETZIG|
000001C0: 45 52 20 44 49 53 4B 2D  4E 41 4D 45 20 22 3B 51  |ER DISK-NAME ";Q|
000001D0: 24 3B 46 24 3B 51 24 00  F5 09 8C 00 99 20 22 20  |$;F$;Q$...... " |
000001E0: 44 49 53 4B 20 49 44 20  49 53 54 3A 20 20 22 3B  |DISK ID IST:  ";|
000001F0: 41 24 3B 42 24 00 27 0A  96 00 99 20 22 11 20 4E  |A$;B$.'.... ". N|
00000200: 45 55 45 52 20 4E 41 4D  45 20 28 4D 41 58 20 31  |EUER NAME (MAX 1|
00000210: 36 20 42 55 43 48 53 54  2E 29 20 4F 44 45 52 20  |6 BUCHST.) ODER |
00000220: 27 45 4E 44 45 27 22 00  56 0A A0 00 85 20 22 20  |'ENDE'".V.... " |
00000230: 3F 20 45 4E 44 45 9D 9D  9D 9D 9D 9D 22 3B 4E 24  |? ENDE......";N$|
00000240: 3A 20 4C B2 C3 28 4E 24  29 3A 20 8B 20 4C B1 56  |: L..(N$): . L.V|
00000250: 20 A7 20 31 33 30 00 76  0A AA 00 8B 20 4E 24 B2  | . 130.v.... N$.|
00000260: 22 45 4E 44 45 22 20 A7  20 99 20 22 93 22 3B 3A  |"ENDE" . . ".";:|
00000270: 20 89 20 33 37 30 00 AA  0A B4 00 99 20 22 11 20  | . 370...... ". |
00000280: 46 45 52 54 49 47 20 46  55 45 52 20 4E 41 4D 45  |FERTIG FUER NAME|
00000290: 4E 53 41 45 4E 44 45 52  55 4E 47 20 28 4A 2F 4E  |NSAENDERUNG (J/N|
000002A0: 29 20 3F 20 4A 9D 9D 9D  22 3B 00 C4 0A BE 00 85  |) ? J...";......|
000002B0: 20 58 24 3A 20 8B 20 58  24 B3 B1 22 4A 22 20 A7  | X$: . X$.."J" .|
000002C0: 20 31 33 30 00 D4 0A C8  00 8B 20 4C B2 56 20 A7  | 130...... L.V .|
000002D0: 20 32 32 30 00 F1 0A D2  00 81 20 58 B2 4C AA 41  | 220...... X.L.A|
000002E0: 20 A4 20 56 3A 20 4E 24  B2 4E 24 AA 50 24 3A 20  | . V: N$.N$.P$: |
000002F0: 82 00 0D 0B DC 00 98 31  2C 22 42 2D 50 3A 22 3B  |.......1,"B-P:";|
00000300: 32 3B 31 34 34 3A 20 98  32 2C 4E 24 3B 00 29 0B  |2;144: .2,N$;.).|
00000310: E6 00 98 31 2C 22 55 32  3A 22 3B 32 3B 44 3B 54  |...1,"U2:";2;D;T|
00000320: 3B 53 3A 20 8D 20 33 35  30 00 3F 0B F0 00 98 31  |;S: . 350.?....1|
00000330: 2C 49 24 3A 20 8D 20 33  35 30 3A 20 A0 20 32 00  |,I$: . 350: . 2.|
00000340: 63 0B FA 00 99 20 22 11  20 41 4C 54 45 52 20 44  |c.... ". ALTER D|
00000350: 49 53 4B 2D 4E 41 4D 45  20 22 3B 51 24 3B 46 24  |ISK-NAME ";Q$;F$|
00000360: 3B 51 24 00 77 0B 04 01  8D 20 33 31 30 3A 20 A0  |;Q$.w.... 310: .|
00000370: 20 32 3A 20 A0 20 31 00  9B 0B 0E 01 99 20 22 11  | 2: . 1...... ".|
00000380: 20 4E 45 55 45 52 20 44  49 53 4B 2D 4E 41 4D 45  | NEUER DISK-NAME|
00000390: 20 22 3B 51 24 3B 48 24  3B 51 24 00 CF 0B 18 01  | ";Q$;H$;Q$.....|
000003A0: 99 20 22 11 20 57 49 4C  4C 53 54 20 44 55 20 4E  |. ". WILLST DU N|
000003B0: 4F 43 48 20 45 49 4E 45  20 41 45 4E 44 45 52 4E  |OCH EINE AENDERN|
000003C0: 20 28 4A 2F 4E 29 20 3F  20 4A 9D 9D 9D 22 3B 00  | (J/N) ? J...";.|
000003D0: E7 0B 22 01 85 20 58 24  3A 20 8B 20 58 24 B2 22  |..".. X$: . X$."|
000003E0: 4A 22 20 A7 20 36 30 00  F5 0B 2C 01 99 20 22 93  |J" . 60...,.. ".|
000003F0: 22 3B 3A 20 80 00 13 0C  36 01 9F 20 32 2C 55 2C  |";: ....6.. 2,U,|
00000400: 32 2C 22 23 22 3A 20 8D  20 33 35 30 3A 20 48 24  |2,"#": . 350: H$|
00000410: B2 22 22 00 2F 0C 40 01  98 31 2C 22 55 31 3A 22  |.""./.@..1,"U1:"|
00000420: 3B 32 3B 44 3B 54 3B 53  3A 20 8D 20 33 35 30 00  |;2;D;T;S: . 350.|
00000430: 4E 0C 4A 01 98 31 2C 22  42 2D 50 3A 22 3B 32 3B  |N.J..1,"B-P:";2;|
00000440: 31 34 34 3A 20 81 20 58  B2 41 20 A4 20 56 00 69  |144: . X.A . V.i|
00000450: 0C 54 01 A1 23 32 2C 54  24 3A 20 48 24 B2 48 24  |.T..#2,T$: H$.H$|
00000460: AA 54 24 3A 20 82 3A 20  8E 00 83 0C 5E 01 84 31  |.T$: .: ....^..1|
00000470: 2C 45 2C 4D 24 2C 4A 2C  4B 3A 8B 20 45 B2 30 20  |,E,M$,J,K:. E.0 |
00000480: A7 20 8E 00 9E 0C 68 01  99 20 22 11 20 45 52 52  |. ....h.. ". ERR|
00000490: 4F 52 3A 20 22 3B 45 3B  4D 24 3B 4A 3B 4B 00 AE  |OR: ";E;M$;J;K..|
000004A0: 0C 72 01 A0 20 32 3A 20  A0 20 31 3A 20 80 00 00  |.r.. 2: . 1: ...|
000004B0: 00                                                |.               |

..,.... ".. DISKETTEN-NAMEN-AENDER-PROGR
AMM".W.... ". DISK GERAETE-NR (8-15) ? 8
 ....";.}.... U: . U.8 . U.15 . . "...":
 . 20...(.. ". DISK DRIVE NR (0/1) ? 0..
.";.H.2.. D: . D.0 . D.1 . . "...": . 40
...<.. ".. DISKETTE IN DIE FLOPPY";U;" D
RIVE";D...F.. ". DANACH EINE TASTE DRUEC
KEN".2.P.. X$: . X$."". 80.U.Z.A.1: V.16
: Q$.G(34): P$.G(160).U.D.T.18: S.0: I$.
"I".I(D(D),1)...N.. 1,U,15,I$: . 350...X
.. 310: F$.H$: .#2,X$,X$,A$,B$.W.... "..
. JETZIGER DISK-NAME ";Q$;F$;Q$...... " 
DISK ID IST:  ";A$;B$.'.... ". NEUER NAM
E (MAX 16 BUCHST.) ODER 'ENDE'".V. .. " 
? ENDE......";N$: L.C(N$): . L.V . 130.V
.... N$."ENDE" . . ".";: . 370...... ". 
FERTIG FUER NAMENSAENDERUNG (J/N) ? J...
";.D.... X$: . X$.."J" . 130.T.H.. L.V .
 220...R.. X.L.A . V: N$.N$.P$: .......1
,"B-P:";2;144: .2,N$;.)....1,"U2:";2;D;T
;S: . 350.?....1,I$: . 350:   2.C.... ".
 ALTER DISK-NAME ";Q$;F$;Q$.W.... 310:  
 2:   1...... ". NEUER DISK-NAME ";Q$;H$
;Q$.O.... ". WILLST DU NOCH EINE AENDERN
 (J/N) ? J...";...".. X$: . X$."J" . 60.
..,.. ".";: ....6.. 2,U,2,"#": . 350: H$
.""./.@..1,"U1:";2;D;T;S: . 350.N.J..1,"
B-P:";2;144: . X.A . V.I.T..#2,T$: H$.H$
.T$: .: ....^..1,E,M$,J,K:. E.0 . ....H.
. ". ERROR: ";E;M$;J;K...R.  2:   1: ...
.

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL