;================= [KONFIGURACJA] =======================
HotKeySet("{HOME}", "_START")
HotKeySet("{END}", "_EXIT")
HotKeySet('{Insert}','TogglePause')

Global $TIBIA_WINDOW_NAME = "MasterCores"

Global $HP_PIXEL_COLOR = 0xCB423B					; Kolor HP
Global $HP_PIXEL_POS = [1840, 190]					; POZYCJA PIXELA HP

Global $MANA_PIXEL_COLOR = 0x7260FF					; Kolor MANY
Global $MANA_PIXEL_POS = [1842, 201]				; POZYCJA PIXELA MANY
;================= [KONFIGURACJA] =======================

Global $Paused

While 1
	Sleep(100)
WEnd

Func _START()
	ToolTip('Czekamy az okno tibi bedzie aktywne',10,70)
	While  WinGetTitle("[ACTIVE]") <> $TIBIA_WINDOW_NAME
		Sleep(100)
	WEnd


	Local $HWND = WinGetHandle("[ACTIVE]")
	Local $HP_COLOR = Int($HP_PIXEL_COLOR)
	Local $MANA_COLOR = Int($MANA_PIXEL_COLOR)

	ToolTip('Heal dziala',10,70)
	While True
		If PixelGetColor($HP_PIXEL_POS[0], $HP_PIXEL_POS[1]) <> $HP_COLOR Then
			ControlSend($HWND,'','','{F2}')
			Sleep(250)
		EndIf

		If PixelGetColor($MANA_PIXEL_POS[0], $MANA_PIXEL_POS[1]) <> $MANA_COLOR Then
			ControlSend($HWND,'','','{F3}')
			Sleep(250)
		EndIf
		Sleep(10)
	WEnd
EndFunc

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Heal zatrzymany!',10,70)
    WEnd
	ToolTip('Heal dziala!',10,70)
EndFunc

Func _EXIT()
	Exit
EndFunc