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

BIO 64

FILE INFORMATION

FILENAME(S): BIO 64

FILE TYPE(S): PRG

FILE SIZE: 6.5K

FIRST SEEN: 2025-11-30 01:12:44

APPEARS ON: 1 disk(s)

FILE HASH

eb486fa88384bd0e53574e9caa94856fd6b5f91787f2db308abf03c0713e9590

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10709 9 87 BIO 64 PRG C64er 34 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 1C 28 1C 0A 00 8F 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..(....*********|
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  00 4F 1C 0F 00 8F 2A 20  |********.O....* |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 00  |              *.|
00000050: 76 1C 14 00 8F 2A 20 20  20 20 20 42 20 49 20 4F  |v....*     B I O|
00000060: 20 52 20 48 20 59 20 54  20 48 20 4D 20 55 20 53  | R H Y T H M U S|
00000070: 20 20 20 20 20 2A 00 9D  1C 19 00 8F 2A 20 20 20  |     *......*   |
00000080: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 2A 00 C4 1C  |            *...|
000000A0: 1E 00 8F 2A 20 20 50 52  4F 47 52 41 4D 4D 20 5A  |...*  PROGRAMM Z|
000000B0: 55 52 20 45 52 4D 49 54  54 4C 55 4E 47 20 44 45  |UR ERMITTLUNG DE|
000000C0: 53 20 20 2A 00 EB 1C 23  00 8F 2A 20 42 49 4F 52  |S  *...#..* BIOR|
000000D0: 48 59 54 48 4D 55 53 2C  20 44 45 53 20 57 4F 43  |HYTHMUS, DES WOC|
000000E0: 48 45 4E 54 41 47 45 53  20 20 2A 00 12 1D 28 00  |HENTAGES  *...(.|
000000F0: 8F 2A 20 20 55 4E 44 20  42 45 4C 49 45 42 49 47  |.*  UND BELIEBIG|
00000100: 45 52 20 5A 45 49 54 53  50 41 4E 4E 45 4E 20 20  |ER ZEITSPANNEN  |
00000110: 20 2A 00 39 1D 2D 00 8F  2A 20 20 20 20 20 20 20  | *.9.-..*       |
00000120: 28 43 36 34 20 42 41 53  49 43 20 32 2E 30 29 20  |(C64 BASIC 2.0) |
00000130: 20 20 20 20 20 20 20 20  2A 00 60 1D 32 00 8F 2A  |        *.`.2..*|
00000140: 20 20 48 45 49 4D 4F 20  50 4F 4E 4E 41 54 48 20  |  HEIMO PONNATH |
00000150: 20 48 41 4D 42 55 52 47  20 31 39 38 37 20 20 2A  | HAMBURG 1987  *|
00000160: 00 87 1D 37 00 8F 2A 20  20 20 20 20 20 20 20 20  |...7..*         |
00000170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000180: 20 20 20 20 20 20 2A 00  AE 1D 3C 00 8F 2A 2A 2A  |      *...<..***|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 CD  |**************..|
000001B0: 1D 41 00 97 20 35 33 32  38 30 2C 30 3A 97 20 35  |.A.. 53280,0:. 5|
000001C0: 33 32 38 31 2C 30 3A 99  C7 28 33 30 29 00 D9 1D  |3281,0:..(30)...|
000001D0: 46 00 99 C7 28 31 34 37  29 00 FC 1D 4B 00 8F 20  |F...(147)...K.. |
000001E0: 2D 2D 2D 2D 20 56 41 52  49 41 42 4C 45 2C 4B 4F  |---- VARIABLE,KO|
000001F0: 4E 53 54 41 4E 54 45 4E  20 2D 2D 2D 00 18 1E 50  |NSTANTEN ---...P|
00000200: 00 41 24 B2 22 22 3A 54  24 B2 22 22 3A 4D 24 B2  |.A$."":T$."":M$.|
00000210: 22 22 3A 47 24 B2 22 22  00 62 1E 55 00 54 B2 30  |"":G$."".b.U.T.0|
00000220: 3A 54 31 B2 30 3A 54 32  B2 30 3A 4D B2 30 3A 4D  |:T1.0:T2.0:M.0:M|
00000230: 31 B2 30 3A 4D 32 B2 30  3A 47 B2 30 3A 47 31 B2  |1.0:M2.0:G.0:G1.|
00000240: 30 3A 47 32 B2 30 3A 4A  B2 30 3A 4A 31 B2 30 3A  |0:G2.0:J.0:J1.0:|
00000250: 4A 32 B2 30 3A 43 B2 30  3A 43 31 B2 30 3A 43 32  |J2.0:C.0:C1.0:C2|
00000260: B2 30 00 B0 1E 5A 00 4B  B2 30 3A 4B 31 B2 30 3A  |.0...Z.K.0:K1.0:|
00000270: 4B 32 B2 30 3A 49 B2 30  3A 46 B2 31 3A 53 B2 31  |K2.0:I.0:F.1:S.1|
00000280: 3A 44 5A B2 30 3A 44 B2  30 3A 57 B2 30 3A 59 4B  |:DZ.0:D.0:W.0:YK|
00000290: B2 30 3A 59 53 B2 30 3A  59 47 B2 30 3A 52 41 B2  |.0:YS.0:YG.0:RA.|
000002A0: 30 3A 52 42 B2 30 3A 54  41 B2 30 3A 54 42 B2 30  |0:RB.0:TA.0:TB.0|
000002B0: 00 F1 1E 5F 00 42 42 B2  33 32 3A 42 48 B2 32 34  |..._.BB.32:BH.24|
000002C0: 3A 58 55 B2 31 3A 58 4F  B2 33 32 3A 59 55 B2 AB  |:XU.1:XO.32:YU..|
000002D0: 31 34 30 3A 59 4F B2 31  31 30 3A 58 B2 30 3A 59  |140:YO.110:X.0:Y|
000002E0: 31 B2 30 3A 59 32 B2 30  3A 59 33 B2 30 3A 5A B2  |1.0:Y2.0:Y3.0:Z.|
000002F0: 30 00 12 1F 64 00 52 41  B2 42 42 AD 28 58 4F AB  |0...d.RA.BB.(XO.|
00000300: 58 55 29 3A 52 44 B2 AB  42 48 AD 28 59 4F AB 59  |XU):RD..BH.(YO.Y|
00000310: 55 29 00 3D 1F 69 00 54  41 B2 AB 42 42 AC 58 55  |U).=.i.TA..BB.XU|
00000320: AD 28 58 4F AB 58 55 29  AA 35 3A 54 42 B2 42 48  |.(XO.XU).5:TB.BH|
00000330: AC 59 4F AD 28 59 4F AB  59 55 29 AA 31 00 52 1F  |.YO.(YO.YU).1.R.|
00000340: 6E 00 96 20 A5 20 58 28  58 29 B2 52 41 AC 58 AA  |n.. . X(X).RA.X.|
00000350: 54 41 00 67 1F 73 00 96  20 A5 20 59 28 59 29 B2  |TA.g.s.. . Y(Y).|
00000360: 52 44 AC 59 AA 54 42 00  8D 1F 78 00 96 20 A5 20  |RD.Y.TB...x.. . |
00000370: 4B 28 58 29 B2 B5 28 31  30 30 AC BF 28 2E 32 37  |K(X)..(100..(.27|
00000380: 33 31 38 31 39 37 AC 58  29 AA 2E 35 29 00 B4 1F  |318197.X)..5)...|
00000390: 7A 00 96 20 A5 20 53 28  58 29 B2 B5 28 31 30 30  |z.. . S(X)..(100|
000003A0: AC BF 28 2E 32 32 34 33  39 39 34 37 35 AC 58 29  |..(.224399475.X)|
000003B0: AA 2E 35 29 00 DB 1F 7C  00 96 20 A5 20 47 28 58  |..5)...|.. . G(X|
000003C0: 29 B2 B5 28 31 30 30 AC  BF 28 2E 31 39 30 33 39  |)..(100..(.19039|
000003D0: 39 35 35 35 AC 58 29 AA  2E 35 29 00 FA 1F 7D 00  |9555.X)..5)...}.|
000003E0: 86 20 4D 28 31 32 29 2C  4D 24 28 31 32 29 2C 54  |. M(12),M$(12),T|
000003F0: 24 28 36 29 2C 41 28 31  32 29 00 00 20 82 00 8F  |$(6),A(12).. ...|
00000400: 00 3C 20 87 00 83 20 33  31 2C 4A 41 4E 55 41 52  |.< ... 31,JANUAR|
00000410: 2C 32 38 2C 46 45 42 52  55 41 52 2C 33 31 2C 4D  |,28,FEBRUAR,31,M|
00000420: 41 45 52 5A 2C 33 30 2C  41 50 52 49 4C 2C 33 31  |AERZ,30,APRIL,31|
00000430: 2C 4D 41 49 2C 33 30 2C  4A 55 4E 49 00 84 20 8C  |,MAI,30,JUNI.. .|
00000440: 00 83 20 33 31 2C 4A 55  4C 49 2C 33 31 2C 41 55  |.. 31,JULI,31,AU|
00000450: 47 55 53 54 2C 33 30 2C  53 45 50 54 45 4D 42 45  |GUST,30,SEPTEMBE|
00000460: 52 2C 33 31 2C 4F 4B 54  4F 42 45 52 2C 33 30 2C  |R,31,OKTOBER,30,|
00000470: 4E 4F 56 45 4D 42 45 52  2C 33 31 2C 44 45 5A 45  |NOVEMBER,31,DEZE|
00000480: 4D 42 45 52 00 C6 20 91  00 83 20 53 41 4D 53 54  |MBER.. ... SAMST|
00000490: 41 47 2C 53 4F 4E 4E 54  41 47 2C 4D 4F 4E 54 41  |AG,SONNTAG,MONTA|
000004A0: 47 2C 44 49 45 4E 53 54  41 47 2C 4D 49 54 54 57  |G,DIENSTAG,MITTW|
000004B0: 4F 43 48 2C 44 4F 4E 4E  45 52 53 54 41 47 2C 46  |OCH,DONNERSTAG,F|
000004C0: 52 45 49 54 41 47 00 F7  20 93 00 83 20 30 2C 33  |REITAG.. ... 0,3|
000004D0: 31 2C 35 39 2C 39 30 2C  31 32 30 2C 31 35 31 2C  |1,59,90,120,151,|
000004E0: 31 38 31 2C 32 31 32 2C  32 34 33 2C 32 37 33 2C  |181,212,243,273,|
000004F0: 33 30 34 2C 33 33 34 00  06 21 96 00 81 20 49 B2  |304,334..!... I.|
00000500: 31 20 A4 20 31 32 00 17  21 9B 00 87 20 4D 28 49  |1 . 12..!... M(I|
00000510: 29 2C 4D 24 28 49 29 00  1F 21 A0 00 82 20 49 00  |),M$(I)..!... I.|
00000520: 2D 21 A5 00 81 20 49 B2  30 20 A4 20 36 00 39 21  |-!... I.0 . 6.9!|
00000530: AA 00 87 20 54 24 28 49  29 00 41 21 AF 00 82 20  |... T$(I).A!... |
00000540: 49 00 50 21 B0 00 81 20  49 B2 31 20 A4 20 31 32  |I.P!... I.1 . 12|
00000550: 00 5B 21 B1 00 87 20 41  28 49 29 00 63 21 B2 00  |.[!... A(I).c!..|
00000560: 82 20 49 00 A1 21 B4 00  54 4A B2 34 3A 4D 4A B2  |. I..!..TJ.4:MJ.|
00000570: 31 30 3A 53 4A B2 31 35  38 32 3A 8F 20 42 45 47  |10:SJ.1582:. BEG|
00000580: 49 4E 4E 20 44 45 53 20  47 52 45 47 4F 52 49 41  |INN DES GREGORIA|
00000590: 4E 49 53 43 48 45 4E 20  4B 41 4C 45 4E 44 45 52  |NISCHEN KALENDER|
000005A0: 53 00 C4 21 22 01 8F 20  2D 2D 2D 2D 20 4D 45 4E  |S..!".. ---- MEN|
000005B0: 55 45 20 31 20 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |UE 1 -----------|
000005C0: 2D 2D 2D 2D 00 D0 21 27  01 99 C7 28 31 34 37 29  |----..!'...(147)|
000005D0: 00 09 22 2C 01 99 C7 28  31 38 29 22 20 20 20 20  |..",...(18)"    |
000005E0: 20 20 20 20 42 20 49 20  4F 20 52 20 48 20 59 20  |    B I O R H Y |
000005F0: 54 20 48 20 4D 20 55 20  53 20 20 20 20 20 20 20  |T H M U S       |
00000600: 20 20 22 C7 28 31 34 36  29 00 19 22 31 01 99 3A  |  ".(146).."1..:|
00000610: 99 3A 99 3A 99 3A 99 3A  99 00 48 22 36 01 99 3A  |.:.:.:.:..H"6..:|
00000620: 99 A3 33 29 22 46 45 53  54 53 54 45 4C 4C 45 4E  |..3)"FESTSTELLEN|
00000630: 20 44 45 53 20 57 4F 43  48 45 4E 54 41 47 45 53  | DES WOCHENTAGES|
00000640: 2E 2E 2E 2E 2E 2E 31 22  00 77 22 3B 01 99 3A 99  |......1".w";..:.|
00000650: A3 33 29 22 5A 45 49 54  44 49 46 46 45 52 45 4E  |.3)"ZEITDIFFEREN|
00000660: 5A 20 42 45 52 45 43 48  4E 45 4E 2E 2E 2E 2E 2E  |Z BERECHNEN.....|
00000670: 2E 2E 2E 2E 2E 32 22 00  A6 22 40 01 99 3A 99 A3  |.....2".."@..:..|
00000680: 33 29 22 42 49 4F 52 48  59 54 48 4D 55 53 20 42  |3)"BIORHYTHMUS B|
00000690: 45 53 54 49 4D 4D 45 4E  2E 2E 2E 2E 2E 2E 2E 2E  |ESTIMMEN........|
000006A0: 2E 2E 2E 2E 33 22 00 D5  22 45 01 99 3A 99 A3 33  |....3".."E..:..3|
000006B0: 29 22 50 52 4F 47 52 41  4D 4D 45 4E 44 45 2E 2E  |)"PROGRAMMENDE..|
000006C0: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |................|
000006D0: 2E 2E 2E 34 22 00 F8 22  4A 01 99 3A 99 3A 99 A3  |...4".."J..:.:..|
000006E0: 38 29 22 53 49 45 20 48  41 42 45 4E 20 44 49 45  |8)"SIE HABEN DIE|
000006F0: 20 57 41 48 4C 20 21 22  00 1B 23 4F 01 A1 20 41  | WAHL !"..#O.. A|
00000700: 24 3A 8B 20 C5 28 41 24  29 B3 31 20 B0 20 C5 28  |$:. .(A$).1 . .(|
00000710: 41 24 29 B1 34 20 A7 20  33 33 35 00 35 23 54 01  |A$).4 . 335.5#T.|
00000720: 99 C7 28 31 34 37 29 3A  8B 20 C5 28 41 24 29 B2  |..(147):. .(A$).|
00000730: 34 20 A7 20 80 00 52 23  59 01 91 20 C5 28 41 24  |4 . ..R#Y.. .(A$|
00000740: 29 20 8D 20 31 30 30 30  2C 32 30 30 30 2C 33 30  |) . 1000,2000,30|
00000750: 30 30 00 69 23 5E 01 A1  20 41 24 3A 8B 20 41 24  |00.i#^.. A$:. A$|
00000760: B2 22 22 20 A7 20 33 35  30 00 73 23 63 01 89 20  |."" . 350.s#c.. |
00000770: 32 39 35 00 9A 23 90 01  8F 20 2D 2D 2D 20 44 41  |295..#... --- DA|
00000780: 54 55 4D 53 45 49 4E 47  41 42 45 20 2D 2D 2D 2D  |TUMSEINGABE ----|
00000790: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 00 BC 23 95 01 99  |----------..#...|
000007A0: 3A 85 22 54 41 47 20 28  5A 2E 42 2E 20 31 32 29  |:."TAG (Z.B. 12)|
000007B0: 20 20 20 20 20 20 20 20  22 3B 54 24 00 DC 23 9A  |        ";T$..#.|
000007C0: 01 85 22 4D 4F 4E 41 54  20 28 5A 2E 42 2E 20 36  |.."MONAT (Z.B. 6|
000007D0: 29 20 20 20 20 20 20 20  22 3B 4D 24 00 FC 23 9F  |)       ";M$..#.|
000007E0: 01 85 22 4A 41 48 52 20  28 5A 2E 42 2E 20 31 39  |.."JAHR (Z.B. 19|
000007F0: 38 37 29 20 20 20 20 20  22 3B 47 24 00 18 24 A4  |87)     ";G$..$.|
00000800: 01 54 B2 C5 28 54 24 29  3A 4D B2 C5 28 4D 24 29  |.T..(T$):M..(M$)|
00000810: 3A 47 B2 C5 28 47 24 29  00 36 24 A9 01 4A B2 C5  |:G..(G$).6$..J..|
00000820: 28 C9 28 47 24 2C 32 29  29 3A 43 B2 C5 28 C8 28  |(.(G$,2)):C..(.(|
00000830: 47 24 2C 32 29 29 00 65  24 AE 01 8F 20 50 52 55  |G$,2)).e$... PRU|
00000840: 45 46 45 4E 20 4F 42 20  47 52 45 47 4F 52 49 41  |EFEN OB GREGORIA|
00000850: 4E 49 53 43 48 20 4F 44  45 52 20 4A 55 4C 49 41  |NISCH ODER JULIA|
00000860: 4E 49 53 43 48 00 7C 24  B3 01 8B 20 47 B3 53 4A  |NISCH.|$... G.SJ|
00000870: 20 A7 20 4B B2 30 3A 89  20 34 37 30 00 93 24 B8  | . K.0:. 470..$.|
00000880: 01 8B 20 47 B1 53 4A 20  A7 20 4B B2 31 3A 89 20  |.. G.SJ . K.1:. |
00000890: 34 37 30 00 AA 24 BD 01  8B 20 4D B3 4D 4A 20 A7  |470..$... M.MJ .|
000008A0: 20 4B B2 30 3A 89 20 34  37 30 00 C1 24 C2 01 8B  | K.0:. 470..$...|
000008B0: 20 4D B1 4D 4A 20 A7 20  4B B2 31 3A 89 20 34 37  | M.MJ . K.1:. 47|
000008C0: 30 00 D9 24 C7 01 8B 20  54 B3 B2 54 4A 20 A7 20  |0..$... T..TJ . |
000008D0: 4B B2 30 3A 89 20 34 37  30 00 20 25 C9 01 8B 20  |K.0:. 470. %... |
000008E0: 54 B1 54 4A 20 AF 20 54  B3 31 35 20 A7 20 99 22  |T.TJ . T.15 . ."|
000008F0: 42 45 49 20 44 45 52 20  4B 41 4C 45 4E 44 45 52  |BEI DER KALENDER|
00000900: 52 45 46 4F 52 4D 20 46  4F 4C 47 54 45 20 41 55  |REFORM FOLGTE AU|
00000910: 46 20 44 45 4E 20 34 2E  31 30 2E 31 35 38 32 22  |F DEN 4.10.1582"|
00000920: 00 54 25 CA 01 8B 20 54  B1 54 4A 20 AF 20 54 B3  |.T%... T.TJ . T.|
00000930: 31 35 20 A7 20 99 22 53  4F 46 4F 52 54 20 44 45  |15 . ."SOFORT DE|
00000940: 52 20 31 35 2E 31 30 2E  31 35 38 32 21 22 3A 89  |R 15.10.1582!":.|
00000950: 20 34 30 35 00 5C 25 CC  01 4B B2 31 00 78 25 D1  | 405.\%..K.1.x%.|
00000960: 01 8F 20 5A 55 4C 41 45  53 53 49 47 4B 45 49 54  |.. ZULAESSIGKEIT|
00000970: 20 50 52 55 45 46 45 4E  00 8F 25 D6 01 8B 20 4D  | PRUEFEN..%... M|
00000980: B1 31 32 20 A7 20 46 B2  31 3A 89 20 35 31 35 00  |.12 . F.1:. 515.|
00000990: A9 25 DB 01 8B 20 54 B3  B2 4D 28 4D 29 20 A7 20  |.%... T..M(M) . |
000009A0: 46 B2 30 3A 89 20 34 39  30 00 C9 25 E0 01 8B 20  |F.0:. 490..%... |
000009B0: 54 B1 4D 28 4D 29 20 AF  20 4D B3 B1 32 20 A7 20  |T.M(M) . M..2 . |
000009C0: 46 B2 31 3A 89 20 35 31  35 00 E6 25 E5 01 8F 20  |F.1:. 515..%... |
000009D0: 53 43 48 41 4C 54 4A 41  48 52 20 46 45 53 54 53  |SCHALTJAHR FESTS|
000009E0: 54 45 4C 4C 45 4E 00 F7  25 EA 01 53 B2 47 AB 34  |TELLEN..%..S.G.4|
000009F0: AC B5 28 47 AD 34 29 00  2A 26 EF 01 8B 20 4B B2  |..(G.4).*&... K.|
00000A00: 30 20 AF 20 53 B3 31 45  AB 36 20 A7 20 53 B2 30  |0 . S.1E.6 . S.0|
00000A10: 3A 8F 20 4A 55 4C 49 41  4E 49 53 43 48 45 53 20  |:. JULIANISCHES |
00000A20: 53 43 48 41 4C 54 4A 41  48 52 00 6D 26 F4 01 8B  |SCHALTJAHR.m&...|
00000A30: 20 4B B2 31 20 AF 20 53  B3 31 45 AB 36 20 AF 20  | K.1 . S.1E.6 . |
00000A40: 28 43 AB 34 AC B5 28 43  AD 34 29 B3 31 45 AB 36  |(C.4..(C.4).1E.6|
00000A50: 29 20 A7 20 53 B2 30 3A  8F 20 47 52 45 47 4F 52  |) . S.0:. GREGOR|
00000A60: 49 41 4E 2E 20 53 43 48  41 4C 54 4A 2E 00 89 26  |IAN. SCHALTJ...&|
00000A70: F9 01 8B 20 4D B2 32 20  AF 20 53 B2 30 20 AF 20  |... M.2 . S.0 . |
00000A80: 54 B3 B2 32 39 20 A7 20  8E 00 97 26 FE 01 8B 20  |T..29 . ...&... |
00000A90: 46 B2 30 20 A7 20 8E 00  CE 26 03 02 99 22 44 49  |F.0 . ...&..."DI|
00000AA0: 45 53 45 53 20 44 41 54  55 4D 20 49 53 54 20 46  |ESES DATUM IST F|
00000AB0: 41 4C 53 43 48 21 22 3A  99 22 42 49 54 54 45 20  |ALSCH!":."BITTE |
00000AC0: 4E 45 55 20 45 49 4E 47  45 42 45 4E 2E 22 00 D8  |NEU EINGEBEN."..|
00000AD0: 26 08 02 89 20 34 30 35  00 00 27 E8 03 8F 20 2D  |&... 405..'... -|
00000AE0: 2D 20 46 45 53 54 53 54  45 4C 4C 45 4E 20 44 45  |- FESTSTELLEN DE|
00000AF0: 53 20 57 4F 43 48 45 4E  54 41 47 45 53 20 2D 2D  |S WOCHENTAGES --|
00000B00: 00 08 27 ED 03 46 B2 31  00 22 27 F2 03 8D 20 34  |..'..F.1."'... 4|
00000B10: 30 30 3A 8F 20 44 41 54  55 4D 53 45 49 4E 47 41  |00:. DATUMSEINGA|
00000B20: 42 45 00 43 27 F7 03 8F  20 4B 41 4C 45 4E 44 45  |BE.C'... KALENDE|
00000B30: 52 46 4F 52 4D 45 4C 4E  20 56 4F 4E 20 5A 45 4C  |RFORMELN VON ZEL|
00000B40: 4C 45 52 00 75 27 FC 03  8B 20 4D B2 31 20 B0 20  |LER.u'... M.1 . |
00000B50: 4D B2 32 20 A7 20 4D B2  4D AA 31 32 3A 4A B2 4A  |M.2 . M.M.12:J.J|
00000B60: AB 31 3A 8B 20 4A B3 30  20 A7 20 4A B2 39 39 3A  |.1:. J.0 . J.99:|
00000B70: 43 B2 43 AB 31 00 94 27  01 04 44 5A B2 54 AA B5  |C.C.1..'..DZ.T..|
00000B80: 28 32 2E 36 AC 28 4D AA  31 29 29 AA 4A AA B5 28  |(2.6.(M.1)).J..(|
00000B90: 4A AD 34 29 00 C1 27 06  04 8B 20 4B B2 30 20 A7  |J.4)..'... K.0 .|
00000BA0: 20 44 B2 44 5A AA 35 AB  43 3A 8F 20 4A 55 4C 49  | D.DZ.5.C:. JULI|
00000BB0: 41 4E 49 53 43 48 45 52  20 4B 41 4C 45 4E 44 45  |ANISCHER KALENDE|
00000BC0: 52 00 F8 27 0B 04 8B 20  4B B2 31 20 A7 20 44 B2  |R..'... K.1 . D.|
00000BD0: 44 5A AA B5 28 43 AD 34  29 AB 32 AC 43 3A 8F 20  |DZ..(C.4).2.C:. |
00000BE0: 47 52 45 47 4F 52 49 41  4E 49 53 43 48 45 52 20  |GREGORIANISCHER |
00000BF0: 4B 41 4C 45 4E 44 45 52  00 09 28 10 04 57 B2 44  |KALENDER..(..W.D|
00000C00: AB 37 AC B5 28 44 AD 37  29 00 3E 28 15 04 8B 20  |.7..(D.7).>(... |
00000C10: 4D B2 31 33 20 B0 20 4D  B2 31 34 20 A7 20 4D B2  |M.13 . M.14 . M.|
00000C20: 4D AB 31 32 3A 4A B2 4A  AA 31 3A 8B 20 4A B2 31  |M.12:J.J.1:. J.1|
00000C30: 30 30 20 A7 20 4A B2 30  3A 43 B2 43 AA 31 00 69  |00 . J.0:C.C.1.i|
00000C40: 28 1A 04 99 3A 99 22 44  45 52 20 22 54 22 2E 22  |(...:."DER "T"."|
00000C50: 4D 24 28 4D 29 22 20 22  47 22 20 49 53 54 20 45  |M$(M)" "G" IST E|
00000C60: 49 4E 20 22 54 24 28 57  29 00 6F 28 1F 04 8E 00  |IN "T$(W).o(....|
00000C70: 93 28 D0 07 8F 20 2D 2D  20 5A 45 49 54 44 49 46  |.(... -- ZEITDIF|
00000C80: 46 45 52 45 4E 5A 20 42  45 52 45 43 48 4E 45 4E  |FERENZ BERECHNEN|
00000C90: 20 2D 2D 00 B6 28 D5 07  8D 20 31 30 30 30 3A 8F  | --..(... 1000:.|
00000CA0: 20 45 49 4E 47 41 42 45  20 55 4E 44 20 57 4F 43  | EINGABE UND WOC|
00000CB0: 48 45 4E 54 41 47 00 DD  28 DA 07 54 31 B2 54 3A  |HENTAG..(..T1.T:|
00000CC0: 4D 31 B2 4D 3A 47 31 B2  47 3A 4A 31 B2 4A 3A 43  |M1.M:G1.G:J1.J:C|
00000CD0: 31 B2 43 3A 4B 31 B2 4B  3A 53 31 B2 53 00 F2 28  |1.C:K1.K:S1.S..(|
00000CE0: DF 07 8D 20 31 30 30 30  3A 8F 20 32 2E 44 41 54  |... 1000:. 2.DAT|
00000CF0: 55 4D 00 19 29 E4 07 54  32 B2 54 3A 4D 32 B2 4D  |UM..)..T2.T:M2.M|
00000D00: 3A 47 32 B2 47 3A 4A 32  B2 4A 3A 43 32 B2 43 3A  |:G2.G:J2.J:C2.C:|
00000D10: 4B 32 B2 4B 3A 53 32 B2  53 00 4A 29 E9 07 8B 20  |K2.K:S2.S.J)... |
00000D20: 4B 31 B2 30 20 AF 20 4B  32 B2 30 20 A7 20 32 30  |K1.0 . K2.0 . 20|
00000D30: 38 35 3A 8F 20 4E 55 52  20 4A 55 4C 49 41 4E 49  |85:. NUR JULIANI|
00000D40: 53 43 48 45 20 44 41 54  45 4E 00 7E 29 EE 07 8B  |SCHE DATEN.~)...|
00000D50: 20 4B 31 B2 31 20 AF 20  4B 32 B2 31 20 A7 20 32  | K1.1 . K2.1 . 2|
00000D60: 31 32 35 3A 8F 20 4E 55  52 20 47 52 45 47 4F 52  |125:. NUR GREGOR|
00000D70: 49 41 4E 49 53 43 48 45  20 44 41 54 45 4E 00 B2  |IANISCHE DATEN..|
00000D80: 29 F3 07 8F 20 48 49 45  52 20 44 41 54 55 4D 20  |)... HIER DATUM |
00000D90: 31 20 4A 55 4C 49 41 4E  49 53 43 48 2C 44 41 54  |1 JULIANISCH,DAT|
00000DA0: 55 4D 20 32 20 47 52 45  47 4F 52 49 41 4E 49 53  |UM 2 GREGORIANIS|
00000DB0: 43 48 00 CA 29 F8 07 54  B2 54 31 3A 4D B2 4D 31  |CH..)..T.T1:M.M1|
00000DC0: 3A 47 B2 47 31 3A 53 B2  53 31 00 E2 29 FD 07 8D  |:G.G1:S.S1..)...|
00000DD0: 20 32 31 36 35 3A 8F 20  4A 55 4C 49 41 4E 49 53  | 2165:. JULIANIS|
00000DE0: 43 48 00 F2 29 02 08 8D  20 32 31 39 35 3A 44 5A  |CH..)... 2195:DZ|
00000DF0: B2 44 00 0A 2A 07 08 54  B2 54 32 3A 4D B2 4D 32  |.D..*..T.T2:M.M2|
00000E00: 3A 47 B2 47 32 3A 53 B2  53 32 00 25 2A 0C 08 8D  |:G.G2:S.S2.%*...|
00000E10: 20 32 31 38 30 3A 8F 20  47 52 45 47 4F 52 49 41  | 2180:. GREGORIA|
00000E20: 4E 49 53 43 48 00 3B 2A  11 08 44 B2 44 AA 32 3A  |NISCH.;*..D.D.2:|
00000E30: 8F 20 4B 4F 52 52 45 4B  54 55 52 00 46 2A 16 08  |. KORREKTUR.F*..|
00000E40: 8D 20 32 31 39 35 00 59  2A 1B 08 44 49 B2 44 AB  |. 2195.Y*..DI.D.|
00000E50: 44 5A 3A 89 20 32 32 31  35 00 75 2A 20 08 8F 20  |DZ:. 2215.u* .. |
00000E60: 4E 55 52 20 4A 55 4C 49  41 4E 49 53 43 48 45 20  |NUR JULIANISCHE |
00000E70: 44 41 54 45 4E 00 8D 2A  25 08 54 B2 54 31 3A 4D  |DATEN..*%.T.T1:M|
00000E80: B2 4D 31 3A 47 B2 47 31  3A 53 B2 53 31 00 98 2A  |.M1:G.G1:S.S1..*|
00000E90: 2A 08 8D 20 32 31 36 35  00 A8 2A 2F 08 8D 20 32  |*.. 2165..*/.. 2|
00000EA0: 31 39 35 3A 44 5A B2 44  00 C0 2A 34 08 54 B2 54  |195:DZ.D..*4.T.T|
00000EB0: 32 3A 4D B2 4D 32 3A 47  B2 47 32 3A 53 B2 53 32  |2:M.M2:G.G2:S.S2|
00000EC0: 00 CB 2A 39 08 8D 20 32  31 36 35 00 D6 2A 3E 08  |..*9.. 2165..*>.|
00000ED0: 8D 20 32 31 39 35 00 E9  2A 43 08 44 49 B2 44 AB  |. 2195..*C.DI.D.|
00000EE0: 44 5A 3A 89 20 32 32 31  35 00 08 2B 48 08 8F 20  |DZ:. 2215..+H.. |
00000EF0: 4E 55 52 20 47 52 45 47  4F 52 49 41 4E 49 53 43  |NUR GREGORIANISC|
00000F00: 48 45 20 44 41 54 45 4E  00 20 2B 4D 08 54 B2 54  |HE DATEN. +M.T.T|
00000F10: 31 3A 4D B2 4D 31 3A 47  B2 47 31 3A 53 B2 53 31  |1:M.M1:G.G1:S.S1|
00000F20: 00 2B 2B 52 08 8D 20 32  31 38 30 00 3B 2B 57 08  |.++R.. 2180.;+W.|
00000F30: 8D 20 32 31 39 35 3A 44  5A B2 44 00 53 2B 5C 08  |. 2195:DZ.D.S+\.|
00000F40: 54 B2 54 32 3A 4D B2 4D  32 3A 47 B2 47 32 3A 53  |T.T2:M.M2:G.G2:S|
00000F50: B2 53 32 00 5E 2B 61 08  8D 20 32 31 38 30 00 69  |.S2.^+a.. 2180.i|
00000F60: 2B 66 08 8D 20 32 31 39  35 00 7C 2B 6B 08 44 49  |+f.. 2195.|+k.DI|
00000F70: B2 44 AB 44 5A 3A 89 20  32 32 31 35 00 99 2B 70  |.D.DZ:. 2215..+p|
00000F80: 08 8F 20 55 50 20 4A 55  4C 49 41 4E 49 53 43 48  |.. UP JULIANISCH|
00000F90: 45 20 54 41 47 5A 41 48  4C 00 B5 2B 75 08 44 B2  |E TAGZAHL..+u.D.|
00000FA0: 41 28 4D 29 AA 47 AC 33  36 35 AA B5 28 47 AD 34  |A(M).G.365..(G.4|
00000FB0: 29 AA 54 AA 31 00 BB 2B  7A 08 8E 00 DB 2B 7F 08  |).T.1..+z....+..|
00000FC0: 8F 20 55 50 20 47 52 45  47 4F 52 49 41 4E 49 53  |. UP GREGORIANIS|
00000FD0: 43 48 45 20 54 41 47 5A  41 48 4C 00 09 2C 84 08  |CHE TAGZAHL..,..|
00000FE0: 44 B2 41 28 4D 29 AA 47  AC 33 36 35 AA B5 28 47  |D.A(M).G.365..(G|
00000FF0: AD 34 29 AB B5 28 47 AD  31 30 30 29 AA B5 28 47  |.4)..(G.100)..(G|
00001000: AD 34 30 30 29 AA 54 AA  31 00 0F 2C 89 08 8E 00  |.400).T.1..,....|
00001010: 2C 2C 8E 08 8F 20 55 50  20 53 43 48 41 4C 54 4A  |,,... UP SCHALTJ|
00001020: 41 48 52 4B 4F 52 52 45  4B 54 55 52 00 44 2C 93  |AHRKORREKTUR.D,.|
00001030: 08 8B 20 53 B2 30 20 AF  20 4D B2 31 20 A7 20 44  |.. S.0 . M.1 . D|
00001040: B2 44 AB 31 00 63 2C 98  08 8B 20 53 B2 30 20 AF  |.D.1.c,... S.0 .|
00001050: 20 4D B2 32 20 AF 20 54  B3 32 39 20 A7 20 44 B2  | M.2 . T.29 . D.|
00001060: 44 AB 31 00 69 2C 9D 08  8E 00 85 2C A2 08 8F 20  |D.1.i,.....,... |
00001070: 41 55 53 47 41 42 45 20  44 45 52 20 44 49 46 46  |AUSGABE DER DIFF|
00001080: 45 52 45 4E 5A 00 AB 2C  A7 08 99 3A 99 22 44 41  |ERENZ..,...:."DA|
00001090: 5A 57 49 53 43 48 45 4E  20 4C 49 45 47 45 4E 20  |ZWISCHEN LIEGEN |
000010A0: 22 44 49 22 20 54 41 47  45 2E 22 00 B1 2C AC 08  |"DI" TAGE."..,..|
000010B0: 8E 00 D6 2C B8 0B 8F 20  2D 2D 2D 20 42 49 4F 52  |...,... --- BIOR|
000010C0: 48 59 54 48 4D 55 53 20  42 45 52 45 43 48 4E 45  |HYTHMUS BERECHNE|
000010D0: 4E 20 2D 2D 2D 2D 00 F4  2C BD 0B 99 3A 99 22 42  |N ----..,...:."B|
000010E0: 49 54 54 45 20 47 45 42  45 4E 20 53 49 45 20 45  |ITTE GEBEN SIE E|
000010F0: 49 4E 3A 22 00 21 2D C2  0B 99 22 31 2E 47 45 42  |IN:".!-..."1.GEB|
00001100: 55 52 54 53 44 41 54 55  4D 20 55 4E 44 20 32 2E  |URTSDATUM UND 2.|
00001110: 41 4B 54 55 45 4C 4C 45  53 20 44 41 54 55 4D 21  |AKTUELLES DATUM!|
00001120: 22 00 52 2D C7 0B 8D 20  32 30 30 35 3A 8F 20 45  |".R-... 2005:. E|
00001130: 49 4E 47 41 42 45 2C 50  52 55 45 46 45 4E 2C 57  |INGABE,PRUEFEN,W|
00001140: 4F 43 48 45 4E 54 41 47  2C 44 49 46 46 45 52 45  |OCHENTAG,DIFFERE|
00001150: 4E 5A 00 70 2D CC 0B 59  4B B2 A5 20 4B 28 44 49  |NZ.p-..YK.. K(DI|
00001160: 29 3A 8F 20 4B 4F 45 52  50 45 52 4B 55 52 56 45  |):. KOERPERKURVE|
00001170: 00 8D 2D D1 0B 59 53 B2  A5 20 53 28 44 49 29 3A  |..-..YS.. S(DI):|
00001180: 8F 20 53 45 45 4C 45 4E  4B 55 52 56 45 00 A9 2D  |. SEELENKURVE..-|
00001190: D6 0B 59 47 B2 A5 20 47  28 44 49 29 3A 8F 20 47  |..YG.. G(DI):. G|
000011A0: 45 49 53 54 4B 55 52 56  45 00 D4 2D DB 0B 99 3A  |EISTKURVE..-...:|
000011B0: 99 22 41 4D 20 22 54 32  22 2E 22 4D 32 22 2E 22  |."AM "T2"."M2"."|
000011C0: 47 32 22 20 53 49 4E 44  20 44 49 45 20 57 45 52  |G2" SIND DIE WER|
000011D0: 54 45 3A 22 00 EF 2D E0  0B 99 3A 99 22 4B 4F 45  |TE:"..-...:."KOE|
000011E0: 52 50 45 52 4B 55 52 56  45 20 3D 20 22 59 4B 00  |RPERKURVE = "YK.|
000011F0: 08 2E E5 0B 99 22 53 45  45 4C 45 4E 4B 55 52 56  |....."SEELENKURV|
00001200: 45 20 20 3D 20 22 59 53  00 21 2E EA 0B 99 22 47  |E  = "YS.!...."G|
00001210: 45 49 53 54 4B 55 52 56  45 20 20 20 3D 20 22 59  |EISTKURVE   = "Y|
00001220: 47 00 39 2E EF 0B A1 20  41 24 3A 8B 20 41 24 B2  |G.9.... A$:. A$.|
00001230: 22 22 20 A7 20 33 30 35  35 00 50 2E F4 0B 8F 20  |"" . 3055.P.... |
00001240: 2D 2D 20 4D 45 4E 55 45  20 32 20 2D 2D 2D 2D 2D  |-- MENUE 2 -----|
00001250: 00 6A 2E F9 0B 99 C7 28  31 34 37 29 3A 99 3A 99  |.j.....(147):.:.|
00001260: 3A 99 3A 99 3A 99 3A 99  3A 99 00 8E 2E FE 0B 99  |:.:.:.:.:.......|
00001270: A3 35 29 22 4E 45 55 45  53 20 44 41 54 55 4D 2E  |.5)"NEUES DATUM.|
00001280: 2E 2E 2E 2E 2E 2E 2E 2E  2E 2E 2E 2E 31 22 00 B4  |............1"..|
00001290: 2E 03 0C 99 3A 99 A3 35  29 22 4D 4F 4E 41 54 53  |....:..5)"MONATS|
000012A0: 47 52 41 46 49 4B 2E 2E  2E 2E 2E 2E 2E 2E 2E 2E  |GRAFIK..........|
000012B0: 2E 2E 32 22 00 DA 2E 08  0C 99 3A 99 A3 35 29 22  |..2"......:..5)"|
000012C0: 5A 55 52 55 45 43 4B 20  5A 55 20 4D 45 4E 55 45  |ZURUECK ZU MENUE|
000012D0: 20 31 2E 2E 2E 2E 2E 2E  33 22 00 FE 2E 0D 0C A1  | 1......3"......|
000012E0: 20 41 24 3A 8B 20 C5 28  41 24 29 B3 31 20 B0 20  | A$:. .(A$).1 . |
000012F0: C5 28 41 24 29 B1 33 20  A7 20 33 30 38 35 00 2D  |.(A$).3 . 3085.-|
00001300: 2F 12 0C 8B 20 41 24 B2  22 33 22 20 A7 20 99 3A  |/... A$."3" . .:|
00001310: 99 A3 31 30 29 22 42 49  54 54 45 20 54 41 53 54  |..10)"BITTE TAST|
00001320: 45 20 44 52 55 45 43 4B  45 4E 22 3A 8E 00 45 2F  |E DRUECKEN":..E/|
00001330: 17 0C 91 20 C5 28 41 24  29 20 8D 20 33 32 30 30  |... .(A$) . 3200|
00001340: 2C 33 34 30 30 00 5D 2F  1C 0C A1 20 41 24 3A 8B  |,3400.]/... A$:.|
00001350: 20 41 24 B2 22 22 20 A7  20 33 31 30 30 00 68 2F  | A$."" . 3100.h/|
00001360: 21 0C 89 20 33 30 36 35  00 6E 2F 26 0C 8F 00 93  |!.. 3065.n/&....|
00001370: 2F 80 0C 8F 20 2D 2D 2D  20 42 49 4F 52 48 59 54  |/... --- BIORHYT|
00001380: 48 4D 55 53 20 4E 45 55  45 53 20 44 41 54 55 4D  |HMUS NEUES DATUM|
00001390: 20 2D 2D 00 9F 2F 85 0C  99 C7 28 31 34 37 29 00  | --../....(147).|
000013A0: CD 2F 8A 0C 99 3A 99 22  42 49 54 54 45 20 4E 45  |./...:."BITTE NE|
000013B0: 55 45 53 20 41 4B 54 55  45 4C 4C 45 53 20 44 41  |UES AKTUELLES DA|
000013C0: 54 55 4D 20 41 4E 47 45  42 45 4E 3A 22 00 FE 2F  |TUM ANGEBEN:"../|
000013D0: 8F 0C 8D 20 32 30 31 35  3A 8F 20 45 49 4E 47 41  |... 2015:. EINGA|
000013E0: 42 45 2C 50 52 55 45 46  45 4E 2C 57 4F 43 48 45  |BE,PRUEFEN,WOCHE|
000013F0: 4E 54 41 47 2C 44 49 46  46 45 52 45 4E 5A 00 21  |NTAG,DIFFERENZ.!|
00001400: 30 94 0C 8D 20 33 30 32  30 3A 8F 20 4E 45 55 45  |0... 3020:. NEUE|
00001410: 20 42 49 4F 52 48 59 54  48 4D 55 53 57 45 52 54  | BIORHYTHMUSWERT|
00001420: 45 00 27 30 99 0C 8E 00  4C 30 48 0D 8F 20 2D 2D  |E.'0....L0H.. --|
00001430: 2D 20 4D 4F 4E 41 54 53  47 52 41 46 49 4B 20 2D  |- MONATSGRAFIK -|
00001440: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 00 5D 30 4A  |------------.]0J|
00001450: 0D 4D B2 4D 32 3A 44 B2  44 49 AB 54 32 00 8C 30  |.M.M2:D.DI.T2..0|
00001460: 4D 0D 99 C7 28 31 34 37  29 C7 28 31 38 29 22 42  |M...(147).(18)"B|
00001470: 49 4F 52 48 59 54 48 4D  55 53 20 49 4D 20 22 4D  |IORHYTHMUS IM "M|
00001480: 24 28 4D 29 47 32 C7 28  31 34 36 29 00 AE 30 52  |$(M)G2.(146)..0R|
00001490: 0D 8D 20 33 35 30 30 3A  8F 20 48 49 4E 54 45 52  |.. 3500:. HINTER|
000014A0: 47 52 55 4E 44 20 5A 45  49 43 48 4E 45 4E 00 D5  |GRUND ZEICHNEN..|
000014B0: 30 57 0D 44 B2 44 AA 5A  3A 8F 20 30 2E 54 41 47  |0W.D.D.Z:. 0.TAG|
000014C0: 20 44 45 53 20 41 4B 54  55 45 4C 4C 45 4E 20 4D  | DES AKTUELLEN M|
000014D0: 4F 4E 41 54 53 00 F5 30  5C 0D 4C B2 4D 28 4D 29  |ONATS..0\.L.M(M)|
000014E0: 3A 8B 20 53 32 B2 30 20  AF 20 4D B2 32 20 A7 20  |:. S2.0 . M.2 . |
000014F0: 4C B2 4C AA 31 00 03 31  61 0D 81 20 49 B2 31 20  |L.L.1..1a.. I.1 |
00001500: A4 20 4C 00 3E 31 66 0D  58 B2 A5 20 58 28 49 29  |. L.>1f.X.. X(I)|
00001510: 3A 20 59 31 B2 A5 59 28  A5 4B 28 44 AA 49 29 29  |: Y1..Y(.K(D.I))|
00001520: 3A 59 32 B2 A5 59 28 A5  53 28 44 AA 49 29 29 3A  |:Y2..Y(.S(D.I)):|
00001530: 59 33 B2 A5 59 28 A5 47  28 44 AA 49 29 29 00 77  |Y3..Y(.G(D.I)).w|
00001540: 31 6B 0D 8F 20 43 31 32  38 3A 50 52 49 4E 54 43  |1k.. C128:PRINTC|
00001550: 48 52 24 28 35 29 3B 3A  53 59 53 20 36 35 35 32  |HR$(5);:SYS 6552|
00001560: 30 2C 2C 59 31 2C 58 3A  50 52 49 4E 54 43 48 52  |0,,Y1,X:PRINTCHR|
00001570: 24 28 31 31 39 29 3B 00  A1 31 6C 0D 99 C7 28 35  |$(119);..1l...(5|
00001580: 29 3B 3A 97 32 31 31 2C  58 3A 97 32 31 34 2C 59  |);:.211,X:.214,Y|
00001590: 31 3A 9E 35 38 36 34 30  3A 99 C7 28 31 31 39 29  |1:.58640:..(119)|
000015A0: 3B 00 DA 31 70 0D 8F 20  43 31 32 38 3A 50 52 49  |;..1p.. C128:PRI|
000015B0: 4E 54 43 48 52 24 28 32  38 29 3B 3A 53 59 53 36  |NTCHR$(28);:SYS6|
000015C0: 35 35 32 30 2C 2C 59 32  2C 58 3A 50 52 49 4E 54  |5520,,Y2,X:PRINT|
000015D0: 43 48 52 24 28 31 31 33  29 3B 00 05 32 71 0D 99  |CHR$(113);..2q..|
000015E0: C7 28 32 38 29 3B 3A 97  32 31 31 2C 58 3A 97 32  |.(28);:.211,X:.2|
000015F0: 31 34 2C 59 32 3A 9E 35  38 36 34 30 3A 99 C7 28  |14,Y2:.58640:..(|
00001600: 31 31 33 29 3B 00 3E 32  75 0D 8F 20 43 31 32 38  |113);.>2u.. C128|
00001610: 3A 50 52 49 4E 54 43 48  52 24 28 33 31 29 3B 3A  |:PRINTCHR$(31);:|
00001620: 53 59 53 36 35 35 32 30  2C 2C 59 33 2C 58 3A 50  |SYS65520,,Y3,X:P|
00001630: 52 49 4E 54 43 48 52 24  28 31 31 38 29 3B 00 69  |RINTCHR$(118);.i|
00001640: 32 76 0D 99 C7 28 33 31  29 3B 3A 97 32 31 31 2C  |2v...(31);:.211,|
00001650: 58 3A 97 32 31 34 2C 59  33 3A 9E 35 38 36 34 30  |X:.214,Y3:.58640|
00001660: 3A 99 C7 28 31 31 38 29  3B 00 71 32 7A 0D 82 20  |:..(118);.q2z.. |
00001670: 49 00 7C 32 7F 0D 99 C7  28 33 30 29 00 A0 32 84  |I.|2....(30)..2.|
00001680: 0D A1 20 41 24 3A 8B 20  C5 28 41 24 29 B3 31 20  |.. A$:. .(A$).1 |
00001690: B0 20 C5 28 41 24 29 B1  33 20 A7 20 33 34 36 30  |. .(A$).3 . 3460|
000016A0: 00 DA 32 89 0D 99 C7 28  31 34 37 29 3A 8B 20 C5  |..2....(147):. .|
000016B0: 28 41 24 29 B2 33 20 A7  20 99 C7 28 31 38 29 22  |(A$).3 . ..(18)"|
000016C0: 20 54 41 53 54 45 20 44  52 55 45 43 4B 45 4E 21  | TASTE DRUECKEN!|
000016D0: 20 22 C7 28 31 34 36 29  3A 8E 00 EF 32 8E 0D 8B  | ".(146):...2...|
000016E0: 20 C5 28 41 24 29 B2 31  20 A7 20 33 34 38 35 00  | .(A$).1 . 3485.|
000016F0: 23 33 93 0D 5A B2 4C 3A  4D B2 4D AA 31 3A 8B 20  |#3..Z.L:M.M.1:. |
00001700: 4D B2 31 33 20 A7 20 99  C7 28 31 38 29 22 42 49  |M.13 . ..(18)"BI|
00001710: 54 54 45 20 54 41 53 54  45 21 22 C7 28 31 34 36  |TTE TASTE!".(146|
00001720: 29 3A 8E 00 40 33 98 0D  89 20 33 34 30 35 3A 8F  |):..@3... 3405:.|
00001730: 20 4E 41 45 43 48 53 54  45 52 20 4D 4F 4E 41 54  | NAECHSTER MONAT|
00001740: 00 6F 33 9D 0D 4D B2 4D  AB 31 3A 8B 20 4D B2 30  |.o3..M.M.1:. M.0|
00001750: 20 A7 20 99 C7 28 31 38  29 22 42 49 54 54 45 20  | . ..(18)"BITTE |
00001760: 54 41 53 54 45 21 22 C7  28 31 34 36 29 3A 8E 00  |TASTE!".(146):..|
00001770: 90 33 A2 0D 5A B2 AB 4D  28 4D 29 3A 8B 20 53 32  |.3..Z..M(M):. S2|
00001780: B2 30 20 AF 20 4D B2 32  20 A7 20 5A B2 5A AB 31  |.0 . M.2 . Z.Z.1|
00001790: 00 A6 33 A7 0D 89 20 33  34 30 35 3A 8F 20 56 4F  |..3... 3405:. VO|
000017A0: 52 4D 4F 4E 41 54 00 CA  33 AC 0D 8F 20 2D 2D 2D  |RMONAT..3... ---|
000017B0: 20 48 49 4E 54 45 52 47  52 55 4E 44 20 5A 45 49  | HINTERGRUND ZEI|
000017C0: 43 48 4E 45 4E 20 2D 2D  2D 2D 00 F1 33 B1 0D 99  |CHNEN ----..3...|
000017D0: A3 35 29 C7 28 31 37 36  29 3B 3A 81 20 49 B2 31  |.5).(176);:. I.1|
000017E0: 20 A4 20 33 30 3A 99 C7  28 31 37 38 29 3B 3A 82  | . 30:..(178);:.|
000017F0: 49 00 0D 34 B6 0D 99 C7  28 31 37 34 29 3A 81 20  |I..4....(174):. |
00001800: 4C B2 31 20 A4 20 39 3A  99 A3 35 29 3B 00 25 34  |L.1 . 9:..5);.%4|
00001810: BB 0D 81 20 49 B2 31 20  A4 20 33 32 3A 99 C7 28  |... I.1 . 32:..(|
00001820: 31 32 35 29 3B 00 3E 34  C0 0D 82 20 49 3A 99 C7  |125);.>4... I:..|
00001830: 28 31 33 29 C7 28 31 34  35 29 3A 82 20 4C 00 6E  |(13).(145):. L.n|
00001840: 34 C5 0D 99 A3 35 29 C7  28 31 37 31 29 3B 3A 81  |4....5).(171);:.|
00001850: 20 49 B2 31 20 A4 20 33  30 3A 99 C7 28 31 32 33  | I.1 . 30:..(123|
00001860: 29 3B 3A 82 20 49 3A 99  C7 28 31 37 39 29 00 82  |);:. I:..(179)..|
00001870: 34 CA 0D 81 20 4C B2 31  20 A4 20 39 3A 99 A3 35  |4... L.1 . 9:..5|
00001880: 29 3B 00 9A 34 CF 0D 81  20 49 B2 31 20 A4 20 33  |);..4... I.1 . 3|
00001890: 32 3A 99 C7 28 31 32 35  29 3B 00 B3 34 D4 0D 82  |2:..(125);..4...|
000018A0: 20 49 3A 99 C7 28 31 33  29 C7 28 31 34 35 29 3A  | I:..(13).(145):|
000018B0: 82 20 4C 00 D5 34 D9 0D  99 A3 35 29 C7 28 31 37  |. L..4....5).(17|
000018C0: 31 29 C7 28 31 37 37 29  C7 28 31 37 37 29 C7 28  |1).(177).(177).(|
000018D0: 31 37 37 29 3B 00 08 35  DE 0D 81 20 49 B2 31 20  |177);..5... I.1 |
000018E0: A4 20 35 3A 99 C7 28 31  32 33 29 C7 28 31 37 37  |. 5:..(123).(177|
000018F0: 29 C7 28 31 37 37 29 C7  28 31 37 37 29 C7 28 31  |).(177).(177).(1|
00001900: 37 37 29 3B 3A 82 20 49  00 20 35 E3 0D 99 C7 28  |77);:. I. 5....(|
00001910: 31 32 33 29 C7 28 31 37  37 29 C7 28 31 38 39 29  |123).(177).(189)|
00001920: 00 53 35 E8 0D 99 A3 35  29 C7 28 31 32 35 29 22  |.S5....5).(125)"|
00001930: 20 20 20 22 3B 3A 81 20  49 B2 30 20 A4 20 35 3A  |   ";:. I.0 . 5:|
00001940: 99 A3 39 AA 35 AC 49 29  C7 28 31 32 35 29 3B 3A  |..9.5.I).(125);:|
00001950: 82 20 49 00 64 35 ED 0D  99 C7 28 31 33 29 C7 28  |. I.d5....(13).(|
00001960: 31 34 35 29 00 90 35 F2  0D 99 A3 34 29 31 A3 38  |145)..5....4)1.8|
00001970: 29 35 A3 31 33 29 31 30  A3 31 38 29 31 35 A3 32  |)5.13)10.18)15.2|
00001980: 33 29 32 30 A3 32 38 29  32 35 A3 33 33 29 33 30  |3)20.28)25.33)30|
00001990: 00 B6 35 F7 0D 99 C7 28  31 39 29 C7 28 31 37 29  |..5....(19).(17)|
000019A0: 22 20 31 30 30 22 3A 81  20 49 B2 31 20 A4 20 39  |" 100":. I.1 . 9|
000019B0: 3A 99 3A 82 20 49 00 DA  35 FC 0D 99 22 20 20 20  |:.:. I..5..."   |
000019C0: 30 22 3A 81 20 49 B2 31  20 A4 20 39 3A 99 3A 82  |0":. I.1 . 9:.:.|
000019D0: 20 49 3A 99 22 2D 31 30  30 22 00 0E 36 01 0E 99  | I:."-100"..6...|
000019E0: 3A 99 3A 99 22 56 4F 52  4D 4F 4E 41 54 20 28 31  |:.:."VORMONAT (1|
000019F0: 29 20 4E 41 43 48 4D 4F  4E 41 54 20 28 32 29 20  |) NACHMONAT (2) |
00001A00: 45 4E 44 45 20 28 33 29  22 C7 28 31 39 29 00 14  |ENDE (3)".(19)..|
00001A10: 36 06 0E 8E 00 00 00                              |6......         |
..(....*********************************
.O....*                               *.
V....*     B I O R H Y T H M U S     *..
....*                               *.D.
...*  PROGRAMM ZUR ERMITTLUNG DES  *...#
..* BIORHYTHMUS, DES WOCHENTAGES  *...(.
.*  UND BELIEBIGER ZEITSPANNEN   *.9.-..
*       (C64 BASIC 2.0)         *.`.2..*
  HEIMO PONNATH  HAMBURG 1987  *...7..* 
                              *...<..***
******************************.M.A.. 532
80,0:. 53281,0:.G(30).Y.F..G(147)...K.. 
---- VARIABLE,KONSTANTEN ---...P.A$."":T
$."":M$."":G$."".B.U.T.0:T1.0:T2.0:M.0:M
1.0:M2.0:G.0:G1.0:G2.0:J.0:J1.0:J2.0:C.0
:C1.0:C2.0...Z.K.0:K1.0:K2.0:I.0:F.1:S.1
:DZ.0:D.0:W.0:YK.0:YS.0:YG.0:RA.0:RB.0:T
A.0:TB.0..._.BB.32:BH.24:XU.1:XO.32:YU..
140:YO.110:X.0:Y1.0:Y2.0:Y3.0:Z.0...D.RA
.BB.(XO.XU):RD..BH.(YO.YU).=.I.TA..BB.XU
.(XO.XU).5:TB.BH.YO.(YO.YU).1.R.N.. . X(
X).RA.X.TA.G.S.. . Y(Y).RD.Y.TB...X.. . 
K(X)..(100..(.27318197.X)..5)...Z.. . S(
X)..(100..(.224399475.X)..5)...|.. . G(X
)..(100..(.190399555.X)..5)...}.. M(12),
M$(12),T$(6),A(12).. ....< ... 31,JANUAR
,28,FEBRUAR,31,MAERZ,30,APRIL,31,MAI,30,
JUNI.. ... 31,JULI,31,AUGUST,30,SEPTEMBE
R,31,OKTOBER,30,NOVEMBER,31,DEZEMBER.F .
.. SAMSTAG,SONNTAG,MONTAG,DIENSTAG,MITTW
OCH,DONNERSTAG,FREITAG.. ... 0,31,59,90,
120,151,181,212,243,273,304,334..!... I.
1 . 12..!... M(I),M$(I)..! .. I.-!... I.
0 . 6.9!... T$(I).A!... I.P!... I.1 . 12
.[!... A(I).C!... I..!..TJ.4:MJ.10:SJ.15
82:. BEGINN DES GREGORIANISCHEN KALENDER
S.D!".. ---- MENUE 1 ---------------.P!'
..G(147)..",..G(18)"        B I O R H Y 
T H M U S         "G(146).."1..:.:.:.:.:
..H"6..:..3)"FESTSTELLEN DES WOCHENTAGES
......1".W";..:..3)"ZEITDIFFERENZ BERECH
NEN..........2".."@..:..3)"BIORHYTHMUS B
ESTIMMEN............3".U"E..:..3)"PROGRA
MMENDE.....................4".."J..:.:..
8)"SIE HABEN DIE WAHL !"..#O.. A$:. E(A$
).1 . E(A$).4 . 335.5#T..G(147):. E(A$).
4 . ..R#Y.. E(A$) . 1000,2000,3000.I#^..
 A$:. A$."" . 350.S#C.. 295..#... --- DA
TUMSEINGABE --------------..#...:."TAG (
Z.B. 12)        ";T$..#..."MONAT (Z.B. 6
)       ";M$..#..."JAHR (Z.B. 1987)     
";G$..$..T.E(T$):M.E(M$):G.E(G$).6$..J.E
(I(G$,2)):C.E(H(G$,2)).E$... PRUEFEN OB 
GREGORIANISCH ODER JULIANISCH.|$... G.SJ
 . K.0:. 470..$... G.SJ . K.1:. 470..$..
. M.MJ . K.0:. 470.A$B.. M.MJ . K.1:. 47
0.Y$G.. T..TJ . K.0:. 470. %I.. T.TJ . T
.15 . ."BEI DER KALENDERREFORM FOLGTE AU
F DEN 4.10.1582".T%J.. T.TJ . T.15 . ."S
OFORT DER 15.10.1582!":. 405.\%L.K.1.X%Q
.. ZULAESSIGKEIT PRUEFEN..%V.. M.12 . F.
1:. 515..%... T..M(M) . F.0:. 490.I%... 
T.M(M) . M..2 . F.1:. 515..%... SCHALTJA
HR FESTSTELLEN..%..S.G.4..(G.4).*&... K.
0 . S.1E.6 . S.0:. JULIANISCHES SCHALTJA
HR.M&... K.1 . S.1E.6 . (C.4..(C.4).1E.6
) . S.0:. GREGORIAN. SCHALTJ...&... M.2 
. S.0 . T..29 . ...&... F.0 . ..N&..."DI
ESES DATUM IST FALSCH!":."BITTE NEU EING
EBEN.".X&... 405..'... -- FESTSTELLEN DE
S WOCHENTAGES --..'..F.1."'... 400:. DAT
UMSEINGABE.C'... KALENDERFORMELN VON ZEL
LER.U'... M.1 . M.2 . M.M.12:J.J.1:. J.0
 . J.99:C.C.1..'..DZ.T..(2.6.(M.1)).J..(
J.4).A'... K.0 . D.DZ.5.C:. JULIANISCHER
 KALENDER..'... K.1 . D.DZ..(C.4).2.C:. 
GREGORIANISCHER KALENDER..(..W.D.7..(D.7
).>(... M.13 . M.14 . M.M.12:J.J.1:. J.1
00 . J.0:C.C.1.I(...:."DER "T"."M$(M)" "
G" IST EIN "T$(W).O(.....(P.. -- ZEITDIF
FERENZ BERECHNEN --..(U.. 1000:. EINGABE
 UND WOCHENTAG..(Z.T1.T:M1.M:G1.G:J1.J:C
1.C:K1.K:S1.S..(... 1000:. 2.DATUM..)..T
2.T:M2.M:G2.G:J2.J:C2.C:K2.K:S2.S.J)... 
K1.0 . K2.0 . 2085:. NUR JULIANISCHE DAT
EN.~)... K1.1 . K2.1 . 2125:. NUR GREGOR
IANISCHE DATEN..)... HIER DATUM 1 JULIAN
ISCH,DATUM 2 GREGORIANISCH.J)..T.T1:M.M1
:G.G1:S.S1..)... 2165:. JULIANISCH..)...
 2195:DZ.D..*..T.T2:M.M2:G.G2:S.S2.%*...
 2180:. GREGORIANISCH.;*..D.D.2:. KORREK
TUR.F*... 2195.Y*..DI.D.DZ:. 2215.U* .. 
NUR JULIANISCHE DATEN..*%.T.T1:M.M1:G.G1
:S.S1..**.. 2165..*/.. 2195:DZ.D..*4.T.T
2:M.M2:G.G2:S.S2.K*9.. 2165.V*>.. 2195..
*C.DI.D.DZ:. 2215..+H.. NUR GREGORIANISC
HE DATEN. +M.T.T1:M.M1:G.G1:S.S1.++R.. 2
180.;+W.. 2195:DZ.D.S+\.T.T2:M.M2:G.G2:S
.S2.^+A.. 2180.I+F.. 2195.|+K.DI.D.DZ:. 
2215..+P.. UP JULIANISCHE TAGZAHL..+U.D.
A(M).G.365..(G.4).T.1..+Z....+.. UP GRE
GORIANISCHE TAGZAHL..,..D.A(M).G.365..(G
.4)..(G.100)..(G.400).T.1..,....,,... UP
 SCHALTJAHRKORREKTUR.D,... S.0 . M.1 . D
.D.1.C,... S.0 . M.2 . T.29 . D.D.1.I,..
...,... AUSGABE DER DIFFERENZ..,...:."DA
ZWISCHEN LIEGEN "DI" TAGE."..,....V,... 
--- BIORHYTHMUS BERECHNEN ----..,...:."B
ITTE GEBEN SIE EIN:".!-B.."1.GEBURTSDATU
M UND 2.AKTUELLES DATUM!".R-G.. 2005:. E
INGABE,PRUEFEN,WOCHENTAG,DIFFERENZ.P-L.Y
K.. K(DI):. KOERPERKURVE..-Q.YS.. S(DI):
. SEELENKURVE..-V.YG.. G(DI):. GEISTKURV
E.T-...:."AM "T2"."M2"."G2" SIND DIE WER
TE:"..-...:."KOERPERKURVE = "YK......"SE
ELENKURVE  = "YS.!...."GEISTKURVE   = "Y
G.9.... A$:. A$."" . 3055.P.... -- MENUE
 2 -----.J....G(147):.:.:.:.:.:.:.......
.5)"NEUES DATUM.............1"......:..5
)"MONATSGRAFIK............2".Z....:..5)"
ZURUECK ZU MENUE 1......3"...... A$:. E(
A$).1 . E(A$).3 . 3085.-/... A$."3" . .:
..10)"BITTE TASTE DRUECKEN":..E/... E(A$
) . 3200,3400.]/... A$:. A$."" . 3100.H/
!.. 3065.N/&..../... --- BIORHYTHMUS NEU
ES DATUM --../...G(147).M/...:."BITTE NE
UES AKTUELLES DATUM ANGEBEN:"../... 2015
:. EINGABE,PRUEFEN,WOCHENTAG,DIFFERENZ.!
0... 3020:. NEUE BIORHYTHMUSWERTE.'0....
L0H.. --- MONATSGRAFIK -------------.]0J
.M.M2:D.DI.T2..0M..G(147)G(18)"BIORHYTHM
US IM "M$(M)G2G(146)..0R.. 3500:. HINTER
GRUND ZEICHNEN.U0W.D.D.Z:. 0.TAG DES AKT
UELLEN MONATS..0\.L.M(M):. S2.0 . M.2 . 
L.L.1..1A.. I.1 . L.>1F.X.. X(I): Y1..Y(
.K(D.I)):Y2..Y(.S(D.I)):Y3..Y(.G(D.I)).W
1K.. C128:PRINTCHR$(5);:SYS 65520,,Y1,X:
PRINTCHR$(119);..1L..G(5);:.211,X:.214,Y
1:.58640:.G(119);.Z1P.. C128:PRINTCHR$(2
8);:SYS65520,,Y2,X:PRINTCHR$(113);..2Q..
G(28);:.211,X:.214,Y2:.58640:.G(113);.>2
U.. C128:PRINTCHR$(31);:SYS65520,,Y3,X:P
RINTCHR$(118);.I2V..G(31);:.211,X:.214,Y
3:.58640:.G(118);.Q2Z.. I.|2..G(30). 2.
.. A$:. E(A$).1 . E(A$).3 . 3460.Z2...G(
147):. E(A$).3 . .G(18)" TASTE DRUECKEN!
 "G(146):...2... E(A$).1 . 3485.#3..Z.L:
M.M.1:. M.13 . .G(18)"BITTE TASTE!"G(146
):..@3... 3405:. NAECHSTER MONAT.O3..M.M
.1:. M.0 . .G(18)"BITTE TASTE!"G(146):..
.3..Z..M(M):. S2.0 . M.2 . Z.Z.1..3... 3
405:. VORMONAT.J3... --- HINTERGRUND ZEI
CHNEN ----..3....5)G(176);:. I.1 . 30:.G
(178);:.I..4...G(174):. L.1 . 9:..5);.%4
... I.1 . 32:.G(125);.>4... I:.G(13)G(14
5):. L.N4E...5)G(171);:. I.1 . 30:.G(123
);:. I:.G(179)..4J.. L.1 . 9:..5);..4O..
 I.1 . 32:.G(125);..4T.. I:.G(13)G(145):
. L.U4Y...5)G(171)G(177)G(177)G(177);..5
... I.1 . 5:.G(123)G(177)G(177)G(177)G(1
77);:. I. 5...G(123)G(177)G(189).S5....5
)G(125)"   ";:. I.0 . 5:..9.5.I)G(125);:
. I.D5...G(13)G(145)..5....4)1.8)5.13)10
.18)15.23)20.28)25.33)30..5...G(19)G(17)
" 100":. I.1 . 9:.:. I.Z5..."   0":. I.1
 . 9:.:. I:."-100"..6...:.:."VORMONAT (1
) NACHMONAT (2) ENDE (3)"G(19)..6......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL