> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 0A 00 3A 00 0D 08 14 00 3A 00 13 08 |......:.....:...|
00000010: 1E 00 3A 00 2D 08 28 00 8F 20 2A 20 4E 41 4D 45 |..:.-.(.. * NAME|
00000020: 2B 49 44 20 41 45 4E 44 45 52 4E 20 2A 00 55 08 |+ID AENDERN *.U.|
00000030: 32 00 8F 20 2A 20 41 55 53 20 36 34 27 47 45 52 |2.. * AUS 64'GER|
00000040: 20 48 45 46 54 20 35 2F 38 34 20 53 45 49 54 45 | HEFT 5/84 SEITE|
00000050: 20 38 39 20 2A 00 5B 08 3C 00 3A 00 61 08 46 00 | 89 *.[.<.:.a.F.|
00000060: 3A 00 93 08 E8 03 99 22 93 12 20 20 20 20 20 3D |:......".. =|
00000070: 2D 3D 20 20 44 49 53 4B 45 54 54 45 4E 4E 41 4D |-= DISKETTENNAM|
00000080: 45 20 41 45 4E 44 45 52 4E 20 20 3D 2D 3D 20 20 |E AENDERN =-= |
00000090: 20 20 22 00 C4 08 F2 03 99 22 12 20 20 20 20 20 | "......". |
000000A0: 20 20 20 20 20 20 28 43 29 20 42 59 20 55 57 45 | (C) BY UWE|
000000B0: 20 52 45 50 50 4C 49 4E 47 45 52 20 20 20 20 20 | REPPLINGER |
000000C0: 20 20 20 22 00 F1 08 FC 03 85 22 11 52 49 43 48 | "......".RICH|
000000D0: 54 49 47 45 20 44 49 53 4B 45 54 54 45 20 45 49 |TIGE DISKETTE EI|
000000E0: 4E 47 45 4C 45 47 54 20 20 4A 9D 9D 9D 22 3B 57 |NGELEGT J...";W|
000000F0: 24 00 0C 09 06 04 8B 57 24 B3 B1 22 4A 22 A7 99 |$......W$.."J"..|
00000100: 22 11 43 4F 4E 54 91 91 91 22 3A 80 00 39 09 10 |".CONT...":..9..|
00000110: 04 99 22 11 44 49 53 4B 4E 41 4D 45 3A 22 3B A6 |..".DISKNAME:";.|
00000120: 31 39 29 22 44 49 53 4B 20 49 44 3A 22 3A 99 A3 |19)"DISK ID:":..|
00000130: 31 30 29 3B 22 91 12 22 3B 00 4D 09 1A 04 9F 31 |10);"..";.M....1|
00000140: 2C 38 2C 31 35 3A 98 31 2C 22 49 30 22 00 5C 09 |,8,15:.1,"I0".\.|
00000150: 24 04 9F 38 2C 38 2C 38 2C 22 23 22 00 72 09 2E |$..8,8,8,"#".r..|
00000160: 04 98 31 2C 22 55 31 3A 22 3B 38 3B 30 3B 31 38 |..1,"U1:";8;0;18|
00000170: 3B 30 00 86 09 38 04 98 31 2C 22 42 2D 50 3A 22 |;0...8..1,"B-P:"|
00000180: 3B 38 3B 31 34 34 00 92 09 42 04 81 49 B2 31 A4 |;8;144...B..I.1.|
00000190: 31 36 00 A4 09 4C 04 A1 23 38 2C 43 48 24 3A 99 |16...L..#8,CH$:.|
000001A0: 43 48 24 3B 00 AB 09 56 04 82 49 00 BF 09 60 04 |CH$;...V..I...`.|
000001B0: 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 36 32 00 |.1,"B-P:";8;162.|
000001C0: CF 09 6A 04 A1 23 38 2C 43 31 24 2C 43 32 24 00 |..j..#8,C1$,C2$.|
000001D0: E1 09 74 04 99 A6 31 31 29 3B 43 31 24 3B 43 32 |..t...11);C1$;C2|
000001E0: 24 00 17 0A 7E 04 85 22 11 11 53 4F 4C 4C 20 44 |$...~.."..SOLL D|
000001F0: 45 52 20 4E 41 4D 45 20 47 45 41 45 4E 44 45 52 |ER NAME GEAENDER|
00000200: 54 20 57 45 52 44 45 4E 20 20 4A 9D 9D 9D 22 3B |T WERDEN J...";|
00000210: 57 24 3A 47 25 B2 30 00 29 0A 88 04 8B 57 24 B3 |W$:G%.0.)....W$.|
00000220: B1 22 4A 22 A7 31 32 31 30 00 49 0A 92 04 85 22 |."J".1210.I...."|
00000230: 11 4E 45 55 45 52 20 44 49 53 4B 45 54 54 45 4E |.NEUER DISKETTEN|
00000240: 4E 41 4D 45 22 3B 44 4E 24 00 6D 0A 9C 04 44 4E |NAME";DN$.m...DN|
00000250: 24 B2 C8 28 44 4E 24 AA 22 20 20 20 20 20 20 20 |$..(DN$." |
00000260: 20 20 20 20 20 20 20 20 22 2C 31 36 29 00 81 0A | ",16)...|
00000270: A6 04 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 34 |...1,"B-P:";8;14|
00000280: 34 00 91 0A B0 04 98 38 2C 44 4E 24 3A 47 25 B2 |4......8,DN$:G%.|
00000290: 31 00 C5 0A BA 04 85 22 11 11 53 4F 4C 4C 20 44 |1......"..SOLL D|
000002A0: 49 45 20 44 49 53 4B 20 49 44 20 47 45 41 45 4E |IE DISK ID GEAEN|
000002B0: 44 45 52 54 20 57 45 52 44 45 4E 20 20 4E 9D 9D |DERT WERDEN N..|
000002C0: 9D 22 3B 57 24 00 D7 0A C4 04 8B 57 24 B3 B1 22 |.";W$......W$.."|
000002D0: 4A 22 A7 31 32 37 30 00 F0 0A CE 04 85 22 11 4E |J".1270......".N|
000002E0: 45 55 45 20 44 49 53 4B 20 49 44 22 3B 49 44 24 |EUE DISK ID";ID$|
000002F0: 00 06 0B D8 04 49 44 24 B2 C8 28 49 44 24 AA 22 |.....ID$..(ID$."|
00000300: 20 20 22 2C 32 29 00 19 0B E2 04 98 31 2C 22 42 | ",2)......1,"B|
00000310: 2D 50 22 3B 38 3B 31 36 32 00 29 0B EC 04 98 38 |-P";8;162.)....8|
00000320: 2C 49 44 24 3A 52 25 B2 31 00 45 0B F6 04 8B 47 |,ID$:R%.1.E....G|
00000330: 25 B2 31 A7 98 31 2C 22 55 32 3A 22 3B 38 3B 30 |%.1..1,"U2:";8;0|
00000340: 3B 31 38 3B 30 00 57 0B 00 05 98 31 2C 22 49 30 |;18;0.W....1,"I0|
00000350: 22 3A A0 38 3A A0 31 00 84 0B 0A 05 99 22 11 11 |":.8:.1......"..|
00000360: 12 22 3B 3A 8B 47 25 B2 31 A7 99 22 44 49 53 4B |.";:.G%.1.."DISK|
00000370: 45 54 54 45 20 47 45 41 45 4E 44 45 52 54 20 2D |ETTE GEAENDERT -|
00000380: 3D 2D 22 3B 00 98 0B 14 05 99 22 50 52 4F 47 52 |=-";......"PROGR|
00000390: 41 4D 4D 45 4E 44 45 22 00 9E 0B 1E 05 80 00 00 |AMMENDE"........|
000003A0: 00 00 |.. |
......:.....:.....:.-.(.. * NAME+ID AEND
ERN *.U.2.. * AUS 64'GER HEFT 5/84 SEITE
89 *.[.<.:.A.F.:......".. =-= DISK
ETTENNAME AENDERN =-= ".D....".
(C) BY UWE REPPLINGER "....
..".RICHTIGE DISKETTE EINGELEGT J...";W
$......W$.."J"..".CONT...":..9....".DISK
NAME:";.19)"DISK ID:":..10);"..";.M....1
,8,15:.1,"I0".\.$..8,8,8,"#".R....1,"U1:
";8;0;18;0...8..1,"B-P:";8;144...B..I.1.
16...L..#8,CH$:.CH$;...V..I...`..1,"B-P:
";8;162.O.J..#8,C1$,C2$...T...11);C1$;C2
$...~.."..SOLL DER NAME GEAENDERT WERDEN
J...";W$:G%.0.)....W$.."J".1210.I...."
.NEUER DISKETTENNAME";DN$.M...DN$.H(DN$.
" ",16)......1,"B-P:";8;14
4......8,DN$:G%.1.E...."..SOLL DIE DISK
ID GEAENDERT WERDEN N...";W$.W.D..W$.."
J".1270...N..".NEUE DISK ID";ID$...X.ID$
.H(ID$." ",2)......1,"B-P";8;162.)....8
,ID$:R%.1.E....G%.1..1,"U2:";8;0;18;0.W.
...1,"I0": 8: 1......"...";:.G%.1.."DISK
ETTE GEAENDERT -=-";......"PROGRAMMENDE"
..........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL