> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 E8 03 8F 20 2A 2A 2A 20 54 45 49 4C |....... *** TEIL|
00000010: 20 41 00 18 08 E9 03 3A 00 21 08 F2 03 41 46 B2 | A.....:.!...AF.|
00000020: 36 00 2E 08 FC 03 86 20 45 4E 28 41 46 29 00 37 |6...... EN(AF).7|
00000030: 08 4C 04 83 20 32 36 00 40 08 56 04 83 20 37 32 |.L.. 26.@.V.. 72|
00000040: 00 49 08 60 04 83 20 37 34 00 52 08 6A 04 83 20 |.I.`.. 74.R.j.. |
00000050: 36 34 00 5B 08 74 04 83 20 36 32 00 64 08 7E 04 |64.[.t.. 62.d.~.|
00000060: 83 20 36 33 00 73 08 DC 05 81 20 49 B2 31 20 A4 |. 63.s.... I.1 .|
00000070: 20 41 46 00 7F 08 E6 05 87 20 45 4E 28 49 29 00 | AF...... EN(I).|
00000080: 87 08 F0 05 82 20 49 00 95 08 FA 05 9F 20 31 34 |..... I...... 14|
00000090: 2C 38 2C 31 35 00 9B 08 04 06 3A 00 AC 08 40 06 |,8,15.....:...@.|
000000A0: 8F 20 2A 2A 2A 20 54 45 49 4C 20 42 00 B2 08 41 |. *** TEIL B...A|
000000B0: 06 3A 00 D8 08 4A 06 86 20 4E 24 28 33 30 30 29 |.:...J.. N$(300)|
000000C0: 2C 53 24 28 33 30 30 29 2C 4F 24 28 31 30 30 29 |,S$(300),O$(100)|
000000D0: 2C 54 24 28 31 30 30 29 00 E1 08 D0 07 41 41 B2 |,T$(100).....AA.|
000000E0: 30 00 EE 08 34 08 99 20 C7 28 31 34 37 29 00 06 |0...4.. .(147)..|
000000F0: 09 3E 08 85 20 22 44 41 54 45 49 4E 41 4D 45 3A |.>.. "DATEINAME:|
00000100: 20 22 3B 44 4E 24 00 0C 09 48 08 99 00 23 09 52 | ";DN$...H...#.R|
00000110: 08 9F 20 31 2C 38 2C 38 2C 44 4E 24 AA 22 2C 53 |.. 1,8,8,DN$.",S|
00000120: 2C 52 22 00 2E 09 5C 08 8D 20 39 30 30 30 00 40 |,R"...\.. 9000.@|
00000130: 09 66 08 8B 20 41 B2 36 32 20 A7 20 32 33 30 30 |.f.. A.62 . 2300|
00000140: 00 51 09 70 08 8B 20 41 B2 30 20 A7 20 32 32 30 |.Q.p.. A.0 . 220|
00000150: 30 00 59 09 7A 08 A0 20 31 00 64 09 84 08 89 20 |0.Y.z.. 1.d.... |
00000160: 32 31 30 30 00 6A 09 8E 08 3A 00 7B 09 98 08 8F |2100.j...:.{....|
00000170: 20 2A 2A 2A 20 54 45 49 4C 20 33 00 85 09 A2 08 | *** TEIL 3.....|
00000180: 84 31 2C 41 41 00 94 09 AC 08 81 20 49 B2 31 20 |.1,AA...... I.1 |
00000190: A4 20 41 41 00 B3 09 B6 08 84 31 2C 4E 24 28 49 |. AA......1,N$(I|
000001A0: 29 2C 53 24 28 49 29 2C 4F 24 28 49 29 2C 54 24 |),S$(I),O$(I),T$|
000001B0: 28 49 29 00 C9 09 C0 08 99 20 4E 24 28 49 29 20 |(I)...... N$(I) |
000001C0: 3A 20 99 20 53 24 28 49 29 00 DF 09 CA 08 99 20 |: . S$(I)...... |
000001D0: 4F 24 28 49 29 20 3A 20 99 20 54 24 28 49 29 00 |O$(I) : . T$(I).|
000001E0: E5 09 D4 08 99 00 ED 09 DE 08 82 20 49 00 F5 09 |........... I...|
000001F0: FC 08 A0 20 31 00 01 0A 06 09 41 41 B2 41 41 AA |... 1.....AA.AA.|
00000200: 31 00 17 0A 10 09 85 20 22 4E 41 4D 45 3A 20 22 |1...... "NAME: "|
00000210: 3B 4E 24 28 41 41 29 00 30 0A 1A 09 85 20 22 53 |;N$(AA).0.... "S|
00000220: 54 52 41 53 53 45 3A 20 22 3B 53 24 28 41 41 29 |TRASSE: ";S$(AA)|
00000230: 00 45 0A 24 09 85 20 22 4F 52 54 3A 20 22 3B 4F |.E.$.. "ORT: ";O|
00000240: 24 28 41 41 29 00 5E 0A 2E 09 85 20 22 54 45 4C |$(AA).^.... "TEL|
00000250: 45 46 4F 4E 3A 20 22 3B 54 24 28 41 41 29 00 64 |EFON: ";T$(AA).d|
00000260: 0A 38 09 99 00 83 0A 42 09 85 20 22 57 45 49 54 |.8.....B.. "WEIT|
00000270: 45 52 20 4D 41 43 48 45 4E 20 28 4A 2F 4E 29 22 |ER MACHEN (J/N)"|
00000280: 3B 45 24 00 99 0A 4C 09 8B 20 45 24 B2 22 4A 22 |;E$...L.. E$."J"|
00000290: 20 A7 20 89 20 32 33 31 30 00 9F 0A 56 09 3A 00 | . . 2310...V.:.|
000002A0: B0 0A 60 09 8F 20 2A 2A 2A 20 54 45 49 4C 20 44 |..`.. *** TEIL D|
000002B0: 00 B6 0A 61 09 3A 00 CD 0A 6A 09 9F 20 31 2C 38 |...a.:...j.. 1,8|
000002C0: 2C 38 2C 44 4E 24 AA 22 2C 53 2C 57 22 00 D8 0A |,8,DN$.",S,W"...|
000002D0: 74 09 8D 20 39 30 30 30 00 E9 0A 7E 09 8B 20 41 |t.. 9000...~.. A|
000002E0: B2 30 20 A7 20 32 36 30 30 00 F1 0A 88 09 A0 20 |.0 . 2600...... |
000002F0: 31 00 04 0B 92 09 8B 20 41 B3 B1 36 33 20 89 20 |1...... A..63 . |
00000300: 32 34 30 30 00 1C 0B C4 09 98 31 34 2C 22 53 3A |2400......14,"S:|
00000310: 22 AA 44 4E 24 AA 22 2E 42 41 4B 22 00 39 0B CE |".DN$.".BAK".9..|
00000320: 09 98 31 34 2C 22 52 3A 22 AA 44 4E 24 AA 22 2E |..14,"R:".DN$.".|
00000330: 42 41 4B 3D 22 AA 44 4E 24 00 44 0B D8 09 89 20 |BAK=".DN$.D.... |
00000340: 32 34 30 30 00 4E 0B 28 0A 98 31 2C 41 41 00 5D |2400.N.(..1,AA.]|
00000350: 0B 32 0A 81 20 49 B2 31 20 A4 20 41 41 00 73 0B |.2.. I.1 . AA.s.|
00000360: 3C 0A 98 31 2C 4E 24 28 49 29 3A 98 31 2C 53 24 |<..1,N$(I):.1,S$|
00000370: 28 49 29 00 89 0B 46 0A 98 31 2C 4F 24 28 49 29 |(I)...F..1,O$(I)|
00000380: 3A 98 31 2C 54 24 28 49 29 00 91 0B 50 0A 82 20 |:.1,T$(I)...P.. |
00000390: 49 00 A0 0B 5A 0A A0 20 31 20 3A 20 A0 20 31 34 |I...Z.. 1 : . 14|
000003A0: 00 B9 0B 64 0A 99 20 22 50 52 4F 47 52 41 4D 4D |...d.. "PROGRAMM|
000003B0: 20 42 45 45 4E 44 45 54 22 00 BF 0B B8 0B 80 00 | BEENDET".......|
000003C0: C5 0B C2 0B 3A 00 D6 0B 28 23 8F 20 2A 2A 2A 20 |....:...(#. *** |
000003D0: 54 45 49 4C 20 45 00 DC 0B 29 23 3A 00 ED 0B 32 |TEIL E...)#:...2|
000003E0: 23 84 31 34 2C 41 2C 42 24 2C 43 2C 44 00 FB 0B |#.14,A,B$,C,D...|
000003F0: 3C 23 8B 20 41 B2 30 20 A7 20 8E 00 01 0C 46 23 |<#. A.0 . ....F#|
00000400: 99 00 0A 0C 50 23 49 39 B2 31 00 20 0C 5A 23 8B |....P#I9.1. .Z#.|
00000410: 20 45 4E 28 49 39 29 B2 41 20 A7 20 39 31 30 30 | EN(I9).A . 9100|
00000420: 00 2C 0C 64 23 49 39 B2 49 39 AA 31 00 40 0C 6E |.,.d#I9.I9.1.@.n|
00000430: 23 8B 20 49 39 B3 B2 41 46 20 A7 20 39 30 35 30 |#. I9..AF . 9050|
00000440: 00 6B 0C 78 23 99 20 41 3B 22 20 22 3B 42 24 3B |.k.x#. A;" ";B$;|
00000450: 22 20 20 22 3B 22 53 50 55 52 3A 22 3B 43 3B 22 |" ";"SPUR:";C;"|
00000460: 20 53 45 4B 54 4F 52 3A 22 3B 44 00 85 0C 82 23 | SEKTOR:";D....#|
00000470: 90 20 3A 20 8F 20 50 52 4F 47 52 41 4D 4D 41 42 |. : . PROGRAMMAB|
00000480: 42 52 55 43 48 00 A4 0C 8C 23 91 20 49 39 20 89 |BRUCH....#. I9 .|
00000490: 20 39 32 30 30 2C 39 33 30 30 2C 39 34 30 30 2C | 9200,9300,9400,|
000004A0: 39 35 30 30 00 AA 0C 96 23 8E 00 B0 0C A0 23 3A |9500....#.....#:|
000004B0: 00 CA 0C F0 23 8F 20 2A 2A 2A 20 46 45 48 4C 45 |....#. *** FEHLE|
000004C0: 52 4D 45 4C 44 55 4E 47 20 31 00 F9 0C FA 23 99 |RMELDUNG 1....#.|
000004D0: 20 22 44 49 45 20 44 49 53 4B 45 54 54 45 20 49 | "DIE DISKETTE I|
000004E0: 53 54 20 53 43 48 52 45 49 42 47 45 53 43 48 55 |ST SCHREIBGESCHU|
000004F0: 45 54 5A 54 22 20 3A 20 99 00 2B 0D 04 24 99 20 |ETZT" : ..+..$. |
00000500: 22 57 45 4E 4E 20 53 49 45 20 4D 49 54 20 44 45 |"WENN SIE MIT DE|
00000510: 52 20 44 49 53 4B 45 54 54 45 20 41 52 42 45 49 |R DISKETTE ARBEI|
00000520: 54 45 4E 20 57 4F 4C 4C 45 4E 22 00 53 0D 0E 24 |TEN WOLLEN".S..$|
00000530: 99 20 22 20 20 44 41 4E 4E 20 45 4E 54 46 45 52 |. " DANN ENTFER|
00000540: 4E 45 4E 20 53 49 45 20 44 45 4E 20 53 43 48 55 |NEN SIE DEN SCHU|
00000550: 54 5A 22 00 5E 0D 18 24 8D 20 39 39 30 30 00 64 |TZ".^..$. 9900.d|
00000560: 0D 22 24 8E 00 6A 0D 2C 24 3A 00 84 0D 54 24 8F |."$..j.,$:...T$.|
00000570: 20 2A 2A 2A 20 46 45 48 4C 45 52 4D 45 4C 44 55 | *** FEHLERMELDU|
00000580: 4E 47 20 32 00 BF 0D 5E 24 99 20 22 44 49 45 20 |NG 2...^$. "DIE |
00000590: 44 49 53 4B 45 54 54 45 20 4F 44 45 52 20 44 41 |DISKETTE ODER DA|
000005A0: 53 20 49 4E 48 41 4C 54 53 56 45 52 5A 45 49 43 |S INHALTSVERZEIC|
000005B0: 48 4E 49 53 20 53 49 4E 44 20 56 4F 4C 4C 22 00 |HNIS SIND VOLL".|
000005C0: EC 0D 68 24 99 20 22 20 20 4C 45 47 45 4E 20 53 |..h$. " LEGEN S|
000005D0: 49 45 20 45 49 4E 45 20 41 4E 44 45 52 45 20 44 |IE EINE ANDERE D|
000005E0: 49 53 4B 45 54 54 45 20 45 49 4E 22 00 F7 0D 72 |ISKETTE EIN"...r|
000005F0: 24 8D 20 39 39 30 30 00 FD 0D 7C 24 8E 00 03 0E |$. 9900...|$....|
00000600: 86 24 3A 00 1D 0E B8 24 8F 20 2A 2A 2A 20 46 45 |.$:....$. *** FE|
00000610: 48 4C 45 52 4D 45 4C 44 55 4E 47 20 33 00 49 0E |HLERMELDUNG 3.I.|
00000620: C2 24 99 20 22 45 53 20 42 45 46 49 4E 44 45 54 |.$. "ES BEFINDET|
00000630: 20 53 49 43 48 20 4B 45 49 4E 45 20 46 4F 52 4D | SICH KEINE FORM|
00000640: 41 54 54 49 45 52 54 45 22 00 68 0E CC 24 99 20 |ATTIERTE".h..$. |
00000650: 22 20 20 44 49 53 4B 45 54 54 45 20 49 4D 20 4C |" DISKETTE IM L|
00000660: 41 55 46 57 45 52 4B 22 00 73 0E D6 24 8D 20 39 |AUFWERK".s..$. 9|
00000670: 39 30 30 00 79 0E E0 24 8E 00 7F 0E EA 24 3A 00 |900.y..$.....$:.|
00000680: 99 0E 1C 25 8F 20 2A 2A 2A 20 46 45 48 4C 45 52 |...%. *** FEHLER|
00000690: 4D 45 4C 44 55 4E 47 20 34 00 D1 0E 26 25 99 20 |MELDUNG 4...&%. |
000006A0: 22 44 49 45 53 45 20 44 41 54 45 49 20 45 58 49 |"DIESE DATEI EXI|
000006B0: 53 54 49 45 52 54 20 42 45 52 45 49 54 53 20 41 |STIERT BEREITS A|
000006C0: 4C 53 20 50 52 4F 47 52 41 4D 4D 44 41 54 45 49 |LS PROGRAMMDATEI|
000006D0: 22 00 EC 0E 30 25 99 20 22 20 20 41 55 46 20 44 |"...0%. " AUF D|
000006E0: 45 52 20 44 49 53 4B 45 54 54 45 22 00 14 0F 3A |ER DISKETTE"...:|
000006F0: 25 99 20 22 57 41 45 48 4C 45 4E 20 53 49 45 20 |%. "WAEHLEN SIE |
00000700: 45 49 4E 45 4E 20 41 4E 44 45 52 45 4E 20 4E 41 |EINEN ANDEREN NA|
00000710: 4D 45 4E 22 00 1F 0F 44 25 8D 20 39 39 30 30 00 |MEN"...D%. 9900.|
00000720: 25 0F 4E 25 8E 00 2B 0F 58 25 3A 00 44 0F AC 26 |%.N%..+.X%:.D..&|
00000730: 8F 20 2A 2A 2A 20 54 41 53 54 45 20 41 42 57 41 |. *** TASTE ABWA|
00000740: 52 54 45 4E 00 6D 0F B6 26 99 20 3A 20 99 20 22 |RTEN.m..&. : . "|
00000750: 57 45 4E 4E 20 46 45 52 54 49 47 20 2D 20 54 41 |WENN FERTIG - TA|
00000760: 53 54 45 20 44 52 55 45 43 4B 45 4E 22 00 87 0F |STE DRUECKEN"...|
00000770: C0 26 A1 20 45 24 20 3A 20 8B 20 45 24 B2 22 22 |.&. E$ : . E$.""|
00000780: 20 A7 20 39 39 32 30 00 8D 0F CA 26 8E 00 93 0F | . 9920....&....|
00000790: D4 26 3A 00 00 00 |.&:... |
....... *** TEIL A.....:.!...AF.6......
EN(AF).7.L.. 26.@.V.. 72.I.`.. 74.R.J..
64.[.T.. 62.D.~.. 63.S.... I.1 . AF....
. EN(I)...... I...... 14,8,15.....:...@.
. *** TEIL B...A.:.X.J.. N$(300),S$(300)
,O$(100),T$(100)...P.AA.0...4.. G(147)..
.>.. "DATEINAME: ";DN$...H...#.R.. 1,8,8
,DN$.",S,R"...\.. 9000.@.F.. A.62 . 2300
.Q.P.. A.0 . 2200.Y.Z. 1.D.... 2100.J..
.:.{.... *** TEIL 3......1,AA...... I.1
. AA......1,N$(I),S$(I),O$(I),T$(I).I...
. N$(I) : . S$(I)...J.. O$(I) : . T$(I).
..T........ I..... 1.....AA.AA.1......
"NAME: ";N$(AA).0.... "STRASSE: ";S$(AA)
.E.$.. "ORT: ";O$(AA).^.... "TELEFON: ";
T$(AA).D.8.....B.. "WEITER MACHEN (J/N)"
;E$...L.. E$."J" . . 2310...V.:...`.. **
* TEIL D...A.:.M.J.. 1,8,8,DN$.",S,W".X.
T.. 9000...~.. A.0 . 2600..... 1......
A..63 . 2400...D..14,"S:".DN$.".BAK".9.N
..14,"R:".DN$.".BAK=".DN$.D.X.. 2400.N.(
..1,AA.].2.. I.1 . AA.S.<..1,N$(I):.1,S$
(I)...F..1,O$(I):.1,T$(I)...P.. I. .Z.
1 : 14...D.. "PROGRAMM BEENDET".......
E.B.:.V.(#. *** TEIL E...)#:...2#.14,A,B
$,C,D...<#. A.0 . ....F#....P#I9.1. .Z#.
EN(I9).A . 9100.,.D#I9.I9.1.@.N#. I9..A
F . 9050.K.X#. A;" ";B$;" ";"SPUR:";C;"
SEKTOR:";D....#. : . PROGRAMMABBRUCH...
.#. I9 . 9200,9300,9400,9500....#.... #:
.J..#. *** FEHLERMELDUNG 1....#. "DIE DI
SKETTE IST SCHREIBGESCHUETZT" : ..+..$.
"WENN SIE MIT DER DISKETTE ARBEITEN WOLL
EN".S..$. " DANN ENTFERNEN SIE DEN SCHU
TZ".^..$. 9900.D."$..J.,$:...T$. *** FEH
LERMELDUNG 2...^$. "DIE DISKETTE ODER DA
S INHALTSVERZEICHNIS SIND VOLL"...H$. "
LEGEN SIE EINE ANDERE DISKETTE EIN"...R
$. 9900...|$.....$:....$. *** FEHLERMELD
UNG 3.I.B$. "ES BEFINDET SICH KEINE FORM
ATTIERTE".H.L$. " DISKETTE IM LAUFWERK"
.S.V$. 9900.Y..$....$:....%. *** FEHLER
MELDUNG 4.Q.&%. "DIESE DATEI EXISTIERT B
EREITS ALS PROGRAMMDATEI"...0%. " AUF D
ER DISKETTE"...:%. "WAEHLEN SIE EINEN AN
DEREN NAMEN"...D%. 9900.%.N%..+.X%:.D..&
. *** TASTE ABWARTEN.M..&. : . "WENN FER
TIG - TASTE DRUECKEN"....&. E$ : . E$.""
. 9920...J&....T&:...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL