@#@ **** BIORHYTHM ****E@ **** FOR THE C-128 ********g@ **** BY ROBERT A. DE VOE **@ *** QLINK NAME --ORFEO ****@( *** PHOENIX, AZ. 1986 ***@2PH(330),EM(330),IN(330)@< 2000@F720@Z"WHAT IS YOUR NAME? ";NA$Ad"DATE OF BIRTH --MONTH #:";M?An" DAY #:";DcAx" YEAR #:19";YA} Y99 "UST THE LAST TWO DIGITS PLEASE--": 120A"PRESENT DATE ---MONTH #:";MMB MM 6000,6010,6020,6030,6040,6050,6060,6070,6080,6090,6100,6110(B" DAY #:";DDMB" YEAR #:19";YYB YY99 "UST THE LAST TWO DIGITS PLEASE--":150BAGE YYYB MMM AGEAGE1B"YOU ARE ";AGE;" YEARS OLD, ";NA$BN0B T 1 M1: DAYSBNNDAYSC:CNND:N365N1C T 1 MM1: DAYS>CKKDAYSGC,: RC6KKDDqCJL(AGE4):AG365(YYY1)ChNDKLNAGCr"YOU ARE ";ND;" DAYS OLD."C| 3CPND23:END28:IND33CPP(P):EE(E):II(I)DP23P:E28E:I33I:P D2,1,18D1,320,3002D1,0,100 320,100HD T 0 310 10\D1,T,80 T,120bD~D1,DD10,60 DD10,140D 1,12,1,"BIORHYTHM CHART"D1,12,2,"FOR ":1,17,2,NA$D1,0,13," 1 4 8 12 16 20 24 28 31"E1,12,14,M$EDEDD10"E&Z(40DE)320-E0Z$"*":E:DEDE10IED1,Z,12,Z$SEN 960iEX"PHYSICAL----";PsEb 810El"EMOTIONAL---";EEv 1110E"INTELLECT---";IE"TO GET PRINTOUT--HIT 'P' AND ! OTHERWISE HIT ANY KEY."E K$F K$"P" 5000eF0,1:::"F YOU WANT TO SEE A ONCE IN A LIFETIME EVENT --A SECOND BIRTH....."F"UN THE PROGRAM AND ENTER THE FOLLOWING: 7 - 9 - 28 & 9 - 15 - 86 FOR THE BIRTH AND PRESENT DATA. HESE"]G"ARE MY BIRTH STATISTICS AND ON EPT 15 MY BIORHYTHMS WILL SYNCHRONIZE AND STARTAGAIN AS THEY DID ON THE DAY OF MY "G"BIRTH! HIS ONLY HAPPENS ONCE IN 58 YEARS! PLAN TO CELEBRATE IT WITH A RE-BIRTH DAY PARTY. OIN ME!!!" H"(T TAKES 21252 DAYS TO BRING BIO CYCLESIN SYNCH.)"H=H 31,28,31,30,31,30,31,31,30,31,30,31SH TITLE AND SETUP\H0,1H:"***************************************"H"****** *********"H"***************************************"DI:"------FOR THE -128-------------------- ------WRITTEN BY -----------------"NI::TI jI* EMOTIONAL CYCLEtI4DYDEI>A40:T280IHDDEIRPH(DD28)360I\PHPH180IfDYDY10IpXCDY:YC100IzXXC:YA(2XTPH)I1,XCX,YCYJ XXC1 320XC)JYA(2XTPH)8JEM(XXC)YKJ1 XCX,YCYSJ:hJ PHYSICAL CYCLErJDYDEJA50:T230JDDPJPH(DD23)360JPHPH180JDYDY10JXCDY:YC100JXXC:YA(2XTPH)J1,XCX,YCYK$ XXC1 320XC'K.YA(2XTPH)6K8PH(XXC)YIKB1 XCX,YCYQKL:gKV INTELLECT CYCLEqK`DYDEKjA30:T330KtDDIK~PH(DD33)360KPHPH180KDYDY10KXCDY:YC100KXXC:YA(2XTPH)K1,XCX,YCYL XXC1 320XC&LYA(2XTPH)5LIN(XXC)YHL1 XCX,YCYPL:VL2tL ****DOCUMENTATION******zLL" ******"L" ---------------"L" ENERAL HEORY"UM:" CCORDING TO THE THEORY, WE ALL HAVEBIOLOGICAL RHYTHMS WHICH AFFECT OUR PHYSICAL ENERGIES, EMOTIONAL STATES AND"M"OUR INTELLECTUAL POWERS. HESE CYCLES SWING BACK AND FORTH LIKE A PENDULUM BETWEEN AND "(N "PHASES. OR EXAMPLE, THE HYSICAL CYCLE IS 23 DAYS LONG. HE FIRST 11.5 DAYS ARE"N"THE 'UP' DAYS WITH POSITIVE ENERGY CRESTING BETWEEN DAY 5 AND 6. HE LAST 11.5 DAYS ARE THE 'DOWN' CYCLE WHILE THE"N "BODY STORES AND REBUILDS ENERGY. HESE CYCLES DESCRIBE A SINE WAVE CURVE WITH"?O*"ALTERNATING AND CYCLES THROUGH- OUT OUR LIFETIME."O4:"***ϠŠԠŠ--HIT ^ **** *** ---HIT _ ****"O> U$OH U$"_" ORP\" HEN THE WAVE IS CROSSING THE ZERO CENTER LINE THIS IS CALLED A "Pf"DAY. HAT'S WHEN WE TEND TO BE UNSTABLE;WE ARE SICK, CLUMSY, UN-COORDINATED AND ACCIDENT-PRONE. (APPLIES TO PHYS. CYCLE)"Qp" HE CYCLE IS 28 DAYS LONG WITH RITICAL DAYS ON THE FIRST AND 14THDAYS. URING DAYS WE ARE OUTGOING AND"Qz"EXPRESSIVE. N DAYS WE TEND TO BE WITHDRAWN AND INTERNALIZE OUR FEELINGS. N DAYS WE ARE SCRAPPY AND"Q"UNPREDICTABLE. E CAREFUL WITH RELATION-SHIPS ON THOSE DAYS!"DR" DAYS ON THE CYCLE (33 DAYS LONG) ARE GOOD FOR MENTAL TASKSWHERE WE HAVE TO BE SHARP AND VERBOSE."R::"****ϠŠԠ --HIT ^ **** **** ---HIT _ ****"R"****ϠŠŠ1 --HIT 1 ****"R U$R U$"_" R U$"1" 2000RrS" DAYS ON THE CYCLE ARETIMES WHEN WE ARE IN A LEARNING/STORING MODE. O FOR THE FIRST 16 DAYS WE ARE"S"'SMART'; THE LAST 16, WE ARE 'DUMB' AND ON THE 1ST AND 17TH, WE'RE A LITTLE 'CRAZY'; WE USUALLY MAKE BAD JUDGMENTS"mT"ON THOSE RITICAL DAYS! N A TRIPLE RITICAL DAY (WHEN ALL THREE CYCLES CROSS THE LINE) DON'T GET OUT OF BED!"T" LL THREE CYCLES BEGIN AT AT THE MOMENT OF YOUR BIRTH AND RUN LIKE CLOCK-WORK THROUGHOUT YOUR LIFE. AM TOLD"RU"THAT SOME IRLINES MONITOR THEIR PILOTS'IORHYTHMS AND GROUND THEM ON CRITICAL DAYS. OOD IDEA!"U::"****ϠŠԠ --HIT ^ **** **** Š1 ---HIT 1 **** ****ϠŠ 2 ---HIT 2 ****"U"****ϠР٠ ---HIT _ ****"V U$V U$"_" )V U$"1" 2000=V$ U$"2" 2130CV. V8 " HIS PROGRAM ASKS FOR YOUR BIRTHDAY DATE AND THE PRESENT DATE, AND THEN CALCULATES HOW MANY DAYS OLD YOU ARE."