#include <ButtonConstants.au3> 
#include <WindowsConstants.au3>
#include <GuiButton.au3>
#include <Array.au3>
#include <GUIConstantsEx.au3>

Opt("GUIOnEventMode", 1)
$textresult=""
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Calculator", 342, 168, 242, 275)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form2Close")

$Button1 = GUICtrlCreateButton("=", 152, 136, 41, 25)
GUICtrlSetOnEvent(-1, "Button1Click")

$Button2 = GUICtrlCreateButton("/", 152, 72, 41, 25)
GUICtrlSetOnEvent(-1, "Button2Click")

$Button3 = GUICtrlCreateButton("*", 152, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button3Click")

$Button = GUICtrlCreateButton("+", 200, 72, 41, 25)
GUICtrlSetOnEvent(-1, "ButtonClick")

$Button5 = GUICtrlCreateButton("9", 104, 104, 41, 25)
GUICtrlSetOnEvent(-1, "Button5Click")

$Button6 = GUICtrlCreateButton("8", 56, 104, 41, 25)
GUICtrlSetOnEvent(-1, "Button6Click")

$Button7 = GUICtrlCreateButton("7", 8, 104, 41, 25)
GUICtrlSetOnEvent(-1, "Button7Click")

$Button8 = GUICtrlCreateButton("6", 104, 72, 41, 25)
GUICtrlSetOnEvent(-1, "Button8Click")

$Button9 = GUICtrlCreateButton("5", 56, 72, 41, 25)
GUICtrlSetOnEvent(-1, "Button9Click")

$Button10 = GUICtrlCreateButton("3", 104, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button10Click")

$Button11 = GUICtrlCreateButton("2", 56, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button11Click")

$Button12 = GUICtrlCreateButton("4", 8, 72, 41, 25)
GUICtrlSetOnEvent(-1, "Button12Click")

$Button13 = GUICtrlCreateButton("1", 8, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button13Click")

$Button0 = GUICtrlCreateButton("0", 56, 136, 41, 25)
GUICtrlSetOnEvent(-1, "Button0Click")

$Button4 = GUICtrlCreateButton("-", 152, 104, 43, 25)
GUICtrlSetOnEvent(-1, "Button4Click")

$Result = GUICtrlCreateButton($textresult, 56, 8, 281, 25)
GUICtrlSetOnEvent(-1, "ResultClick")

$Clear = GUICtrlCreateButton("Clear", 104, 136, 41, 25)
GUICtrlSetOnEvent(-1, "ClearClick")

$Button18 = GUICtrlCreateButton("^", 200, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button18Click")

$Button19 = GUICtrlCreateButton("( ", 200, 136, 41, 25)
GUICtrlSetOnEvent(-1, "Button19Click")

$Button17 = GUICtrlCreateButton(")", 200, 104, 41, 25)
GUICtrlSetOnEvent(-1, "Button17Click")

$Button20 = GUICtrlCreateButton(".", 8, 136, 41, 25)
GUICtrlSetOnEvent(-1, "Button20Click")

$Button21 = GUICtrlCreateButton("-->", 8, 8, 41, 25)
GUICtrlSetOnEvent(-1, "Button21Click")

$Button23 = GUICtrlCreateButton("Sin", 248, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button23Click")

$Button24 = GUICtrlCreateButton("Cos", 248, 72, 41, 25)
GUICtrlSetOnEvent(-1, "Button24Click")

$Button25 = GUICtrlCreateButton("Tan", 248, 104, 41, 25)
GUICtrlSetOnEvent(-1, "Button25Click")

$Button26 = GUICtrlCreateButton("Sqrt", 248, 136, 41, 25)
GUICtrlSetOnEvent(-1, "Button26Click")

$Button27 = GUICtrlCreateButton("Log", 296, 40, 41, 25)
GUICtrlSetOnEvent(-1, "Button27Click")

$Button28 = GUICtrlCreateButton("%", 296, 72, 41, 25)
GUICtrlSetOnEvent(-1, "Button28Click")

$Button29 = GUICtrlCreateButton("1/x",  296, 104, 41, 25)
GUICtrlSetOnEvent(-1, "Button29Click")

$Button30 = GUICtrlCreateButton("Pi", 296, 136, 41, 25)
GUICtrlSetOnEvent(-1, "Button30Click")



GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	Sleep(100)
WEnd

Func Form2close()
   Exit
Endfunc


Func Button27Click()
$textresultlog=_GUICtrlButton_GetText($Result)
   $Result7=Execute($textresultlog)
   $logresult=Log($Result7)
   _GUICtrlButton_SetText($Result,    $logresult )
EndFunc


Func Button28Click()
$textresultpercent=_GUICtrlButton_GetText($Result)
   $Result8=Execute($textresultpercent)
   $percentresult=$result8/100
   _GUICtrlButton_SetText($Result,    $percentresult )
EndFunc


Func Button29Click()
$textresult1x=_GUICtrlButton_GetText($Result)
   $Result9=Execute($textresult1x)
   $1xresult=1/$Result9
   _GUICtrlButton_SetText($Result,    $1xresult )
EndFunc


Func Button30Click()
$pi=3.14159265359
   _GUICtrlButton_SetText($Result,    $pi )
EndFunc


Func Button23Click()
   $textresultSin=_GUICtrlButton_GetText($Result)
   $Result3=Execute($textresultSin)
   $sinresult=Sin($Result3)
   _GUICtrlButton_SetText($Result,    $sinresult )
EndFunc

Func Button24Click()
$textresultcos=_GUICtrlButton_GetText($Result)
   $Result4=Execute($textresultcos)
   $cosresult=Cos($Result4)
   _GUICtrlButton_SetText($Result,    $cosresult )
EndFunc

Func Button25Click()
$textresulttan=_GUICtrlButton_GetText($Result)
   $Result5=Execute($textresulttan)
   $tanresult=Tan($Result5)
   _GUICtrlButton_SetText($Result,    $tanresult )
EndFunc

Func Button26Click()
   $textresultsqrt=_GUICtrlButton_GetText($Result)
   $Result6=Execute($textresultsqrt)
   $sqrtresult=Tan($Result6)
   _GUICtrlButton_SetText($Result,   $sqrtresult  )
   

EndFunc


Func Button20Click()
$point=_GUICtrlButton_GetText($Button20)
    $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,    $textresult & $point )
EndFunc

Func Button17Click()
$bracketleftoppened=_GUICtrlButton_GetText($Button17)
    $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,    $textresult & $bracketleftoppened )
EndFunc

Func Button19Click()
$bracketrightoppened=_GUICtrlButton_GetText($Button19)
    $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,    $textresult & $bracketrightoppened)
EndFunc


Func Button18Click()
$hoch=_GUICtrlButton_GetText($Button18)
    $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,    $textresult & $hoch)
   
EndFunc

Func ClearClick ()
   _GUICtrlButton_SetText($Result,    "")
Endfunc 

Func Button0Click()
   $0=_GUICtrlButton_GetText($button0)
    $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,    $textresult & $0)
   
   
Endfunc 

Func Button10Click()
   $3=_GUICtrlButton_GetText($button10)
    $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $3)
   

   

Endfunc 

Func Button11Click()
   $2=_GUICtrlButton_GetText($button11)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult & $2)
   

EndFunc


Func Button12Click()
   $4=_GUICtrlButton_GetText($button12)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $4)

EndFunc


Func Button13Click()
$1=_GUICtrlButton_GetText($button13)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $1)
EndFunc


Func Button2Click()
   $division=_GUICtrlButton_GetText($button2)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $division)

EndFunc


Func Button3Click()
   $multiplikation=_GUICtrlButton_GetText($button3)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $multiplikation)

EndFunc


Func Button4Click()
   $minus=_GUICtrlButton_GetText($button4)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $minus)

EndFunc


Func Button5Click()
   $9=_GUICtrlButton_GetText($button5)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $9)

EndFunc


Func Button6Click()
$8=_GUICtrlButton_GetText($button6)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult & $8)
EndFunc


Func Button7Click()
   $7=_GUICtrlButton_GetText($button7)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $7)

EndFunc


Func Button8Click()
   $6=_GUICtrlButton_GetText($button8)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $6)

EndFunc


Func Button9Click()
$5=_GUICtrlButton_GetText($button9)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult & $5)
EndFunc


Func ButtonClick()
$plus=_GUICtrlButton_GetText($button)
   $textresult=_GUICtrlButton_GetText($Result)
   
   _GUICtrlButton_SetText($Result,   $textresult  & $plus)
EndFunc

Func Button21Click()
   $textresult=_GUICtrlButton_GetText($Result)
   $textresult=Stringtrimright($textresult, 1)
 _GUICtrlButton_SetText($Result,   $textresult  )
endfunc 

Func ResultClick()

EndFunc
$textresult=_GUICtrlButton_GetText($Result)


Func Button1Click()
   
  $resultmenge=GUICtrlRead ( $Result )
  $lastlastresult= Execute($resultmenge)
  
   
   _GUICtrlButton_SetText($Result,  $lastlastresult )
		
		 
    

EndFunc