LISTING 25.D
FILE INFORMATION
FILENAME(S): LISTING 25.D
FILE TYPE(S): PRG
FILE SIZE: 916b
FIRST SEEN: 2025-11-30 01:12:32
APPEARS ON: 2 disk(s)
FILE HASH
a2a2258d7818e57d6d0c5ed99d0530e3ec67926dbc17b349005c2a5fe792f747
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SH 4 86 SEITE 1 | LISTING 25.D | PRG | C64er, DuncanTwain | 21 | 2 | DOWNLOAD FILE |
| SH 4 86 SEITE 1 | LISTING 25.D | PRG | DuncanTwain | 21 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..(.... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 0F 00 8F 20 2A |********.O.... *| 00000030: 20 50 52 4F 47 52 41 4D 4D 20 5A 55 4D 20 41 45 | PROGRAMM ZUM AE| 00000040: 4E 44 45 52 4E 20 56 4F 4E 20 20 20 20 20 2A 00 |NDERN VON *.| 00000050: 76 08 14 00 8F 20 2A 20 44 49 53 4B 4E 41 4D 45 |v.... * DISKNAME| 00000060: 20 55 4E 44 20 49 44 20 20 20 20 20 20 20 20 20 | UND ID | 00000070: 20 20 20 20 20 2A 00 9D 08 19 00 8F 20 2A 2A 2A | *...... ***| 00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D1 08 |*************...| 000000A0: 1E 00 99 22 93 12 44 49 53 4B 2D 55 54 49 4C 49 |..."..DISK-UTILI| 000000B0: 54 59 20 31 20 20 20 20 20 20 20 20 20 20 20 20 |TY 1 | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."| 000000D0: 3B 00 F9 08 23 00 99 22 11 11 20 20 20 20 20 44 |;...#..".. D| 000000E0: 49 53 4B 2D 4E 41 4D 45 20 41 45 4E 44 45 52 4E |ISK-NAME AENDERN| 000000F0: 20 20 20 2D 20 20 27 31 27 00 1F 09 28 00 99 22 | - '1'...(.."| 00000100: 20 20 20 20 20 44 49 53 4B 2D 49 44 20 20 20 41 | DISK-ID A| 00000110: 45 4E 44 45 52 4E 20 20 20 2D 20 20 27 32 27 00 |ENDERN - '2'.| 00000120: 45 09 2A 00 99 22 20 20 20 20 20 45 4E 44 45 20 |E.*.." ENDE | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2D | -| 00000140: 20 20 27 33 27 00 69 09 2D 00 A1 58 24 3A 8B 58 | '3'.i.-..X$:.X| 00000150: 24 B3 B1 22 31 22 AF 58 24 B3 B1 22 32 22 AF 58 |$.."1".X$.."2".X| 00000160: 24 B3 B1 22 33 22 A7 34 35 00 8B 09 2E 00 8B 58 |$.."3".45......X| 00000170: 24 B2 22 33 22 A7 99 22 11 11 2A 2A 2A 20 46 45 |$."3".."..*** FE| 00000180: 52 54 49 47 20 2A 2A 2A 22 3A 80 00 AE 09 32 00 |RTIG ***":....2.| 00000190: 9F 31 35 2C 38 2C 31 35 3A 8F 20 46 4C 4F 50 50 |.15,8,15:. FLOPP| 000001A0: 59 4B 41 4E 41 4C 20 4F 45 46 46 4E 45 4E 00 E4 |YKANAL OEFFNEN..| 000001B0: 09 37 00 98 31 35 2C 22 49 30 22 3A 9F 31 2C 38 |.7..15,"I0":.1,8| 000001C0: 2C 33 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A 33 |,3,"#":.15,"U1:3| 000001D0: 22 30 22 2C 31 38 2C 30 22 3A 8B 58 24 B2 22 31 |"0",18,0":.X$."1| 000001E0: 22 A7 39 30 00 28 0A 3C 00 98 31 35 2C 22 42 2D |".90.(.<..15,"B-| 000001F0: 50 3A 33 2C 31 36 32 22 3A A1 23 31 2C 41 24 2C |P:3,162":.#1,A$,| 00000200: 42 24 2C 43 24 2C 44 24 2C 45 24 3A 99 22 11 41 |B$,C$,D$,E$:.".A| 00000210: 4C 54 45 52 20 44 49 53 4B 2D 49 44 20 49 53 54 |LTER DISK-ID IST| 00000220: 20 12 20 22 3B 41 24 3B 00 4F 0A 41 00 99 42 24 | . ";A$;.O.A..B$| 00000230: 3B 43 24 3B 44 24 3B 45 24 3A 85 22 11 4E 45 55 |;C$;D$;E$:.".NEU| 00000240: 45 52 20 44 49 53 4B 2D 49 44 20 22 3B 46 24 00 |ER DISK-ID ";F$.| 00000250: 71 0A 46 00 8B C3 28 46 24 29 B3 B1 34 A7 46 24 |q.F...(F$)..4.F$| 00000260: B2 C8 28 46 24 AA 22 20 20 20 20 20 20 22 2C 35 |..(F$." ",5| 00000270: 29 00 9F 0A 4B 00 98 31 35 2C 22 42 2D 50 3A 33 |)...K..15,"B-P:3| 00000280: 2C 31 36 32 22 3A 98 31 2C 46 24 3B 3A 98 31 35 |,162":.1,F$;:.15| 00000290: 2C 22 55 32 3A 33 22 44 56 22 2C 31 38 2C 30 00 |,"U2:3"DV",18,0.| 000002A0: BC 0A 50 00 49 24 B2 22 49 22 AA CA 28 C4 28 44 |..P.I$."I"..(.(D| 000002B0: 56 29 2C 32 29 3A 98 31 35 2C 49 24 00 C2 0A 55 |V),2):.15,I$...U| 000002C0: 00 8A 00 F7 0A 5A 00 98 31 35 2C 22 42 2D 50 3A |.....Z..15,"B-P:| 000002D0: 33 2C 31 34 34 22 3A 52 24 B2 22 22 3A 81 4C B2 |3,144":R$."":.L.| 000002E0: 31 A4 31 36 3A A1 23 31 2C 41 24 3A 52 24 B2 52 |1.16:.#1,A$:R$.R| 000002F0: 24 AA 41 24 3A 82 4C 00 1D 0B 5F 00 99 22 11 41 |$.A$:.L..._..".A| 00000300: 4C 54 45 52 20 44 49 53 4B 2D 4E 41 4D 45 20 49 |LTER DISK-NAME I| 00000310: 53 54 20 22 3B 22 12 22 52 24 22 92 22 00 3A 0B |ST ";"."R$".".:.| 00000320: 64 00 85 22 11 4E 45 55 45 52 20 44 49 53 4B 2D |d..".NEUER DISK-| 00000330: 4E 41 4D 45 20 22 3B 4E 45 24 00 5D 0B 69 00 4E |NAME ";NE$.].i.N| 00000340: 45 24 B2 C8 28 4E 45 24 AA 22 20 20 20 20 20 20 |E$..(NE$." | 00000350: 20 20 20 20 20 20 20 20 22 2C 31 36 29 00 91 0B | ",16)...| 00000360: 6E 00 98 31 35 2C 22 42 2D 50 3A 33 2C 31 34 34 |n..15,"B-P:3,144| 00000370: 22 3A 98 31 2C 4E 45 24 3B 3A 98 31 35 2C 22 55 |":.1,NE$;:.15,"U| 00000380: 32 3A 33 22 44 56 22 2C 31 38 2C 30 22 3A 89 38 |2:3"DV",18,0":.8| 00000390: 30 00 00 00 |0... |
..(.... ********************************
.O.... * PROGRAMM ZUM AENDERN VON *.
V.... * DISKNAME UND ID *..
.... ********************************.Q.
..."..DISK-UTILITY 1
.";...#..".. DISK-NAME AENDERN
- '1'...(.." DISK-ID AENDERN
- '2'.E.*.." ENDE -
'3'.I.-..X$:.X$.."1".X$.."2".X$.."3".4
5......X$."3".."..*** FERTIG ***":....2.
.15,8,15:. FLOPPYKANAL OEFFNEN...7..15,"
I0":.1,8,3,"#":.15,"U1:3"0",18,0":.X$."1
".90.(.<..15,"B-P:3,162":.#1,A$,B$,C$,D$
,E$:.".ALTER DISK-ID IST . ";A$;.O.A..B$
;C$;D$;E$:.".NEUER DISK-ID ";F$.Q.F..C(F
$)..4.F$.H(F$." ",5)...K..15,"B-P:3
,162":.1,F$;:.15,"U2:3"DV",18,0...P.I$."
I".J(D(DV),2):.15,I$.B.U.....Z..15,"B-P:
3,144":R$."":.L.1.16:.#1,A$:R$.R$.A$:.L.
.._..".ALTER DISK-NAME IST ";"."R$".".:.
D..".NEUER DISK-NAME ";NE$.].I.NE$.H(NE$
." ",16)...N..15,"B-P:3,144
":.1,NE$;:.15,"U2:3"DV",18,0":.80...
> CLICK IMAGE PREVIEW FOR FULL MODAL