ye a bit but dont get it good but tis is wat i got now but wont att monsters :(
[CODE]
$xTop = 30
$yTop = 73
$xBot = 1002
$yBot = 692
$mobGreen = "0xC0BE40"
Sleep(600)
while 1
$coord = PixelSearch($xTop,$yTop,$xBot,$ ;yBot,$mobGreen,5)
$n = @error
If NOT @error Then
while $n = 0
$x = Random($coord[0], $coord[0]+40, 1)
$y = Random($coord[1], $coord[1]+40, 1)
MouseClick("right", $x, $y, 2, 0)
$mm = PixelGetColor ( 378 , 12 )
$mob = Hex($mm, 6)
If $mob = "7B0000" Then
ExitLoop
EndIf
$coord = PixelSearch($xTop,$yTop,$xBot,$ ;yBot,$mobGreen,5)
$n = @error
wend
If $mob = "7B0000" Then
while $mob = "7B0000"
Send("{F4}")
Sleep(200)
Send("{F3}")
Sleep(200)
Send("{F2}")
Sleep(200)
Send("{F1}")
Sleep(200)
$mm = PixelGetColor ( 378 , 12 )
$mob = Hex($mm, 6)
wend
Send("{Space}")
Sleep(200)
Send("{Space}")
Sleep(200)
Send("{Space}")
Sleep(200)
EndIf
Else
Send("{Right 7}")
Endif
Wend