_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

BIORHYTHMUS

FILE INFORMATION

FILENAME(S): BIORHYTHMUS

FILE TYPE(S): PRG

FILE SIZE: 2.9K

FIRST SEEN: 2025-12-02 22:47:14

APPEARS ON: 1 disk(s)

FILE HASH

28ca869f35a86fe9d1e98c7f18cec5f664c26e12e66f301fc22c1f308ddebe94

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SPIELEND BASIC L BIORHYTHMUS PRG swasti, charly 23 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1B 08 0A 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 35 08 14 00  |***********.5...|
00000020: 8F 20 2A 2A 2A 20 20 20  20 20 20 20 20 20 20 20  |. ***           |
00000030: 20 20 2A 2A 2A 00 4F 08  1E 00 8F 20 2A 2A 2A 20  |  ***.O.... *** |
00000040: 42 49 4F 52 48 59 54 48  4D 55 53 20 2A 2A 2A 00  |BIORHYTHMUS ***.|
00000050: 69 08 28 00 8F 20 2A 2A  2A 20 20 20 20 20 20 20  |i.(.. ***       |
00000060: 20 20 20 20 20 20 2A 2A  2A 00 83 08 32 00 8F 20  |      ***...2.. |
00000070: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000080: 2A 2A 2A 00 89 08 3C 00  8F 00 94 08 46 00 8D 20  |***...<.....F.. |
00000090: 31 30 30 30 00 9F 08 50  00 8D 20 32 30 30 30 00  |1000...P.. 2000.|
000000A0: A5 08 5A 00 80 00 AB 08  E8 03 8F 00 C8 08 F2 03  |..Z.............|
000000B0: 8F 20 2A 2A 2A 20 56 4F  52 42 45 52 45 49 54 55  |. *** VORBEREITU|
000000C0: 4E 47 45 4E 20 2A 2A 2A  00 CE 08 FC 03 8F 00 D8  |NGEN ***........|
000000D0: 08 06 04 53 57 B2 32 39  00 FD 08 10 04 86 20 41  |...SW.29...... A|
000000E0: 24 28 53 57 29 2C 20 50  4C 28 32 33 29 2C 20 45  |$(SW), PL(23), E|
000000F0: 4C 28 32 38 29 2C 20 49  4C 28 33 33 29 00 2C 09  |L(28), IL(33).,.|
00000100: 1A 04 4D 4F 24 B2 22 4A  41 4E 46 45 42 4D 41 52  |..MO$."JANFEBMAR|
00000110: 41 50 52 4D 41 49 4A 55  4E 4A 55 4C 41 55 47 53  |APRMAIJUNJULAUGS|
00000120: 45 50 4F 4B 54 4E 4F 56  44 45 5A 22 00 45 09 24  |EPOKTNOVDEZ".E.$|
00000130: 04 57 4F 24 B2 22 4D 4F  44 49 4D 49 44 4F 46 52  |.WO$."MODIMIDOFR|
00000140: 53 41 53 4F 22 00 54 09  2E 04 81 20 49 B2 31 20  |SASO".T.... I.1 |
00000150: A4 20 53 57 00 63 09 38  04 3A 41 24 28 49 29 B2  |. SW.c.8.:A$(I).|
00000160: 22 20 22 00 6B 09 42 04  82 20 49 00 7A 09 4C 04  |" ".k.B.. I.z.L.|
00000170: 42 B2 B5 20 28 53 57 AD  32 29 00 86 09 56 04 41  |B.. (SW.2)...V.A|
00000180: B2 42 AA 31 2E 35 00 95  09 60 04 81 20 49 B2 31  |.B.1.5...`.. I.1|
00000190: 20 A4 20 33 33 00 B8 09  6A 04 3A 49 4C 28 49 29  | . 33...j.:IL(I)|
000001A0: B2 B5 20 28 41 AA 42 AC  BF 28 32 AC FF AC 28 49  |.. (A.B..(2...(I|
000001B0: AB 31 29 AD 33 33 29 29  00 D1 09 74 04 3A 8B 20  |.1).33))...t.:. |
000001C0: 49 B1 32 38 20 A7 20 82  20 49 3A 89 20 31 31 39  |I.28 . . I:. 119|
000001D0: 30 00 F4 09 7E 04 3A 45  4C 28 49 29 B2 B5 20 28  |0...~.:EL(I).. (|
000001E0: 41 AA 42 AC BF 28 32 AC  FF AC 28 49 AB 31 29 AD  |A.B..(2...(I.1).|
000001F0: 32 38 29 29 00 0D 0A 88  04 3A 8B 20 49 B1 32 33  |28)).....:. I.23|
00000200: 20 A7 20 82 20 49 3A 89  20 31 31 39 30 00 30 0A  | . . I:. 1190.0.|
00000210: 92 04 3A 50 4C 28 49 29  B2 B5 20 28 41 AA 42 AC  |..:PL(I).. (A.B.|
00000220: BF 28 32 AC FF AC 28 49  AB 31 29 AD 32 33 29 29  |.(2...(I.1).23))|
00000230: 00 38 0A 9C 04 82 20 49  00 5E 0A A6 04 42 57 24  |.8.... I.^...BW$|
00000240: B2 22 2D 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 30  |."-............0|
00000250: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2B 22 00 64  |............+".d|
00000260: 0A B0 04 8E 00 6A 0A 14  05 8F 00 8F 0A 1E 05 8F  |.....j..........|
00000270: 20 2A 2A 2A 20 42 45 52  45 43 48 4E 55 4E 47 20  | *** BERECHNUNG |
00000280: 44 45 53 20 57 4F 43 48  45 4E 54 41 47 45 53 00  |DES WOCHENTAGES.|
00000290: 95 0A 28 05 8F 00 B7 0A  32 05 8B 20 4D B3 33 20  |..(.....2.. M.3 |
000002A0: A7 20 4D 30 B2 4D AA 31  30 3A 4A 30 B2 4A AB 31  |. M0.M.10:J0.J.1|
000002B0: 3A 89 20 31 33 35 30 00  C7 0A 3C 05 4D 30 B2 4D  |:. 1350...<.M0.M|
000002C0: AB 32 3A 4A 30 B2 4A 00  D7 0A 46 05 59 B2 B5 28  |.2:J0.J...F.Y..(|
000002D0: 4A 30 AD 31 30 30 29 00  E8 0A 50 05 4B B2 4A 30  |J0.100)...P.K.J0|
000002E0: AB 28 59 AC 31 30 30 29  00 16 0B 5A 05 4E B2 B5  |.(Y.100)...Z.N..|
000002F0: 28 28 31 33 AC 4D 30 AB  31 29 AD 35 29 AA 54 AA  |((13.M0.1).5).T.|
00000300: 4B AA B5 28 4B AD 34 29  AA B5 28 59 AD 34 29 AB  |K..(K.4)..(Y.4).|
00000310: 32 AC 59 AA 37 37 00 29  0B 64 05 4E B2 4E AB B5  |2.Y.77.).d.N.N..|
00000320: 28 4E AD 37 29 AC 37 AA  31 00 35 0B 6E 05 4D 30  |(N.7).7.1.5.n.M0|
00000330: B2 4D 30 AB 31 00 6B 0B  78 05 59 B2 B5 28 28 31  |.M0.1.k.x.Y..((1|
00000340: 34 36 30 39 37 AC 59 29  AD 34 29 AA 54 AA B5 28  |46097.Y).4).T..(|
00000350: 28 31 34 36 31 AC 4B 29  AD 34 29 AA B5 28 28 31  |(1461.K).4)..((1|
00000360: 35 33 AC 4D 30 AA 32 29  AD 35 29 00 71 0B 82 05  |53.M0.2).5).q...|
00000370: 8E 00 77 0B DC 05 8F 00  9B 0B E6 05 8F 20 2A 2A  |..w.......... **|
00000380: 2A 20 45 52 52 45 43 48  4E 45 4E 20 44 45 52 20  |* ERRECHNEN DER |
00000390: 53 43 48 41 4C 54 4A 41  48 52 45 00 A1 0B F0 05  |SCHALTJAHRE.....|
000003A0: 8F 00 A9 0B FA 05 4C B2  32 00 C0 0B 04 06 8B 20  |......L.2...... |
000003B0: 4D B3 33 20 A7 20 4C B2  30 3A 89 20 31 35 39 30  |M.3 . L.0:. 1590|
000003C0: 00 DA 0B 0E 06 8B 20 4A  B3 B1 B5 20 28 4A AD 34  |...... J... (J.4|
000003D0: 29 AC 34 20 A7 20 31 35  39 30 00 F8 0B 18 06 8B  |).4 . 1590......|
000003E0: 20 4A B3 B1 B5 20 28 4A  AD 31 30 30 29 AC 31 30  | J... (J.100).10|
000003F0: 30 20 A7 20 31 35 38 30  00 16 0C 22 06 8B 20 4A  |0 . 1580...".. J|
00000400: B3 B1 B5 20 28 4A AD 34  30 30 29 AC 34 30 30 20  |... (J.400).400 |
00000410: A7 20 31 35 39 30 00 1E  0C 2C 06 4C B2 31 00 41  |. 1590...,.L.1.A|
00000420: 0C 36 06 59 31 B2 B5 20  28 28 33 30 35 35 AC 28  |.6.Y1.. ((3055.(|
00000430: 4D AA 32 29 29 AD 31 30  30 29 AB 39 31 AA 54 AB  |M.2)).100).91.T.|
00000440: 4C 00 47 0C 40 06 8E 00  4D 0C D0 07 8F 00 63 0C  |L.G.@...M.....c.|
00000450: DA 07 8F 20 2A 2A 2A 20  22 53 50 49 45 4C 22 20  |... *** "SPIEL" |
00000460: 2A 2A 2A 00 69 0C E4 07  8F 00 89 0C EE 07 99 20  |***.i.......... |
00000470: 22 93 11 11 11 22 3B A3  31 31 29 3B 22 42 49 4F  |"....";.11);"BIO|
00000480: 52 48 59 54 48 4D 55 53  22 00 A0 0C F8 07 85 20  |RHYTHMUS"...... |
00000490: 22 11 11 49 48 52 20 4E  41 4D 45 20 22 3B 4E 24  |"..IHR NAME ";N$|
000004A0: 00 C9 0C 02 08 85 20 22  49 48 52 20 47 45 42 55  |...... "IHR GEBU|
000004B0: 52 54 53 54 41 47 20 28  54 54 2C 4D 4D 2C 4A 4A  |RTSTAG (TT,MM,JJ|
000004C0: 29 20 22 3B 54 2C 4D 2C  4A 00 E3 0C 0C 08 8B 20  |) ";T,M,J...... |
000004D0: 54 B1 30 20 AF 20 54 B3  33 32 20 A7 20 89 20 32  |T.0 . T.32 . . 2|
000004E0: 30 39 30 00 FC 0C 16 08  99 20 22 46 41 4C 53 43  |090...... "FALSC|
000004F0: 48 45 52 20 54 41 47 20  21 91 91 22 00 07 0D 20  |HER TAG !.."... |
00000500: 08 89 20 32 30 35 30 00  21 0D 2A 08 8B 20 4D B1  |.. 2050.!.*.. M.|
00000510: 30 20 AF 20 4D B3 31 33  20 A7 20 89 20 32 31 32  |0 . M.13 . . 212|
00000520: 30 00 3C 0D 34 08 99 20  22 46 41 4C 53 43 48 45  |0.<.4.. "FALSCHE|
00000530: 52 20 4D 4F 4E 41 54 20  21 91 91 22 00 47 0D 3E  |R MONAT !..".G.>|
00000540: 08 89 20 32 30 35 30 00  62 0D 48 08 8B 20 4A B1  |.. 2050.b.H.. J.|
00000550: 31 20 AF 20 4A B3 31 30  30 20 A7 20 89 20 32 31  |1 . J.100 . . 21|
00000560: 35 30 00 7C 0D 52 08 99  20 22 46 41 4C 53 43 48  |50.|.R.. "FALSCH|
00000570: 45 53 20 4A 41 48 52 20  21 91 91 22 00 87 0D 5C  |ES JAHR !.."...\|
00000580: 08 89 20 32 30 35 30 00  99 0D 66 08 4A B2 4A AA  |.. 2050...f.J.J.|
00000590: 31 39 30 30 3A 4D 4A B2  4A 00 A4 0D 70 08 8D 20  |1900:MJ.J...p.. |
000005A0: 31 33 30 30 00 AC 0D 7A  08 53 B2 59 00 CD 0D 84  |1300...z.S.Y....|
000005B0: 08 99 3A 99 20 22 53 54  41 52 54 44 41 54 55 4D  |..:. "STARTDATUM|
000005C0: 20 44 45 52 20 4B 55 52  56 45 20 3F 22 00 EA 0D  | DER KURVE ?"...|
000005D0: 8E 08 85 20 22 28 54 54  2C 4D 4D 2C 4A 4A 29 20  |... "(TT,MM,JJ) |
000005E0: 22 3B 54 31 2C 4D 31 2C  4A 31 00 06 0E 98 08 8B  |";T1,M1,J1......|
000005F0: 20 54 31 B1 30 20 AF 20  54 31 B3 33 32 20 A7 20  | T1.0 . T1.32 . |
00000600: 89 20 32 32 33 30 00 1F  0E A2 08 99 20 22 46 41  |. 2230...... "FA|
00000610: 4C 53 43 48 45 52 20 54  41 47 20 21 91 91 22 00  |LSCHER TAG !..".|
00000620: 2A 0E AC 08 89 20 32 31  39 30 00 46 0E B6 08 8B  |*.... 2190.F....|
00000630: 20 4D 31 B1 30 20 AF 20  4D 31 B3 31 33 20 A7 20  | M1.0 . M1.13 . |
00000640: 89 20 32 32 36 30 00 61  0E C0 08 99 20 22 46 41  |. 2260.a.... "FA|
00000650: 4C 53 43 48 45 52 20 4D  4F 4E 41 54 20 21 91 91  |LSCHER MONAT !..|
00000660: 22 00 6C 0E CA 08 89 20  32 31 39 30 00 89 0E D4  |".l.... 2190....|
00000670: 08 8B 20 4A 31 B1 30 20  AF 20 4A 31 B3 31 30 30  |.. J1.0 . J1.100|
00000680: 20 A7 20 89 20 32 32 39  30 00 A3 0E DE 08 99 20  | . . 2290...... |
00000690: 22 46 41 4C 53 43 48 45  53 20 4A 41 48 52 20 21  |"FALSCHES JAHR !|
000006A0: 91 91 22 00 AE 0E E8 08  89 20 32 31 39 30 00 BD  |.."...... 2190..|
000006B0: 0E F2 08 4A 31 B2 4A 31  AA 31 39 30 30 00 D1 0E  |...J1.J1.1900...|
000006C0: FC 08 8B 20 4A 31 B1 4A  20 A7 20 89 20 32 33 35  |... J1.J . . 235|
000006D0: 30 00 EC 0E 06 09 8B 20  4A 31 B2 4A 20 AF 20 4D  |0...... J1.J . M|
000006E0: 31 B1 4D 20 A7 20 89 20  32 33 35 30 00 0F 0F 10  |1.M . . 2350....|
000006F0: 09 8B 20 4A 31 B2 4A 20  AF 20 4D 31 B2 4D 20 AF  |.. J1.J . M1.M .|
00000700: 20 54 31 B1 B2 54 20 A7  20 89 20 32 33 35 30 00  | T1..T . . 2350.|
00000710: 41 0F 1A 09 99 20 22 53  54 41 52 54 44 41 54 55  |A.... "STARTDATU|
00000720: 4D 20 4C 49 45 47 54 20  56 4F 52 20 44 45 4D 20  |M LIEGT VOR DEM |
00000730: 47 45 42 55 52 54 53 44  41 54 55 4D 20 21 91 91  |GEBURTSDATUM !..|
00000740: 22 00 4C 0F 24 09 89 20  32 31 39 30 00 68 0F 2E  |".L.$.. 2190.h..|
00000750: 09 99 3A 85 20 22 57 49  45 20 56 49 45 4C 45 20  |..:. "WIE VIELE |
00000760: 54 41 47 45 20 22 3B 5A  00 7B 0F 38 09 8B 20 5A  |TAGE ";Z.{.8.. Z|
00000770: B3 31 20 A7 20 89 20 32  33 35 30 00 98 0F 42 09  |.1 . . 2350...B.|
00000780: 99 20 22 93 22 3B A3 31  34 29 3B 22 42 49 4F 52  |. ".";.14);"BIOR|
00000790: 48 59 54 48 4D 55 53 22  00 B1 0F 4C 09 99 20 A3  |HYTHMUS"...L.. .|
000007A0: 31 34 29 3B 22 3D 3D 3D  46 55 45 52 3D 3D 3D 3D  |14);"===FUER====|
000007B0: 22 00 C9 0F 56 09 99 20  A3 28 34 30 AB C3 28 4E  |"...V.. .(40..(N|
000007C0: 24 29 29 AD 32 29 3B 4E  24 00 E2 0F 60 09 99 20  |$)).2);N$...`.. |
000007D0: A3 35 29 3B 22 47 45 42  4F 52 45 4E 20 41 4D 20  |.5);"GEBOREN AM |
000007E0: 22 3B 00 0B 10 6A 09 99  20 CA 28 57 4F 24 2C 32  |";...j.. .(WO$,2|
000007F0: AC 4E AB 31 2C 32 29 3B  54 3B CA 28 4D 4F 24 2C  |.N.1,2);T;.(MO$,|
00000800: 33 AC 4D AB 32 2C 33 29  3B 4D 4A 00 38 10 74 09  |3.M.2,3);MJ.8.t.|
00000810: 99 20 A3 35 29 3B 22 50  3D 50 48 59 53 49 53 43  |. .5);"P=PHYSISC|
00000820: 48 20 20 20 20 20 20 28  32 33 20 54 41 47 45 20  |H      (23 TAGE |
00000830: 5A 59 4B 4C 55 53 29 22  00 65 10 7E 09 99 20 A3  |ZYKLUS)".e.~.. .|
00000840: 35 29 3B 22 45 3D 45 4D  4F 54 49 4F 4E 41 4C 20  |5);"E=EMOTIONAL |
00000850: 20 20 20 20 28 32 38 20  54 41 47 45 20 5A 59 4B  |    (28 TAGE ZYK|
00000860: 4C 55 53 29 22 00 92 10  88 09 99 20 A3 35 29 3B  |LUS)"...... .5);|
00000870: 22 49 3D 49 4E 54 45 4C  4C 45 4B 54 55 45 4C 4C  |"I=INTELLEKTUELL|
00000880: 20 28 33 33 20 54 41 47  45 20 5A 59 4B 4C 55 53  | (33 TAGE ZYKLUS|
00000890: 29 22 00 9D 10 92 09 99  20 22 11 11 22 00 BE 10  |)"...... ".."...|
000008A0: 9C 09 4D B2 4D 31 3A 54  B2 54 31 3A 4A B2 4A 31  |..M.M1:T.T1:J.J1|
000008B0: 3A 8D 20 31 33 30 30 3A  8D 20 31 35 30 30 00 C8  |:. 1300:. 1500..|
000008C0: 10 A6 09 59 32 B2 59 31  00 DD 10 B0 09 4D B2 4D  |...Y2.Y1.....M.M|
000008D0: AA 31 3A 54 B2 31 3A 8D  20 31 35 30 30 00 EA 10  |.1:T.1:. 1500...|
000008E0: BA 09 4C 45 B2 59 31 AB  59 32 00 FC 10 C4 09 8B  |..LE.Y1.Y2......|
000008F0: 20 4C 45 B1 5A 20 A7 20  4C 45 B2 5A 00 07 11 CE  | LE.Z . LE.Z....|
00000900: 09 5A B2 5A AB 4C 45 00  13 11 D8 09 54 31 B2 54  |.Z.Z.LE.....T1.T|
00000910: 31 AB 31 00 26 11 E2 09  46 B2 59 AB 53 3A 45 B2  |1.1.&...F.Y.S:E.|
00000920: 46 AA 4C 45 AB 31 00 34  11 EC 09 81 20 4B B2 46  |F.LE.1.4.... K.F|
00000930: 20 A4 20 45 00 41 11 F6  09 3A 54 31 B2 54 31 AA  | . E.A...:T1.T1.|
00000940: 31 00 58 11 00 0A 3A 50  4B B2 4B AB B5 28 4B AD  |1.X...:PK.K..(K.|
00000950: 32 33 29 AC 32 33 AA 31  00 6F 11 0A 0A 3A 45 4B  |23).23.1.o...:EK|
00000960: B2 4B AB B5 28 4B AD 32  38 29 AC 32 38 AA 31 00  |.K..(K.28).28.1.|
00000970: 86 11 14 0A 3A 49 4B B2  4B AB B5 28 4B AD 33 33  |....:IK.K..(K.33|
00000980: 29 AC 33 33 AA 31 00 9A  11 1E 0A 3A 41 24 28 50  |).33.1.....:A$(P|
00000990: 4C 28 50 4B 29 29 B2 22  50 22 00 C8 11 28 0A 3A  |L(PK))."P"...(.:|
000009A0: 8B 20 41 24 28 45 4C 28  45 4B 29 29 B2 22 20 22  |. A$(EL(EK))." "|
000009B0: 20 A7 20 41 24 28 45 4C  28 45 4B 29 29 B2 22 45  | . A$(EL(EK))."E|
000009C0: 22 3A 89 20 32 36 32 30  00 DC 11 32 0A 3A 41 24  |":. 2620...2.:A$|
000009D0: 28 45 4C 28 45 4B 29 29  B2 22 2A 22 00 0A 12 3C  |(EL(EK))."*"...<|
000009E0: 0A 3A 8B 20 41 24 28 49  4C 28 49 4B 29 29 B2 22  |.:. A$(IL(IK))."|
000009F0: 20 22 20 A7 20 41 24 28  49 4C 28 49 4B 29 29 B2  | " . A$(IL(IK)).|
00000A00: 22 49 22 3A 89 20 32 36  34 30 00 1E 12 46 0A 3A  |"I":. 2640...F.:|
00000A10: 41 24 28 49 4C 28 49 4B  29 29 B2 22 2A 22 00 3F  |A$(IL(IK))."*".?|
00000A20: 12 50 0A 3A 8B 20 41 24  28 42 AA 31 29 B2 22 20  |.P.:. A$(B.1)." |
00000A30: 22 20 A7 20 41 24 28 42  AA 31 29 B2 22 2E 22 00  |" . A$(B.1).".".|
00000A40: 6A 12 5A 0A 3A 8B 20 54  31 B2 31 20 B0 20 4B B2  |j.Z.:. T1.1 . K.|
00000A50: 46 20 A7 20 99 20 CA 28  43 24 2C 33 AC 4D 31 AB  |F . . .(C$,3.M1.|
00000A60: 32 2C 33 29 3B 4A 3B 4D  4C 24 00 95 12 64 0A 3A  |2,3);J;ML$...d.:|
00000A70: 99 20 CA 28 57 24 2C 33  AC 4E AB 32 2C 33 29 3B  |. .(W$,3.N.2,3);|
00000A80: C9 28 22 20 20 22 AA C4  28 54 31 29 2C 33 29 3B  |.("  "..(T1),3);|
00000A90: 22 20 20 22 3B 00 A5 12  6E 0A 3A 81 20 49 B2 31  |"  ";...n.:. I.1|
00000AA0: 20 A4 20 53 57 00 B4 12  78 0A 3A 20 99 20 41 24  | . SW...x.: . A$|
00000AB0: 28 49 29 3B 00 C4 12 82  0A 3A 20 41 24 28 49 29  |(I);.....: A$(I)|
00000AC0: B2 22 20 22 00 CD 12 8C  0A 3A 82 20 49 00 D4 12  |." ".....:. I...|
00000AD0: 96 0A 3A 99 00 EF 12 AA  0A 3A A1 20 41 24 3A 8B  |..:......:. A$:.|
00000AE0: 20 41 24 B2 22 22 20 A7  20 89 20 32 37 33 30 00  | A$."" . . 2730.|
00000AF0: 06 13 BE 0A 3A 4E B2 4E  AA 31 3A 8B 20 4E B1 37  |....:N.N.1:. N.7|
00000B00: 20 A7 20 4E B2 31 00 0E  13 C8 0A 82 20 4B 00 36  | . N.1...... K.6|
00000B10: 13 D2 0A 54 31 B2 31 3A  4D 31 B2 4D 31 AA 31 3A  |...T1.1:M1.M1.1:|
00000B20: 8B 20 4D 31 B1 31 32 20  A7 20 4D 31 B2 31 3A 4A  |. M1.12 . M1.1:J|
00000B30: 31 B2 4A 31 AA 31 00 47  13 DC 0A 8B 20 5A 20 A7  |1.J1.1.G.... Z .|
00000B40: 20 89 20 32 34 36 30 00  55 13 E6 0A 99 20 A3 39  | . 2460.U.... .9|
00000B50: 29 3B 4D 4C 24 00 83 13  FA 0A 99 20 22 4D 4F 45  |);ML$...... "MOE|
00000B60: 43 48 54 45 4E 20 53 49  45 20 45 49 4E 45 20 57  |CHTEN SIE EINE W|
00000B70: 45 49 54 45 52 45 20 4B  55 52 56 45 3F 20 12 20  |EITERE KURVE? . |
00000B80: 92 22 3B 00 9F 13 04 0B  A1 20 41 4E 24 3A 8B 20  |.";...... AN$:. |
00000B90: 41 4E 24 B2 22 22 20 A7  20 89 20 32 38 32 30 00  |AN$."" . . 2820.|
00000BA0: B6 13 0E 0B 8B 20 41 4E  24 B2 22 4A 22 20 A7 20  |..... AN$."J" . |
00000BB0: 89 20 32 30 30 30 00 C1  13 18 0B 99 20 22 9D 4E  |. 2000...... ".N|
00000BC0: 22 00 C7 13 22 0B 8E 00  00 00                    |"...".....      |
....... *******************.5.... ***   
          ***.O.... *** BIORHYTHMUS ***.
I.(.. ***             ***...2.. ********
***********...<.....F.. 1000...P.. 2000.
..Z.........H.... *** VORBEREITUNGEN ***
.N.....X...SW.29...... A$(SW), PL(23), E
L(28), IL(33).,...MO$."JANFEBMARAPRMAIJU
NJULAUGSEPOKTNOVDEZ".E.$.WO$."MODIMIDOFR
SASO".T.... I.1 . SW.C.8.:A$(I)." ".K.B.
. I.Z.L.B.. (SW.2)...V.A.B.1.5...`.. I.1
 . 33...J.:IL(I).. (A.B..(2...(I.1).33))
.Q.T.:. I.28 . . I:. 1190...~.:EL(I).. (
A.B..(2...(I.1).28)).....:. I.23 . . I:.
 1190.0...:PL(I).. (A.B..(2...(I.1).23))
.8.... I.^...BW$."-............0........
....+".D.....J.......... *** BERECHNUNG 
DES WOCHENTAGES...(.....2.. M.3 . M0.M.1
0:J0.J.1:. 1350.G.<.M0.M.2:J0.J.W.F.Y..(
J0.100)...P.K.J0.(Y.100)...Z.N..((13.M0.
1).5).T.K..(K.4)..(Y.4).2.Y.77.).D.N.N..
(N.7).7.1.5.N.M0.M0.1.K.X.Y..((146097.Y)
.4).T..((1461.K).4)..((153.M0.2).5).Q...
..W.......... *** ERRECHNEN DER SCHALTJA
HRE...........L.2...... M.3 . L.0:. 1590
.Z.... J... (J.4).4 . 1590...... J... (J
.100).100 . 1580...".. J... (J.400).400 
. 1590...,.L.1.A.6.Y1.. ((3055.(M.2)).10
0).91.T.L.G.@...M.P...C.Z.. *** "SPIEL" 
***.I.......... "....";.11);"BIORHYTHMUS
". .... "..IHR NAME ";N$.I.... "IHR GEBU
RTSTAG (TT,MM,JJ) ";T,M,J...... T.0 . T.
32 . . 2090...... "FALSCHER TAG !.."... 
.. 2050.!.*.. M.0 . M.13 . . 2120.<.4.. 
"FALSCHER MONAT !..".G.>.. 2050.B.H.. J.
1 . J.100 . . 2150.|.R.. "FALSCHES JAHR 
!.."...\.. 2050...F.J.J.1900:MJ.J...P.. 
1300...Z.S.Y.M....:. "STARTDATUM DER KUR
VE ?"...... "(TT,MM,JJ) ";T1,M1,J1......
 T1.0 . T1.32 . . 2230...... "FALSCHER T
AG !..".*.... 2190.F.... M1.0 . M1.13 . 
. 2260.A.... "FALSCHER MONAT !..".L.J.. 
2190...T.. J1.0 . J1.100 . . 2290...... 
"FALSCHES JAHR !.."...... 2190.....J1.J1
.1900.Q.... J1.J . . 2350...... J1.J . M
1.M . . 2350...... J1.J . M1.M . T1..T .
 . 2350.A.... "STARTDATUM LIEGT VOR DEM 
GEBURTSDATUM !..".L.$.. 2190.H....:. "WI
E VIELE TAGE ";Z.{.8.. Z.1 . . 2350...B.
. ".";.14);"BIORHYTHMUS"...L.. .14);"===
FUER====".I.V.. .(40.C(N$)).2);N$...`.. 
.5);"GEBOREN AM ";...J.. J(WO$,2.N.1,2);
T;J(MO$,3.M.2,3);MJ.8.T.. .5);"P=PHYSISC
H      (23 TAGE ZYKLUS)".E.~.. .5);"E=EM
OTIONAL     (28 TAGE ZYKLUS)"...... .5);
"I=INTELLEKTUELL (33 TAGE ZYKLUS)"......
 "..".....M.M1:T.T1:J.J1:. 1300:. 1500.H
...Y2.Y1.....M.M.1:T.1:. 1500.....LE.Y1.
Y2...D.. LE.Z . LE.Z...N.Z.Z.LE...X.T1.T
1.1.&...F.Y.S:E.F.LE.1.4.... K.F . E.A..
.:T1.T1.1.X...:PK.K..(K.23).23.1.O...:EK
.K..(K.28).28.1.....:IK.K..(K.33).33.1..
...:A$(PL(PK))."P".H.(.:. A$(EL(EK))." "
 . A$(EL(EK))."E":. 2620...2.:A$(EL(EK))
."*"...<.:. A$(IL(IK))." " . A$(IL(IK)).
"I":. 2640...F.:A$(IL(IK))."*".?.P.:. A$
(B.1)." " . A$(B.1).".".J.Z.:. T1.1 . K.
F . . J(C$,3.M1.2,3);J;ML$...D.:. J(W$,3
.N.2,3);I("  ".D(T1),3);"  ";...N.:. I.1
 . SW...X.: . A$(I);.D...: A$(I)." ".M..
.:. I.T...:......:. A$:. A$."" . . 2730.
....:N.N.1:. N.7 . N.1...H.. K.6.R.T1.1:
M1.M1.1:. M1.12 . M1.1:J1.J1.1.G.... Z .
 . 2460.U.... .9);ML$...... "MOECHTEN SI
E EINE WEITERE KURVE? . .";...... AN$:. 
AN$."" . . 2820...... AN$."J" . . 2000.A
.... ".N".G.".....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL