Global $setPoint = 0
Global $color
Global $point
Global $setPoint
HotKeySet("!f", "setPoint")
MsgBox(0, "Instructions", "Press Alt + F at any place on your health." & @CRLF &"When your health goes below that point, q is pressed.")
while 1
	sleep(100)
	if $setPoint = 1 Then
		Start()
	EndIf
Wend
Func setPoint()
	$point = MouseGetPos()
	$color = PixelGetColor($point[0], $point[1])
	$setPoint = 1
EndFunc

Func Start()
	while 1
		Sleep(100)
		$color = PixelGetColor($point[0], $point[1])
		if $color = 1776411 Then
			Send("q")
		EndIf
	WEnd
EndFunc