> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3A 08 0A 00 8F 22 14 14 14 14 14 14 14 8D |..:...."........|
00000010: 90 20 12 20 B0 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |. . ............|
00000020: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000030: C3 C3 C3 C3 C3 C3 C3 AE 20 92 00 74 08 0B 00 8F |........ ..t....|
00000040: 22 14 14 14 14 14 14 14 8D 90 91 20 12 20 C2 20 |".......... . . |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 C2 20 92 00 AE 08 0C 00 8F 22 14 14 14 14 14 | . .......".....|
00000080: 14 14 8D 90 91 20 12 20 C2 20 20 44 49 53 4B 45 |..... . . DISKE|
00000090: 54 54 45 4E 4E 41 4D 45 4E 20 55 4E 44 20 49 44 |TTENNAMEN UND ID|
000000A0: 20 41 45 4E 44 45 52 4E 20 20 20 C2 20 92 00 E8 | AENDERN . ...|
000000B0: 08 0D 00 8F 22 14 14 14 14 14 14 14 8D 90 91 20 |....".......... |
000000C0: 12 20 C2 20 20 20 20 20 20 20 20 20 20 20 20 20 |. . |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 20 C2 20 92 00 22 09 0E 00 8F 22 14 | . .."....".|
000000F0: 14 14 14 14 14 14 8D 90 91 20 12 20 C2 20 20 20 |......... . . |
00000100: 41 55 53 20 3A 20 36 34 27 45 52 20 20 20 20 20 |AUS : 64'ER |
00000110: 41 55 53 47 41 42 45 20 35 2F 38 34 20 20 20 C2 |AUSGABE 5/84 .|
00000120: 20 92 00 5C 09 0F 00 8F 22 14 14 14 14 14 14 14 | ..\....".......|
00000130: 8D 90 91 20 12 20 C2 20 20 20 20 20 20 20 20 20 |... . . |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 20 20 20 20 20 20 20 20 20 C2 20 92 00 95 09 10 | . .....|
00000160: 00 8F 22 14 14 14 14 14 14 14 8D 91 20 12 20 C2 |.."......... . .|
00000170: 20 20 20 20 20 20 20 20 20 20 53 45 49 54 45 4E | SEITEN|
00000180: 3A 20 20 38 38 20 2D 20 38 39 20 20 20 20 20 20 |: 88 - 89 |
00000190: 20 20 C2 20 92 00 CF 09 11 00 8F 22 14 14 14 14 | . ......."....|
000001A0: 14 14 14 8D 90 91 20 12 20 C2 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 C2 20 92 00 | . ..|
000001D0: 0A 0A 14 00 8F 22 14 14 14 14 14 14 14 8D 91 20 |....."......... |
000001E0: 12 20 AD C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |. ..............|
000001F0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000200: C3 C3 C3 C3 C3 BD 20 92 9A 8D 00 29 0A 19 00 97 |...... ....)....|
00000210: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 |53281,6:.53280,1|
00000220: 34 3A 97 36 34 36 2C 31 34 00 5C 0A 1E 00 99 22 |4:.646,14.\...."|
00000230: 93 12 20 20 20 20 3D 2D 3D 20 20 44 49 53 4B 45 |.. =-= DISKE|
00000240: 54 54 45 4E 4E 41 4D 45 20 41 45 4E 44 45 52 4E |TTENNAME AENDERN|
00000250: 20 20 3D 2D 3D 20 20 20 20 20 22 3B 00 8E 0A 23 | =-= ";...#|
00000260: 00 99 22 12 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
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 20 20 20 22 3B 00 BF | ";..|
00000290: 0A 28 00 99 22 12 20 20 20 20 20 20 20 28 43 29 |.(..". (C)|
000002A0: 20 42 59 20 4B 4C 41 55 53 20 4D 45 52 47 45 4E | BY KLAUS MERGEN|
000002B0: 54 48 41 4C 45 52 20 20 20 20 20 20 20 20 22 00 |THALER ".|
000002C0: 09 0B 32 00 99 22 11 20 20 20 20 20 52 49 43 48 |..2..". RICH|
000002D0: 54 49 47 45 20 44 49 53 4B 45 54 54 45 20 45 49 |TIGE DISKETTE EI|
000002E0: 4E 4C 45 47 45 4E 20 22 3A 99 22 11 20 20 20 20 |NLEGEN ":.". |
000002F0: 20 20 20 20 55 4E 44 20 54 41 53 54 45 20 44 52 | UND TASTE DR|
00000300: 55 45 43 4B 45 4E 20 21 22 00 1B 0B 3C 00 97 31 |UECKEN !"...<..1|
00000310: 39 38 2C 30 3A 92 31 39 38 2C 31 00 4B 0B 46 00 |98,0:.198,1.K.F.|
00000320: 99 22 11 20 44 49 53 4B 4E 41 4D 45 3A 22 3B A6 |.". DISKNAME:";.|
00000330: 31 38 29 3B 22 44 49 53 4B 20 49 44 3A 22 3A 99 |18);"DISK ID:":.|
00000340: 20 A3 31 30 29 3B 22 91 12 22 3B 00 5F 0B 50 00 | .10);"..";._.P.|
00000350: 9F 31 2C 38 2C 31 35 3A 98 31 2C 22 49 30 22 00 |.1,8,15:.1,"I0".|
00000360: 6E 0B 5A 00 9F 38 2C 38 2C 38 2C 22 23 22 00 84 |n.Z..8,8,8,"#"..|
00000370: 0B 64 00 98 31 2C 22 55 31 3A 22 3B 38 3B 30 3B |.d..1,"U1:";8;0;|
00000380: 31 38 3B 30 00 98 0B 6E 00 98 31 2C 22 42 2D 50 |18;0...n..1,"B-P|
00000390: 3A 22 3B 38 3B 31 34 34 00 B5 0B 78 00 81 49 B2 |:";8;144...x..I.|
000003A0: 31 A4 31 36 3A A1 23 38 2C 43 48 24 3A 99 43 48 |1.16:.#8,CH$:.CH|
000003B0: 24 3B 3A 82 49 00 C9 0B 82 00 98 31 2C 22 42 2D |$;:.I......1,"B-|
000003C0: 50 3A 22 3B 38 3B 31 36 32 00 D9 0B 8C 00 A1 23 |P:";8;162......#|
000003D0: 38 2C 43 31 24 2C 43 32 24 00 EE 0B 96 00 99 20 |8,C1$,C2$...... |
000003E0: A6 31 31 29 3B 43 31 24 3B 43 32 24 3A 99 00 20 |.11);C1$;C2$:.. |
000003F0: 0C A0 00 85 22 11 20 20 53 4F 4C 4C 20 44 45 52 |....". SOLL DER|
00000400: 20 4E 41 4D 45 20 47 45 41 45 4E 44 45 52 54 20 | NAME GEAENDERT |
00000410: 57 45 52 44 45 4E 20 20 4A 9D 9D 9D 22 3B 57 24 |WERDEN J...";W$|
00000420: 00 36 0C AA 00 47 25 B2 30 3A 8B 57 24 B3 B1 22 |.6...G%.0:.W$.."|
00000430: 4A 22 A7 33 30 30 00 59 0C B4 00 85 22 11 20 20 |J".300.Y....". |
00000440: 4E 45 55 45 52 20 44 49 53 4B 45 54 54 45 4E 4E |NEUER DISKETTENN|
00000450: 41 4D 45 20 22 3B 44 4E 24 00 7E 0C BE 00 44 4E |AME ";DN$.~...DN|
00000460: 24 B2 C8 28 44 4E 24 AA 22 20 20 20 20 20 20 20 |$..(DN$." |
00000470: 20 20 20 20 20 20 20 20 20 22 2C 31 36 29 00 92 | ",16)..|
00000480: 0C C8 00 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 |....1,"B-P:";8;1|
00000490: 34 34 00 A3 0C D2 00 98 38 2C 44 4E 24 3B 3A 47 |44......8,DN$;:G|
000004A0: 25 B2 31 00 D4 0C 2C 01 85 22 11 11 20 20 53 4F |%.1...,..".. SO|
000004B0: 4C 4C 20 44 49 45 20 49 44 20 47 45 41 45 4E 44 |LL DIE ID GEAEND|
000004C0: 45 52 54 20 57 45 52 44 45 4E 20 20 4E 9D 9D 9D |ERT WERDEN N...|
000004D0: 22 3B 57 24 00 E8 0C 36 01 8B 57 24 B3 B1 22 4A |";W$...6..W$.."J|
000004E0: 22 20 20 A7 20 33 37 30 00 04 0D 40 01 85 22 11 |" . 370...@..".|
000004F0: 20 20 4E 45 55 45 20 44 49 53 4B 20 49 44 20 22 | NEUE DISK ID "|
00000500: 3B 49 44 24 00 1A 0D 4A 01 49 44 24 B2 C8 28 49 |;ID$...J.ID$..(I|
00000510: 44 24 AA 22 20 20 22 2C 32 29 00 2E 0D 54 01 98 |D$." ",2)...T..|
00000520: 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 36 32 00 3F |1,"B-P:";8;162.?|
00000530: 0D 5E 01 98 38 2C 49 44 24 3B 3A 47 25 B2 31 00 |.^..8,ID$;:G%.1.|
00000540: 5D 0D 72 01 8B 47 25 B2 31 20 A7 20 98 31 2C 22 |].r..G%.1 . .1,"|
00000550: 55 32 3A 22 3B 38 3B 30 3B 31 38 3B 30 00 71 0D |U2:";8;0;18;0.q.|
00000560: 7C 01 98 31 2C 22 49 30 22 20 20 3A A0 38 3A A0 ||..1,"I0" :.8:.|
00000570: 31 00 B0 0D 86 01 99 22 11 11 12 22 3B 3A 8B 47 |1......"...";:.G|
00000580: 25 B2 31 A7 99 22 20 20 20 20 20 20 2D 3D 2D 20 |%.1.." -=- |
00000590: 20 44 49 53 4B 45 54 54 45 20 47 45 41 45 4E 44 | DISKETTE GEAEND|
000005A0: 45 52 54 20 20 2D 3D 2D 20 20 20 20 20 20 22 3B |ERT -=- ";|
000005B0: 00 E9 0D 8B 01 8B 47 25 B2 31 A7 99 22 12 20 20 |......G%.1..". |
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 20 20 20 20 20 20 20 | |
000005E0: 20 20 20 20 20 20 92 22 3B 00 1A 0E 90 01 99 22 | .";......"|
000005F0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 |. P|
00000600: 52 4F 47 52 41 4D 4D 45 4E 44 45 20 20 20 20 20 |ROGRAMMENDE |
00000610: 20 20 20 20 20 20 20 20 20 22 00 00 00 | "... |
..:...."......... . .CCCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCC. ..T....".......... . B
B .....
..".......... . B DISKETTENNAMEN UND ID
AENDERN B .......".......... . B
B .."....".
......... . B AUS : 64'ER AUSGABE
5/84 B ..\....".......... . B
B .......".....
.... . B SEITEN: 88 - 89
B ..O....".......... . B
B .......".........
. .CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC. .
...)....53281,6:.53280,14:.646,14.\...."
.. =-= DISKETTENNAME AENDERN =-=
";...#..".
";...(..". (C) BY KLAU
S MERGENTHALER "...2..". RICH
TIGE DISKETTE EINLEGEN ":.". UND
TASTE DRUECKEN !"...<..198,0:.198,1.K.F.
.". DISKNAME:";.18);"DISK ID:":. .10);".
.";._.P..1,8,15:.1,"I0".N.Z..8,8,8,"#"..
.D..1,"U1:";8;0;18;0...N..1,"B-P:";8;144
...X..I.1.16:.#8,CH$:.CH$;:.I.I....1,"B-
P:";8;162.Y....#8,C1$,C2$...... .11);C1$
;C2$:.. . ..". SOLL DER NAME GEAENDERT
WERDEN J...";W$.6...G%.0:.W$.."J".300.Y
....". NEUER DISKETTENNAME ";DN$.~...DN
$.H(DN$." ",16)...H..1,"B
-P:";8;144...R..8,DN$;:G%.1.T.,..".. SO
LL DIE ID GEAENDERT WERDEN N...";W$...6
..W$.."J" . 370...@..". NEUE DISK ID "
;ID$...J.ID$.H(ID$." ",2)...T..1,"B-P:"
;8;162.?.^..8,ID$;:G%.1.].R..G%.1 . .1,"
U2:";8;0;18;0.Q.|..1,"I0" : 8: 1......"
...";:.G%.1.." -=- DISKETTE GEAEND
ERT -=- ";......G%.1..".
.";......"
. PROGRAMMENDE
"...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL