This version does work:
Code:
Sleep(1423)
MouseClick("left", 1023, 767)
WinActivate("Guild Wars")
Call("main")
func check1()
if pixelgetcolor(393, 41) = 14238017 then
call("loot")
EndIf
Endfunc
func checkloot()
if PixelGetColor(476, 46) = 65793 then
Call("travel")
EndIf
EndFunc
func loot()
for $i = 0 to $bb
Send("o")
Call("checkloot")
Sleep($c-500)
Send("{space}")
Sleep($c-500)
Next
Call("travel")
Endfunc
func checkhpmino()
if PixelGetColor(353, 40) = 8792875 Then
Return
else
Send("c")
Sleep($c-750)
Send("{SPACE}")
EndIf
endfunc
func travel()
Sleep(1000)
Send("m")
Sleep($c-500)
$map = PixelSearch(498, 248, 678, 399, 0)
if not @error Then
MouseClick("left", $map[0], $map[1], 2)
Else
call("travel")
EndIf
Sleep(10000)
main()
EndFunc
func fight()
while 1
Send("3")
Call("checkhpmino")
Call("check1")
Sleep($c-500)
Send("6")
Sleep(1932)
Send("1")
Sleep($c-500)
Send("4")
Sleep($c+2000)
Send("2")
Sleep(3000+$c)
Call("checkhpmino")
Call("check1")
Send("1")
Sleep($c-500)
Send("2")
Sleep($c)
Send("3")
Call("checkhpmino")
Call("check1")
sleep(564)
Send("6")
Sleep(1432)
Send("5")
Sleep($c)
Send("1")
Sleep($c+1000)
Send("2")
Sleep(3000+$c)
Call("checkhpmino")
Call("check1")
Send("1")
Sleep($c-500)
Send("2")
Sleep(3000+$c)
Send("1")
Sleep($c-500)
Send("2")
Sleep($c)
call("checkdeath")
WEND
EndFunc
func checkdeath()
If PixelGetColor(637, 412) = 14078912 Then
Sleep(1500)
Send("m")
Sleep($c)
$map = PixelSearch(402, 247, 636, 400, 65792)
if not @error Then
MouseClick("left", $map[0], $map[1], 2)
EndIf
Sleep(15000)
call("main")
EndIf
EndFunc
func enter()
$a = Random(840, 880)
$b = Random(254, 260)
MouseClick("left", $a, $b, "1")
Sleep($c)
Send("{ENTER}")
Sleep(15000)
EndFunc
func main()
global $okl = Random(745, 755)
global $okj = Random(540, 550)
global $pa = Random(910, 918)
global $pb = random(545, 553)
global $pc = Random(755, 765)
global $pd = Random(643, 649)
global $qa = Random(750, 760)
global $qb = Random(645, 655)
global $qc = Random(805, 815)
global $qd = Random(640, 650)
global $qe = Random(860, 870)
global $qf = Random(640, 650)
global $qg = Random(940, 950)
global $qh = Random(915, 925)
global $qi = Random(910, 920)
global $qj = Random(643, 650)
global $qwe = Random(540, 560)
global $wer = Random(335, 350)
global $t = 0
global $ll = Random(300, 500)
global $kl = Random(220, 240)
global $hh = Random(790, 800)
global $hj = Random(710, 715)
global $pp = Random(500, 800)
global $c = Random(1000, 2000)
global $bb = Random(13, 15)
global $ii = 0
global $oo = Random(133, 138)
global $oi = Random(40, 45)
Sleep(12000)
global $c = Random(1000, 2000)
global $aa = Random(90, 100)
call("enter")
Send("8")
Sleep(($c+2000))
Send("v")
Sleep($c)
Send("{SPACE}")
Sleep(($c+10000))
Send("j")
Sleep($c)
Send("f")
Sleep($c)
Send("7")
Sleep(3000)
Send("{w down}")
Sleep(6000+$c)
Send("{w up}")
Sleep($c-500)
Send("{s down}")
Sleep(2000)
Send("{s up}")
Sleep($c-750)
MouseDown("right")
Send("{d down}")
Sleep(2300+$c)
Send("{d up}")
MouseUp("right")
Sleep($c)
Send("{w down}")
Sleep(6000+$c-500)
Send("{w up}")
Sleep($c)
MouseDown("right")
Send("{a down}")
Sleep(9000+$c)
Send("{a up}")
Sleep($c)
MouseUp("right")
Send("c")
Sleep($c-500)
Send("{SPACE}")
Call("fight")
EndFunc
As you can see in the lootfunction, you have to bind Targeting: Item-Next to o. Look into the code, it is very easy to understand. Besides: Here aren't any sellfunctions. It is better to let the bot farm for a few hours and then sell the items manually. Much less time and it works more safely.
It is wroth to spend 10 minutes on understanding script-editing. If you edit your own values for the pixelsearch/getcolor functions the bot will work as save as requia (har har harko^^)