Data update
This commit is contained in:
parent
81fd053722
commit
52a6ef48dd
10248 changed files with 63654 additions and 6775 deletions
|
|
@ -5,6 +5,8 @@ https://rosettacode.org/wiki/Biorhythms
|
|||
Translated from FreeBasic to FutureBasic
|
||||
Rich Love May 24, 2024
|
||||
|
||||
Oct 16, 2024 fixed the percentage amounts
|
||||
|
||||
*/
|
||||
|
||||
|
||||
|
|
@ -39,9 +41,9 @@ void local fn Biorhythm(Birthdate As str255, Targetdate As str255)
|
|||
short quadrantP = Int(4 * positionP / 23)
|
||||
short quadrantE = Int(4 * positionE / 28)
|
||||
short quadrantM = Int(4 * positionM / 33)
|
||||
short percentageP = Fix(100 * Sin(2 * (pi * positionP) / 23))
|
||||
short percentageE = Fix(100 * Sin(2 * (pi * positionE) / 28))
|
||||
short percentageM = Fix(100 * Sin(2 * (pi * positionM) / 33))
|
||||
short percentageP = int(100 * Sin(2 * (pi * positionP) / 23))
|
||||
short percentageE = int(100 * Sin(2 * (pi * positionE) / 28))
|
||||
short percentageM = int(100 * Sin(2 * (pi * positionM) / 33))
|
||||
|
||||
str255 textP, textE, textM, Header1Text, Header2Text
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue