> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 01 00 8F 20 28 43 29 20 42 59 20 4D |....... (C) BY M|
00000010: 4F 48 41 4D 45 44 20 45 4C 4D 41 53 52 41 52 00 |OHAMED ELMASRAR.|
00000020: 30 08 05 00 86 41 24 28 37 29 2C 42 24 28 37 29 |0....A$(7),B$(7)|
00000030: 00 3A 08 0A 00 99 22 93 22 3B 00 6E 08 14 00 99 |.:....".";.n....|
00000040: 22 93 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00000050: 20 20 20 4D 45 4E 55 45 20 20 20 20 20 20 20 20 | MENUE |
00000060: 20 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 97 | .";..|
00000070: 08 1E 00 99 22 11 11 11 20 20 20 12 20 31 20 92 |...."... . 1 .|
00000080: 20 2E 2E 2E 2E 2E 20 44 41 54 45 4E 20 45 49 4E | ..... DATEN EIN|
00000090: 47 45 42 45 4E 2E 22 00 B8 08 28 00 99 22 11 11 |GEBEN."...(.."..|
000000A0: 20 20 20 12 20 32 20 92 20 2E 2E 2E 2E 2E 20 44 | . 2 . ..... D|
000000B0: 52 55 43 4B 45 4E 2E 22 00 D6 08 29 00 99 22 11 |RUCKEN."...)..".|
000000C0: 11 20 20 20 12 20 33 20 92 20 2E 2E 2E 2E 2E 20 |. . 3 . ..... |
000000D0: 45 4E 44 45 2E 22 00 F3 08 2D 00 99 22 11 11 11 |ENDE."...-.."...|
000000E0: 11 11 11 11 11 20 49 48 52 45 20 57 41 48 4C 20 |..... IHRE WAHL |
000000F0: 3F 22 3B 00 02 09 3C 00 92 31 39 38 2C 31 3A A1 |?";...<..198,1:.|
00000100: 41 24 00 12 09 46 00 8B 41 24 B2 22 31 22 A7 31 |A$...F..A$."1".1|
00000110: 31 30 00 23 09 50 00 8B 41 24 B2 22 32 22 A7 31 |10.#.P..A$."2".1|
00000120: 30 30 30 00 35 09 55 00 8B 41 24 B2 22 33 22 A7 |000.5.U..A$."3".|
00000130: 31 30 30 30 30 00 3D 09 5A 00 89 36 30 00 70 09 |10000.=.Z..60.p.|
00000140: 6E 00 99 22 93 12 20 20 20 20 20 20 20 20 20 20 |n..".. |
00000150: 20 20 20 20 44 41 54 45 4E 20 45 49 4E 47 45 42 | DATEN EINGEB|
00000160: 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 92 22 |EN ."|
00000170: 00 8F 09 78 00 41 24 28 31 29 B2 22 20 41 4E 52 |...x.A$(1)." ANR|
00000180: 45 44 45 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 3A 22 00 |EDE .........:".|
00000190: AE 09 82 00 41 24 28 32 29 B2 22 20 56 4F 52 4E |....A$(2)." VORN|
000001A0: 41 4D 45 20 2E 2E 2E 2E 2E 2E 2E 2E 3A 22 00 CD |AME ........:"..|
000001B0: 09 8C 00 41 24 28 33 29 B2 22 20 4E 41 43 48 4E |...A$(3)." NACHN|
000001C0: 41 4D 45 20 2E 2E 2E 2E 2E 2E 2E 3A 22 00 EC 09 |AME .......:"...|
000001D0: 96 00 41 24 28 34 29 B2 22 20 53 54 52 41 53 53 |..A$(4)." STRASS|
000001E0: 45 2F 4E 52 2E 20 2E 2E 2E 2E 3A 22 00 0B 0A A0 |E/NR. ....:"....|
000001F0: 00 41 24 28 35 29 B2 22 20 50 4C 5A 2E 2F 4F 52 |.A$(5)." PLZ./OR|
00000200: 54 20 2E 2E 2E 2E 2E 2E 2E 3A 22 00 2A 0A AA 00 |T .......:".*...|
00000210: 41 24 28 36 29 B2 22 20 52 55 46 4E 55 4D 4D 45 |A$(6)." RUFNUMME|
00000220: 52 20 2E 2E 2E 2E 2E 2E 3A 22 00 49 0A B4 00 41 |R ......:".I...A|
00000230: 24 28 37 29 B2 22 20 42 45 4D 45 52 4B 55 4E 47 |$(7)." BEMERKUNG|
00000240: 20 2E 2E 2E 2E 2E 2E 3A 22 00 57 0A C8 00 99 22 | ......:".W...."|
00000250: 13 11 11 11 11 22 3B 00 62 0A D2 00 81 54 B2 31 |.....";.b....T.1|
00000260: A4 37 00 77 0A DC 00 99 41 24 28 54 29 3B 22 20 |.7.w....A$(T);" |
00000270: 22 3B 42 24 28 54 29 00 7D 0A E6 00 82 00 88 0A |";B$(T).}.......|
00000280: F0 00 81 41 B2 31 A4 37 00 A4 0A FA 00 97 32 31 |...A.1.7......21|
00000290: 34 2C 33 AA 41 3A 97 32 31 31 2C 31 39 3A 9E 35 |4,3.A:.211,19:.5|
000002A0: 38 36 34 30 00 AD 0A 04 01 9F 31 2C 30 00 BA 0A |8640......1,0...|
000002B0: 0E 01 84 31 2C 42 24 28 41 29 00 C1 0A 18 01 A0 |...1,B$(A)......|
000002C0: 31 00 C7 0A 22 01 82 00 F8 0A 2C 01 99 22 13 11 |1...".....,.."..|
000002D0: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 12 |............ .|
000002E0: 20 41 4C 4C 45 53 20 52 49 43 48 54 49 47 20 3F | ALLES RICHTIG ?|
000002F0: 20 28 4A 2F 4E 29 92 22 00 07 0B 36 01 92 31 39 | (J/N)."...6..19|
00000300: 38 2C 31 3A A1 41 24 00 1C 0B 40 01 8B 41 24 B2 |8,1:.A$...@..A$.|
00000310: 22 4A 22 A7 54 46 B2 31 3A 89 31 30 00 2C 0B 4A |"J".TF.1:.10.,.J|
00000320: 01 8B 41 24 B2 22 4E 22 A7 31 31 30 00 35 0B 54 |..A$."N".110.5.T|
00000330: 01 89 33 31 30 00 69 0B E8 03 99 22 93 12 20 20 |..310.i....".. |
00000340: 20 20 20 20 20 20 20 20 20 20 20 20 44 52 55 43 | DRUC|
00000350: 4B 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 |KEN |
00000360: 20 20 20 20 20 20 92 22 3B 00 75 0B F2 03 99 22 | .";.u...."|
00000370: 11 11 11 22 3B 00 AB 0B F7 03 8B 54 46 B3 B1 31 |...";......TF..1|
00000380: A7 99 22 4B 45 49 4E 45 20 44 41 54 45 4E 20 49 |.."KEINE DATEN I|
00000390: 4D 20 52 45 43 48 4E 45 52 2E 22 3A 81 54 B2 30 |M RECHNER.":.T.0|
000003A0: A4 32 30 30 30 3A 82 3A 89 31 30 00 D2 0B FC 03 |.2000:.:.10.....|
000003B0: 99 22 57 49 45 56 49 45 4C 20 4B 4F 50 49 45 4E |."WIEVIEL KOPIEN|
000003C0: 20 42 45 4E 4F 45 54 49 47 45 4E 20 53 49 45 20 | BENOETIGEN SIE |
000003D0: 22 3B 00 DA 0B 06 04 85 41 4E 00 E4 0B 0B 04 99 |";......AN......|
000003E0: 22 11 11 22 00 F1 0B 10 04 81 4B 50 B2 31 A4 41 |".."......KP.1.A|
000003F0: 4E 00 FC 0B 60 04 81 54 B2 31 A4 37 00 10 0C 6A |N...`..T.1.7...j|
00000400: 04 99 41 24 28 54 29 3B 22 20 22 42 24 28 54 29 |..A$(T);" "B$(T)|
00000410: 00 16 0C 74 04 82 00 20 0C 79 04 8D 35 30 30 30 |...t... .y..5000|
00000420: 00 2D 0C 7A 04 8B 54 32 B2 31 A7 31 30 00 38 0C |.-.z..T2.1.10.8.|
00000430: 7E 04 81 54 B2 31 A4 37 00 45 0C 88 04 98 34 2C |~..T.1.7.E....4,|
00000440: 42 24 28 54 29 00 4C 0C 92 04 82 54 00 53 0C 9C |B$(T).L....T.S..|
00000450: 04 98 34 00 5B 0C A6 04 82 4B 50 00 62 0C B0 04 |..4.[....KP.b...|
00000460: A0 34 00 6B 0C 88 13 9F 35 2C 34 00 78 0C 92 13 |.4.k....5,4.x...|
00000470: 97 37 36 38 2C 31 38 35 00 82 0C 9C 13 98 35 3A |.768,185......5:|
00000480: A0 35 00 8F 0C A6 13 97 37 36 38 2C 31 33 39 00 |.5......768,139.|
00000490: 9F 0C B0 13 8B 53 54 B3 B1 AB 31 32 38 A7 8E 00 |.....ST...128...|
000004A0: C2 0C BA 13 99 22 12 44 52 55 43 4B 45 52 20 49 |.....".DRUCKER I|
000004B0: 53 54 20 41 55 53 47 45 53 43 48 41 4C 54 45 54 |ST AUSGESCHALTET|
000004C0: 92 22 00 CB 0C C4 13 54 32 B2 31 00 DD 0C CE 13 |.".....T2.1.....|
000004D0: 81 54 B2 30 A4 35 30 30 30 3A 82 3A 8E 00 11 0D |.T.0.5000:.:....|
000004E0: 10 27 99 22 93 12 20 20 50 52 4F 47 52 41 4D 4D |.'.".. PROGRAMM|
000004F0: 20 45 4E 44 45 20 20 20 20 20 20 20 20 20 20 20 | ENDE |
00000500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."|
00000510: 3B 00 00 00 1C BF 04 |;...... |
....... (C) BY MOHAMED ELMASRAR.0....A$(
7),B$(7).:....".";.N...."..
MENUE .";......"...
. 1 . ..... DATEN EINGEBEN."...(.."..
. 2 . ..... DRUCKEN.".V.)..".. . 3
. ..... ENDE."...-.."........ IHRE WAHL
?";...<..198,1:.A$...F..A$."1".110.#.P..
A$."2".1000.5.U..A$."3".10000.=.Z..60.P.
N..".. DATEN EINGEBEN
."...X.A$(1)." ANREDE .........:".
....A$(2)." VORNAME ........:".M...A$(3)
." NACHNAME .......:".....A$(4)." STRASS
E/NR. ....:"... .A$(5)." PLZ./ORT ......
.:".*...A$(6)." RUFNUMMER ......:".I...A
$(7)." BEMERKUNG ......:".W.H..".....";.
B.R..T.1.7.W....A$(T);" ";B$(T).}.......
...A.1.7......214,3.A:.211,19:.58640....
..1,0......1,B$(A).A... 1.G.".....,.."..
............ . ALLES RICHTIG ? (J/N)."
...6..198,1:.A$...@..A$."J".TF.1:.10.,.J
..A$."N".110.5.T..310.I...."..
DRUCKEN .";.U...."
...";......TF..1.."KEINE DATEN IM RECHNE
R.":.T.0.2000:.:.10.R...."WIEVIEL KOPIEN
BENOETIGEN SIE ";.Z....AN......".."....
..KP.1.AN...`..T.1.7...J..A$(T);" "B$(T)
...T... .Y..5000.-.Z..T2.1.10.8.~..T.1.7
.E....4,B$(T).L....T.S....4.[....KP.B...
4.K....5,4.X....768,185......5: 5......
768,139......ST...128...B....".DRUCKER I
ST AUSGESCHALTET.".K.D.T2.1...N..T.0.500
0:.:.....'.".. PROGRAMM ENDE
.";......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL