Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
#huita
Global $Paused
HotKeySet("{F3}", "Stop")
HotKeySet("{F4}", "Pause")

Func Pause()

 EndFunc

Func Stop()
Exit
EndFunc   

while 1
 sleep (500)
HotKeySet("{F2}","farm")
WEnd

func farm()
$pos = MouseGetPos()
$x = $pos[0]
$w = $pos[1]
$y = 10
$z = 5
$a = 40
$b = 20
$i = 0
Do
MouseClick("left", $x+$i*$y, $w-$i*$z, 1, 0)
sleep (100)
$i = $i + 1
Until $i = 27
$i= 28
Do
MouseClick("left", $x+$i*$y-$a, $w-$i*$z-$b, 1, 0)
sleep (100)
$i = $i - 1
Until $i = 0
MouseMove($pos[0], $pos[1], 0)
EndFunc