FUJIbauddata VUUBIORYTM dataG UU0qZDDATDYD1D2N2NDSIMIBUFXZTBUF2IIIGALXPBAMMMYMDYYMMDDYZDYMALOUTEEMNMMSMMSM @ !"#$%&'()*+,-./01234567BIORYTHMS 16KMAY 1, 1980 +@e@1AdAU<@\@@K:|@@S: A@-@@ =2@@$t&(BORN  ,A%t(7@<@,/7@<@,/7@<@, TO (tJ(7@<@,/7@<@,/7@<@,V"@ldataD UU[(j( FOR t @`2(Ҡ<H"@E(@( LOW CRITICAL PEAKH$F!( נ̠!$PB6-+',&P:',"6-$A`46-P:+G:,,$,%?67<,.B$Z-@A $dGG;@@,9@,;@,;@@,;@,;@,nGG;@ ,;@ ,;@ ,;A ,;@,;@,x))31,29,31,30,31,30,31,31,30,31,30,31<<JAN,FEB,MARCH,APRIL,MAY,JUNE,JULY,AUG,SEPT,OCT,NOV,DEC'@@'@@9 Ap(@-(@ L(@ ---------------X6-@d6-@p6-@|6-@ A 6-6.6.4AP"A&APL-@B:,267<,.>:@:7<,,%A`,?7<,4L67<,. L Ap*(@(1) SCREEN ONLYL(@(2) SCREEN + PRINTER:-@:(@ SELECTION() [6-@6-@'6-@1 A =6-EdataA UU42Q6-@[ AP01A  A pINPUT DATES5-@@ 5(@BIRTHDATE //G6-@6-@'6-@ 1 A ; A@GA`+ 6-6- A `6.%6-+6-"i-@@5(@range of biorhythmG-@i(@ENTER FOR same YEARS,= 6--@=(@// TO //6G6-@6-'6-@1 A ; A@GA;ERROR CHECK@) 6.6-6-6-) ApB"* ApD"*"* ApEG6-@6-@'6-@1 A ; A@GAJ# 6.6-6-#6-%AT) Ap^"* Aph ArZ-@8(@ invalid range!! L-@AP Z A| A @6-f-@@!#A /-@3"7 Z"@)*P:'@,'@f6-@( 68,-  CALCULATE INITIAL POSITION6-dataE UU%A)6-%@)!+%A,AP>6-Ae2P:'@,&+'@,">6-Af 6-% A T6-@6-(6-6@. ;6-6@H6-6@T6-0 -+%,+%,,6-%+$+8,,,0 6-%+&, A +@6-@5( ɠ5( Ҡ( BIORHYTHM$v +@'(@ PB(@ `(@ il6-@v @0d(@PHYSICAL4(@ EMOTIONALN(@ INTELLECTUALZ6-@d @0> #A0!-@@%",6.8"@>6- @w@ )!A A&%6- )!%6-@0 "* 6-@: "*!6-@D$NI @ '"@I(@ X-@8,b6-@6-@l6. v A`76-%@ APdataA UU-6-&@7 A`6-&@]6-@#6.P! @-6-@356.i? @K6-@(S6.] @S67@<@,.=:,1-@@O67<,.>:@:7<,,%A(,S M6-@ 6-@!6.M6.% + w6-@#6.P! @-6-@356.I? @K6-@(S6.E] @w67@<@,.=:,F:B2y,"@%#6-@"#6-@%   A0:6.7@!<A,,-@:(@5(@52@@`&@@F:B2y,"@%\%2@967B:,%@,.O"*"@\(@6-%@ !A  Ap @-@% 9-@@Z(@ ^ p-@ .  -@@* @. *6-@#6(@press button4YF:B2y,@*-@udata> UU@#= @startO-@#Y A>%H56-+67B:,%@,. 5 A`R6-@$\a 6. AP-6-A:7@<@,,G6-A:7@<@,,a6-A:7@<@,,f?? )!@) )!@1) APp7-@@77<,4.)7<,4-APz 1 #A -@"# 1!AP<0'@P:'@,*"@*!@(<6-@$ Ap 6- A `$& #A0-@"# &$0 A -@@P:0$H(@0(@ϠҠ;@E @H%B6-6.82@AAAB @ F:B2y,"@%**"@!*F:Ad,"AUA -%)@G -%(@>:,0F:Ad,"AU8-%G(@ F:B2y,"@% F:Ad,"AUA0$C -%)@*AdAU@"AU)"A&data UU C$) Au.--"*+ @H)!@W,A08N6-%@(67B:,%@,.>:,9 @>:,?"K6-@!N$B3%"@*+"@)"@,36-%@L A &*** INPUT CHECK&'!@* A('6-&@2&'!A)* A'6-&A(&'!A* A%'6-&A(&'!A$* AV'6-&A`&$'MN=BIRTH MONTH'MMY= " "'DY=BIRTH DAY'YR=BIRTH YEAR'MM=START MONTH'DD=START DAY'YYQ=START YEAR'MM2=END MONTH'DD2=END DAY'YQ=END YEAR'MO=MONTH BEING DONE'X=PERIOD'D3=NUMBER OF DAY'DAT$=BIRTHDATE'OUTR=IF <> 0 THEN PRINT 'T( )=# OF DAYS IN MONTH F:BIORYTM + I U:"@`6-&@*F:Ad,"AUA -%)@G -%(@>:,0F:Ad,"AU8-%G(@ F:B2y,"@% F:Ad,"AUA0$C -%)@*AdAU@"AU)"A&