> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 37 08 01 00 99 C7 28 31 34 29 3A 44 24 B2 |..7.....(14):D$.|
00000010: C7 28 31 37 29 AA C7 28 31 37 29 3A 49 24 B2 C7 |.(17)..(17):I$..|
00000020: 28 31 38 29 3A 43 24 B2 C7 28 31 34 37 29 3A 48 |(18):C$..(147):H|
00000030: 24 B2 C7 28 31 39 29 00 7E 08 02 00 55 24 B2 22 |$..(19).~...U$."|
00000040: 20 C1 44 52 45 53 53 45 4E 20 22 3A 41 24 28 30 | .DRESSEN ":A$(0|
00000050: 29 B2 22 31 20 CC 49 53 54 45 22 3A 41 24 28 31 |)."1 .ISTE":A$(1|
00000060: 29 B2 22 32 20 D3 55 43 48 45 4E 22 3A 41 24 28 |)."2 .UCHEN":A$(|
00000070: 32 29 B2 22 33 20 C5 49 4E 47 41 42 45 22 00 C0 |2)."3 .INGABE"..|
00000080: 08 03 00 41 24 28 33 29 B2 22 34 20 C5 4E 44 45 |...A$(3)."4 .NDE|
00000090: 22 3A 42 24 28 30 29 B2 22 C1 4E 52 45 44 45 3A |":B$(0).".NREDE:|
000000A0: 22 3A 42 24 28 31 29 B2 22 D6 4F 52 4E 41 4D 45 |":B$(1).".ORNAME|
000000B0: 3A 22 3A 42 24 28 32 29 B2 22 CE 41 4D 45 3A 22 |:":B$(2).".AME:"|
000000C0: 00 09 09 04 00 42 24 28 33 29 B2 22 D3 54 52 41 |.....B$(3).".TRA|
000000D0: 53 53 45 3A 22 3A 42 24 28 34 29 B2 22 D0 CC DA |SSE:":B$(4)."...|
000000E0: 3A 22 3A 42 24 28 35 29 B2 22 CF 52 54 3A 22 3A |:":B$(5).".RT:":|
000000F0: 42 24 28 36 29 B2 22 D4 45 4C 45 46 4F 4E 3A 22 |B$(6).".ELEFON:"|
00000100: 3A 45 24 B2 C7 28 33 34 29 00 3B 09 05 00 99 43 |:E$..(34).;....C|
00000110: 24 3B 3A 99 A3 32 29 3B 49 24 3B 55 24 3B 44 24 |$;:..2);I$;U$;D$|
00000120: 3B 44 24 3A 81 49 B2 30 A4 33 3A 99 A3 32 29 3B |;D$:.I.0.3:..2);|
00000130: 41 24 28 49 29 3B 44 24 3A 82 49 00 69 09 06 00 |A$(I);D$:.I.i...|
00000140: 99 A3 32 29 3B 44 24 3B 49 24 3B 22 20 C1 55 53 |..2);D$;I$;" .US|
00000150: 57 41 48 4C 20 31 2D 34 20 22 3B 3A 85 58 3A 8B |WAHL 1-4 ";:.X:.|
00000160: 58 B3 31 B0 58 B1 34 89 35 00 7B 09 07 00 91 58 |X.1.X.4.5.{....X|
00000170: 89 38 2C 31 30 2C 31 34 2C 31 37 00 AB 09 08 00 |.8,10,14,17.....|
00000180: 8C 3A 87 45 3A 81 49 B2 31 A4 45 3A 81 4A B2 30 |.:.E:.I.1.E:.J.0|
00000190: A4 36 3A 87 45 24 28 4A 29 3A 82 4A 3A 8D 31 39 |.6:.E$(J):.J:.19|
000001A0: 3A 99 48 24 3A 81 4A B2 30 A4 36 00 D5 09 09 00 |:.H$:.J.0.6.....|
000001B0: 99 A3 31 33 29 3B 44 24 3B 45 24 28 4A 29 3A 82 |..13);D$;E$(J):.|
000001C0: 4A 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |J:.198,0:.198,1:|
000001D0: 82 49 3A 89 35 00 0A 0A 0A 00 99 43 24 3B 44 24 |.I:.5......C$;D$|
000001E0: 3B 44 24 3A 85 22 D3 55 43 48 42 45 47 52 49 46 |;D$:.".UCHBEGRIF|
000001F0: 46 3A 20 22 3B 53 24 3A 8C 3A 87 45 3A 81 49 B2 |F: ";S$:.:.E:.I.|
00000200: 31 A4 45 3A 81 4A B2 30 A4 36 00 2D 0A 0B 00 87 |1.E:.J.0.6.-....|
00000210: 45 24 28 4A 29 3A 82 4A 3A 81 4A B2 30 A4 36 3A |E$(J):.J:.J.0.6:|
00000220: 8B 53 24 B3 B1 45 24 28 4A 29 89 31 33 00 60 0A |.S$..E$(J).13.`.|
00000230: 0C 00 8D 31 39 3A 99 48 24 3A 81 4B B2 30 A4 36 |...19:.H$:.K.0.6|
00000240: 3A 99 A3 31 33 29 3B 44 24 3B 45 24 28 4B 29 3A |:..13);D$;E$(K):|
00000250: 82 4B 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 |.K:.198,0:.198,1|
00000260: 00 6C 0A 0D 00 82 4A 2C 49 3A 89 35 00 98 0A 0E |.l....J,I:.5....|
00000270: 00 8D 31 39 3A 99 48 24 3A 81 49 B2 30 A4 36 3A |..19:.H$:.I.0.6:|
00000280: 99 A3 31 33 29 3B 44 24 3B 3A 85 45 24 28 49 29 |..13);D$;:.E$(I)|
00000290: 3A 82 49 3A 8C 3A 87 45 00 DA 0A 0F 00 45 B2 45 |:.I:.:.E.....E.E|
000002A0: AA 31 3A 99 43 24 3B 22 31 30 30 44 41 54 41 22 |.1:.C$;"100DATA"|
000002B0: 45 3A 81 49 B2 30 A4 36 3A 99 31 30 30 AA 45 AC |E:.I.0.6:.100.E.|
000002C0: 31 30 AA 49 3B 22 44 41 54 41 22 AA 45 24 AA 45 |10.I;"DATA".E$.E|
000002D0: 24 28 49 29 AA 45 24 3A 82 49 00 12 0B 10 00 99 |$(I).E$:.I......|
000002E0: 22 47 4F 54 4F 31 22 3A 97 36 33 31 2C 31 39 3A |"GOTO1":.631,19:|
000002F0: 81 49 B2 31 A4 39 3A 97 36 33 31 AA 49 2C 31 33 |.I.1.9:.631.I,13|
00000300: 3A 82 49 3A 97 31 39 38 2C 31 30 3A 97 32 2C 31 |:.I:.198,10:.2,1|
00000310: 3A 80 00 20 0B 11 00 8B C2 28 32 29 B2 30 A7 80 |:.. .....(2).0..|
00000320: 00 4E 0B 12 00 9F 31 35 2C 38 2C 31 35 2C 22 53 |.N....15,8,15,"S|
00000330: 3A 41 44 52 45 53 53 45 4E 22 3A A0 31 35 3A 94 |:ADRESSEN":.15:.|
00000340: 22 41 44 52 45 53 53 45 4E 22 2C 38 3A 80 00 70 |"ADRESSEN",8:..p|
00000350: 0B 13 00 99 43 24 3A 81 4C B2 30 A4 36 3A 99 A3 |....C$:.L.0.6:..|
00000360: 32 29 3B 44 24 3B 42 24 28 4C 29 3A 82 4C 3A 8E |2);D$;B$(L):.L:.|
00000370: 00 78 0B 64 00 83 20 30 00 00 00 |.x.d.. 0... |
..7....G(14):D$.G(17).G(17):I$.G(18):C$.
G(147):H$.G(19).~...U$." ADRESSEN ":A$(0
)."1 LISTE":A$(1)."2 SUCHEN":A$(2)."3 EI
NGABE".....A$(3)."4 ENDE":B$(0)."ANREDE:
":B$(1)."VORNAME:":B$(2)."NAME:".....B$(
3)."STRASSE:":B$(4)."PLZ:":B$(5)."ORT:":
B$(6)."TELEFON:":E$.G(34).;....C$;:..2);
I$;U$;D$;D$:.I.0.3:..2);A$(I);D$:.I.I...
..2);D$;I$;" AUSWAHL 1-4 ";:.X:.X.1.X.4.
5.{....X.8,10,14,17......:.E:.I.1.E:.J.0
.6:.E$(J):.J:.19:.H$:.J.0.6.U.....13);D$
;E$(J):.J:.198,0:.198,1:.I:.5......C$;D$
;D$:."SUCHBEGRIFF: ";S$:.:.E:.I.1.E:.J.0
.6.-....E$(J):.J:.J.0.6:.S$..E$(J).13.`.
...19:.H$:.K.0.6:..13);D$;E$(K):.K:.198,
0:.198,1.L....J,I:.5......19:.H$:.I.0.6:
..13);D$;:.E$(I):.I:.:.E.Z...E.E.1:.C$;"
100DATA"E:.I.0.6:.100.E.10.I;"DATA".E$.E
$(I).E$:.I......"GOTO1":.631,19:.I.1.9:.
631.I,13:.I:.198,10:.2,1:.. ....B(2).0..
.N....15,8,15,"S:ADRESSEN": 15:."ADRESSE
N",8:..P....C$:.L.0.6:..2);D$;B$(L):.L:.
.X.D.. 0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL