> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 11 08 64 00 8F 2A 2A 4D 45 4E 55 45 31 2A |....d..**MENUE1*|
00000010: 2A 00 34 08 6E 00 85 22 93 11 11 57 49 45 20 48 |*.4.n.."...WIE H|
00000020: 45 49 53 53 54 20 44 49 45 20 44 41 54 45 49 22 |EISST DIE DATEI"|
00000030: 3B 44 4E 24 00 66 08 78 00 44 57 24 B2 22 2C 53 |;DN$.f.x.DW$.",S|
00000040: 2C 57 22 3A 44 52 24 B2 22 2C 53 2C 52 22 3A 45 |,W":DR$.",S,R":E|
00000050: 57 24 B2 44 4E 24 AA 44 57 24 3A 45 52 24 B2 44 |W$.DN$.DW$:ER$.D|
00000060: 4E 24 AA 44 52 24 00 86 08 82 00 8D 20 32 30 30 |N$.DR$...... 200|
00000070: 30 3A 8F 2A 2A 4C 41 44 45 4E 20 44 45 52 20 44 |0:.**LADEN DER D|
00000080: 41 54 45 49 2A 2A 00 9C 08 8C 00 97 35 33 32 38 |ATEI**......5328|
00000090: 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 C6 08 96 |0,0:.53281,0....|
000000A0: 00 99 22 93 11 11 1D 1D 1D 1D 1D 1D 1D 1D 2A 2A |.."...........**|
000000B0: 2A 44 41 54 45 49 45 4E 56 45 52 57 41 4C 54 55 |*DATEIENVERWALTU|
000000C0: 4E 47 2A 2A 2A 22 00 EA 08 A0 00 99 A6 38 29 22 |NG***".......8)"|
000000D0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000000E0: AF AF AF AF AF AF AF 22 3A 99 00 0E 09 AA 00 99 |.......":.......|
000000F0: 22 1D 44 41 54 45 49 20 45 52 53 54 45 4C 4C 45 |".DATEI ERSTELLE|
00000100: 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E 28 31 29 22 00 34 |N.........(1)".4|
00000110: 09 B4 00 99 3A 99 22 1D 44 41 54 45 49 20 53 4F |....:.".DATEI SO|
00000120: 52 54 49 45 52 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 2E |RTIEREN.........|
00000130: 28 32 29 22 00 5A 09 BE 00 99 3A 99 22 1D 44 41 |(2)".Z....:.".DA|
00000140: 54 45 49 20 41 45 4E 44 45 52 4E 2E 2E 2E 2E 2E |TEI AENDERN.....|
00000150: 2E 2E 2E 2E 2E 2E 28 33 29 22 00 80 09 C8 00 99 |......(3)"......|
00000160: 3A 99 22 1D 41 44 52 45 53 53 45 4E 4C 49 53 54 |:.".ADRESSENLIST|
00000170: 45 20 44 52 55 43 4B 45 4E 2E 2E 2E 28 34 29 22 |E DRUCKEN...(4)"|
00000180: 00 A6 09 D2 00 99 3A 99 22 1D 4E 41 4D 45 4E 4C |......:.".NAMENL|
00000190: 49 53 54 45 20 44 52 55 43 4B 45 4E 2E 2E 2E 2E |ISTE DRUCKEN....|
000001A0: 2E 2E 28 35 29 22 00 CC 09 DC 00 99 3A 99 22 1D |..(5)"......:.".|
000001B0: 47 45 42 55 52 54 53 54 41 47 53 4C 49 53 54 45 |GEBURTSTAGSLISTE|
000001C0: 20 44 52 55 43 4B 45 4E 28 36 29 22 00 F2 09 E6 | DRUCKEN(6)"....|
000001D0: 00 99 3A 99 22 1D 50 52 4F 47 52 41 4D 4D 20 42 |..:.".PROGRAMM B|
000001E0: 45 45 4E 44 45 4E 2E 2E 2E 2E 2E 2E 2E 2E 28 37 |EENDEN........(7|
000001F0: 29 22 00 1D 0A F0 00 99 3A 85 22 57 45 4C 43 48 |)"......:."WELCH|
00000200: 45 53 20 50 52 4F 47 52 41 4D 4D 20 57 55 45 4E |ES PROGRAMM WUEN|
00000210: 53 43 48 45 4E 20 53 49 45 20 22 3B 57 00 2E 0A |SCHEN SIE ";W...|
00000220: FA 00 8B 57 B1 37 B0 57 B3 31 A7 31 35 30 00 57 |...W.7.W.1.150.W|
00000230: 0A 04 01 91 20 57 20 89 33 30 30 2C 36 30 30 2C |.... W .300,600,|
00000240: 39 30 30 2C 31 32 30 30 2C 31 35 30 30 2C 31 38 |900,1200,1500,18|
00000250: 30 30 2C 32 31 35 30 00 71 0A 2C 01 8F 2A 2A 2A |00,2150.q.,..***|
00000260: 44 41 54 45 49 20 45 52 53 54 45 4C 4C 45 4E 2A |DATEI ERSTELLEN*|
00000270: 2A 00 95 0A 36 01 8F 20 2A 2A 41 5A 3D 41 4E 5A |*...6.. **AZ=ANZ|
00000280: 41 48 4C 20 44 45 52 20 44 41 54 45 4E 53 41 45 |AHL DER DATENSAE|
00000290: 54 5A 45 2A 2A 00 A1 0A 40 01 41 5A B2 41 5A AA |TZE**...@.AZ.AZ.|
000002A0: 31 00 CD 0A 4A 01 99 22 93 11 11 49 53 54 20 44 |1...J.."...IST D|
000002B0: 49 45 20 50 45 52 53 4F 4E 20 4D 41 45 4E 4E 4C |IE PERSON MAENNL|
000002C0: 49 43 48 28 31 29 20 4F 44 45 52 22 3B 00 EA 0A |ICH(1) ODER";...|
000002D0: 54 01 85 22 20 57 45 49 42 4C 49 43 48 28 32 29 |T.." WEIBLICH(2)|
000002E0: 22 3B 44 24 28 41 5A 2C 31 29 00 02 0B 5E 01 85 |";D$(AZ,1)...^..|
000002F0: 22 56 4F 52 4E 41 4D 45 22 3B 44 24 28 41 5A 2C |"VORNAME";D$(AZ,|
00000300: 32 29 00 1B 0B 68 01 85 22 4E 41 43 48 4E 41 4D |2)...h.."NACHNAM|
00000310: 45 22 3B 44 24 28 41 5A 2C 33 29 00 36 0B 72 01 |E";D$(AZ,3).6.r.|
00000320: 85 22 53 54 52 41 53 53 45 2F 4E 52 22 3B 44 24 |."STRASSE/NR";D$|
00000330: 28 41 5A 2C 34 29 00 4E 0B 7C 01 85 22 50 4C 5A |(AZ,4).N.|.."PLZ|
00000340: 2F 4F 52 54 22 3B 44 24 28 41 5A 2C 35 29 00 67 |/ORT";D$(AZ,5).g|
00000350: 0B 86 01 85 22 56 4F 52 57 2F 54 45 4C 22 3B 44 |...."VORW/TEL";D|
00000360: 24 28 41 5A 2C 36 29 00 84 0B 90 01 85 22 47 45 |$(AZ,6)......"GE|
00000370: 42 55 52 54 53 44 41 54 55 4D 22 3B 44 24 28 41 |BURTSDATUM";D$(A|
00000380: 5A 2C 37 29 00 A7 0B 9A 01 99 22 93 11 4E 4F 43 |Z,7)......"..NOC|
00000390: 48 20 45 49 4E 20 44 41 54 45 4E 53 41 54 5A 20 |H EIN DATENSATZ |
000003A0: 28 4A 2F 4E 29 3F 22 00 C0 0B A4 01 A1 20 4A 4E |(J/N)?"...... JN|
000003B0: 24 3A 8B 20 4A 4E 24 B2 22 22 20 A7 20 34 32 30 |$:. JN$."" . 420|
000003C0: 00 D3 0B AE 01 8B 20 4A 4E 24 B2 22 4A 22 A7 20 |...... JN$."J". |
000003D0: 33 32 30 00 E6 0B B8 01 8B 20 4A 4E 24 B2 22 4E |320...... JN$."N|
000003E0: 22 A7 20 31 35 30 00 F0 0B C2 01 89 20 34 31 30 |". 150...... 410|
000003F0: 00 0A 0C D0 07 8F 20 2A 2A 4C 41 44 45 4E 20 44 |...... **LADEN D|
00000400: 45 52 20 44 41 54 45 49 2A 2A 00 1A 0C DA 07 9F |ER DATEI**......|
00000410: 20 38 2C 38 2C 38 2C 45 52 24 00 24 0C E4 07 84 | 8,8,8,ER$.$....|
00000420: 38 2C 41 5A 00 30 0C EE 07 81 49 B2 31 A4 41 5A |8,AZ.0....I.1.AZ|
00000430: 00 3B 0C F8 07 81 4A B2 31 A4 37 00 4A 0C 02 08 |.;....J.1.7.J...|
00000440: 84 38 2C 44 24 28 49 2C 4A 29 00 51 0C 0C 08 82 |.8,D$(I,J).Q....|
00000450: 4A 00 58 0C 16 08 82 49 00 5F 0C 20 08 A0 38 00 |J.X....I._. ..8.|
00000460: 65 0C 2A 08 8E 00 81 0C 66 08 8F 2A 2A 2A 50 52 |e.*.....f..***PR|
00000470: 4F 47 52 41 4D 4D 20 42 45 45 4E 44 45 4E 2A 2A |OGRAMM BEENDEN**|
00000480: 2A 00 B4 0C 70 08 8D 20 33 30 30 30 3A 8F 2A 2A |*...p.. 3000:.**|
00000490: 2A 44 41 54 45 49 20 4E 45 55 20 41 55 46 20 44 |*DATEI NEU AUF D|
000004A0: 49 53 4B 45 54 54 45 20 53 43 48 52 45 49 42 45 |ISKETTE SCHREIBE|
000004B0: 4E 2A 2A 2A 00 BD 0C 7A 08 99 22 93 22 00 C3 0C |N***...z.."."...|
000004C0: 84 08 80 00 EF 0C B8 0B 8F 2A 2A 2A 44 41 54 45 |.........***DATE|
000004D0: 49 20 4E 45 55 20 41 55 46 20 44 49 53 4B 45 54 |I NEU AUF DISKET|
000004E0: 54 45 20 53 43 48 52 45 49 42 45 4E 2A 2A 2A 00 |TE SCHREIBEN***.|
000004F0: FB 0C C2 0B 9F 31 2C 38 2C 31 35 00 1C 0D CC 0B |.....1,8,15.....|
00000500: 58 24 B2 22 53 3A 22 3A 52 24 B2 22 2C 53 22 3A |X$."S:":R$.",S":|
00000510: 53 24 B2 58 24 AA 44 4E 24 AA 52 24 00 47 0D D6 |S$.X$.DN$.R$.G..|
00000520: 0B 98 31 2C 53 24 3A A0 31 3A 8F 2A 2A 41 4C 54 |..1,S$:.1:.**ALT|
00000530: 45 20 44 41 54 45 49 20 49 53 54 20 47 45 4C 4F |E DATEI IST GELO|
00000540: 45 53 43 48 54 2A 2A 00 56 0D E0 0B 9F 38 2C 38 |ESCHT**.V....8,8|
00000550: 2C 38 2C 45 57 24 00 60 0D EA 0B 98 38 2C 41 5A |,8,EW$.`....8,AZ|
00000560: 00 6D 0D F4 0B 81 20 49 B2 31 A4 41 5A 00 79 0D |.m.... I.1.AZ.y.|
00000570: FE 0B 81 20 4A B2 31 A4 37 00 88 0D 08 0C 98 38 |... J.1.7......8|
00000580: 2C 44 24 28 49 2C 4A 29 00 8F 0D 12 0C 82 4A 00 |,D$(I,J)......J.|
00000590: 96 0D 1C 0C 82 49 00 9E 0D 26 0C A0 20 38 00 A4 |.....I...&.. 8..|
000005A0: 0D 30 0C 8E 00 00 00 |.0..... |
....D..**MENUE1**.4.N.."...WIE HEISST DI
E DATEI";DN$.F.X.DW$.",S,W":DR$.",S,R":E
W$.DN$.DW$:ER$.DN$.DR$...... 2000:.**LAD
EN DER DATEI**......53280,0:.53281,0.F..
.."...........***DATEIENVERWALTUNG***"..
. ...8)".......................":.......
".DATEI ERSTELLEN.........(1)".4....:.".
DATEI SORTIEREN.........(2)".Z....:.".DA
TEI AENDERN...........(3)"...H..:.".ADRE
SSENLISTE DRUCKEN...(4)"...R..:.".NAMENL
ISTE DRUCKEN......(5)".L....:.".GEBURTST
AGSLISTE DRUCKEN(6)"......:.".PROGRAMM B
EENDEN........(7)"......:."WELCHES PROGR
AMM WUENSCHEN SIE ";W......W.7.W.1.150.W
.... W .300,600,900,1200,1500,1800,2150.
Q.,..***DATEI ERSTELLEN**...6.. **AZ=ANZ
AHL DER DATENSAETZE**...@.AZ.AZ.1.M.J.."
...IST DIE PERSON MAENNLICH(1) ODER";...
T.." WEIBLICH(2)";D$(AZ,1)...^.."VORNAME
";D$(AZ,2)...H.."NACHNAME";D$(AZ,3).6.R.
."STRASSE/NR";D$(AZ,4).N.|.."PLZ/ORT";D$
(AZ,5).G...."VORW/TEL";D$(AZ,6)......"GE
BURTSDATUM";D$(AZ,7)......"..NOCH EIN DA
TENSATZ (J/N)?"...... JN$:. JN$."" . 420
.S.... JN$."J". 320...... JN$."N". 150..
.B.. 410...P.. **LADEN DER DATEI**...Z..
8,8,8,ER$.$....8,AZ.0....I.1.AZ.;....J.
1.7.J....8,D$(I,J).Q....J.X....I._. . 8.
E.*.....F..***PROGRAMM BEENDEN***...P..
3000:.***DATEI NEU AUF DISKETTE SCHREIBE
N***...Z..".".C..........***DATEI NEU AU
F DISKETTE SCHREIBEN***...B..1,8,15...L.
X$."S:":R$.",S":S$.X$.DN$.R$.G.V..1,S$:
1:.**ALTE DATEI IST GELOESCHT**.V....8,8
,8,EW$.`....8,AZ.M.... I.1.AZ.Y.... J.1.
7......8,D$(I,J)......J......I...&. 8..
.0.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL