LFS BIORHYTHM
FILE INFORMATION
FILENAME(S): LFS BIORHYTHM
FILE TYPE(S): PRG
FILE SIZE: 5.5K
FIRST SEEN: 2025-11-30 16:59:36
APPEARS ON: 1 disk(s)
FILE HASH
212b337e6596b0e246f78f12d945581e50abeb2b30909fbaa55391ddb5b8e4ee
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TALENTED RULERZ | LFS BIORHYTHM | PRG | High Voltage Complete C64 Collection | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 0A 00 8F 20 20 20 20 2A 20 2A 20 2A |..#.... * * *| 00000010: 20 20 42 49 4F 52 48 59 54 48 4D 20 20 20 2A 20 | BIORHYTHM * | 00000020: 2A 20 2A 00 29 08 14 00 8F 00 46 08 1E 00 8F 20 |* *.).....F.... | 00000030: 20 20 20 20 20 20 20 35 2F 31 37 2F 38 36 20 56 | 5/17/86 V| 00000040: 45 52 53 49 4F 4E 00 6B 08 20 00 8F 20 43 4F 50 |ERSION.k. .. COP| 00000050: 59 52 49 47 48 54 20 31 39 38 36 20 4C 4F 55 49 |YRIGHT 1986 LOUI| 00000060: 53 20 46 2E 20 53 41 4E 44 45 52 00 8E 08 22 00 |S F. SANDER...".| 00000070: 8F 20 20 20 4F 4B 20 54 4F 20 43 4F 50 59 2C 20 |. OK TO COPY, | 00000080: 4E 4F 54 20 4F 4B 20 54 4F 20 53 45 4C 4C 00 94 |NOT OK TO SELL..| 00000090: 08 28 00 8F 00 B1 08 32 00 8F 20 20 20 20 20 20 |.(.....2.. | 000000A0: 20 20 4C 4F 55 49 53 20 46 2E 20 53 41 4E 44 45 | LOUIS F. SANDE| 000000B0: 52 00 CE 08 3C 00 8F 20 20 20 20 20 20 20 20 31 |R...<.. 1| 000000C0: 35 33 20 4D 41 59 45 52 20 44 52 49 56 45 00 EE |53 MAYER DRIVE..| 000000D0: 08 46 00 8F 20 20 20 20 20 50 49 54 54 53 42 55 |.F.. PITTSBU| 000000E0: 52 47 48 2C 20 50 41 20 20 31 35 32 33 37 00 0A |RGH, PA 15237..| 000000F0: 09 50 00 8F 20 20 20 20 20 20 20 20 20 28 34 31 |.P.. (41| 00000100: 32 29 33 36 37 2D 31 33 37 36 00 10 09 5A 00 8F |2)367-1376...Z..| 00000110: 00 34 09 64 00 8F 20 2A 2A 20 4E 45 58 54 20 32 |.4.d.. ** NEXT 2| 00000120: 20 4C 49 4E 45 53 20 53 45 54 55 50 20 50 52 49 | LINES SETUP PRI| 00000130: 4E 54 45 52 00 3A 09 6E 00 3A 00 58 09 78 00 50 |NTER.:.n.:.X.x.P| 00000140: 44 B2 34 20 3A 20 8F 20 50 52 49 4E 54 45 52 20 |D.4 : . PRINTER | 00000150: 44 45 56 49 43 45 20 23 00 A5 09 82 00 50 54 B2 |DEVICE #.....PT.| 00000160: 32 20 3A 20 8F 20 50 52 49 4E 54 45 52 20 54 59 |2 : . PRINTER TY| 00000170: 50 45 2E 20 54 59 50 45 53 20 41 52 45 3A 20 20 |PE. TYPES ARE: | 00000180: 20 20 20 20 20 20 20 20 20 31 3D 31 35 32 35 2F | 1=1525/| 00000190: 4D 50 53 38 30 31 2C 20 32 3D 31 35 32 36 2F 4D |MPS801, 2=1526/M| 000001A0: 50 53 38 30 32 00 AB 09 8C 00 3A 00 C7 09 96 00 |PS802.....:.....| 000001B0: 46 B2 2E 30 30 31 3A 48 B2 31 30 30 2E 30 31 3A |F..001:H.100.01:| 000001C0: 50 49 B2 AB 32 AC FF 00 E7 09 A0 00 44 24 B2 22 |PI..2.......D$."| 000001D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000001E0: 11 11 11 11 11 11 22 00 19 0A AA 00 52 24 B2 22 |......".....R$."| 000001F0: 9D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000200: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000210: 1D 1D 1D 1D 1D 1D 1D 1D 22 00 2C 0A B4 00 86 4D |........".,....M| 00000220: 25 28 31 32 29 2C 4D 24 28 31 32 29 00 41 0A BE |%(12),M$(12).A..| 00000230: 00 81 49 B2 31 A4 31 32 3A 87 4D 25 28 49 29 3A |..I.1.12:.M%(I):| 00000240: 82 00 56 0A C8 00 81 49 B2 31 A4 31 32 3A 87 4D |..V....I.1.12:.M| 00000250: 24 28 49 29 3A 82 00 61 0A D2 00 8D 20 35 30 30 |$(I):..a.... 500| 00000260: 30 00 77 0A DC 00 97 35 33 32 38 30 2C 32 3A 97 |0.w....53280,2:.| 00000270: 35 33 32 38 31 2C 31 00 A4 0A E6 00 99 22 93 11 |53281,1......"..| 00000280: 11 22 C7 28 31 34 32 29 A3 39 29 22 11 1E 42 49 |.".(142).9)"..BI| 00000290: 4F 52 48 59 54 48 4D 20 43 48 41 52 54 20 4D 41 |ORHYTHM CHART MA| 000002A0: 4B 45 52 22 00 C6 0A F0 00 99 A3 39 29 22 9E C5 |KER".......9)"..| 000002B0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 000002C0: C5 C5 C5 C5 98 22 00 F7 0A FA 00 99 22 11 11 20 |....."......".. | 000002D0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 | THIS PROGRAM WI| 000002E0: 4C 4C 20 43 52 45 41 54 45 20 41 20 42 49 4F 52 |LL CREATE A BIOR| 000002F0: 48 59 54 48 4D 20 22 00 1D 0B 04 01 99 22 20 20 |HYTHM "......" | 00000300: 43 48 41 52 54 20 46 4F 52 20 41 4E 59 20 33 38 |CHART FOR ANY 38| 00000310: 2D 44 41 59 20 50 45 52 49 4F 44 2E 22 00 4B 0B |-DAY PERIOD.".K.| 00000320: 0E 01 99 22 11 20 20 45 4E 54 45 52 20 54 48 45 |...". ENTER THE| 00000330: 20 53 55 42 4A 45 43 54 27 53 20 4E 41 4D 45 20 | SUBJECT'S NAME | 00000340: 42 45 4C 4F 57 2C 20 54 48 45 4E 00 70 0B 18 01 |BELOW, THEN.p...| 00000350: 99 22 20 20 50 52 45 53 53 20 27 52 45 54 55 52 |." PRESS 'RETUR| 00000360: 4E 27 20 54 4F 20 45 4E 54 45 52 20 49 54 2E 22 |N' TO ENTER IT."| 00000370: 00 9D 0B 22 01 99 22 11 20 20 44 4F 20 54 48 45 |..."..". DO THE| 00000380: 20 53 41 4D 45 20 46 4F 52 20 44 41 54 45 53 2E | SAME FOR DATES.| 00000390: 20 20 42 45 20 53 55 52 45 20 54 4F 22 00 CC 0B | BE SURE TO"...| 000003A0: 2C 01 99 22 20 20 53 45 50 41 52 41 54 45 20 4D |,.." SEPARATE M| 000003B0: 4F 4E 54 48 2C 20 44 41 59 20 26 20 59 45 41 52 |ONTH, DAY & YEAR| 000003C0: 20 42 59 20 43 4F 4D 4D 41 53 2E 22 00 DE 0B 36 | BY COMMAS."...6| 000003D0: 01 99 A3 33 32 29 22 C5 C5 C5 C5 C5 C5 22 00 14 |...32)"......"..| 000003E0: 0C 40 01 4E 24 B2 22 4E 4F 20 4E 41 4D 45 22 3A |.@.N$."NO NAME":| 000003F0: 85 22 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.".. | 00000400: 20 53 55 42 4A 45 43 54 27 53 20 4E 41 4D 45 1E | SUBJECT'S NAME.| 00000410: 22 3B 4E 24 00 2C 0C 4A 01 8B C3 28 4E 24 29 B1 |";N$.,.J...(N$).| 00000420: 39 A7 4E 24 B2 C8 28 4E 24 2C 38 29 00 6B 0C 54 |9.N$..(N$,8).k.T| 00000430: 01 4D 42 B2 39 39 3A 85 22 11 98 20 20 20 44 41 |.MB.99:.".. DA| 00000440: 54 45 20 4F 46 20 42 49 52 54 48 20 28 4D 4D 2C |TE OF BIRTH (MM,| 00000450: 44 44 2C 59 59 29 22 3B 4D 42 2C 44 42 2C 59 42 |DD,YY)";MB,DB,YB| 00000460: 3A 8B 4D 42 B1 31 32 A7 33 34 30 00 74 0C 5E 01 |:.MB.12.340.t.^.| 00000470: 54 42 B2 30 00 80 0C 68 01 54 31 B2 59 42 AD 34 |TB.0...h.T1.YB.4| 00000480: 00 8E 0C 72 01 8B 4D 42 B3 32 A7 34 32 30 00 9C |...r..MB.2.420..| 00000490: 0C 7C 01 81 49 B2 31 A4 4D 42 AB 31 00 AC 0C 86 |.|..I.1.MB.1....| 000004A0: 01 54 42 B2 54 42 AA 4D 25 28 49 29 00 B2 0C 90 |.TB.TB.M%(I)....| 000004B0: 01 82 00 D2 0C 9A 01 8B 28 54 31 B3 B1 B5 28 54 |........(T1...(T| 000004C0: 31 29 29 AF 28 4D 42 B1 32 29 A7 54 42 B2 54 42 |1)).(MB.2).TB.TB| 000004D0: AA 31 00 EC 0C A4 01 54 42 B2 54 42 AA 33 36 35 |.1.....TB.TB.365| 000004E0: AC 59 42 AA B5 28 54 31 29 AA 44 42 00 2B 0D AE |.YB..(T1).DB.+..| 000004F0: 01 4D 53 B2 39 39 3A 99 3A 85 22 43 48 41 52 54 |.MS.99:.:."CHART| 00000500: 20 53 54 41 52 54 20 44 41 54 45 20 28 4D 4D 2C | START DATE (MM,| 00000510: 44 44 2C 59 59 29 22 3B 4D 53 2C 44 43 2C 59 53 |DD,YY)";MS,DC,YS| 00000520: 3A 8B 4D 53 B1 31 32 A7 34 33 30 00 34 0D B8 01 |:.MS.12.430.4...| 00000530: 54 53 B2 30 00 40 0D C2 01 54 31 B2 59 53 AD 34 |TS.0.@...T1.YS.4| 00000540: 00 4E 0D CC 01 8B 4D 53 B3 32 A7 35 31 30 00 5C |.N....MS.2.510.\| 00000550: 0D D6 01 81 49 B2 31 A4 4D 53 AB 31 00 6C 0D E0 |....I.1.MS.1.l..| 00000560: 01 54 53 B2 54 53 AA 4D 25 28 49 29 00 72 0D EA |.TS.TS.M%(I).r..| 00000570: 01 82 00 92 0D F4 01 8B 28 54 31 B3 B1 B5 28 54 |........(T1...(T| 00000580: 31 29 29 AF 28 4D 53 B1 32 29 A7 54 53 B2 54 53 |1)).(MS.2).TS.TS| 00000590: AA 31 00 AC 0D FE 01 54 53 B2 54 53 AA 33 36 35 |.1.....TS.TS.365| 000005A0: AC 59 53 AA B5 28 54 31 29 AA 44 43 00 B9 0D 08 |.YS..(T1).DC....| 000005B0: 02 54 54 B2 54 53 AB 54 42 00 D4 0D 12 02 50 53 |.TT.TS.TB.....PS| 000005C0: B2 32 33 AC 28 54 54 AD 32 33 AB B5 28 54 54 AD |.23.(TT.23..(TT.| 000005D0: 32 33 29 29 00 EF 0D 1C 02 45 53 B2 32 38 AC 28 |23)).....ES.28.(| 000005E0: 54 54 AD 32 38 AB B5 28 54 54 AD 32 38 29 29 00 |TT.28..(TT.28)).| 000005F0: 0A 0E 26 02 49 53 B2 33 33 AC 28 54 54 AD 33 33 |..&.IS.33.(TT.33| 00000600: AB B5 28 54 54 AD 33 33 29 29 00 17 0E 30 02 97 |..(TT.33))...0..| 00000610: 35 33 32 38 30 2C 31 00 3B 0E 3A 02 99 22 93 42 |53280,1.;.:..".B| 00000620: 49 4F 52 48 59 54 48 4D 20 46 4F 52 20 1E 22 4E |IORHYTHM FOR ."N| 00000630: 24 22 98 20 42 4F 52 4E 20 22 3B 00 62 0E 44 02 |$". BORN ";.b.D.| 00000640: 99 4D 24 28 4D 42 29 3B 44 42 3B 22 9D 2C 31 39 |.M$(MB);DB;".,19| 00000650: 22 3B CA 28 C4 28 59 42 AD 48 AA 46 29 2C 33 2C |";.(.(YB.H.F),3,| 00000660: 32 29 00 7F 0E 46 02 43 24 B2 22 55 50 20 20 20 |2)...F.C$."UP | 00000670: 20 20 20 43 52 49 54 20 20 20 20 44 57 4E 22 00 | CRIT DWN".| 00000680: 8E 0E 47 02 81 49 B2 31 A4 C3 28 43 24 29 00 AC |..G..I.1..(C$)..| 00000690: 0E 48 02 99 A3 33 38 29 CA 28 43 24 2C 49 2C 31 |.H...38).(C$,I,1| 000006A0: 29 22 9D 9D 9D 22 C7 28 31 34 38 29 00 B2 0E 49 |)"...".(148)...I| 000006B0: 02 82 00 E3 0E 4E 02 99 22 13 11 B0 B2 B2 B2 B2 |.....N..".......| 000006C0: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 000006D0: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................| 000006E0: B2 AE 22 00 EE 0E 58 02 81 49 B2 31 A4 38 00 1D |.."...X..I.1.8..| 000006F0: 0F 62 02 99 22 AB 20 DD 20 DD 20 DD 20 DD 20 DD |.b..". . . . . .| 00000700: 20 DD 20 DD 20 DD 20 DD 20 DD 20 DD 20 DD 20 DD | . . . . . . . .| 00000710: 20 DD 20 DD 20 DD 20 DD 20 DD 20 B3 22 00 23 0F | . . . . . .".#.| 00000720: 6C 02 82 00 52 0F 76 02 99 22 AB C0 DB C0 DB C0 |l...R.v.."......| 00000730: DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 |................| 00000740: DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 |................| 00000750: B3 22 00 5D 0F 80 02 81 49 B2 31 A4 38 00 8C 0F |.".]....I.1.8...| 00000760: 8A 02 99 22 AB 20 DD 20 DD 20 DD 20 DD 20 DD 20 |...". . . . . . | 00000770: DD 20 DD 20 DD 20 DD 20 DD 20 DD 20 DD 20 DD 20 |. . . . . . . . | 00000780: DD 20 DD 20 DD 20 DD 20 DD 20 B3 22 00 92 0F 94 |. . . . . ."....| 00000790: 02 82 00 C1 0F 9E 02 99 22 AD B1 B1 B1 B1 B1 B1 |........".......| 000007A0: B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 |................| 000007B0: B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 BD |................| 000007C0: 22 00 D7 0F A8 02 4D 44 B2 4D 53 3A 44 31 B2 44 |".....MD.MS:D1.D| 000007D0: 43 3A 59 44 B2 59 53 00 E3 0F B2 02 81 49 B2 30 |C:YD.YS......I.0| 000007E0: A4 33 38 00 FF 0F BC 02 8B 49 AD 32 B3 B1 B5 28 |.38......I.2...(| 000007F0: 49 AD 32 29 A7 99 22 1D 22 3B 3A 89 37 37 30 00 |I.2)..".";:.770.| 00000800: 0C 10 C6 02 41 24 B2 C4 28 44 31 29 00 29 10 D0 |....A$..(D1).)..| 00000810: 02 8B C3 28 41 24 29 B3 33 A7 42 24 B2 C9 28 41 |...(A$).3.B$..(A| 00000820: 24 2C 31 29 3A 89 37 34 30 00 4B 10 DA 02 42 24 |$,1):.740.K...B$| 00000830: B2 CA 28 41 24 2C 32 2C 31 29 AA 22 11 9D 22 AA |..(A$,2,1)."..".| 00000840: C9 28 41 24 2C 31 29 AA 22 91 22 00 54 10 E4 02 |.(A$,1).".".T...| 00000850: 99 42 24 3B 00 74 10 EE 02 43 24 B2 22 92 9D 9D |.B$;.t...C$."...| 00000860: 9D 9D 9D 9D 9D 91 22 3A 8B B9 28 30 29 B1 33 34 |......":..(0).34| 00000870: A7 37 37 30 00 AD 10 F8 02 8B 28 44 31 B2 31 29 |.770......(D1.1)| 00000880: B0 28 44 31 B2 32 29 A7 99 22 9D 11 12 22 4D 24 |.(D1.2).."..."M$| 00000890: 28 4D 44 29 22 20 31 39 22 CA 28 C4 28 59 44 AD |(MD)" 19".(.(YD.| 000008A0: 48 AA 46 29 2C 33 2C 32 29 3B 43 24 3B 00 B9 10 |H.F),3,2);C$;...| 000008B0: 02 03 44 31 B2 44 31 AA 31 00 CD 10 0C 03 8B 44 |..D1.D1.1......D| 000008C0: 31 B3 B2 4D 25 28 4D 44 29 A7 38 33 30 00 DC 10 |1..M%(MD).830...| 000008D0: 16 03 8B 4D 44 B3 B1 32 A7 38 32 30 00 F3 10 20 |...MD..2.820... | 000008E0: 03 8B 59 44 AD 34 B3 B1 B5 28 59 44 AD 34 29 A7 |..YD.4...(YD.4).| 000008F0: 38 32 30 00 02 11 2A 03 8B 44 31 B3 33 30 A7 38 |820...*..D1.30.8| 00000900: 33 30 00 27 11 34 03 44 31 B2 31 3A 4D 44 B2 4D |30.'.4.D1.1:MD.M| 00000910: 44 AA 31 3A 8B 4D 44 B1 31 32 A7 4D 44 B2 31 3A |D.1:.MD.12.MD.1:| 00000920: 59 44 B2 59 44 AA 31 00 2D 11 3E 03 82 00 69 11 |YD.YD.1.-.>...i.| 00000930: 48 03 99 22 11 11 22 3A 99 22 50 48 59 53 49 43 |H.."..":."PHYSIC| 00000940: 41 4C 3D 9E D7 98 20 20 45 4D 4F 54 49 4F 4E 41 |AL=... EMOTIONA| 00000950: 4C 3D 9A D1 98 20 20 49 4E 54 45 4C 4C 45 43 54 |L=... INTELLECT| 00000960: 55 41 4C 3D 96 2A 98 22 3B 00 75 11 84 03 81 49 |UAL=.*.";.u....I| 00000970: B2 30 A4 33 38 00 92 11 8E 03 50 B2 38 AA 38 AC |.0.38.....P.8.8.| 00000980: BF 28 28 50 53 AA 49 29 AC 50 49 AD 32 33 29 AA |.((PS.I).PI.23).| 00000990: 2E 35 00 B3 11 98 03 99 22 13 22 C8 28 52 24 2C |.5......".".(R$,| 000009A0: 49 AA 31 29 3B C8 28 44 24 2C 50 AA 32 29 3B 22 |I.1);.(D$,P.2);"| 000009B0: 9E D7 22 00 B9 11 A2 03 82 00 C5 11 AC 03 81 49 |.."............I| 000009C0: B2 31 A4 33 38 00 E2 11 B6 03 45 B2 38 AA 38 AC |.1.38.....E.8.8.| 000009D0: BF 28 28 45 53 AA 49 29 AC 50 49 AD 32 38 29 AA |.((ES.I).PI.28).| 000009E0: 2E 35 00 03 12 C0 03 99 22 13 22 C8 28 52 24 2C |.5......".".(R$,| 000009F0: 49 AA 31 29 3B C8 28 44 24 2C 45 AA 32 29 3B 22 |I.1);.(D$,E.2);"| 00000A00: 9A D1 22 00 09 12 CA 03 82 00 15 12 D4 03 81 49 |.."............I| 00000A10: B2 31 A4 33 38 00 33 12 DE 03 49 54 B2 38 AA 38 |.1.38.3...IT.8.8| 00000A20: AC BF 28 28 49 53 AA 49 29 AC 50 49 AD 33 33 29 |..((IS.I).PI.33)| 00000A30: AA 2E 35 00 56 12 E8 03 99 22 13 22 C8 28 52 24 |..5.V....".".(R$| 00000A40: 2C 49 AA 31 29 3B C8 28 44 24 2C 49 54 AA 32 29 |,I.1);.(D$,IT.2)| 00000A50: 3B 22 96 2A 98 22 00 5C 12 F2 03 82 00 A6 12 FC |;".*.".\........| 00000A60: 03 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............| 00000A70: 11 11 11 11 11 11 11 11 11 11 11 11 28 43 2D 4E |............(C-N| 00000A80: 45 57 20 43 48 41 52 54 20 53 2D 4E 45 57 20 53 |EW CHART S-NEW S| 00000A90: 55 42 4A 20 50 2D 50 52 49 4E 54 20 51 2D 51 55 |UBJ P-PRINT Q-QU| 00000AA0: 49 54 29 91 22 3B 00 BA 12 06 04 A1 41 24 3A 8B |IT).";......A$:.| 00000AB0: 41 24 B2 22 22 A7 31 30 33 30 00 C8 12 10 04 8B |A$."".1030......| 00000AC0: 41 24 B2 22 53 22 A7 8A 00 D9 12 1A 04 8B 41 24 |A$."S"........A$| 00000AD0: B2 22 43 22 A7 31 30 39 30 00 16 13 24 04 8B 41 |."C".1090...$..A| 00000AE0: 24 B2 22 51 22 A7 97 35 33 32 38 30 2C 31 34 3A |$."Q"..53280,14:| 00000AF0: 97 35 33 32 38 31 2C 36 3A 99 22 93 11 11 11 11 |.53281,6:.".....| 00000B00: 22 A3 31 36 29 22 9E 47 4F 4F 44 42 59 45 21 11 |".16)".GOODBYE!.| 00000B10: 11 11 9A 22 3A 80 00 27 13 2E 04 8B 41 24 B2 22 |...":..'....A$."| 00000B20: 50 22 A7 31 31 35 30 00 31 13 38 04 89 31 30 33 |P".1150.1.8..103| 00000B30: 30 00 64 13 42 04 99 3A 99 22 20 20 20 20 20 20 |0.d.B..:." | 00000B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B60: 20 91 22 3B 00 6D 13 4C 04 89 34 33 30 00 96 13 | .";.m.L..430...| 00000B70: 56 04 83 33 31 2C 32 38 2C 33 31 2C 33 30 2C 33 |V..31,28,31,30,3| 00000B80: 31 2C 33 30 2C 33 31 2C 33 31 2C 33 30 2C 33 31 |1,30,31,31,30,31| 00000B90: 2C 33 30 2C 33 31 00 CC 13 60 04 83 20 4A 41 4E |,30,31...`.. JAN| 00000BA0: 2C 46 45 42 2C 4D 41 52 2C 41 50 52 2C 4D 41 59 |,FEB,MAR,APR,MAY| 00000BB0: 2C 4A 55 4E 2C 4A 55 4C 2C 41 55 47 2C 53 45 50 |,JUN,JUL,AUG,SEP| 00000BC0: 2C 4F 43 54 2C 4E 4F 56 2C 44 45 43 00 D2 13 6A |,OCT,NOV,DEC...j| 00000BD0: 04 3A 00 EF 13 74 04 8F 20 2A 2A 20 50 52 49 4E |.:...t.. ** PRIN| 00000BE0: 54 20 54 48 45 20 53 43 52 45 45 4E 20 2A 2A 00 |T THE SCREEN **.| 00000BF0: 39 14 7E 04 99 22 13 11 11 11 11 11 11 11 11 11 |9.~.."..........| 00000C00: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 20 |............... | 00000C10: 20 20 20 20 2A 2A 2A 20 20 50 52 49 4E 54 49 4E | *** PRINTIN| 00000C20: 47 20 54 48 45 20 43 48 41 52 54 20 20 2A 2A 2A |G THE CHART ***| 00000C30: 20 20 20 20 20 20 91 22 3B 00 58 14 88 04 8B 50 | .";.X....P| 00000C40: 54 B2 32 A7 31 32 38 30 20 3A 20 8F 20 31 35 32 |T.2.1280 : . 152| 00000C50: 36 2F 4D 50 53 38 30 32 00 7C 14 92 04 9F 33 2C |6/MPS802.|....3,| 00000C60: 33 3A 9F 34 2C 44 4E 2C 37 3A 81 53 4C B2 30 A4 |3:.4,DN,7:.SL.0.| 00000C70: 32 33 3A 98 34 2C C7 28 31 35 29 3B 00 9C 14 9C |23:.4,.(15);....| 00000C80: 04 81 53 43 B2 30 A4 33 39 3A 43 B2 C2 28 31 30 |..SC.0.39:C..(10| 00000C90: 32 34 AA 34 30 AC 53 4C AA 53 43 29 00 AB 14 A6 |24.40.SL.SC)....| 00000CA0: 04 8B 43 B2 33 34 A7 43 B2 33 39 00 BC 14 B0 04 |..C.34.C.39.....| 00000CB0: 8B 43 B2 31 36 32 A7 43 B2 31 36 37 00 DD 14 BA |.C.162.C.167....| 00000CC0: 04 8B 52 56 B2 31 A7 8B 43 B3 31 32 38 A7 98 34 |..RV.1..C.128..4| 00000CD0: 2C C7 28 31 34 36 29 3B 3A 52 56 B2 30 00 FD 14 |,.(146);:RV.0...| 00000CE0: C4 04 8B 43 B1 31 32 37 A7 8B 52 56 B2 30 A7 98 |...C.127..RV.0..| 00000CF0: 34 2C C7 28 31 38 29 3B 3A 52 56 B2 31 00 3C 15 |4,.(18);:RV.1.<.| 00000D00: CE 04 43 B2 43 AA 31 32 38 AC 28 43 B1 31 32 37 |..C.C.128.(C.127| 00000D10: 29 3A 43 B2 43 AB 36 34 AC 28 43 B3 33 32 B0 43 |):C.C.64.(C.32.C| 00000D20: B1 39 35 29 AB 33 32 AC 28 43 B1 36 33 AF 43 B3 |.95).32.(C.63.C.| 00000D30: 39 36 29 3A 98 34 2C C7 28 43 29 3B 00 5D 15 D8 |96):.4,.(C);.]..| 00000D40: 04 82 3A 98 34 2C C7 28 38 29 3A 52 56 B2 30 3A |..:.4,.(8):RV.0:| 00000D50: 82 3A 98 34 2C C7 28 31 35 29 3A A0 34 00 67 15 |.:.4,.(15):.4.g.| 00000D60: E2 04 89 31 30 32 30 00 6D 15 EC 04 3A 00 90 15 |...1020.m...:...| 00000D70: F6 04 8F 20 50 52 49 4E 54 45 52 20 54 59 50 45 |... PRINTER TYPE| 00000D80: 20 32 20 2D 20 31 35 32 36 2F 4D 50 53 38 30 32 | 2 - 1526/MPS802| 00000D90: 00 A8 15 00 05 9F 36 2C 50 44 2C 36 3A 98 36 2C |......6,PD,6:.6,| 00000DA0: C7 28 32 31 29 3A A0 36 00 C5 15 0A 05 81 49 B2 |.(21):.6......I.| 00000DB0: 32 31 37 A4 32 34 32 3A 97 49 2C C2 28 49 29 B0 |217.242:.I,.(I).| 00000DC0: 31 32 38 3A 82 00 DC 15 14 05 9F 33 2C 33 3A 9F |128:.......3,3:.| 00000DD0: 34 2C 50 44 2C 37 3A 99 22 13 22 3B 00 17 16 1E |4,PD,7:.".";....| 00000DE0: 05 81 49 B2 30 A4 32 33 3A 81 4A B2 30 A4 33 39 |..I.0.23:.J.0.39| 00000DF0: 3A A1 23 33 2C 41 24 3A 8B C2 28 31 30 32 34 AA |:.#3,A$:..(1024.| 00000E00: 34 30 AC 49 AA 4A 29 B1 31 32 37 A7 98 34 2C 22 |40.I.J).127..4,"| 00000E10: 12 22 3B 3A 52 B2 31 00 33 16 28 05 98 34 2C 41 |.";:R.1.3.(..4,A| 00000E20: 24 3B 3A 8B 52 B2 31 A7 52 B2 30 3A 98 34 2C 22 |$;:.R.1.R.0:.4,"| 00000E30: 92 22 3B 00 48 16 32 05 82 4A 3A 98 34 2C C7 28 |.";.H.2..J:.4,.(| 00000E40: 31 34 31 29 3B 3A 82 49 00 58 16 3C 05 81 49 B2 |141);:.I.X.<..I.| 00000E50: 31 A4 39 3A 98 34 3A 82 00 62 16 46 05 A0 33 3A |1.9:.4:..b.F..3:| 00000E60: A0 34 00 77 16 50 05 9F 31 30 2C 34 2C 31 30 3A |.4.w.P..10,4,10:| 00000E70: 98 31 30 3A A0 31 30 00 81 16 5A 05 89 31 30 32 |.10:.10...Z..102| 00000E80: 30 00 9A 16 87 13 8F 20 2A 2A 20 49 4E 53 54 52 |0...... ** INSTR| 00000E90: 55 43 54 49 4F 4E 53 20 2A 2A 00 B7 16 88 13 99 |UCTIONS **......| 00000EA0: C7 28 31 34 29 3A 97 35 33 32 38 30 2C 31 3A 97 |.(14):.53280,1:.| 00000EB0: 35 33 32 38 31 2C 31 00 E3 16 8A 13 99 22 1F 93 |53281,1......"..| 00000EC0: 11 11 20 20 20 20 20 20 C3 2D 36 34 20 C2 49 4F |.. .-64 .IO| 00000ED0: 52 48 59 54 48 4D 20 C3 48 41 52 54 20 CD 41 4B |RHYTHM .HART .AK| 00000EE0: 45 52 22 00 00 17 8B 13 99 22 11 20 20 20 20 20 |ER"......". | 00000EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 42 59 22 | BY"| 00000F00: 00 24 17 8C 13 99 22 11 20 20 20 20 20 20 20 20 |.$....". | 00000F10: 20 20 20 20 CC 4F 55 49 53 20 C6 2E 20 D3 41 4E | .OUIS .. .AN| 00000F20: 44 45 52 22 00 54 17 8D 13 99 22 11 11 11 98 D4 |DER".T....".....| 00000F30: 48 49 53 20 43 52 45 41 54 45 53 20 C2 49 4F 52 |HIS CREATES .IOR| 00000F40: 48 59 54 48 4D 20 43 48 41 52 54 53 20 4F 4E 20 |HYTHM CHARTS ON | 00000F50: 54 48 45 22 00 81 17 8E 13 99 22 53 43 52 45 45 |THE"......"SCREE| 00000F60: 4E 2E 20 C9 54 20 50 52 49 4E 54 53 20 54 48 45 |N. .T PRINTS THE| 00000F70: 4D 20 4F 4E 20 54 48 45 20 50 52 49 4E 54 45 52 |M ON THE PRINTER| 00000F80: 22 00 97 17 8F 13 99 22 49 46 20 59 4F 55 27 44 |"......"IF YOU'D| 00000F90: 20 4C 49 4B 45 2E 22 00 C5 17 90 13 99 22 11 D3 | LIKE."......"..| 00000FA0: 45 45 20 4C 49 4E 45 53 20 31 30 30 2D 31 34 30 |EE LINES 100-140| 00000FB0: 20 46 4F 52 20 50 52 49 4E 54 45 52 20 53 45 54 | FOR PRINTER SET| 00000FC0: 55 50 53 2E 22 00 0A 18 91 13 99 22 11 C4 4F 20 |UPS."......"..O | 00000FD0: 59 4F 55 20 57 41 4E 54 20 54 4F 20 4B 4E 4F 57 |YOU WANT TO KNOW| 00000FE0: 20 41 42 4F 55 54 20 54 48 45 20 54 48 45 4F 52 | ABOUT THE THEOR| 00000FF0: 59 20 4F 46 20 C2 49 4F 52 48 59 54 48 4D 53 20 |Y OF .IORHYTHMS | 00001000: 28 D9 20 4F 52 20 CE 29 3F 22 00 1C 18 92 13 A1 |(. OR .)?"......| 00001010: 41 24 3A 8B 41 24 B2 22 4E 22 A7 8E 00 2E 18 9C |A$:.A$."N"......| 00001020: 13 8B 41 24 B3 B1 22 59 22 A7 35 30 31 30 00 4E |..A$.."Y".5010.N| 00001030: 18 60 EA 8F 20 2A 2A 20 42 49 4F 52 48 54 59 48 |.`.. ** BIORHTYH| 00001040: 4D 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 78 |M INSTRUCTIONS.x| 00001050: 18 74 EA 99 22 93 20 20 20 20 20 20 20 20 9A C2 |.t..". ..| 00001060: 41 43 4B 47 52 4F 55 4E 44 20 4F 4E 20 C2 49 4F |ACKGROUND ON .IO| 00001070: 52 48 59 54 48 4D 53 22 00 A6 18 7E EA 99 22 11 |RHYTHMS"...~..".| 00001080: 98 20 C2 49 4F 52 48 59 54 48 4D 20 54 48 45 4F |. .IORHYTHM THEO| 00001090: 52 59 20 53 54 41 54 45 53 20 54 48 41 54 20 4F |RY STATES THAT O| 000010A0: 4E 20 54 48 45 22 00 D4 18 88 EA 99 22 44 41 59 |N THE"......"DAY| 000010B0: 20 4F 46 20 4F 55 52 20 42 49 52 54 48 2C 20 54 | OF OUR BIRTH, T| 000010C0: 48 52 45 45 20 49 4D 4D 55 54 41 42 4C 45 20 4C |HREE IMMUTABLE L| 000010D0: 49 46 45 22 00 EA 18 92 EA 99 22 43 59 43 4C 45 |IFE"......"CYCLE| 000010E0: 53 20 42 45 47 49 4E 3A 11 22 00 10 19 9C EA 99 |S BEGIN:."......| 000010F0: 22 20 20 20 20 20 20 20 20 41 20 32 33 2D 44 41 |" A 23-DA| 00001100: 59 20 50 48 59 53 49 43 41 4C 20 43 59 43 4C 45 |Y PHYSICAL CYCLE| 00001110: 00 37 19 A6 EA 99 22 20 20 20 20 20 20 20 20 41 |.7...." A| 00001120: 20 32 38 2D 44 41 59 20 45 4D 4F 54 49 4F 4E 41 | 28-DAY EMOTIONA| 00001130: 4C 20 43 59 43 4C 45 00 61 19 B0 EA 99 22 20 20 |L CYCLE.a...." | 00001140: 20 20 20 20 20 20 41 20 33 33 2D 44 41 59 20 49 | A 33-DAY I| 00001150: 4E 54 45 4C 4C 45 43 54 55 41 4C 20 43 59 43 4C |NTELLECTUAL CYCL| 00001160: 45 00 91 19 BA EA 8F 50 52 49 4E 54 22 11 20 D4 |E......PRINT". .| 00001170: 48 45 53 45 20 43 59 43 4C 45 53 20 43 48 41 4E |HESE CYCLES CHAN| 00001180: 47 45 20 53 49 4E 55 53 4F 49 44 41 4C 4C 59 2C |GE SINUSOIDALLY,| 00001190: 22 00 C5 19 C4 EA 8F 20 50 52 49 4E 54 22 4D 4F |"...... PRINT"MO| 000011A0: 56 49 4E 47 20 55 50 20 41 4E 44 20 44 4F 57 4E |VING UP AND DOWN| 000011B0: 20 57 49 54 48 20 54 48 45 20 50 41 53 53 41 47 | WITH THE PASSAG| 000011C0: 45 20 4F 46 22 00 D7 19 CE EA 8F 20 50 52 49 4E |E OF"...... PRIN| 000011D0: 54 22 54 49 4D 45 2E 00 03 1A D8 EA 99 22 11 20 |T"TIME.......". | 000011E0: D7 48 45 4E 20 41 20 43 59 43 4C 45 20 49 53 20 |.HEN A CYCLE IS | 000011F0: 41 54 20 49 54 53 20 48 49 47 48 20 50 4F 49 4E |AT ITS HIGH POIN| 00001200: 54 2C 22 00 2E 1A E2 EA 99 22 54 48 45 20 50 45 |T,"......"THE PE| 00001210: 52 53 4F 4E 20 49 53 20 41 54 20 48 49 53 20 4F |RSON IS AT HIS O| 00001220: 52 20 48 45 52 20 50 45 41 4B 20 49 4E 22 00 53 |R HER PEAK IN".S| 00001230: 1A EC EA 99 22 54 48 41 54 20 50 41 52 54 49 43 |...."THAT PARTIC| 00001240: 55 4C 41 52 20 52 45 41 4C 4D 20 4F 46 20 4C 49 |ULAR REALM OF LI| 00001250: 46 45 2E 00 82 1A F6 EA 99 22 11 20 D7 48 45 4E |FE.......". .HEN| 00001260: 20 41 20 43 59 43 4C 45 20 49 53 20 41 54 20 49 | A CYCLE IS AT I| 00001270: 54 53 20 4C 4F 57 20 50 4F 49 4E 54 2C 20 54 48 |TS LOW POINT, TH| 00001280: 45 22 00 A2 1A 00 EB 99 22 50 45 52 53 4F 4E 20 |E"......"PERSON | 00001290: 49 53 20 41 4C 53 4F 20 41 54 20 41 20 4C 4F 57 |IS ALSO AT A LOW| 000012A0: 2E 22 00 D2 1A 0A EB 99 22 11 20 C1 20 27 43 52 |."......". . 'CR| 000012B0: 49 54 49 43 41 4C 20 44 41 59 27 20 4F 43 43 55 |ITICAL DAY' OCCU| 000012C0: 52 53 20 57 48 45 4E 20 54 48 45 20 43 59 43 4C |RS WHEN THE CYCL| 000012D0: 45 22 00 FE 1A 14 EB 99 22 43 52 4F 53 53 45 53 |E"......"CROSSES| 000012E0: 20 54 48 45 20 5A 45 52 4F 20 41 58 49 53 2E 20 | THE ZERO AXIS. | 000012F0: C3 52 49 54 49 43 41 4C 20 44 41 59 53 22 00 2A |.RITICAL DAYS".*| 00001300: 1B 1E EB 99 22 41 52 45 20 43 4F 4E 53 49 44 45 |...."ARE CONSIDE| 00001310: 52 45 44 20 54 4F 20 42 45 20 55 4E 53 54 41 42 |RED TO BE UNSTAB| 00001320: 4C 45 20 54 49 4D 45 53 2C 22 00 58 1B 28 EB 99 |LE TIMES,".X.(..| 00001330: 22 57 48 45 4E 20 55 50 53 45 54 53 20 4F 52 20 |"WHEN UPSETS OR | 00001340: 44 49 53 41 53 54 45 52 53 20 41 52 45 20 4C 49 |DISASTERS ARE LI| 00001350: 4B 45 4C 59 20 54 4F 22 00 66 1B 32 EB 99 22 4F |KELY TO".f.2.."O| 00001360: 43 43 55 52 2E 22 00 72 1B 3C EB 8D 36 30 33 39 |CCUR.".r.<..6039| 00001370: 30 20 00 A1 1B 46 EB 99 22 93 11 20 C4 45 50 45 |0 ...F..".. .EPE| 00001380: 4E 44 49 4E 47 20 4F 4E 20 59 4F 55 52 20 56 49 |NDING ON YOUR VI| 00001390: 45 57 50 4F 49 4E 54 2C 20 59 4F 55 20 43 41 4E |EWPOINT, YOU CAN| 000013A0: 22 00 CC 1B 50 EB 99 22 43 4F 4E 53 49 44 45 52 |"...P.."CONSIDER| 000013B0: 20 C2 49 4F 52 48 59 54 48 4D 53 20 41 53 20 53 | .IORHYTHMS AS S| 000013C0: 49 4C 4C 49 4E 45 53 53 20 4F 52 22 00 F4 1B 5A |ILLINESS OR"...Z| 000013D0: EB 99 22 53 43 49 45 4E 43 45 2C 20 41 53 20 46 |.."SCIENCE, AS F| 000013E0: 4F 4F 4C 49 53 48 4E 45 53 53 20 4F 52 20 46 41 |OOLISHNESS OR FA| 000013F0: 43 54 2E 22 00 24 1C 64 EB 99 22 11 20 C9 4E 20 |CT.".$.d..". .N | 00001400: 53 4F 4D 45 20 43 4F 55 4E 54 52 49 45 53 20 41 |SOME COUNTRIES A| 00001410: 4E 44 20 53 4F 4D 45 20 49 4E 44 55 53 54 52 49 |ND SOME INDUSTRI| 00001420: 45 53 2C 22 00 52 1C 6E EB 99 22 42 49 4F 52 48 |ES,".R.n.."BIORH| 00001430: 59 54 48 4D 20 54 48 45 4F 52 59 20 49 53 20 55 |YTHM THEORY IS U| 00001440: 53 45 44 20 49 4E 20 53 43 48 45 44 55 4C 49 4E |SED IN SCHEDULIN| 00001450: 47 22 00 7D 1C 78 EB 99 22 57 4F 52 4B 45 52 53 |G".}.x.."WORKERS| 00001460: 20 46 4F 52 20 43 52 49 54 49 43 41 4C 20 54 41 | FOR CRITICAL TA| 00001470: 53 4B 53 2C 20 53 55 43 48 20 41 53 22 00 98 1C |SKS, SUCH AS"...| 00001480: 82 EB 99 22 50 49 4C 4F 54 49 4E 47 20 41 49 52 |..."PILOTING AIR| 00001490: 50 4C 41 4E 45 53 2E 22 00 C6 1C 8C EB 99 22 11 |PLANES."......".| 000014A0: 20 C2 55 54 20 4D 41 4E 59 20 50 45 4F 50 4C 45 | .UT MANY PEOPLE| 000014B0: 20 53 43 4F 46 46 20 41 54 20 54 48 45 20 54 48 | SCOFF AT THE TH| 000014C0: 45 4F 52 59 2C 22 00 F4 1C 96 EB 99 22 53 49 4E |EORY,"......"SIN| 000014D0: 43 45 20 49 54 20 48 41 53 20 4E 4F 20 57 45 4C |CE IT HAS NO WEL| 000014E0: 4C 2D 50 52 4F 56 45 4E 20 53 43 49 45 4E 54 49 |L-PROVEN SCIENTI| 000014F0: 46 49 43 22 00 08 1D A0 EB 99 22 46 4F 55 4E 44 |FIC"......"FOUND| 00001500: 41 54 49 4F 4E 53 2E 22 00 35 1D AA EB 99 22 11 |ATIONS.".5....".| 00001510: 20 CD 4F 53 54 20 50 55 42 4C 49 43 20 4C 49 42 | .OST PUBLIC LIB| 00001520: 52 41 52 49 45 53 20 48 41 56 45 20 42 4F 4F 4B |RARIES HAVE BOOK| 00001530: 53 20 4F 4E 22 00 60 1D B4 EB 99 22 C2 49 4F 52 |S ON".`....".IOR| 00001540: 48 59 54 48 4D 53 2C 20 53 4F 4D 45 20 4F 46 20 |HYTHMS, SOME OF | 00001550: 57 48 49 43 48 20 41 52 45 20 51 55 49 54 45 22 |WHICH ARE QUITE"| 00001560: 00 73 1D BE EB 99 22 50 45 52 53 55 41 53 49 56 |.s...."PERSUASIV| 00001570: 45 2E 22 00 9F 1D C8 EB 99 22 11 20 C2 45 52 4E |E."......". .ERN| 00001580: 41 52 44 20 C7 49 54 54 45 4C 53 4F 4E 27 53 20 |ARD .ITTELSON'S | 00001590: 27 1F C2 49 4F 52 48 59 54 48 4D 2C 20 C1 22 00 |'..IORHYTHM, .".| 000015A0: CF 1D D2 EB 99 22 D0 45 52 53 4F 4E 41 4C 20 D3 |.....".ERSONAL .| 000015B0: 43 49 45 4E 43 45 98 27 2C 20 49 53 20 41 20 57 |CIENCE.', IS A W| 000015C0: 45 4C 4C 2D 4B 4E 4F 57 4E 20 57 4F 52 4B 22 00 |ELL-KNOWN WORK".| 000015D0: E3 1D DC EB 99 22 49 4E 20 54 48 45 20 46 49 45 |....."IN THE FIE| 000015E0: 4C 44 2E 00 10 1E E6 EB 99 22 11 20 20 20 20 20 |LD.......". | 000015F0: 20 1E D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 | ..RESS ANY KEY | 00001600: 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E 98 22 |TO CONTINUE...."| 00001610: 00 25 1E F0 EB A1 41 24 3A 8B 41 24 B2 22 22 A7 |.%....A$:.A$."".| 00001620: 36 30 34 30 30 00 2B 1E FA EB 8E 00 00 00 |60400.+....... |
..#.... * * * BIORHYTHM * * *.)...
..F.... 5/17/86 VERSION.K. .. COP
YRIGHT 1986 LOUIS F. SANDER...".. OK T
O COPY, NOT OK TO SELL...(.....2..
LOUIS F. SANDER.N.<.. 153 MAYER
DRIVE...F.. PITTSBURGH, PA 15237..
.P.. (412)367-1376...Z...4.D.. *
* NEXT 2 LINES SETUP PRINTER.:.N.:.X.X.P
D.4 : . PRINTER DEVICE #.....PT.2 : . PR
INTER TYPE. TYPES ARE: 1=1525/
MPS801, 2=1526/MPS802.....:.G...F..001:H
.100.01:PI..2..... .D$."................
......".....R$."........................
................".,....M%(12),M$(12).A..
..I.1.12:.M%(I):..V.H..I.1.12:.M$(I):..A
.R.. 5000.W....53280,2:.53281,1......"..
."G(142).9)"..BIORHYTHM CHART MAKER".F..
...9)".EEEEEEEEEEEEEEEEEEEEE."......"..
THIS PROGRAM WILL CREATE A BIORHYTHM ".
....." CHART FOR ANY 38-DAY PERIOD.".K.
...". ENTER THE SUBJECT'S NAME BELOW, T
HEN.P...." PRESS 'RETURN' TO ENTER IT."
..."..". DO THE SAME FOR DATES. BE SUR
E TO".L.,.." SEPARATE MONTH, DAY & YEAR
BY COMMAS."...6...32)"EEEEEE"...@.N$."N
O NAME":.".. SUBJECT'S NAME.
";N$.,.J..C(N$).9.N$.H(N$,8).K.T.MB.99:.
".. DATE OF BIRTH (MM,DD,YY)";MB,DB,YB
:.MB.12.340.T.^.TB.0...H.T1.YB.4...R..MB
.2.420...|..I.1.MB.1.....TB.TB.M%(I)....
...R....(T1...(T1)).(MB.2).TB.TB.1.....T
B.TB.365.YB..(T1).DB.+...MS.99:.:."CHART
START DATE (MM,DD,YY)";MS,DC,YS:.MS.12.
430.4...TS.0.@.B.T1.YS.4.N.L..MS.2.510.\
.V..I.1.MS.1.L...TS.TS.M%(I).R..........
(T1...(T1)).(MS.2).TS.TS.1.....TS.TS.365
.YS..(T1).DC.....TT.TS.TB.T...PS.23.(TT.
23..(TT.23)).....ES.28.(TT.28..(TT.28)).
..&.IS.33.(TT.33..(TT.33))...0..53280,1.
;.:..".BIORHYTHM FOR ."N$". BORN ";.B.D.
.M$(MB);DB;".,19";J(D(YB.H.F),3,2)..F.C
$."UP CRIT DWN"...G..I.1.C(C$)..
.H...38)J(C$,I,1)"..."G(148)...I.....N..
".......................................
.."...X..I.1.8...B..". . . . . . . . . .
. . . . . . . . . .".#.L...R.V.."......
.................................".]....
I.1.8......". . . . . . . . . . . . . .
. . . . . .".......A...."...............
........................".W...MD.MS:D1.D
C:YD.YS......I.0.38......I.2...(I.2)..".
";:.770...F.A$.D(D1).).P..C(A$).3.B$.I(A
$,1):.740.K.Z.B$.J(A$,2,1)."..".I(A$,1).
".".T....B$;.T...C$.".........":..(0).34
.770......(D1.1).(D1.2).."..."M$(MD)" 19
"J(D(YD.H.F),3,2);C$;.....D1.D1.1.M....D
1..M%(MD).830......MD..2.820... ..YD.4..
.(YD.4).820...*..D1.30.830.'.4.D1.1:MD.M
D.1:.MD.12.MD.1:YD.YD.1.-.>...I.H.."..":
."PHYSICAL=.W. EMOTIONAL=.Q. INTELLECT
UAL=.*.";.U....I.0.38.....P.8.8..((PS.I)
.PI.23)..5......"."H(R$,I.1);H(D$,P.2);"
.W".......E....I.1.38.....E.8.8..((ES.I)
.PI.28)..5......"."H(R$,I.1);H(D$,E.2);"
.Q"...J.....T..I.1.38.3...IT.8.8..((IS.I
).PI.33)..5.V...."."H(R$,I.1);H(D$,IT.2)
;".*.".\..........".....................
....(C-NEW CHART S-NEW SUBJ P-PRINT Q-QU
IT).";......A$:.A$."".1030.H....A$."S"..
.Y....A$."C".1090...$..A$."Q"..53280,14:
.53281,6:.".....".16)".GOODBYE!....":..'
....A$."P".1150.1.8..1030.D.B..:."
.";.M.L
..430...V..31,28,31,30,31,30,31,31,30,31
,30,31.L.`.. JAN,FEB,MAR,APR,MAY,JUN,JUL
,AUG,SEP,OCT,NOV,DEC.R.J.:...T.. ** PRIN
T THE SCREEN **.9.~.."..................
....... *** PRINTING THE CHART ***
.";.X....PT.2.1280 : . 1526/MPS802
.|....3,3:.4,DN,7:.SL.0.23:.4,G(15);....
..SC.0.39:C.B(1024.40.SL.SC)......C.34.C
.39......C.162.C.167......RV.1..C.128..4
,G(146);:RV.0...D..C.127..RV.0..4,G(18);
:RV.1.<.N.C.C.128.(C.127):C.C.64.(C.32.C
.95).32.(C.63.C.96):.4,G(C);.].X..:.4,G(
8):RV.0:.:.4,G(15): 4.G....1020.M...:...
... PRINTER TYPE 2 - 1526/MPS802......6,
PD,6:.6,G(21): 6.E....I.217.242:.I,B(I).
128:.......3,3:.4,PD,7:.".";......I.0.23
:.J.0.39:.#3,A$:.B(1024.40.I.J).127..4,"
.";:R.1.3.(..4,A$;:.R.1.R.0:.4,".";.H.2.
.J:.4,G(141);:.I.X.<..I.1.9:.4:..B.F. 3:
4.W.P..10,4,10:.10: 10...Z..1020......
** INSTRUCTIONS **......G(14):.53280,1:.
53281,1......".... C-64 BIORHYTHM C
HART MAKER"......". BY"
.$....". LOUIS F. SANDER".T..
.."....THIS CREATES BIORHYTHM CHARTS ON
THE"......"SCREEN. IT PRINTS THEM ON THE
PRINTER"......"IF YOU'D LIKE.".E....".S
EE LINES 100-140 FOR PRINTER SETUPS."...
...".DO YOU WANT TO KNOW ABOUT THE THEOR
Y OF BIORHYTHMS (Y OR N)?"......A$:.A$."
N"........A$.."Y".5010.N.`.. ** BIORHTYH
M INSTRUCTIONS.X.T..". .BACKGROUN
D ON BIORHYTHMS"...~..".. BIORHYTHM THEO
RY STATES THAT ON THE".T...."DAY OF OUR
BIRTH, THREE IMMUTABLE LIFE"......"CYCLE
S BEGIN:."......" A 23-DAY PHYSIC
AL CYCLE.7...." A 28-DAY EMOTIONA
L CYCLE.A...." A 33-DAY INTELLECT
UAL CYCLE......PRINT". THESE CYCLES CHAN
GE SINUSOIDALLY,".E.D.. PRINT"MOVING UP
AND DOWN WITH THE PASSAGE OF".W.N.. PRIN
T"TIME....X..". WHEN A CYCLE IS AT ITS H
IGH POINT,"......"THE PERSON IS AT HIS O
R HER PEAK IN".S...."THAT PARTICULAR REA
LM OF LIFE.......". WHEN A CYCLE IS AT I
TS LOW POINT, THE"......"PERSON IS ALSO
AT A LOW.".R....". A 'CRITICAL DAY' OCCU
RS WHEN THE CYCLE"......"CROSSES THE ZER
O AXIS. CRITICAL DAYS".*...."ARE CONSIDE
RED TO BE UNSTABLE TIMES,".X.(.."WHEN UP
SETS OR DISASTERS ARE LIKELY TO".F.2.."O
CCUR.".R.<..60390 ...F..".. DEPENDING ON
YOUR VIEWPOINT, YOU CAN".L.P.."CONSIDER
BIORHYTHMS AS SILLINESS OR"...Z.."SCIEN
CE, AS FOOLISHNESS OR FACT.".$.D..". IN
SOME COUNTRIES AND SOME INDUSTRIES,".R.N
.."BIORHYTHM THEORY IS USED IN SCHEDULIN
G".}.X.."WORKERS FOR CRITICAL TASKS, SUC
H AS"......"PILOTING AIRPLANES.".F....".
BUT MANY PEOPLE SCOFF AT THE THEORY,"..
...."SINCE IT HAS NO WELL-PROVEN SCIENTI
FIC"... .."FOUNDATIONS.".5....". MOST PU
BLIC LIBRARIES HAVE BOOKS ON".`...."BIOR
HYTHMS, SOME OF WHICH ARE QUITE".S...."P
ERSUASIVE."...H..". BERNARD GITTELSON'S
'.BIORHYTHM, A".O.R.."PERSONAL SCIENCE.'
, IS A WELL-KNOWN WORK"......"IN THE FIE
LD.......". .PRESS ANY KEY TO CONTI
NUE....".%....A$:.A$."".60400.+.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL