PARTNERWAHL
FILE INFORMATION
FILENAME(S): PARTNERWAHL
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-11-30 16:18:11
APPEARS ON: 1 disk(s)
FILE HASH
298f7634a5a2241029dd95e02f5ef1eff6e8fc4c67e0e2e41d608f72ec4785ad
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LODERUNNER | PARTNERWAHL | PRG | BrainSkull, Leopold Zyka | 13 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 01 00 8F 20 50 41 52 54 4E 45 52 57 |....... PARTNERW| 00000010: 41 48 4C 00 20 08 02 00 97 35 33 32 38 30 2C 39 |AHL. ....53280,9| 00000020: 00 2D 08 03 00 97 35 33 32 38 31 2C 39 00 63 08 |.-....53281,9.c.| 00000030: 05 00 54 31 24 B2 22 46 55 45 52 27 53 20 4C 45 |..T1$."FUER'S LE| 00000040: 42 45 4E 22 3A 54 32 24 B2 22 46 55 45 52 20 44 |BEN":T2$."FUER D| 00000050: 49 45 20 4E 41 45 48 45 52 45 20 5A 55 4B 55 4E |IE NAEHERE ZUKUN| 00000060: 46 54 22 00 A6 08 06 00 54 33 24 B2 22 46 55 45 |FT".....T3$."FUE| 00000070: 52 27 53 20 4B 4F 4D 4D 45 4E 44 45 20 57 4F 43 |R'S KOMMENDE WOC| 00000080: 48 45 4E 45 4E 44 45 22 3A 54 34 24 B2 22 46 55 |HENENDE":T4$."FU| 00000090: 45 52 20 44 49 45 20 4E 41 45 43 48 53 54 45 20 |ER DIE NAECHSTE | 000000A0: 4E 41 43 48 54 22 00 B7 08 0A 00 99 22 93 05 22 |NACHT"......".."| 000000B0: 3A 8D 31 30 30 30 30 00 E2 08 14 00 99 3A 99 A3 |:.10000......:..| 000000C0: 39 29 22 50 20 41 20 52 20 54 20 4E 20 45 20 52 |9)"P A R T N E R| 000000D0: 20 57 20 41 20 48 20 4C 22 3A 99 3A 8D 31 30 30 | W A H L":.:.100| 000000E0: 30 30 00 12 09 1E 00 86 46 24 28 31 30 29 2C 4C |00......F$(10),L| 000000F0: 24 28 31 30 29 2C 46 28 31 30 29 2C 4D 28 31 30 |$(10),F(10),M(10| 00000100: 2C 31 30 29 2C 56 28 31 30 29 2C 5A 28 31 30 29 |,10),V(10),Z(10)| 00000110: 3A 99 00 47 09 28 00 59 24 B2 22 59 22 3A 99 22 |:..G.(.Y$."Y":."| 00000120: 20 4B 45 49 4E 45 20 45 4E 54 53 43 48 45 49 44 | KEINE ENTSCHEID| 00000130: 55 4E 47 53 50 52 4F 42 4C 45 4D 45 20 4D 45 48 |UNGSPROBLEME MEH| 00000140: 52 20 46 55 45 52 22 00 72 09 32 00 99 22 4A 55 |R FUER".r.2.."JU| 00000150: 4E 47 47 45 53 45 4C 4C 45 4E 20 4F 44 45 52 20 |NGGESELLEN ODER | 00000160: 4C 45 44 49 47 45 20 4C 41 44 49 45 53 21 21 22 |LEDIGE LADIES!!"| 00000170: 3A 99 00 A0 09 3C 00 99 22 20 47 45 42 45 4E 20 |:....<.." GEBEN | 00000180: 53 49 45 20 4D 49 52 20 42 49 54 54 45 20 41 4E |SIE MIR BITTE AN| 00000190: 2C 20 57 41 53 20 53 49 45 20 55 45 42 45 52 22 |, WAS SIE UEBER"| 000001A0: 00 CA 09 46 00 99 22 44 49 45 20 45 56 54 4C 2E |...F.."DIE EVTL.| 000001B0: 50 41 52 54 4E 45 52 20 57 49 53 53 45 4E 2E 20 |PARTNER WISSEN. | 000001C0: 49 43 48 20 48 45 4C 46 45 22 00 F6 09 50 00 99 |ICH HELFE"...P..| 000001D0: 22 49 48 4E 45 4E 20 44 41 4E 4E 20 42 45 49 20 |"IHNEN DANN BEI | 000001E0: 45 49 4E 45 52 20 45 4E 54 53 43 48 45 49 44 55 |EINER ENTSCHEIDU| 000001F0: 4E 47 2E 22 3A 99 00 3E 0A 5A 00 99 22 20 55 45 |NG.":..>.Z.." UE| 00000200: 42 45 52 4C 41 53 53 45 4E 20 53 49 45 20 4D 49 |BERLASSEN SIE MI| 00000210: 52 20 44 49 45 53 45 53 20 50 52 4F 42 4C 45 4D |R DIESES PROBLEM| 00000220: 2C 20 55 4E 44 4B 4F 4E 5A 45 4E 54 52 49 45 52 |, UNDKONZENTRIER| 00000230: 45 4E 20 53 49 45 20 53 49 43 48 20 22 3B 00 6A |EN SIE SICH ";.j| 00000240: 0A 64 00 99 22 56 4F 4C 4C 20 55 4E 44 20 47 41 |.d.."VOLL UND GA| 00000250: 4E 5A 20 41 55 46 44 41 53 20 44 41 4E 41 43 48 |NZ AUFDAS DANACH| 00000260: 2E 2E 2E 2E 2E 2E 2E 22 3A 99 00 8D 0A 6E 00 85 |.......":....n..| 00000270: 22 42 45 52 45 49 54 22 3B 42 24 3A 8B C8 28 42 |"BEREIT";B$:..(B| 00000280: 24 2C 31 29 B2 22 4E 22 A7 39 39 39 30 00 B6 0A |$,1)."N".9990...| 00000290: 78 00 99 22 93 22 3A 99 3A 99 3A 99 3A 99 3A 99 |x..".":.:.:.:.:.| 000002A0: 3A 99 A3 38 29 22 21 21 21 20 48 20 41 20 4C 20 |:..8)"!!! H A L | 000002B0: 54 20 21 21 21 22 00 F2 0A 82 00 99 3A 99 3A 99 |T !!!"......:.:.| 000002C0: 22 49 43 48 20 48 41 45 54 54 45 20 4E 4F 43 48 |"ICH HAETTE NOCH| 000002D0: 20 45 49 4E 45 20 28 52 45 49 4E 20 53 54 41 54 | EINE (REIN STAT| 000002E0: 49 53 54 49 53 43 48 45 29 20 46 52 41 47 45 20 |ISTISCHE) FRAGE | 000002F0: 3A 22 00 1F 0B 8C 00 99 3A 99 A3 36 29 22 54 52 |:"......:..6)"TR| 00000300: 45 46 46 45 4E 20 53 49 45 20 44 49 45 53 45 20 |EFFEN SIE DIESE | 00000310: 45 4E 54 53 43 48 45 49 44 55 4E 47 22 3A 99 00 |ENTSCHEIDUNG":..| 00000320: 4A 0B 96 00 99 A3 32 29 22 31 2D 22 3B 54 31 24 |J.....2)"1-";T1$| 00000330: 3A 99 A3 32 29 22 32 2D 22 3B 54 32 24 3A 99 A3 |:..2)"2-";T2$:..| 00000340: 32 29 22 33 2D 22 3B 54 33 24 00 5B 0B A0 00 99 |2)"3-";T3$.[....| 00000350: A3 32 29 22 34 2D 22 3B 54 34 24 00 64 0B AA 00 |.2)"4-";T4$.d...| 00000360: 99 3A 85 45 00 71 0B B4 00 8B 45 B2 31 A7 31 39 |.:.E.q....E.1.19| 00000370: 30 00 7E 0B B5 00 8B 45 B2 32 A7 31 39 31 00 8B |0.~....E.2.191..| 00000380: 0B B6 00 8B 45 B2 33 A7 31 39 32 00 98 0B B7 00 |....E.3.192.....| 00000390: 8B 45 B2 34 A7 31 39 33 00 A8 0B BE 00 4F 24 B2 |.E.4.193.....O$.| 000003A0: 54 31 24 3A 89 33 30 30 00 B8 0B BF 00 4F 24 B2 |T1$:.300.....O$.| 000003B0: 54 32 24 3A 89 33 30 30 00 C8 0B C0 00 4F 24 B2 |T2$:.300.....O$.| 000003C0: 54 33 24 3A 89 33 30 30 00 D8 0B C1 00 4F 24 B2 |T3$:.300.....O$.| 000003D0: 54 34 24 3A 89 33 30 30 00 E8 0B 2C 01 99 22 93 |T4$:.300...,..".| 000003E0: 22 3A 8D 31 31 30 30 30 00 17 0C 36 01 99 3A 99 |":.11000...6..:.| 000003F0: 22 20 55 4E 54 45 52 20 57 49 45 56 49 45 4C 20 |" UNTER WIEVIEL | 00000400: 44 49 45 53 45 52 20 48 49 4D 4D 4C 49 53 43 48 |DIESER HIMMLISCH| 00000410: 45 4E 20 47 45 2D 22 00 5F 0C 40 01 99 22 53 43 |EN GE-"._.@.."SC| 00000420: 48 4F 45 50 46 45 20 28 4D 49 4E 3D 32 2D 4D 41 |HOEPFE (MIN=2-MA| 00000430: 58 3D 31 30 29 20 4D 55 45 53 53 45 4E 20 53 49 |X=10) MUESSEN SI| 00000440: 45 20 53 49 43 48 20 44 45 4E 4E 20 45 4E 54 53 |E SICH DENN ENTS| 00000450: 43 48 45 49 44 45 4E 20 3F 11 22 3A 85 4C 30 00 |CHEIDEN ?.":.L0.| 00000460: 9C 0C 4A 01 99 3A 99 22 42 49 54 54 45 20 47 45 |..J..:."BITTE GE| 00000470: 42 45 4E 20 53 49 45 20 4A 45 54 5A 54 20 41 4C |BEN SIE JETZT AL| 00000480: 4C 45 22 3B 4C 30 3A 99 22 45 56 45 4E 54 55 45 |LE";L0:."EVENTUE| 00000490: 4C 4C 45 4E 20 50 41 52 54 4E 45 52 00 C9 0C 54 |LLEN PARTNER...T| 000004A0: 01 99 22 28 52 45 49 48 45 4E 46 4F 4C 47 45 20 |.."(REIHENFOLGE | 000004B0: 53 50 49 45 4C 54 20 4B 45 49 4E 45 20 52 4F 4C |SPIELT KEINE ROL| 000004C0: 4C 45 29 20 45 49 4E 2E 22 00 F9 0C 5E 01 99 3A |LE) EIN."...^..:| 000004D0: 81 49 B2 31 A4 4C 30 3A 99 22 4E 55 4D 4D 45 52 |.I.1.L0:."NUMMER| 000004E0: 22 3B 49 3B 22 42 49 54 54 45 22 3A 85 4C 24 28 |";I;"BITTE":.L$(| 000004F0: 49 29 3A 99 3A 82 49 3A 99 00 09 0D 68 01 99 22 |I):.:.I:....h.."| 00000500: 93 22 3A 8D 31 31 30 30 30 00 29 0D 72 01 99 3A |.":.11000.).r..:| 00000510: 99 22 20 4F 4B 2C 20 44 41 53 20 57 41 45 52 45 |." OK, DAS WAERE| 00000520: 4E 20 41 4C 53 4F 22 3A 99 00 4A 0D 7C 01 81 49 |N ALSO":..J.|..I| 00000530: B2 31 A4 4C 30 3A 99 A3 33 29 49 3B 22 2D 22 3B |.1.L0:..3)I;"-";| 00000540: 4C 24 28 49 29 3A 82 49 3A 99 00 8C 0D 90 01 99 |L$(I):.I:.......| 00000550: 3A 99 22 57 49 45 56 49 45 4C 20 46 41 4B 54 4F |:."WIEVIEL FAKTO| 00000560: 52 45 4E 28 4D 41 58 3D 31 30 29 20 53 49 4E 44 |REN(MAX=10) SIND| 00000570: 20 45 49 47 45 4E 54 4C 49 43 48 57 49 43 48 54 | EIGENTLICHWICHT| 00000580: 49 47 20 42 45 49 20 44 45 52 20 22 00 BF 0D 9A |IG BEI DER "....| 00000590: 01 99 22 45 4E 54 53 43 48 45 49 44 55 4E 47 20 |.."ENTSCHEIDUNG | 000005A0: 46 55 45 52 20 49 48 52 45 4E 22 3A 99 3A 99 22 |FUER IHREN":.:."| 000005B0: 50 41 52 54 4E 45 52 2E 2E 2E 20 22 3B 4F 24 00 |PARTNER... ";O$.| 000005C0: C9 0D A4 01 99 3A 85 46 30 00 D2 0D AE 01 99 22 |.....:.F0......"| 000005D0: 93 22 00 01 0E B8 01 99 22 42 49 54 54 45 20 47 |."......"BITTE G| 000005E0: 45 42 45 4E 20 53 49 45 20 4D 49 52 20 44 49 45 |EBEN SIE MIR DIE| 000005F0: 53 45 20 46 41 4B 54 4F 52 45 4E 20 41 4E 22 3A |SE FAKTOREN AN":| 00000600: 99 00 2D 0E C2 01 81 49 B2 31 A4 46 30 3A 99 3A |..-....I.1.F0:.:| 00000610: 99 22 46 41 4B 54 4F 52 22 3B 49 3B 22 42 49 54 |."FAKTOR";I;"BIT| 00000620: 54 45 22 3A 85 46 24 28 49 29 3A 82 49 00 55 0E |TE":.F$(I):.I.U.| 00000630: CC 01 99 22 93 22 3A 99 22 57 45 4C 43 48 45 52 |...".":."WELCHER| 00000640: 20 56 4F 4E 20 44 49 45 53 45 4E 20 46 41 4B 54 | VON DIESEN FAKT| 00000650: 4F 52 45 4E 22 00 70 0E D6 01 81 49 B2 31 A4 46 |OREN".p....I.1.F| 00000660: 30 3A 99 A3 34 29 49 3B 46 24 28 49 29 3A 82 49 |0:..4)I;F$(I):.I| 00000670: 00 9D 0E E0 01 99 22 49 53 54 20 44 45 4E 4E 20 |......"IST DENN | 00000680: 46 55 45 52 20 53 49 45 20 44 45 52 20 57 49 43 |FUER SIE DER WIC| 00000690: 48 54 49 47 53 54 45 22 3B 3A 85 46 32 00 DC 0E |HTIGSTE";:.F2...| 000006A0: F4 01 99 3A 99 3A 99 22 4F 4B 20 2D 20 47 45 48 |...:.:."OK - GEH| 000006B0: 45 4E 20 57 49 52 20 4D 41 4C 20 56 4F 4E 20 45 |EN WIR MAL VON E| 000006C0: 49 4E 45 52 20 42 45 44 45 55 54 55 4E 47 53 2D |INER BEDEUTUNGS-| 000006D0: 53 4B 41 4C 41 20 41 55 53 2C 22 3B 00 FC 0E FE |SKALA AUS,";....| 000006E0: 01 99 22 44 49 45 20 56 4F 4E 20 30 20 42 49 53 |.."DIE VON 0 BIS| 000006F0: 20 31 30 20 52 45 49 43 48 54 2E 22 00 22 0F 08 | 10 REICHT."."..| 00000700: 02 99 46 24 28 46 32 29 3B 22 20 41 4C 53 20 57 |..F$(F2);" ALS W| 00000710: 49 43 48 54 49 47 53 54 45 52 20 46 41 4B 54 4F |ICHTIGSTER FAKTO| 00000720: 52 22 00 40 0F 12 02 99 22 45 52 48 41 45 4C 54 |R".@...."ERHAELT| 00000730: 20 44 45 4E 20 57 45 52 54 20 31 30 2E 22 3A 99 | DEN WERT 10.":.| 00000740: 00 6B 0F 1C 02 99 22 57 45 4C 43 48 45 4E 20 57 |.k...."WELCHEN W| 00000750: 45 52 54 20 28 44 45 5A 49 4D 41 4C 57 45 52 54 |ERT (DEZIMALWERT| 00000760: 45 20 53 49 4E 44 20 4F 4B 29 22 00 98 0F 26 02 |E SIND OK)"...&.| 00000770: 99 22 57 55 45 52 44 45 4E 20 53 49 45 20 44 41 |."WUERDEN SIE DA| 00000780: 4E 4E 20 44 45 4E 20 41 4E 44 45 52 45 4E 20 46 |NN DEN ANDEREN F| 00000790: 41 4B 54 4F 52 45 4E 22 00 A9 0F 30 02 99 22 5A |AKTOREN"...0.."Z| 000007A0: 55 4F 52 44 4E 45 4E 3F 22 00 B7 0F 3A 02 99 3A |UORDNEN?"...:..:| 000007B0: 81 49 B2 31 A4 46 30 00 C5 0F 44 02 8B 49 B2 46 |.I.1.F0...D..I.F| 000007C0: 32 A7 36 30 30 00 D6 0F 4E 02 99 46 24 28 49 29 |2.600...N..F$(I)| 000007D0: 3A 85 46 28 49 29 00 FC 0F 58 02 82 3A 46 28 46 |:.F(I)...X..:F(F| 000007E0: 32 29 B2 31 30 3A 43 B2 30 3A 81 49 B2 31 A4 46 |2).10:C.0:.I.1.F| 000007F0: 30 3A 43 B2 43 AA 46 28 49 29 3A 82 00 17 10 62 |0:C.C.F(I):....b| 00000800: 02 81 49 B2 31 A4 46 30 3A 46 28 49 29 B2 46 28 |..I.1.F0:F(I).F(| 00000810: 49 29 AD 43 3A 82 49 00 20 10 6C 02 99 22 93 22 |I).C:.I. .l.."."| 00000820: 00 4E 10 80 02 99 22 20 47 45 42 45 4E 20 53 49 |.N...." GEBEN SI| 00000830: 45 20 4D 49 52 20 4A 45 54 5A 54 20 42 49 54 54 |E MIR JETZT BITT| 00000840: 45 20 41 4E 2C 20 57 49 45 20 44 49 45 22 00 76 |E AN, WIE DIE".v| 00000850: 10 82 02 99 22 50 45 52 53 4F 4E 45 4E 20 42 45 |...."PERSONEN BE| 00000860: 49 20 44 45 52 20 42 45 54 52 41 43 48 54 55 4E |I DER BETRACHTUN| 00000870: 47 20 44 45 52 22 00 9C 10 84 02 99 22 45 49 4E |G DER"......"EIN| 00000880: 5A 45 4C 4E 45 4E 20 46 41 4B 54 4F 52 45 4E 20 |ZELNEN FAKTOREN | 00000890: 41 42 53 43 48 4E 45 49 44 45 4E 22 00 C9 10 8A |ABSCHNEIDEN"....| 000008A0: 02 99 3A 99 22 4C 41 53 53 45 4E 20 53 49 45 20 |..:."LASSEN SIE | 000008B0: 55 4E 53 20 44 41 56 4F 4E 20 41 55 53 47 45 48 |UNS DAVON AUSGEH| 000008C0: 45 4E 2C 20 44 41 53 53 22 00 F9 10 94 02 99 4C |EN, DASS"......L| 000008D0: 24 28 31 29 22 20 4A 45 57 45 49 4C 53 20 45 49 |$(1)" JEWEILS EI| 000008E0: 4E 45 4E 20 57 45 52 54 20 56 4F 4E 20 31 30 20 |NEN WERT VON 10 | 000008F0: 48 41 54 2E 20 53 49 45 22 00 28 11 9E 02 99 22 |HAT. SIE".(...."| 00000900: 47 45 42 45 4E 20 44 41 4E 4E 20 44 45 4E 20 45 |GEBEN DANN DEN E| 00000910: 49 4E 5A 45 4C 4E 45 4E 20 50 45 52 53 4F 4E 45 |INZELNEN PERSONE| 00000920: 4E 20 57 45 52 54 45 22 00 56 11 A8 02 99 22 47 |N WERTE".V...."G| 00000930: 52 4F 45 53 53 45 52 20 4F 44 45 52 20 4B 4C 45 |ROESSER ODER KLE| 00000940: 49 4E 45 52 20 41 4C 53 20 31 30 2C 20 4A 45 20 |INER ALS 10, JE | 00000950: 4E 41 43 48 2D 22 00 7D 11 B2 02 99 22 44 45 4D |NACH-".}...."DEM| 00000960: 20 57 49 45 20 53 49 45 20 49 4E 20 42 45 5A 55 | WIE SIE IN BEZU| 00000970: 47 20 41 55 46 20 22 3B 4C 24 28 31 29 00 90 11 |G AUF ";L$(1)...| 00000980: BC 02 99 22 41 42 53 43 48 4E 45 49 44 45 4E 22 |..."ABSCHNEIDEN"| 00000990: 00 9C 11 C1 02 81 49 B2 31 A4 46 30 00 C6 11 C6 |......I.1.F0....| 000009A0: 02 99 3A 99 22 42 45 54 52 41 43 48 54 45 4E 20 |..:."BETRACHTEN | 000009B0: 57 49 52 20 45 49 4E 4D 41 4C 20 4E 55 52 20 22 |WIR EINMAL NUR "| 000009C0: 3B 46 24 28 49 29 00 F2 11 D0 02 99 22 55 4E 44 |;F$(I)......"UND| 000009D0: 20 47 45 48 45 4E 20 57 49 52 20 44 41 56 4F 4E | GEHEN WIR DAVON| 000009E0: 20 41 55 53 2C 20 44 41 53 53 20 22 3B 4C 24 28 | AUS, DASS ";L$(| 000009F0: 31 29 00 1C 12 DA 02 99 22 44 45 4E 20 57 45 52 |1)......"DEN WER| 00000A00: 54 20 31 30 20 45 52 52 45 49 43 48 54 2C 20 57 |T 10 ERREICHT, W| 00000A10: 45 4C 43 48 45 20 57 45 52 54 45 22 00 4A 12 E4 |ELCHE WERTE".J..| 00000A20: 02 99 22 57 55 45 52 44 45 4E 20 53 49 45 20 44 |.."WUERDEN SIE D| 00000A30: 45 4E 20 41 4E 44 45 52 45 4E 20 50 45 52 53 4F |EN ANDEREN PERSO| 00000A40: 4E 45 4E 20 47 45 42 45 4E 22 00 58 12 EE 02 99 |NEN GEBEN".X....| 00000A50: 3A 81 4A B2 32 A4 4C 30 00 6B 12 F8 02 99 4C 24 |:.J.2.L0.k....L$| 00000A60: 28 4A 29 3A 85 4D 28 4A 2C 49 29 00 95 12 02 03 |(J):.M(J,I).....| 00000A70: 82 4A 3A 99 3A 4D 28 31 2C 49 29 B2 31 30 3A 82 |.J:.:M(1,I).10:.| 00000A80: 49 3A 81 49 B2 31 A4 46 30 3A 43 B2 30 3A 81 4A |I:.I.1.F0:C.0:.J| 00000A90: B2 31 A4 4C 30 00 C5 12 0C 03 43 B2 43 AA 4D 28 |.1.L0.....C.C.M(| 00000AA0: 4A 2C 49 29 3A 82 4A 3A 81 4A B2 31 A4 4C 30 3A |J,I):.J:.J.1.L0:| 00000AB0: 4D 28 4A 2C 49 29 B2 4D 28 4A 2C 49 29 AD 43 3A |M(J,I).M(J,I).C:| 00000AC0: 82 4A 3A 82 49 00 F6 12 16 03 81 4A B2 31 A4 4C |.J:.I......J.1.L| 00000AD0: 30 3A 56 28 4A 29 B2 30 3A 81 49 B2 31 A4 46 30 |0:V(J).0:.I.1.F0| 00000AE0: 3A 56 28 4A 29 B2 56 28 4A 29 AA 4D 28 4A 2C 49 |:V(J).V(J).M(J,I| 00000AF0: 29 AC 46 28 49 29 00 20 13 20 03 82 49 3A 82 4A |).F(I). . ..I:.J| 00000B00: 3A 81 49 B2 31 A4 31 30 3A 5A 28 49 29 B2 49 3A |:.I.1.10:Z(I).I:| 00000B10: 82 3A 43 B2 4C 30 AB 31 3A 81 4A B2 31 A4 4C 30 |.:C.L0.1:.J.1.L0| 00000B20: 00 4E 13 2A 03 81 49 B2 31 A4 43 3A 4E 31 B2 5A |.N.*..I.1.C:N1.Z| 00000B30: 28 49 29 3A 4E 32 B2 5A 28 49 AA 31 29 3A 8B 56 |(I):N2.Z(I.1):.V| 00000B40: 28 4E 31 29 B1 56 28 4E 32 29 A7 38 33 30 00 64 |(N1).V(N2).830.d| 00000B50: 13 34 03 5A 28 49 AA 31 29 B2 4E 31 3A 5A 28 49 |.4.Z(I.1).N1:Z(I| 00000B60: 29 B2 4E 32 00 92 13 3E 03 82 49 3A 82 4A 3A 43 |).N2...>..I:.J:C| 00000B70: 31 B2 5A 28 31 29 3A 43 32 B2 5A 28 32 29 3A 43 |1.Z(1):C2.Z(2):C| 00000B80: B2 31 30 30 AD 56 28 43 31 29 3A 81 4A B2 31 A4 |.100.V(C1):.J.1.| 00000B90: 4C 30 00 B6 13 48 03 56 28 4A 29 B2 43 AC 56 28 |L0...H.V(J).C.V(| 00000BA0: 4A 29 3A 82 3A 99 3A 99 3A 44 B2 56 28 43 31 29 |J):.:.:.:D.V(C1)| 00000BB0: AB 56 28 43 32 29 00 C0 13 52 03 99 22 93 22 3B |.V(C2)...R..".";| 00000BC0: 00 E2 13 5C 03 99 A3 31 37 29 22 49 48 52 22 3A |...\...17)"IHR":| 00000BD0: 99 A3 20 32 29 22 50 41 52 54 4E 45 52 20 22 3B |.. 2)"PARTNER ";| 00000BE0: 4F 24 00 02 14 66 03 99 A3 31 36 29 22 48 45 49 |O$...f...16)"HEI| 00000BF0: 53 53 54 22 3A 99 3A 99 A3 31 35 29 4C 24 28 43 |SST":.:..15)L$(C| 00000C00: 31 29 00 08 14 6B 03 99 00 34 14 70 03 8B 44 B3 |1)...k...4.p..D.| 00000C10: 31 30 A7 99 22 20 20 20 20 28 41 4C 4C 45 52 44 |10.." (ALLERD| 00000C20: 49 4E 47 53 20 5A 49 45 4D 4C 49 43 48 20 4B 4E |INGS ZIEMLICH KN| 00000C30: 41 50 50 29 00 62 14 7A 03 8B 44 B3 32 30 AF 44 |APP).b.z..D.20.D| 00000C40: B1 B2 31 30 A7 99 22 20 20 20 20 20 20 28 4D 49 |..10.." (MI| 00000C50: 54 20 4B 4C 41 52 45 4D 20 41 42 53 54 41 4E 44 |T KLAREM ABSTAND| 00000C60: 29 22 00 95 14 7F 03 8B 44 B1 B2 32 30 A7 99 22 |)"......D..20.."| 00000C70: 20 20 20 20 20 20 28 45 49 4E 45 20 47 41 4E 5A | (EINE GANZ| 00000C80: 20 4B 4C 41 52 45 20 45 4E 54 53 43 48 45 49 44 | KLARE ENTSCHEID| 00000C90: 55 4E 47 29 22 00 A2 14 84 03 99 3A 8D 31 30 30 |UNG)"......:.100| 00000CA0: 30 30 00 D3 14 8E 03 99 3A 99 22 48 49 45 52 20 |00......:."HIER | 00000CB0: 49 53 54 20 44 49 45 20 45 4E 54 47 55 45 4C 54 |IST DIE ENTGUELT| 00000CC0: 49 47 45 20 52 45 49 48 45 4E 46 4F 4C 47 45 20 |IGE REIHENFOLGE | 00000CD0: 3A 11 22 00 EA 14 98 03 99 22 9E 50 55 4E 4B 54 |:."......".PUNKT| 00000CE0: 45 22 2C 22 4E 41 4D 45 05 22 00 0E 15 A2 03 81 |E","NAME."......| 00000CF0: 4A B2 31 A4 4C 30 3A 43 B2 5A 28 4A 29 3A 99 B5 |J.1.L0:C.Z(J):..| 00000D00: 28 56 28 43 29 29 2C 4C 24 28 43 29 3A 82 00 18 |(V(C)),L$(C):...| 00000D10: 15 AC 03 99 22 1F 22 3B 00 1E 15 06 27 80 00 35 |....".";....'..5| 00000D20: 15 10 27 81 49 B2 31 A4 34 30 3A 99 22 A6 22 3B |..'.I.1.40:.".";| 00000D30: 3A 82 49 3A 8E 00 4D 15 F8 2A 81 49 B2 31 A4 32 |:.I:..M..*.I.1.2| 00000D40: 30 3A 99 22 28 29 22 3B 3A 82 49 3A 8E 00 00 00 |0:."()";:.I:....| 00000D50: 24 28 |$( |
....... PARTNERWAHL. ....53280,9.-....53 281,9.C...T1$."FUER'S LEBEN":T2$."FUER D IE NAEHERE ZUKUNFT".....T3$."FUER'S KOMM ENDE WOCHENENDE":T4$."FUER DIE NAECHSTE NACHT"......"..":.10000......:..9)"P A R T N E R W A H L":.:.10000......F$(10),L $(10),F(10),M(10,10),V(10),Z(10):..G.(.Y $."Y":." KEINE ENTSCHEIDUNGSPROBLEME MEH R FUER".R.2.."JUNGGESELLEN ODER LEDIGE L ADIES!!":.. .<.." GEBEN SIE MIR BITTE AN , WAS SIE UEBER".J.F.."DIE EVTL.PARTNER WISSEN. ICH HELFE"...P.."IHNEN DANN BEI EINER ENTSCHEIDUNG.":..>.Z.." UEBERLASSE N SIE MIR DIESES PROBLEM, UNDKONZENTRIER EN SIE SICH ";.J.D.."VOLL UND GANZ AUFDA S DANACH.......":....N.."BEREIT";B$:.H(B $,1)."N".9990...X..".":.:.:.:.:.:..8)"!! ! H A L T !!!"......:.:."ICH HAETTE NOCH EINE (REIN STATISTISCHE) FRAGE :"...... :..6)"TREFFEN SIE DIESE ENTSCHEIDUNG":.. J.....2)"1-";T1$:..2)"2-";T2$:..2)"3-";T 3$.[. ...2)"4-";T4$.D....:.E.Q....E.1.19 0.~....E.2.191......E.3.192......E.4.193 .....O$.T1$:.300.....O$.T2$:.300.H...O$. T3$:.300.X.A.O$.T4$:.300...,..".":.11000 ...6..:." UNTER WIEVIEL DIESER HIMMLISCH EN GE-"._.@.."SCHOEPFE (MIN=2-MAX=10) MU ESSEN SIE SICH DENN ENTSCHEIDEN ?.":.L0. ..J..:."BITTE GEBEN SIE JETZT ALLE";L0:. "EVENTUELLEN PARTNER.I.T.."(REIHENFOLGE SPIELT KEINE ROLLE) EIN."...^..:.I.1.L0: ."NUMMER";I;"BITTE":.L$(I):.:.I:....H.." .":.11000.).R..:." OK, DAS WAEREN ALSO": ..J.|..I.1.L0:..3)I;"-";L$(I):.I:....... :."WIEVIEL FAKTOREN(MAX=10) SIND EIGENTL ICHWICHTIG BEI DER "......"ENTSCHEIDUNG FUER IHREN":.:."PARTNER... ";O$.I....:.F 0.R...."."......"BITTE GEBEN SIE MIR DIE SE FAKTOREN AN":..-.B..I.1.F0:.:."FAKTOR ";I;"BITTE":.F$(I):.I.U.L..".":."WELCHER VON DIESEN FAKTOREN".P.V..I.1.F0:..4)I; F$(I):.I......"IST DENN FUER SIE DER WIC HTIGSTE";:.F2......:.:."OK - GEHEN WIR M AL VON EINER BEDEUTUNGS-SKALA AUS,";.... .."DIE VON 0 BIS 10 REICHT."."....F$(F2) ;" ALS WICHTIGSTER FAKTOR".@...."ERHAELT DEN WERT 10.":..K...."WELCHEN WERT (DEZ IMALWERTE SIND OK)"...&.."WUERDEN SIE DA NN DEN ANDEREN FAKTOREN"...0.."ZUORDNEN? "...:..:.I.1.F0.E.D..I.F2.600.V.N..F$(I) :.F(I)...X..:F(F2).10:C.0:.I.1.F0:C.C.F( I):....B..I.1.F0:F(I).F(I).C:.I. .L.."." .N...." GEBEN SIE MIR JETZT BITTE AN, WI E DIE".V...."PERSONEN BEI DER BETRACHTUN G DER"......"EINZELNEN FAKTOREN ABSCHNEI DEN".I....:."LASSEN SIE UNS DAVON AUSGEH EN, DASS"......L$(1)" JEWEILS EINEN WERT VON 10 HAT. SIE".(...."GEBEN DANN DEN E INZELNEN PERSONEN WERTE".V...."GROESSER ODER KLEINER ALS 10, JE NACH-".}...."DEM WIE SIE IN BEZUG AUF ";L$(1)......"ABSC HNEIDEN"...A..I.1.F0.F.F..:."BETRACHTEN WIR EINMAL NUR ";F$(I)...P.."UND GEHEN W IR DAVON AUS, DASS ";L$(1)...Z.."DEN WER T 10 ERREICHT, WELCHE WERTE".J...."WUERD EN SIE DEN ANDEREN PERSONEN GEBEN".X.... :.J.2.L0.K....L$(J):.M(J,I)......J:.:M(1 ,I).10:.I:.I.1.F0:C.0:.J.1.L0.E...C.C.M( J,I):.J:.J.1.L0:M(J,I).M(J,I).C:.J:.I... ...J.1.L0:V(J).0:.I.1.F0:V(J).V(J).M(J,I ).F(I). . ..I:.J:.I.1.10:Z(I).I:.:C.L0.1 :.J.1.L0.N.*..I.1.C:N1.Z(I):N2.Z(I.1):.V (N1).V(N2).830.D.4.Z(I.1).N1:Z(I).N2...> ..I:.J:C1.Z(1):C2.Z(2):C.100.V(C1):.J.1. L0...H.V(J).C.V(J):.:.:.:D.V(C1).V(C2).. .R..".";...\...17)"IHR":.. 2)"PARTNER "; O$...F...16)"HEISST":.:..15)L$(C1)...K.. .4.P..D.10.." (ALLERDINGS ZIEMLICH KN APP).B.Z..D.20.D..10.." (MIT KLAREM ABSTAND)".....D..20.." (EINE GANZ KLARE ENTSCHEIDUNG)"......:.10000.S.... :."HIER IST DIE ENTGUELTIGE REIHENFOLGE :."......".PUNKTE","NAME."......J.1.L0:C .Z(J):..(V(C)),L$(C):.......".";....'..5 ..'.I.1.40:.".";:.I:..M..*.I.1.20:."()"; :.I:....$(
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL