PARTY

00000000: 01 08 20 08 04 00 97 35  33 32 38 31 2C 31 30 3A  |.. ....53281,10:|
00000010: 97 35 33 32 38 30 2C 30  3A 99 C7 28 31 34 34 29  |.53280,0:..(144)|
00000020: 00 2D 08 05 00 99 22 93  11 11 11 11 22 00 46 08  |.-....".....".F.|
00000030: 0A 00 99 22 20 20 20 20  D7 20 22 2C 2C 22 20 4F  |..."    . ",," O|
00000040: 22 2C 22 20 D7 22 00 61  08 0C 00 99 22 20 20 20  |"," .".a...."   |
00000050: CA B1 C9 22 2C 2C 22 D5  B1 C9 22 2C 22 D5 B1 CB  |...",,"...","...|
00000060: 22 00 84 08 0D 00 99 22  20 20 20 20 D1 20 22 2C  |"......"    . ",|
00000070: 22 12 4C 45 55 54 45 92  22 2C 22 20 D3 22 2C 22  |".LEUTE."," .","|
00000080: 20 A6 A6 22 00 A0 08 0E  00 99 22 20 20 20 20 D4  | .."......"    .|
00000090: D4 22 2C 2C 22 20 D4 D4  20 22 2C 22 20 DC DC 22  |.",," .. "," .."|
000000A0: 00 AB 08 12 00 8B 47 A7  32 30 30 00 D9 08 14 00  |......G.200.....|
000000B0: 99 22 11 11 53 4F 4C 4C  20 49 43 48 20 5A 55 45  |."..SOLL ICH ZUE|
000000C0: 52 53 54 20 44 41 53 20  44 41 54 45 4E 42 41 4E  |RST DAS DATENBAN|
000000D0: 44 20 4C 45 53 45 4E 22  3B 00 F2 08 1E 00 47 B2  |D LESEN";.....G.|
000000E0: 33 3A 96 A5 51 28 5A 29  B2 28 C6 28 42 24 29 B2  |3:..Q(Z).(.(B$).|
000000F0: 5A 29 00 FB 08 20 00 8D  39 39 39 00 1D 09 23 00  |Z)... ..999...#.|
00000100: 8B 59 45 53 A7 9F 31 2C  38 2C 32 2C 22 54 2E 44  |.YES..1,8,2,"T.D|
00000110: 41 54 41 2C 53 2C 52 22  3A 84 31 2C 47 00 30 09  |ATA,S,R":.1,G.0.|
00000120: 28 00 86 47 24 28 39 39  29 2C 59 4E 28 39 39 29  |(..G$(99),YN(99)|
00000130: 00 65 09 32 00 47 24 28  31 29 B2 22 3F 49 53 54  |.e.2.G$(1)."?IST|
00000140: 20 45 53 20 45 49 4E 45  20 46 52 41 55 22 3A 47  | ES EINE FRAU":G|
00000150: 24 28 32 29 B2 22 4D 41  52 49 4C 59 4E 20 4D 4F  |$(2)."MARILYN MO|
00000160: 4E 52 4F 45 22 00 8C 09  3C 00 47 24 28 33 29 B2  |NROE"...<.G$(3).|
00000170: 22 4A 41 4D 45 53 20 42  4F 4E 44 22 3A 59 4E 28  |"JAMES BOND":YN(|
00000180: 31 29 B2 32 3A 59 4E 28  32 29 B2 33 00 9B 09 46  |1).2:YN(2).3...F|
00000190: 00 8B A8 20 59 45 53 A7  31 31 30 00 AC 09 50 00  |... YES.110...P.|
000001A0: 81 49 B2 31 A4 47 3A 84  31 2C 42 24 00 BA 09 55  |.I.1.G:.1,B$...U|
000001B0: 00 8B 53 54 B1 30 A7 31  35 31 00 C7 09 5A 00 84  |..ST.0.151...Z..|
000001C0: 31 2C 59 4E 28 49 29 00  D9 09 5F 00 8B A8 A5 51  |1,YN(I)..._....Q|
000001D0: 28 36 33 29 A7 99 2C 42  24 00 EB 09 64 00 47 24  |(63)..,B$...d.G$|
000001E0: 28 49 29 B2 42 24 3A 82  3A A0 31 00 11 0A 6E 00  |(I).B$:.:.1...n.|
000001F0: 99 3A 99 22 20 20 20 20  12 44 45 4E 4B 20 41 4E  |.:."    .DENK AN|
00000200: 20 45 49 4E 45 20 50 45  52 53 4F 4E 20 2E 2E 2E  | EINE PERSON ...|
00000210: 22 00 2C 0A 78 00 99 22  11 20 20 20 20 20 20 20  |".,.x..".       |
00000220: 20 20 12 46 45 52 54 49  47 20 3F 22 00 3F 0A 82  |  .FERTIG ?".?..|
00000230: 00 A1 41 24 3A 8B 41 24  B2 22 22 A7 31 33 30 00  |..A$:.A$."".130.|
00000240: 4D 0A 8C 00 8B 41 24 B2  22 4A 22 A7 35 00 5D 0A  |M....A$."J".5.].|
00000250: 91 00 8B 41 24 B2 22 53  22 A7 31 35 30 00 66 0A  |...A$."S".150.f.|
00000260: 94 00 89 31 33 30 00 88  0A 96 00 99 22 93 11 22  |...130......".."|
00000270: 3A 81 49 B2 31 A4 47 3A  99 49 3B 59 4E 28 49 29  |:.I.1.G:.I;YN(I)|
00000280: 2C 47 24 28 49 29 3A 82  00 A7 0A A0 00 9F 31 2C  |,G$(I):.......1,|
00000290: 38 2C 32 2C 22 40 3A 54  2E 44 41 54 41 2C 53 2C  |8,2,"@:T.DATA,S,|
000002A0: 57 22 3A 98 31 2C 47 00  C1 0A A5 00 81 49 B2 31  |W":.1,G......I.1|
000002B0: A4 47 3A 42 24 B2 47 24  28 49 29 3A 98 31 2C 42  |.G:B$.G$(I):.1,B|
000002C0: 24 00 D0 0A A8 00 98 31  2C 59 4E 28 49 29 3A 82  |$......1,YN(I):.|
000002D0: 00 D7 0A AA 00 A0 31 00  00 0B AB 00 99 22 93 11  |......1......"..|
000002E0: 11 11 11 11 41 55 46 20  57 49 45 44 45 52 53 45  |....AUF WIEDERSE|
000002F0: 48 45 4E 20 21 21 21 11  11 11 11 11 11 11 11 22  |HEN !!!........"|
00000300: 00 06 0B AC 00 80 00 17  0B C8 00 58 B2 31 3A 42  |...........X.1:B|
00000310: 24 B2 47 24 28 58 29 00  22 0B D2 00 99 22 11 11  |$.G$(X)."...."..|
00000320: 11 22 00 33 0B FA 00 99  CA 28 42 24 2C 32 2C 39  |.".3.....(B$,2,9|
00000330: 39 29 3B 00 4E 0B 2C 01  8D 39 39 39 3A 53 B2 58  |9);.N.,..999:S.X|
00000340: AA 31 AA 59 45 53 3A 50  B2 59 4E 28 53 29 00 6C  |.1.YES:P.YN(S).l|
00000350: 0B 5E 01 42 24 B2 47 24  28 50 29 3A 8B A5 51 28  |.^.B$.G$(P):..Q(|
00000360: 36 33 29 A7 58 B2 50 3A  89 32 35 30 00 88 0B 77  |63).X.P:.250...w|
00000370: 01 99 22 11 20 20 20 20  22 42 24 22 2C 20 53 54  |..".    "B$", ST|
00000380: 49 4D 4D 54 27 53 22 3B  00 91 0B 7B 01 8D 39 39  |IMMT'S";...{..99|
00000390: 39 00 9F 0B 7C 01 8B 59  45 53 A7 34 30 30 30 00  |9...|..YES.4000.|
000003A0: AD 0B 8F 01 8B 47 B1 39  39 A7 31 35 30 00 D2 0B  |.....G.99.150...|
000003B0: 90 01 99 22 11 12 57 49  45 20 48 45 49 53 53 54  |..."..WIE HEISST|
000003C0: 20 44 49 45 20 4E 45 55  45 20 50 45 52 53 4F 4E  | DIE NEUE PERSON|
000003D0: 3F 22 00 F8 0B 9A 01 56  24 B2 42 24 3A 8D 32 30  |?".....V$.B$:.20|
000003E0: 30 30 30 3A 42 24 B2 49  4E 24 3A 8B C6 28 42 24  |000:B$.IN$:..(B$|
000003F0: 29 B3 36 35 A7 31 31 30  00 1D 0C A4 01 99 22 12  |).65.110......".|
00000400: 42 49 54 54 45 20 47 49  42 20 45 49 4E 45 20 46  |BITTE GIB EINE F|
00000410: 52 41 47 45 20 41 4E 2C  20 44 49 45 22 00 32 0C  |RAGE AN, DIE".2.|
00000420: A9 01 99 22 12 22 42 24  22 12 20 56 4F 4E 20 22  |..."."B$". VON "|
00000430: 56 24 00 48 0C AA 01 99  22 12 55 4E 54 45 52 53  |V$.H....".UNTERS|
00000440: 43 48 45 49 44 45 54 22  00 6D 0C AE 01 8D 32 30  |CHEIDET".m....20|
00000450: 30 30 30 3A 57 24 B2 49  4E 24 3A 47 B2 47 AA 31  |000:W$.IN$:G.G.1|
00000460: 3A 47 24 28 47 29 B2 22  3F 22 AA 57 24 00 9C 0C  |:G$(G)."?".W$...|
00000470: B8 01 99 22 46 55 45 52  20 22 42 24 22 20 57 41  |..."FUER "B$" WA|
00000480: 45 52 45 20 44 49 45 20  41 4E 54 57 4F 52 54 20  |ERE DIE ANTWORT |
00000490: 28 4A 2F 4E 29 22 3B 3A  8D 39 39 39 00 B1 0C C2  |(J/N)";:.999....|
000004A0: 01 59 4E 28 47 AB 28 A8  59 45 53 29 29 B2 47 AA  |.YN(G.(.YES)).G.|
000004B0: 31 00 C9 0C CC 01 59 4E  28 47 AB 59 45 53 29 B2  |1.....YN(G.YES).|
000004C0: 50 3A 59 4E 28 53 29 B2  47 00 DC 0C D6 01 47 B2  |P:YN(S).G.....G.|
000004D0: 47 AA 31 3A 47 24 28 47  29 B2 42 24 00 E5 0C F4  |G.1:G$(G).B$....|
000004E0: 01 89 31 31 30 00 F0 0C  E7 03 99 22 3F 20 22 3B  |..110......"? ";|
000004F0: 00 04 0D E8 03 A1 41 24  3A 8B 41 24 B2 22 22 A7  |......A$:.A$."".|
00000500: 31 30 30 30 00 1C 0D DC  05 59 45 53 B2 28 41 24  |1000.....YES.(A$|
00000510: B2 22 59 22 B0 41 24 B2  22 4A 22 29 00 2B 0D 40  |."Y".A$."J").+.@|
00000520: 06 8B 59 45 53 A7 99 41  24 3A 8E 00 3D 0D D0 07  |..YES..A$:..=...|
00000530: 8B 41 24 B3 B1 22 4E 22  A7 31 30 30 30 00 47 0D  |.A$.."N".1000.G.|
00000540: D1 07 99 41 24 3A 8E 00  67 0D A0 0F 99 22 11 20  |...A$:..g....". |
00000550: 20 20 47 55 54 2C 20 4E  45 55 45 52 20 56 45 52  |  GUT, NEUER VER|
00000560: 53 55 43 48 20 3F 22 00  7D 0D AA 0F A1 52 45 24  |SUCH ?".}....RE$|
00000570: 3A 8B 52 45 24 B2 22 22  A7 34 30 31 30 00 8E 0D  |:.RE$."".4010...|
00000580: B4 0F 8B 52 45 24 B2 22  4A 22 A7 31 31 30 00 9F  |...RE$."J".110..|
00000590: 0D BE 0F 8B 52 45 24 B2  22 4E 22 A7 31 37 31 00  |....RE$."N".171.|
000005A0: A9 0D C8 0F 89 34 30 31  30 00 C1 0D 88 13 99 22  |.....4010......"|
000005B0: 93 22 3B A3 31 34 29 3B  22 12 4C 45 55 54 45 92  |.";.14);".LEUTE.|
000005C0: 22 00 F1 0D 92 13 99 22  11 11 49 43 48 20 56 45  |"......"..ICH VE|
000005D0: 52 53 55 43 48 45 2C 20  44 49 45 20 50 45 52 53  |RSUCHE, DIE PERS|
000005E0: 4F 4E 45 4E 20 5A 55 20  45 52 52 41 54 45 4E 2C  |ONEN ZU ERRATEN,|
000005F0: 22 00 12 0E 9C 13 99 22  41 4E 20 44 49 45 20 53  |"......"AN DIE S|
00000600: 49 45 20 47 45 44 41 43  48 54 20 48 41 42 45 4E  |IE GEDACHT HABEN|
00000610: 2E 22 00 3C 0E A6 13 99  22 44 41 5A 55 20 57 45  |.".<...."DAZU WE|
00000620: 52 44 45 20 49 43 48 20  49 48 4E 45 4E 20 45 49  |RDE ICH IHNEN EI|
00000630: 4E 49 47 45 20 46 52 41  47 45 4E 22 00 69 0E B0  |NIGE FRAGEN".i..|
00000640: 13 99 22 53 54 45 4C 4C  45 4E 2C 20 44 49 45 20  |.."STELLEN, DIE |
00000650: 53 49 45 20 4D 49 54 20  12 4A 41 92 20 4F 44 45  |SIE MIT .JA. ODE|
00000660: 52 20 12 4E 45 49 4E 92  22 00 84 0E BA 13 99 22  |R .NEIN."......"|
00000670: 42 45 41 4E 54 57 4F 52  54 45 4E 20 53 4F 4C 4C  |BEANTWORTEN SOLL|
00000680: 45 4E 2E 22 00 B0 0E C4  13 99 22 11 41 4D 20 41  |EN."......".AM A|
00000690: 4E 46 41 4E 47 20 4B 45  4E 4E 45 20 49 43 48 20  |NFANG KENNE ICH |
000006A0: 4E 55 52 20 32 20 50 45  52 53 4F 4E 45 4E 2C 22  |NUR 2 PERSONEN,"|
000006B0: 00 DF 0E CE 13 99 22 41  42 45 52 20 49 43 48 20  |......"ABER ICH |
000006C0: 4C 45 52 4E 45 20 49 4D  4D 45 52 20 4E 45 55 45  |LERNE IMMER NEUE|
000006D0: 20 44 41 5A 55 20 28 42  49 53 20 39 39 29 22 00  | DAZU (BIS 99)".|
000006E0: 0E 0F D8 13 99 22 46 41  4C 4C 53 20 49 43 48 20  |....."FALLS ICH |
000006F0: 42 45 49 20 53 50 49 45  4C 45 4E 44 45 20 44 49  |BEI SPIELENDE DI|
00000700: 45 20 44 41 54 45 4E 20  4E 49 43 48 54 22 00 35  |E DATEN NICHT".5|
00000710: 0F E2 13 99 22 56 45 52  47 45 53 53 45 4E 20 53  |...."VERGESSEN S|
00000720: 4F 4C 4C 2C 20 47 45 42  45 4E 20 53 49 45 20 42  |OLL, GEBEN SIE B|
00000730: 49 54 54 45 22 00 54 0F  EC 13 99 22 45 49 4E 20  |ITTE".T...."EIN |
00000740: 12 53 92 20 28 53 49 43  48 45 52 4E 29 20 45 49  |.S. (SICHERN) EI|
00000750: 4E 20 21 22 00 6C 0F F6  13 99 22 11 11 11 20 20  |N !".l...."...  |
00000760: 20 20 20 42 45 52 45 49  54 20 3F 22 00 84 0F 50  |   BEREIT ?"...P|
00000770: 14 A1 52 45 24 3A 8B 52  45 24 B3 B1 22 4A 22 A7  |..RE$:.RE$.."J".|
00000780: 35 32 30 30 00 8A 0F 5A  14 8E 00 98 0F 20 4E 8F  |5200...Z..... N.|
00000790: 20 45 49 4E 47 41 42 45  00 B1 0F 2A 4E 49 4E 24  | EINGABE...*NIN$|
000007A0: B2 22 22 3A 41 4E 5A B2  30 3A 99 22 3F D2 9D 22  |."":ANZ.0:."?.."|
000007B0: 3B 00 C8 0F 34 4E A1 5A  5A 24 3A 8B 5A 5A 24 B2  |;...4N.ZZ$:.ZZ$.|
000007C0: 22 22 A7 32 30 30 32 30  00 D6 0F 3E 4E 5A 5A B2  |"".20020...>NZZ.|
000007D0: C6 28 5A 5A 24 29 00 F0  0F 48 4E 8B 5A 5A B2 32  |.(ZZ$)...HN.ZZ.2|
000007E0: 30 A7 32 30 31 30 30 3A  8F 20 44 45 4C 45 54 45  |0.20100:. DELETE|
000007F0: 00 0A 10 52 4E 8B 5A 5A  B2 31 33 A7 32 30 32 30  |...RN.ZZ.13.2020|
00000800: 30 3A 8F 20 52 45 54 55  52 4E 00 21 10 5C 4E 8B  |0:. RETURN.!.\N.|
00000810: 5A 5A B3 33 32 B0 5A 5A  B1 39 36 A7 32 30 30 32  |ZZ.32.ZZ.96.2002|
00000820: 30 00 3B 10 66 4E 49 4E  24 B2 49 4E 24 AA 5A 5A  |0.;.fNIN$.IN$.ZZ|
00000830: 24 3A 41 4E 5A B2 41 4E  5A AA 31 00 49 10 70 4E  |$:ANZ.ANZ.1.I.pN|
00000840: 99 5A 5A 24 22 D2 9D 22  3B 00 54 10 7A 4E 89 32  |.ZZ$"..";.T.zN.2|
00000850: 30 30 32 30 00 73 10 84  4E 8B 41 4E 5A B2 31 A7  |0020.s..N.ANZ.1.|
00000860: 49 4E 24 B2 22 22 3A 41  4E 5A B2 30 3A 89 32 30  |IN$."":ANZ.0:.20|
00000870: 31 33 30 00 84 10 89 4E  8B 41 4E 5A B3 31 A7 32  |130....N.ANZ.1.2|
00000880: 30 30 32 30 00 92 10 8E  4E 41 4E 5A B2 41 4E 5A  |0020....NANZ.ANZ|
00000890: AB 31 00 A5 10 98 4E 49  4E 24 B2 C8 28 49 4E 24  |.1....NIN$..(IN$|
000008A0: 2C 41 4E 5A 29 00 B3 10  A2 4E 99 22 20 9D 9D D2  |,ANZ)....N." ...|
000008B0: 9D 22 3B 00 BE 10 AC 4E  89 32 30 30 32 30 00 CF  |.";....N.20020..|
000008C0: 10 E8 4E 8B 41 4E 5A B2  30 A7 32 30 30 32 30 00  |..N.ANZ.0.20020.|
000008D0: D8 10 F2 4E 99 22 20 22  00 DE 10 FC 4E 8E 00 00  |...N." "....N...|
000008E0: 00 0F A9                                          |...             |

.. ....53281,10:.53280,0:.G(144).-....".
....".F...."    W ",," O"," W".A...."   
J.I",,"U.I","U.K"......"    Q ",".LEUTE.
"," S"," ..". ...."    TT",," TT "," .."
......G.200.Y...."..SOLL ICH ZUERST DAS 
DATENBAND LESEN";.....G.3:..Q(Z).(F(B$).
Z)... ..999...#..YES..1,8,2,"T.DATA,S,R"
:.1,G.0.(..G$(99),YN(99).E.2.G$(1)."?IST
 ES EINE FRAU":G$(2)."MARILYN MONROE"...
<.G$(3)."JAMES BOND":YN(1).2:YN(2).3...F
... YES.110...P..I.1.G:.1,B$...U..ST.0.1
51.G.Z..1,YN(I).Y._....Q(63)..,B$...D.G$
(I).B$:.: 1...N..:."    .DENK AN EINE PE
RSON ...".,.X..".         .FERTIG ?".?..
..A$:.A$."".130.M....A$."J".5.]....A$."S
".150.F....130......"..":.I.1.G:.I;YN(I)
,G$(I):.... ..1,8,2,"@:T.DATA,S,W":.1,G.
A....I.1.G:B$.G$(I):.1,B$.P....1,YN(I):.
.W... 1......"......AUF WIEDERSEHEN !!!.
.......".........H.X.1:B$.G$(X).".R.."..
.".3....J(B$,2,99);.N.,..999:S.X.1.YES:P
.YN(S).L.^.B$.G$(P):..Q(63).X.P:.250...W
..".    "B$", STIMMT'S";...{..999...|..Y
ES.4000......G.99.150.R...."..WIE HEISST
 DIE NEUE PERSON?".....V$.B$:.20000:B$.I
N$:.F(B$).65.110......".BITTE GIB EINE F
RAGE AN, DIE".2...."."B$". VON "V$.H....
".UNTERSCHEIDET".M....20000:W$.IN$:G.G.1
:G$(G)."?".W$......"FUER "B$" WAERE DIE 
ANTWORT (J/N)";:.999...B.YN(G.(.YES)).G.
1.I.L.YN(G.YES).P:YN(S).G...V.G.G.1:G$(G
).B$......110......"? ";......A$:.A$."".
1000.....YES.(A$."Y".A$."J").+.@..YES..A
$:..=.P..A$.."N".1000.G.Q..A$:..G. ..". 
  GUT, NEUER VERSUCH ?".}....RE$:.RE$.""
.4010......RE$."J".110......RE$."N".171.
..H..4010.A....".";.14);".LEUTE."......"
..ICH VERSUCHE, DIE PERSONEN ZU ERRATEN,
"......"AN DIE SIE GEDACHT HABEN.".<....
"DAZU WERDE ICH IHNEN EINIGE FRAGEN".I..
.."STELLEN, DIE SIE MIT .JA. ODER .NEIN.
"......"BEANTWORTEN SOLLEN."...D..".AM A
NFANG KENNE ICH NUR 2 PERSONEN,"...N.."A
BER ICH LERNE IMMER NEUE DAZU (BIS 99)".
..X.."FALLS ICH BEI SPIELENDE DIE DATEN 
NICHT".5...."VERGESSEN SOLL, GEBEN SIE B
ITTE".T...."EIN .S. (SICHERN) EIN !".L..
.."...     BEREIT ?"...P..RE$:.RE$.."J".
5200...Z..... N. EINGABE...*NIN$."":ANZ.
0:."?R.";.H.4N.ZZ$:.ZZ$."".20020.V.>NZZ.
F(ZZ$)...HN.ZZ.20.20100:. DELETE...RN.ZZ
.13.20200:. RETURN.!.\N.ZZ.32.ZZ.96.2002
0.;.FNIN$.IN$.ZZ$:ANZ.ANZ.1.I.PN.ZZ$"R."
;.T.ZN.20020.S..N.ANZ.1.IN$."":ANZ.0:.20
130....N.ANZ.1.20020....NANZ.ANZ.1....NI
N$.H(IN$,ANZ)....N." ..R.";....N.20020.O
..N.ANZ.0.20020.X..N." "....N......

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL