#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

;BioRhythmusWächter - campweb ¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦

Global $U_YEAR = InputBox("BRW", "Bitte das Jahr ihrer Geburt eingeben! Bsp.: 1969", "1950")                         
Global $U_MON  = InputBox("BRW", "Bitte den Monat ihrer Geburt eingeben! Bsp.: 5", "6")
Global $U_DAY  = InputBox("BRW", "Biite den Tag ihrer Geburt eingeben! Bsp.: 14", "15")
$U_SECONDS = (((((((@YEAR-$U_YEAR)*12)*27.322)*24)*60)*60)+(((($U_MON*27.322)*24)*60)*60)+(((($U_DAY)*24)*60)*60))
$U_DAYS = $U_SECONDS/86400
$PI  = 3.1415926535897932384626433832795
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("BRW", 290, 55, 192, 148)
$Label1 = GUICtrlCreateLabel("Mentaler Zustand X%"   , 5,  1, 285, 17)
$Label2 = GUICtrlCreateLabel("Physischer Zustand X%" , 5, 19, 285, 17)
$Label3 = GUICtrlCreateLabel("Emotionaler Zustand X%", 5, 37, 285, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$mental_p =    (Sin($U_DAYS * 2 * $PI / 33)) * 100
$physisch_p =  (Sin($U_DAYS * 2 * $PI / 23)) * 100
$emotional_p = (Sin($U_DAYS * 2 * $PI / 28)) * 100
GUICtrlSetData($Label1, "Mentaler Zustand "&$mental_p&"%")
GUICtrlSetData($Label2, "Physischer Zustand "&$physisch_p&"%")
GUICtrlSetData($Label3, "Emotionaler Zustand "&$emotional_p&"%")

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
	EndSwitch
		
WEnd
;BioRhythmusWächter - campweb ¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦EOOF¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦