> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 E8 03 97 35 33 32 38 30 2C 30 3A 97 |..A....53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 99 22 93 1E 12 20 20 2A |53281,0:."... *|
00000020: 2A 2A 20 20 44 49 53 4B 45 54 54 45 4E 4E 41 4D |** DISKETTENNAM|
00000030: 45 20 41 45 4E 44 45 52 4E 20 20 2A 2A 2A 20 20 |E AENDERN *** |
00000040: 22 00 47 08 F2 03 99 00 75 08 FC 03 85 22 11 52 |".G.....u....".R|
00000050: 49 43 48 54 49 47 45 20 44 49 53 4B 45 54 54 45 |ICHTIGE DISKETTE|
00000060: 20 45 49 4E 47 45 4C 45 47 54 20 20 20 4A 9D 9D | EINGELEGT J..|
00000070: 9D 22 3B 57 24 00 91 08 06 04 8B 57 24 B3 B1 22 |.";W$......W$.."|
00000080: 4A 22 20 A7 99 22 11 43 4F 4E 54 91 91 91 22 3A |J" ..".CONT...":|
00000090: 80 00 BE 08 10 04 99 22 11 44 49 53 4B 4E 41 4D |.......".DISKNAM|
000000A0: 45 3A 22 3B A6 31 38 29 3B 22 44 49 53 4B 20 49 |E:";.18);"DISK I|
000000B0: 44 3A 22 3A 99 A3 30 29 3B 22 11 12 22 3B 00 D2 |D:":..0);"..";..|
000000C0: 08 1A 04 9F 31 2C 38 2C 31 35 3A 98 31 2C 22 49 |....1,8,15:.1,"I|
000000D0: 44 22 00 E1 08 24 04 9F 38 2C 38 2C 38 2C 22 23 |D"...$..8,8,8,"#|
000000E0: 22 00 F7 08 2E 04 98 31 2C 22 55 31 3A 22 3B 38 |"......1,"U1:";8|
000000F0: 3B 30 3B 31 38 3B 30 00 0B 09 38 04 98 31 2C 22 |;0;18;0...8..1,"|
00000100: 42 2D 50 3A 22 3B 38 3B 31 34 34 00 17 09 42 04 |B-P:";8;144...B.|
00000110: 81 49 B2 31 A4 31 36 00 2B 09 4C 04 A1 23 38 2C |.I.1.16.+.L..#8,|
00000120: 43 48 24 20 3A 20 99 43 48 24 3B 00 32 09 56 04 |CH$ : .CH$;.2.V.|
00000130: 82 49 00 46 09 60 04 98 31 2C 22 42 2D 50 3A 22 |.I.F.`..1,"B-P:"|
00000140: 3B 38 3B 31 36 32 00 56 09 6A 04 A1 23 38 2C 43 |;8;162.V.j..#8,C|
00000150: 31 24 2C 43 32 24 00 68 09 74 04 99 A6 31 31 29 |1$,C2$.h.t...11)|
00000160: 3B 43 31 24 3B 43 32 24 00 9F 09 7E 04 85 22 11 |;C1$;C2$...~..".|
00000170: 11 53 4F 4C 4C 20 44 45 52 20 4E 41 4D 45 20 47 |.SOLL DER NAME G|
00000180: 45 41 45 4E 44 45 52 54 20 57 45 52 44 45 4E 20 |EAENDERT WERDEN |
00000190: 20 20 4A 9D 9D 9D 22 3B 57 24 3A 47 25 B2 30 00 | J...";W$:G%.0.|
000001A0: B4 09 88 04 8B 20 57 24 B3 B1 22 4A 22 20 A7 20 |..... W$.."J" . |
000001B0: 31 32 31 30 00 D5 09 8D 04 99 A3 32 32 29 22 11 |1210.......22)".|
000001C0: 11 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000001D0: A3 91 91 91 22 00 F8 09 92 04 85 22 1C 11 4E 45 |...."......"..NE|
000001E0: 55 45 52 20 44 49 53 4B 45 54 54 45 4E 4E 41 4D |UER DISKETTENNAM|
000001F0: 45 20 1E 22 3B 44 4E 24 00 1D 0A 9C 04 44 4E 24 |E .";DN$.....DN$|
00000200: B2 C8 28 44 4E 24 AA 22 20 20 20 20 20 20 20 20 |..(DN$." |
00000210: 20 20 20 20 20 20 20 20 22 2C 31 36 29 00 31 0A | ",16).1.|
00000220: A6 04 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 34 |...1,"B-P:";8;14|
00000230: 34 00 42 0A B0 04 98 38 2C 44 4E 24 3B 3A 47 25 |4.B....8,DN$;:G%|
00000240: B2 31 00 77 0A BA 04 85 22 11 11 53 4F 4C 4C 20 |.1.w...."..SOLL |
00000250: 44 49 45 20 44 49 53 4B 20 49 44 20 47 45 41 45 |DIE DISK ID GEAE|
00000260: 4E 44 45 52 54 20 57 45 52 44 45 4E 20 20 20 4E |NDERT WERDEN N|
00000270: 9D 9D 9D 22 3B 57 24 00 8A 0A C4 04 8B 57 24 B3 |...";W$......W$.|
00000280: B1 22 4A 22 A7 20 31 32 37 30 00 9D 0A C9 04 99 |."J". 1270......|
00000290: A3 31 35 29 22 11 11 A3 A3 91 91 91 22 00 B9 0A |.15)"......."...|
000002A0: CE 04 85 22 11 1C 4E 45 55 45 20 44 49 53 4B 20 |..."..NEUE DISK |
000002B0: 49 44 20 1E 22 3B 49 44 24 00 CF 0A D8 04 49 44 |ID .";ID$.....ID|
000002C0: 24 B2 C8 28 49 44 24 AA 22 20 20 22 2C 32 29 00 |$..(ID$." ",2).|
000002D0: E3 0A E2 04 98 31 2C 22 42 2D 50 3A 22 3B 38 3B |.....1,"B-P:";8;|
000002E0: 31 36 32 00 F4 0A EC 04 98 38 2C 49 44 24 3B 3A |162......8,ID$;:|
000002F0: 47 25 B2 31 00 12 0B F6 04 8B 20 47 25 B2 31 20 |G%.1...... G%.1 |
00000300: A7 98 31 2C 22 55 32 3A 22 3B 38 3B 30 3B 31 38 |..1,"U2:";8;0;18|
00000310: 3B 30 00 24 0B 00 05 98 31 2C 22 49 44 22 3A A0 |;0.$....1,"ID":.|
00000320: 38 3A A0 31 00 52 0B 0A 05 99 22 93 11 11 12 22 |8:.1.R...."...."|
00000330: 3B 3A 8B 47 25 B2 31 A7 99 22 1C 20 44 49 53 4B |;:.G%.1..". DISK|
00000340: 45 54 54 45 20 47 45 41 45 4E 44 45 52 54 20 1E |ETTE GEAENDERT .|
00000350: 11 22 00 88 0B F8 07 99 22 11 11 11 92 4E 45 55 |."......"....NEU|
00000360: 45 52 20 44 49 53 4B 4E 41 4D 45 3A 22 3B A6 31 |ER DISKNAME:";.1|
00000370: 32 29 3B 22 44 49 53 4B 20 49 44 3A 22 3A 99 A3 |2);"DISK ID:":..|
00000380: 30 29 3B 22 11 12 22 3B 00 9C 0B 02 08 9F 31 2C |0);"..";......1,|
00000390: 38 2C 31 35 3A 98 31 2C 22 49 44 22 00 AB 0B 0C |8,15:.1,"ID"....|
000003A0: 08 9F 38 2C 38 2C 38 2C 22 23 22 00 C1 0B 16 08 |..8,8,8,"#".....|
000003B0: 98 31 2C 22 55 31 3A 22 3B 38 3B 30 3B 31 38 3B |.1,"U1:";8;0;18;|
000003C0: 30 00 D5 0B 20 08 98 31 2C 22 42 2D 50 3A 22 3B |0... ..1,"B-P:";|
000003D0: 38 3B 31 34 34 00 E1 0B 2A 08 81 49 B2 31 A4 31 |8;144...*..I.1.1|
000003E0: 36 00 F5 0B 34 08 A1 23 38 2C 43 48 24 20 3A 20 |6...4..#8,CH$ : |
000003F0: 99 43 48 24 3B 00 FC 0B 3E 08 82 49 00 10 0C 48 |.CH$;...>..I...H|
00000400: 08 98 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 36 32 |..1,"B-P:";8;162|
00000410: 00 30 0C 52 08 A1 23 38 2C 43 31 24 2C 43 32 24 |.0.R..#8,C1$,C2$|
00000420: 2C 43 33 24 2C 43 34 24 2C 43 35 24 2C 43 36 24 |,C3$,C4$,C5$,C6$|
00000430: 00 52 0C 5C 08 99 A6 31 31 29 3B 43 31 24 3B 43 |.R.\...11);C1$;C|
00000440: 32 24 3B 43 33 24 3B 43 34 24 3B 43 35 24 3B 43 |2$;C3$;C4$;C5$;C|
00000450: 36 24 00 66 0C 8E 08 98 31 2C 22 42 2D 50 3A 22 |6$.f....1,"B-P:"|
00000460: 3B 38 3B 31 34 34 00 73 0C 98 08 98 38 2C 44 4E |;8;144.s....8,DN|
00000470: 24 3B 3A 00 7D 0C E8 08 A0 38 3A A0 31 00 87 0C |$;:.}....8:.1...|
00000480: F2 08 99 22 11 11 22 00 93 0C FC 08 89 20 31 30 |...".."...... 10|
00000490: 30 30 30 00 AA 0C 10 27 99 22 11 50 52 4F 47 52 |000....'.".PROGR|
000004A0: 41 4D 4D 45 4E 44 45 11 11 22 00 BC 0C 1A 27 99 |AMMENDE.."....'.|
000004B0: 22 11 11 52 55 4E 91 91 91 22 3A 80 00 00 00 |"..RUN...":.... |
..A....53280,0:.53281,0:."... *** DISK
ETTENNAME AENDERN *** ".G.....U....".R
ICHTIGE DISKETTE EINGELEGT J...";W$...
...W$.."J" ..".CONT...":.......".DISKNAM
E:";.18);"DISK ID:":..0);"..";.R....1,8,
15:.1,"ID"...$..8,8,8,"#"......1,"U1:";8
;0;18;0...8..1,"B-P:";8;144...B..I.1.16.
+.L..#8,CH$ : .CH$;.2.V..I.F.`..1,"B-P:"
;8;162.V.J..#8,C1$,C2$.H.T...11);C1$;C2$
...~.."..SOLL DER NAME GEAENDERT WERDEN
J...";W$:G%.0...... W$.."J" . 1210.U..
...22)"....................."......"..NE
UER DISKETTENNAME .";DN$.....DN$.H(DN$."
",16).1....1,"B-P:";8;14
4.B....8,DN$;:G%.1.W...."..SOLL DIE DISK
ID GEAENDERT WERDEN N...";W$...D..W$.
."J". 1270...I...15)"......."...N.."..NE
UE DISK ID .";ID$.O.X.ID$.H(ID$." ",2).
.....1,"B-P:";8;162......8,ID$;:G%.1....
.. G%.1 ..1,"U2:";8;0;18;0.$....1,"ID":
8: 1.R...."....";:.G%.1..". DISKETTE GEA
ENDERT .."......"....NEUER DISKNAME:";.1
2);"DISK ID:":..0);"..";......1,8,15:.1,
"ID"......8,8,8,"#".A....1,"U1:";8;0;18;
0.U. ..1,"B-P:";8;144...*..I.1.16...4..#
8,CH$ : .CH$;...>..I...H..1,"B-P:";8;162
.0.R..#8,C1$,C2$,C3$,C4$,C5$,C6$.R.\...1
1);C1$;C2$;C3$;C4$;C5$;C6$.F....1,"B-P:"
;8;144.S....8,DN$;:.}... 8: 1......"..".
..... 10000....'.".PROGRAMMENDE.."....'.
"..RUN...":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL