#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <BotTibia.au3>
#include <Timers.au3>
#include <Misc.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("SlimeTrainer", 245, 179, 903, 365)
$Button1 = GUICtrlCreateButton("Spell Caster", 16, 16, 89, 17)
$Button2 = GUICtrlCreateButton("Anti Idle", 16, 48, 89, 17)
$Button3 = GUICtrlCreateButton("Auto Attack", 16, 80, 89, 17)
$Button4 = GUICtrlCreateButton("Alarm", 16, 112, 89, 17)
$Button5 = GUICtrlCreateButton("Eat Food", 16, 144, 89, 17)
$Button6 = GUICtrlCreateButton("Stop", 139, 17, 89, 17)
$Button7 = GUICtrlCreateButton("Stop", 139, 49, 89, 17)
$Button8 = GUICtrlCreateButton("Stop", 139, 81, 89, 17)
$Button9 = GUICtrlCreateButton("Stop", 139, 113, 89, 17)
$Button10 = GUICtrlCreateButton("Stop", 139, 145, 89, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $Button1
            guictrlsetstate($Button1,$gui_disable)
            guictrlsetstate($Button6,$gui_enable)
            $id1 = _Timer_SetTimer($form1,500,"spell")
        case $Button2
            guictrlsetstate($Button2, 128)
            guictrlsetstate($Button7,64)
            $id2 = _Timer_SetTimer($form1,220000,"afk")
        case $Button3
            guictrlsetstate($Button3, 128)
            guictrlsetstate($Button8,64)
            $id3 = _Timer_SetTimer($form1,5000,"attack")
        case $Button4
            guictrlsetstate($Button4, 128)
            guictrlsetstate($Button9,64)
            $id4 = _Timer_SetTimer($form1,1000,"alarm")
        case $Button5
            guictrlsetstate($Button5, 128)
            guictrlsetstate($Button10,64)
            $id5 = _Timer_SetTimer($form1,144000,"food")

    EndSwitch
WEnd


func spell($1,$2,$3,$4, $5)
    if PixelGetColor (3174, 260) = 0x7260FF then
        $StartPos = MouseGetPos()
        MouseMove (3027, 525, 0)
        MouseClick ("right")
        controlsend("Medivia","","","{f1}")
        controlsend("Medivia","","","{enter}")
        MouseMove ($StartPos [0], $StartPos [1], 0)
        MouseClick ("left")

    EndIf
EndFunc

func attack ($1,$2,$3,$4, $5)
    if PixelGetColor (2276,484) <> 0x490000 Then
        $StartPos = MouseGetPos()
        MouseMove (2304,457,0)
        MouseClick ("right")
        MouseMove ($StartPos [0], $StartPos [1], 0)
        MouseClick ("left")
    EndIf
EndFunc

func food ($1,$2,$3,$4, $5)
    $StartPos = MouseGetPos()
    MouseMove (3027, 525, 0)
    MouseClick ("right")
    MouseClick ("right")
    MouseClick ("right")
    MouseMove ($StartPos [0], $StartPos [1], 0)
    MouseClick ("left")
EndFunc

func afk($1,$2,$3,$4, $5)
    controlsend("Medivia","","","{ctrldown}{down}{ctrlup}")
    Sleep (1000)
    controlsend("Medivia","","","{ctrldown}{up}{ctrlup}")
    Sleep (1000)
    controlsend("Medivia","","","{ctrldown}{down}{ctrlup}")
    Sleep (1000)
    controlsend("Medivia","","","{ctrldown}{up}{ctrlup}")
    EndFunc

func alarm($1,$2,$3,$4, $5)
    if PixelGetColor (2017,983) <> 0xFFFF00 Or PixelGetColor (2465, 571) <> 0x020000 Then
        SoundPlay ("C:\Users\AREK\Music\alarm.wav", 0)
        Sleep (300000)
    EndIf
EndFunc