MAEDCHENTEST
FILE INFORMATION
FILENAME(S): MAEDCHENTEST
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-11-30 01:07:52
APPEARS ON: 2 disk(s)
FILE HASH
22349ac9c8a411139b7ba021f8ea153305d7b076ad8d76af6bf2e9997426a32c
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD DISK 25 | MAEDCHENTEST | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 11 | DOWNLOAD FILE |
| FREESOFT NR | MAEDCHENTEST | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..).d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 08 6E 00 8F 20 |*********.Q.n.. |
00000030: 44 49 45 53 45 53 20 50 52 4F 47 52 41 4D 4D 20 |DIESES PROGRAMM |
00000040: 49 53 54 20 50 55 42 4C 49 43 20 44 4F 4D 41 49 |IST PUBLIC DOMAI|
00000050: 4E 00 78 08 78 00 8F 20 45 53 20 44 41 52 46 20 |N.x.x.. ES DARF |
00000060: 46 52 45 49 20 4B 4F 50 49 45 52 54 20 55 4E 44 |FREI KOPIERT UND|
00000070: 20 57 45 49 54 45 52 2D 00 8F 08 82 00 8F 20 47 | WEITER-...... G|
00000080: 45 47 45 42 45 4E 20 57 45 52 44 45 4E 20 21 00 |EGEBEN WERDEN !.|
00000090: B7 08 8C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 00 BD 08 96 00 8F 00 DA 08 |*******.........|
000000C0: A0 00 97 35 33 32 38 30 2C 36 3A 97 35 33 32 38 |...53280,6:.5328|
000000D0: 31 2C 36 3A 97 36 34 36 2C 31 00 10 09 AA 00 54 |1,6:.646,1.....T|
000000E0: 31 24 B2 22 46 55 45 52 27 53 20 4C 45 42 45 4E |1$."FUER'S LEBEN|
000000F0: 22 3A 54 32 24 B2 22 46 55 45 52 20 44 49 45 20 |":T2$."FUER DIE |
00000100: 4E 41 45 48 45 52 45 20 5A 55 4B 55 4E 46 54 22 |NAEHERE ZUKUNFT"|
00000110: 00 53 09 B4 00 54 33 24 B2 22 46 55 45 52 27 53 |.S...T3$."FUER'S|
00000120: 20 4B 4F 4D 4D 45 4E 44 45 20 57 4F 43 48 45 4E | KOMMENDE WOCHEN|
00000130: 45 4E 44 45 22 3A 54 34 24 B2 22 46 55 45 52 20 |ENDE":T4$."FUER |
00000140: 44 49 45 20 4E 41 45 43 48 53 54 45 20 4E 41 43 |DIE NAECHSTE NAC|
00000150: 48 54 22 00 62 09 BE 00 99 22 93 22 3A 8D 31 31 |HT".b....".":.11|
00000160: 31 30 00 90 09 C8 00 99 3A 99 A3 36 29 22 4D 20 |10......:..6)"M |
00000170: 41 20 45 20 44 20 43 20 48 20 45 20 4E 20 2D 20 |A E D C H E N - |
00000180: 54 20 45 20 53 20 54 22 3A 99 3A 8D 31 31 31 30 |T E S T":.:.1110|
00000190: 00 C0 09 D2 00 86 46 24 28 32 30 29 2C 4C 24 28 |......F$(20),L$(|
000001A0: 32 30 29 2C 46 28 32 30 29 2C 4D 28 32 30 2C 32 |20),F(20),M(20,2|
000001B0: 30 29 2C 56 28 32 30 29 2C 5A 28 32 30 29 3A 99 |0),V(20),Z(20):.|
000001C0: 00 F4 09 DC 00 59 24 B2 22 59 22 3A 99 22 4B 45 |.....Y$."Y":."KE|
000001D0: 49 4E 45 20 45 4E 54 53 43 48 45 49 44 55 4E 47 |INE ENTSCHEIDUNG|
000001E0: 53 50 52 4F 42 4C 45 4D 45 20 4D 45 48 52 20 46 |SPROBLEME MEHR F|
000001F0: 55 45 52 22 00 1E 0A E6 00 99 22 56 49 45 4C 42 |UER"......"VIELB|
00000200: 45 53 43 48 41 45 46 54 49 47 54 45 20 4A 55 4E |ESCHAEFTIGTE JUN|
00000210: 47 47 45 53 45 4C 4C 45 4E 20 21 22 3A 99 00 4A |GGESELLEN !":..J|
00000220: 0A F0 00 99 22 47 45 42 45 4E 20 53 49 45 20 4D |...."GEBEN SIE M|
00000230: 49 52 20 42 49 54 54 45 20 41 4E 2C 57 41 53 20 |IR BITTE AN,WAS |
00000240: 53 49 45 20 55 45 42 45 52 22 00 73 0A FA 00 99 |SIE UEBER".s....|
00000250: 22 44 49 45 20 44 41 4D 45 4E 20 57 49 53 53 45 |"DIE DAMEN WISSE|
00000260: 4E 2E 20 49 43 48 20 48 45 4C 46 45 20 49 48 4E |N. ICH HELFE IHN|
00000270: 45 4E 22 00 A4 0A 04 01 99 22 44 41 4E 4E 20 42 |EN"......"DANN B|
00000280: 45 49 20 44 49 45 53 45 52 20 44 45 4C 49 4B 41 |EI DIESER DELIKA|
00000290: 54 45 4E 20 45 4E 54 53 43 48 45 49 44 55 4E 47 |TEN ENTSCHEIDUNG|
000002A0: 2E 22 3A 99 00 EC 0A 0E 01 99 22 55 45 42 45 52 |.":......."UEBER|
000002B0: 4C 41 53 53 45 4E 20 53 49 45 20 4D 49 52 20 44 |LASSEN SIE MIR D|
000002C0: 49 45 53 45 53 20 50 52 4F 42 4C 45 4D 2C 20 55 |IESES PROBLEM, U|
000002D0: 4E 44 20 4B 4F 4E 5A 45 4E 54 52 49 45 52 45 4E |ND KONZENTRIEREN|
000002E0: 20 53 49 45 20 53 49 43 48 20 22 3B 00 18 0B 18 | SIE SICH ";....|
000002F0: 01 99 22 56 4F 4C 4C 20 55 4E 44 20 47 41 4E 5A |.."VOLL UND GANZ|
00000300: 20 41 55 46 44 41 53 20 44 41 4E 41 43 48 2E 2E | AUFDAS DANACH..|
00000310: 2E 2E 2E 2E 2E 22 3A 99 00 45 0B 22 01 99 22 42 |.....":..E.".."B|
00000320: 45 52 45 49 54 20 20 20 4A 9D 9D 9D 22 3B 3A 85 |EREIT J...";:.|
00000330: 42 24 3A 8B C8 28 42 24 2C 31 29 B3 B1 22 4A 22 |B$:..(B$,1).."J"|
00000340: A7 31 31 33 30 00 6E 0B 2C 01 99 22 93 22 3A 99 |.1130.n.,..".":.|
00000350: 3A 99 3A 99 3A 99 3A 99 3A 99 A3 38 29 22 21 21 |:.:.:.:.:..8)"!!|
00000360: 21 20 48 20 41 20 4C 20 54 20 21 21 21 22 00 A9 |! H A L T !!!"..|
00000370: 0B 36 01 99 3A 99 3A 99 22 49 43 48 20 48 41 45 |.6..:.:."ICH HAE|
00000380: 54 54 45 20 4E 4F 43 48 20 45 49 4E 45 20 28 52 |TTE NOCH EINE (R|
00000390: 45 49 4E 20 53 54 41 54 49 53 54 49 53 43 48 45 |EIN STATISTISCHE|
000003A0: 29 46 52 41 47 45 20 3A 22 00 D6 0B 40 01 99 3A |)FRAGE :"...@..:|
000003B0: 99 A3 32 29 22 54 52 45 46 46 45 4E 20 53 49 45 |..2)"TREFFEN SIE|
000003C0: 20 44 49 45 53 45 20 45 4E 54 53 43 48 45 49 44 | DIESE ENTSCHEID|
000003D0: 55 4E 47 22 3A 99 00 07 0C 4A 01 99 A3 32 29 22 |UNG":....J...2)"|
000003E0: 31 20 2D 20 22 3B 54 31 24 3A 99 A3 32 29 22 32 |1 - ";T1$:..2)"2|
000003F0: 20 2D 20 22 3B 54 32 24 3A 99 A3 32 29 22 33 20 | - ";T2$:..2)"3 |
00000400: 2D 20 22 3B 54 33 24 00 1A 0C 54 01 99 A3 32 29 |- ";T3$...T...2)|
00000410: 22 34 20 2D 20 22 3B 54 34 24 00 2E 0C 5E 01 99 |"4 - ";T4$...^..|
00000420: 3A 99 22 20 20 34 9D 9D 9D 22 3B 3A 85 45 00 3B |:." 4...";:.E.;|
00000430: 0C 68 01 8B 45 B2 31 A7 34 30 30 00 48 0C 72 01 |.h..E.1.400.H.r.|
00000440: 8B 45 B2 32 A7 34 31 30 00 55 0C 7C 01 8B 45 B2 |.E.2.410.U.|..E.|
00000450: 33 A7 34 32 30 00 62 0C 86 01 8B 45 B2 34 A7 34 |3.420.b....E.4.4|
00000460: 33 30 00 72 0C 90 01 4F 24 B2 54 31 24 3A 89 34 |30.r...O$.T1$:.4|
00000470: 34 30 00 82 0C 9A 01 4F 24 B2 54 32 24 3A 89 34 |40.....O$.T2$:.4|
00000480: 34 30 00 92 0C A4 01 4F 24 B2 54 33 24 3A 89 34 |40.....O$.T3$:.4|
00000490: 34 30 00 A2 0C AE 01 4F 24 B2 54 34 24 3A 89 34 |40.....O$.T4$:.4|
000004A0: 34 30 00 B1 0C B8 01 99 22 93 22 3A 8D 31 31 32 |40......".":.112|
000004B0: 30 00 DF 0C C2 01 99 3A 99 22 55 4E 54 45 52 20 |0......:."UNTER |
000004C0: 57 49 45 56 49 45 4C 20 44 49 45 53 45 52 20 48 |WIEVIEL DIESER H|
000004D0: 49 4D 4D 4C 49 53 43 48 45 4E 20 47 45 2D 22 00 |IMMLISCHEN GE-".|
000004E0: 24 0D CC 01 99 22 53 43 48 4F 45 50 46 45 20 28 |$...."SCHOEPFE (|
000004F0: 4D 49 4E 3D 32 2D 4D 41 58 3D 31 30 29 20 4D 55 |MIN=2-MAX=10) MU|
00000500: 45 53 53 45 4E 20 53 49 45 20 53 49 43 48 44 45 |ESSEN SIE SICHDE|
00000510: 4E 4E 20 45 4E 54 53 43 48 45 49 44 45 4E 22 3B |NN ENTSCHEIDEN";|
00000520: 3A 85 4C 30 00 56 0D D6 01 99 3A 99 22 42 49 54 |:.L0.V....:."BIT|
00000530: 54 45 20 47 45 42 45 4E 20 53 49 45 20 4A 45 54 |TE GEBEN SIE JET|
00000540: 5A 54 20 41 4C 4C 45 22 3B 4C 30 3B 22 4D 41 45 |ZT ALLE";L0;"MAE|
00000550: 44 43 48 45 4E 22 00 83 0D E0 01 99 22 28 52 45 |DCHEN"......"(RE|
00000560: 49 48 45 4E 46 4F 4C 47 45 20 53 50 49 45 4C 54 |IHENFOLGE SPIELT|
00000570: 20 4B 45 49 4E 45 20 52 4F 4C 4C 45 29 20 45 49 | KEINE ROLLE) EI|
00000580: 4E 21 22 00 B3 0D EA 01 99 3A 81 49 B2 31 A4 4C |N!"......:.I.1.L|
00000590: 30 3A 99 22 4E 55 4D 4D 45 52 22 3B 49 3B 22 42 |0:."NUMMER";I;"B|
000005A0: 49 54 54 45 22 3A 85 4C 24 28 49 29 3A 99 3A 82 |ITTE":.L$(I):.:.|
000005B0: 49 3A 99 00 C2 0D F4 01 99 22 93 22 3A 8D 31 31 |I:.......".":.11|
000005C0: 32 30 00 E3 0D FE 01 99 3A 99 22 20 4F 4B 2C 20 |20......:." OK, |
000005D0: 44 41 53 20 57 41 45 48 52 45 4E 20 41 4C 53 4F |DAS WAEHREN ALSO|
000005E0: 22 3A 99 00 04 0E 08 02 81 49 B2 31 A4 4C 30 3A |":.......I.1.L0:|
000005F0: 99 A3 33 29 49 3B 22 2D 22 3B 4C 24 28 49 29 3A |..3)I;"-";L$(I):|
00000600: 82 49 3A 99 00 47 0E 12 02 99 3A 99 22 57 49 45 |.I:..G....:."WIE|
00000610: 56 49 45 4C 20 46 41 4B 54 4F 52 45 4E 20 28 4D |VIEL FAKTOREN (M|
00000620: 41 58 3D 31 30 29 20 53 49 4E 44 20 45 49 47 45 |AX=10) SIND EIGE|
00000630: 4E 54 4C 49 43 48 20 57 49 43 48 54 49 47 20 42 |NTLICH WICHTIG B|
00000640: 45 49 20 44 45 52 22 00 7B 0E 1C 02 99 22 45 4E |EI DER".{...."EN|
00000650: 54 53 43 48 45 49 44 55 4E 47 20 46 55 45 52 20 |TSCHEIDUNG FUER |
00000660: 49 48 52 45 22 3A 99 3A 99 A3 34 29 22 50 41 52 |IHRE":.:..4)"PAR|
00000670: 54 4E 45 52 49 4E 20 22 3B 4F 24 00 83 0E 26 02 |TNERIN ";O$...&.|
00000680: 85 46 30 00 8C 0E 30 02 99 22 93 22 00 BB 0E 3A |.F0...0.."."...:|
00000690: 02 99 22 42 49 54 54 45 20 47 45 42 45 4E 20 53 |.."BITTE GEBEN S|
000006A0: 49 45 20 4D 49 52 20 44 49 45 53 45 20 46 41 4B |IE MIR DIESE FAK|
000006B0: 54 4F 52 45 4E 20 41 4E 22 3A 99 00 E7 0E 44 02 |TOREN AN":....D.|
000006C0: 81 49 B2 31 A4 46 30 3A 99 3A 99 22 46 41 4B 54 |.I.1.F0:.:."FAKT|
000006D0: 4F 52 22 3B 49 3B 22 42 49 54 54 45 22 3A 85 46 |OR";I;"BITTE":.F|
000006E0: 24 28 49 29 3A 82 49 00 0F 0F 4E 02 99 22 93 22 |$(I):.I...N.."."|
000006F0: 3A 99 22 57 45 4C 43 48 45 52 20 56 4F 4E 20 44 |:."WELCHER VON D|
00000700: 49 45 53 45 4E 20 46 41 4B 54 4F 52 45 4E 22 00 |IESEN FAKTOREN".|
00000710: 2A 0F 58 02 81 49 B2 31 A4 46 30 3A 99 A3 34 29 |*.X..I.1.F0:..4)|
00000720: 49 3B 46 24 28 49 29 3A 82 49 00 56 0F 62 02 99 |I;F$(I):.I.V.b..|
00000730: 22 49 53 54 20 44 45 4E 20 46 55 45 52 20 53 49 |"IST DEN FUER SI|
00000740: 45 20 44 45 52 20 57 49 43 48 54 49 47 53 54 45 |E DER WICHTIGSTE|
00000750: 22 3B 3A 85 46 32 00 95 0F 6C 02 99 3A 99 3A 99 |";:.F2...l..:.:.|
00000760: 22 4F 4B 20 2D 20 47 45 48 45 4E 20 57 49 52 20 |"OK - GEHEN WIR |
00000770: 4D 41 4C 20 56 4F 4E 20 45 49 4E 45 52 20 42 45 |MAL VON EINER BE|
00000780: 44 45 55 54 55 4E 47 53 2D 53 4B 41 4C 41 20 41 |DEUTUNGS-SKALA A|
00000790: 55 53 2C 22 3B 00 B5 0F 76 02 99 22 44 49 45 20 |US,";...v.."DIE |
000007A0: 56 4F 4E 20 30 20 42 49 53 20 31 30 20 52 45 49 |VON 0 BIS 10 REI|
000007B0: 43 48 54 2E 22 00 DB 0F 80 02 99 46 24 28 46 32 |CHT."......F$(F2|
000007C0: 29 3B 22 20 41 4C 53 20 57 49 43 48 54 49 47 53 |);" ALS WICHTIGS|
000007D0: 54 45 52 20 46 41 4B 54 4F 52 22 00 FA 0F 8A 02 |TER FAKTOR".....|
000007E0: 99 22 45 52 48 41 45 48 4C 54 20 44 45 4E 20 57 |."ERHAEHLT DEN W|
000007F0: 45 52 54 20 31 30 2E 22 3A 99 00 25 10 94 02 99 |ERT 10.":..%....|
00000800: 22 57 45 4C 43 48 45 4E 20 57 45 52 54 20 28 44 |"WELCHEN WERT (D|
00000810: 45 5A 49 4D 41 4C 57 45 52 54 45 20 53 49 4E 44 |EZIMALWERTE SIND|
00000820: 20 4F 4B 29 22 00 52 10 9E 02 99 22 57 55 45 52 | OK)".R...."WUER|
00000830: 44 45 4E 20 53 49 45 20 44 41 4E 4E 20 44 45 4E |DEN SIE DANN DEN|
00000840: 20 41 4E 44 45 52 45 4E 20 46 41 4B 54 4F 52 45 | ANDEREN FAKTORE|
00000850: 4E 22 00 64 10 A8 02 99 22 5A 55 4F 52 44 4E 45 |N".d...."ZUORDNE|
00000860: 4E 20 3F 22 00 72 10 B2 02 99 3A 81 49 B2 31 A4 |N ?".r....:.I.1.|
00000870: 46 30 00 80 10 BC 02 8B 49 B2 46 32 A7 37 32 30 |F0......I.F2.720|
00000880: 00 91 10 C6 02 99 46 24 28 49 29 3A 85 46 28 49 |......F$(I):.F(I|
00000890: 29 00 B7 10 D0 02 82 3A 46 28 46 32 29 B2 31 30 |)......:F(F2).10|
000008A0: 3A 43 B2 30 3A 81 49 B2 31 A4 46 30 3A 43 B2 43 |:C.0:.I.1.F0:C.C|
000008B0: AA 46 28 49 29 3A 82 00 D2 10 DA 02 81 49 B2 31 |.F(I):.......I.1|
000008C0: A4 46 30 3A 46 28 49 29 B2 46 28 49 29 AD 43 3A |.F0:F(I).F(I).C:|
000008D0: 82 49 00 DB 10 E4 02 99 22 93 22 00 08 11 EE 02 |.I......".".....|
000008E0: 99 22 20 47 45 42 45 4E 20 53 49 45 20 4D 49 52 |." GEBEN SIE MIR|
000008F0: 20 4A 45 54 5A 54 20 42 49 54 54 45 20 41 4E 2C | JETZT BITTE AN,|
00000900: 57 49 45 20 44 49 45 22 00 30 11 F8 02 99 22 4D |WIE DIE".0...."M|
00000910: 41 45 44 43 48 45 4E 20 42 45 49 20 44 45 52 20 |AEDCHEN BEI DER |
00000920: 42 45 54 52 41 43 48 54 55 4E 47 20 44 45 52 22 |BETRACHTUNG DER"|
00000930: 00 56 11 02 03 99 22 45 49 4E 5A 45 4C 4E 45 4E |.V...."EINZELNEN|
00000940: 20 46 41 4B 54 4F 52 45 4E 20 41 42 53 43 48 4E | FAKTOREN ABSCHN|
00000950: 45 49 44 45 4E 22 00 83 11 0C 03 99 3A 99 22 4C |EIDEN"......:."L|
00000960: 41 53 53 45 4E 20 53 49 45 20 55 4E 53 20 44 41 |ASSEN SIE UNS DA|
00000970: 56 4F 4E 20 41 55 53 47 45 48 45 4E 2C 20 44 41 |VON AUSGEHEN, DA|
00000980: 53 53 22 00 B3 11 16 03 99 4C 24 28 31 29 22 20 |SS"......L$(1)" |
00000990: 4A 45 57 45 49 4C 53 20 45 49 4E 45 4E 20 57 45 |JEWEILS EINEN WE|
000009A0: 52 54 20 56 4F 4E 20 31 30 20 48 41 54 2E 20 53 |RT VON 10 HAT. S|
000009B0: 49 45 22 00 E2 11 20 03 99 22 47 45 42 45 4E 20 |IE"... .."GEBEN |
000009C0: 44 41 4E 4E 20 44 45 4E 20 45 49 4E 5A 45 4C 4E |DANN DEN EINZELN|
000009D0: 45 4E 20 4D 41 45 44 43 48 45 4E 20 57 45 52 54 |EN MAEDCHEN WERT|
000009E0: 45 22 00 10 12 2A 03 99 22 47 52 4F 45 53 53 45 |E"...*.."GROESSE|
000009F0: 52 20 4F 44 45 52 20 4B 4C 45 49 4E 45 4E 20 41 |R ODER KLEINEN A|
00000A00: 4C 53 20 31 30 2C 20 4A 45 20 4E 41 43 48 2D 22 |LS 10, JE NACH-"|
00000A10: 00 37 12 34 03 99 22 44 45 4D 20 57 49 45 20 53 |.7.4.."DEM WIE S|
00000A20: 49 45 20 49 4E 20 42 45 5A 55 47 20 41 55 46 20 |IE IN BEZUG AUF |
00000A30: 22 3B 4C 24 28 31 29 00 4A 12 3E 03 99 22 41 42 |";L$(1).J.>.."AB|
00000A40: 53 43 48 4E 45 49 44 45 4E 22 00 56 12 48 03 81 |SCHNEIDEN".V.H..|
00000A50: 49 B2 31 A4 46 30 00 80 12 52 03 99 3A 99 22 42 |I.1.F0...R..:."B|
00000A60: 45 54 52 41 43 48 54 45 4E 20 57 49 52 20 45 49 |ETRACHTEN WIR EI|
00000A70: 4E 4D 41 4C 20 4E 55 52 20 22 3B 46 24 28 49 29 |NMAL NUR ";F$(I)|
00000A80: 00 AC 12 5C 03 99 22 55 4E 44 20 47 45 48 45 4E |...\.."UND GEHEN|
00000A90: 20 57 49 52 20 44 41 56 4F 4E 20 41 55 53 2C 20 | WIR DAVON AUS, |
00000AA0: 44 41 53 53 20 22 3B 4C 24 28 31 29 00 D6 12 66 |DASS ";L$(1)...f|
00000AB0: 03 99 22 44 45 4E 20 57 45 52 54 20 31 30 20 45 |.."DEN WERT 10 E|
00000AC0: 52 52 45 49 43 48 54 2C 20 57 45 4C 43 48 45 20 |RREICHT, WELCHE |
00000AD0: 57 45 52 54 45 22 00 04 13 70 03 99 22 57 55 45 |WERTE"...p.."WUE|
00000AE0: 52 44 45 4E 20 53 49 45 20 44 45 4E 20 41 4E 44 |RDEN SIE DEN AND|
00000AF0: 45 52 45 4E 20 4D 41 45 44 43 48 45 4E 20 47 45 |EREN MAEDCHEN GE|
00000B00: 42 45 4E 22 00 12 13 7A 03 99 3A 81 4A B2 32 A4 |BEN"...z..:.J.2.|
00000B10: 4C 30 00 25 13 84 03 99 4C 24 28 4A 29 3A 85 4D |L0.%....L$(J):.M|
00000B20: 28 4A 2C 49 29 00 4F 13 8E 03 82 4A 3A 99 3A 4D |(J,I).O....J:.:M|
00000B30: 28 31 2C 49 29 B2 31 30 3A 82 49 3A 81 49 B2 31 |(1,I).10:.I:.I.1|
00000B40: A4 46 30 3A 43 B2 30 3A 81 4A B2 31 A4 4C 30 00 |.F0:C.0:.J.1.L0.|
00000B50: 7F 13 98 03 43 B2 43 AA 4D 28 4A 2C 49 29 3A 82 |....C.C.M(J,I):.|
00000B60: 4A 3A 81 4A B2 31 A4 4C 30 3A 4D 28 4A 2C 49 29 |J:.J.1.L0:M(J,I)|
00000B70: B2 4D 28 4A 2C 49 29 AD 43 3A 82 4A 3A 82 49 00 |.M(J,I).C:.J:.I.|
00000B80: B0 13 A2 03 81 4A B2 31 A4 4C 30 3A 56 28 4A 29 |.....J.1.L0:V(J)|
00000B90: B2 30 3A 81 49 B2 31 A4 46 30 3A 56 28 4A 29 B2 |.0:.I.1.F0:V(J).|
00000BA0: 56 28 4A 29 AA 4D 28 4A 2C 49 29 AC 46 28 49 29 |V(J).M(J,I).F(I)|
00000BB0: 00 DA 13 AC 03 82 49 3A 82 4A 3A 81 49 B2 31 A4 |......I:.J:.I.1.|
00000BC0: 31 30 3A 5A 28 49 29 B2 49 3A 82 3A 43 B2 4C 30 |10:Z(I).I:.:C.L0|
00000BD0: AB 31 3A 81 4A B2 31 A4 4C 30 00 08 14 B6 03 81 |.1:.J.1.L0......|
00000BE0: 49 B2 31 A4 43 3A 4E 31 B2 5A 28 49 29 3A 4E 32 |I.1.C:N1.Z(I):N2|
00000BF0: B2 5A 28 49 AA 31 29 3A 8B 56 28 4E 31 29 B1 56 |.Z(I.1):.V(N1).V|
00000C00: 28 4E 32 29 A7 39 37 30 00 1E 14 C0 03 5A 28 49 |(N2).970.....Z(I|
00000C10: AA 31 29 B2 4E 31 3A 5A 28 49 29 B2 4E 32 00 4C |.1).N1:Z(I).N2.L|
00000C20: 14 CA 03 82 49 3A 82 4A 3A 43 31 B2 5A 28 31 29 |....I:.J:C1.Z(1)|
00000C30: 3A 43 32 B2 5A 28 32 29 3A 43 B2 31 30 30 AD 56 |:C2.Z(2):C.100.V|
00000C40: 28 43 31 29 3A 81 4A B2 31 A4 4C 30 00 70 14 D4 |(C1):.J.1.L0.p..|
00000C50: 03 56 28 4A 29 B2 43 AC 56 28 4A 29 3A 82 3A 99 |.V(J).C.V(J):.:.|
00000C60: 3A 99 3A 44 B2 56 28 43 31 29 AB 56 28 43 32 29 |:.:D.V(C1).V(C2)|
00000C70: 00 7D 14 DE 03 99 22 93 22 3A 99 3A 99 00 A9 14 |.}....".":.:....|
00000C80: E8 03 99 A3 31 37 29 22 49 48 52 45 22 3A 99 3A |....17)"IHRE":.:|
00000C90: 99 A3 20 32 29 22 49 44 45 41 4C 50 41 52 54 4E |.. 2)"IDEALPARTN|
00000CA0: 45 52 49 4E 20 22 3B 4F 24 00 C9 14 F2 03 99 A3 |ERIN ";O$.......|
00000CB0: 31 36 29 22 48 45 49 53 53 54 22 3A 99 3A 99 A3 |16)"HEISST":.:..|
00000CC0: 31 35 29 4C 24 28 43 31 29 00 CF 14 FC 03 99 00 |15)L$(C1).......|
00000CD0: F8 14 06 04 8B 44 B3 31 30 A7 99 22 28 41 4C 4C |.....D.10.."(ALL|
00000CE0: 45 52 44 49 4E 47 53 20 5A 49 45 4D 4C 49 43 48 |ERDINGS ZIEMLICH|
00000CF0: 20 4B 4E 41 50 50 29 22 00 20 15 10 04 8B 44 B3 | KNAPP)". ....D.|
00000D00: 32 30 AF 44 B1 B2 31 30 A7 99 22 28 4D 49 54 20 |20.D..10.."(MIT |
00000D10: 4B 4C 41 52 45 4D 20 41 42 53 54 41 4E 44 29 22 |KLAREM ABSTAND)"|
00000D20: 00 4D 15 1A 04 8B 44 B1 B2 32 30 A7 99 22 28 45 |.M....D..20.."(E|
00000D30: 49 4E 45 20 47 41 4E 5A 20 4B 4C 41 52 45 20 45 |INE GANZ KLARE E|
00000D40: 4E 54 53 43 48 45 49 44 55 4E 47 29 22 00 59 15 |NTSCHEIDUNG)".Y.|
00000D50: 24 04 99 3A 8D 31 31 31 30 00 89 15 2E 04 99 3A |$..:.1110......:|
00000D60: 99 22 48 49 45 52 20 49 53 54 20 44 49 45 20 45 |."HIER IST DIE E|
00000D70: 4E 54 47 55 45 4C 54 49 47 45 20 52 45 49 48 45 |NTGUELTIGE REIHE|
00000D80: 4E 46 4F 4C 47 45 20 3A 22 00 A0 15 38 04 99 3A |NFOLGE :"...8..:|
00000D90: 99 22 50 55 4E 4B 54 45 22 2C 22 4E 41 4D 45 22 |."PUNKTE","NAME"|
00000DA0: 00 C1 15 42 04 81 4A B2 31 A4 4C 30 3A 43 B2 5A |...B..J.1.L0:C.Z|
00000DB0: 28 4A 29 3A 99 56 28 43 29 2C 4C 24 28 43 29 3A |(J):.V(C),L$(C):|
00000DC0: 82 00 C7 15 4C 04 80 00 DE 15 56 04 81 49 B2 31 |....L.....V..I.1|
00000DD0: A4 34 30 3A 99 22 A6 22 3B 3A 82 49 3A 8E 00 F6 |.40:.".";:.I:...|
00000DE0: 15 60 04 81 49 B2 31 A4 32 30 3A 99 22 28 29 22 |.`..I.1.20:."()"|
00000DF0: 3B 3A 82 49 3A 8E 00 0E 16 6A 04 99 22 93 41 4C |;:.I:....j..".AL|
00000E00: 54 45 52 20 46 45 49 47 4C 49 4E 47 21 22 00 14 |TER FEIGLING!"..|
00000E10: 16 74 04 A2 00 00 00 |.t..... |
..).D.. ********************************
*.Q.N.. DIESES PROGRAMM IST PUBLIC DOMAI
N.X.X.. ES DARF FREI KOPIERT UND WEITER-
...... GEGEBEN WERDEN !...... **********
***********************.......Z. ..53280
,6:.53281,6:.646,1.....T1$."FUER'S LEBEN
":T2$."FUER DIE NAEHERE ZUKUNFT".S...T3$
."FUER'S KOMMENDE WOCHENENDE":T4$."FUER
DIE NAECHSTE NACHT".B....".":.1110...H..
:..6)"M A E D C H E N - T E S T":.:.1110
...R..F$(20),L$(20),F(20),M(20,20),V(20)
,Z(20):......Y$."Y":."KEINE ENTSCHEIDUNG
SPROBLEME MEHR FUER"......"VIELBESCHAEFT
IGTE JUNGGESELLEN !":..J...."GEBEN SIE M
IR BITTE AN,WAS SIE UEBER".S...."DIE DAM
EN WISSEN. ICH HELFE IHNEN"......"DANN B
EI DIESER DELIKATEN ENTSCHEIDUNG.":.....
.."UEBERLASSEN SIE MIR DIESES PROBLEM, U
ND KONZENTRIEREN SIE SICH ";......"VOLL
UND GANZ AUFDAS DANACH.......":..E.".."B
EREIT J...";:.B$:.H(B$,1).."J".1130.N.
,..".":.:.:.:.:.:..8)"!!! H A L T !!!"..
.6..:.:."ICH HAETTE NOCH EINE (REIN STAT
ISTISCHE)FRAGE :".V.@..:..2)"TREFFEN SIE
DIESE ENTSCHEIDUNG":....J...2)"1 - ";T1
$:..2)"2 - ";T2$:..2)"3 - ";T3$...T...2)
"4 - ";T4$...^..:." 4...";:.E.;.H..E.1.
400.H.R..E.2.410.U.|..E.3.420.B....E.4.4
30.R...O$.T1$:.440.....O$.T2$:.440.....O
$.T3$:.440.....O$.T4$:.440......".":.112
0...B..:."UNTER WIEVIEL DIESER HIMMLISCH
EN GE-".$.L.."SCHOEPFE (MIN=2-MAX=10) MU
ESSEN SIE SICHDENN ENTSCHEIDEN";:.L0.V.V
..:."BITTE GEBEN SIE JETZT ALLE";L0;"MAE
DCHEN"......"(REIHENFOLGE SPIELT KEINE R
OLLE) EIN!"......:.I.1.L0:."NUMMER";I;"B
ITTE":.L$(I):.:.I:..B....".":.1120......
:." OK, DAS WAEHREN ALSO":.......I.1.L0:
..3)I;"-";L$(I):.I:..G....:."WIEVIEL FAK
TOREN (MAX=10) SIND EIGENTLICH WICHTIG B
EI DER".{...."ENTSCHEIDUNG FUER IHRE":.:
..4)"PARTNERIN ";O$...&..F0...0.."."...:
.."BITTE GEBEN SIE MIR DIESE FAKTOREN AN
":....D..I.1.F0:.:."FAKTOR";I;"BITTE":.F
$(I):.I...N..".":."WELCHER VON DIESEN FA
KTOREN".*.X..I.1.F0:..4)I;F$(I):.I.V.B..
"IST DEN FUER SIE DER WICHTIGSTE";:.F2..
.L..:.:."OK - GEHEN WIR MAL VON EINER BE
DEUTUNGS-SKALA AUS,";...V.."DIE VON 0 BI
S 10 REICHT."......F$(F2);" ALS WICHTIGS
TER FAKTOR"......"ERHAEHLT DEN WERT 10."
:..%...."WELCHEN WERT (DEZIMALWERTE SIND
OK)".R...."WUERDEN SIE DANN DEN ANDEREN
FAKTOREN".D...."ZUORDNEN ?".R....:.I.1.
F0......I.F2.720...F..F$(I):.F(I)...P..:
F(F2).10:C.0:.I.1.F0:C.C.F(I):..R.Z..I.1
.F0:F(I).F(I).C:.I......"."......" GEBEN
SIE MIR JETZT BITTE AN,WIE DIE".0...."M
AEDCHEN BEI DER BETRACHTUNG DER".V...."E
INZELNEN FAKTOREN ABSCHNEIDEN"......:."L
ASSEN SIE UNS DAVON AUSGEHEN, DASS".....
.L$(1)" JEWEILS EINEN WERT VON 10 HAT. S
IE"... .."GEBEN DANN DEN EINZELNEN MAEDC
HEN WERTE"...*.."GROESSER ODER KLEINEN A
LS 10, JE NACH-".7.4.."DEM WIE SIE IN BE
ZUG AUF ";L$(1).J.>.."ABSCHNEIDEN".V.H..
I.1.F0...R..:."BETRACHTEN WIR EINMAL NUR
";F$(I)...\.."UND GEHEN WIR DAVON AUS,
DASS ";L$(1).V.F.."DEN WERT 10 ERREICHT,
WELCHE WERTE"...P.."WUERDEN SIE DEN AND
EREN MAEDCHEN GEBEN"...Z..:.J.2.L0.%....
L$(J):.M(J,I).O....J:.:M(1,I).10:.I:.I.1
.F0:C.0:.J.1.L0....C.C.M(J,I):.J:.J.1.L
0: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).Z....I:
.J:.I.1.10:Z(I).I:.:C.L0.1:.J.1.L0......
I.1.C:N1.Z(I):N2.Z(I.1):.V(N1).V(N2).970
.....Z(I.1).N1:Z(I).N2.L.J..I:.J:C1.Z(1)
:C2.Z(2):C.100.V(C1):.J.1.L0.P.T.V(J).C.
V(J):.:.:.:D.V(C1).V(C2).}....".":.:....
....17)"IHRE":.:.. 2)"IDEALPARTNERIN ";O
$.I.....16)"HEISST":.:..15)L$(C1).O.....
.....D.10.."(ALLERDINGS ZIEMLICH KNAPP)"
. ....D.20.D..10.."(MIT KLAREM ABSTAND)"
.M....D..20.."(EINE GANZ KLARE ENTSCHEID
UNG)".Y.$..:.1110......:."HIER IST DIE E
NTGUELTIGE REIHENFOLGE :". .8..:."PUNKTE
","NAME".A.B..J.1.L0:C.Z(J):.V(C),L$(C):
..G.L.....V..I.1.40:.".";:.I:....`..I.1.
20:."()";:.I:....J..".ALTER FEIGLING!"..
.T.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL