Akira056 0 Posted November 4, 2010 i'm not sure how this work but something wrong around imagesearch if anyone can help correct.#include <pic.au3>HotKeySet("{ESC}", "Terminate")MsgBox(0,"Spirit Weapon","what?")WinActivate("Mabinogi")WinActive("Mabinogi"); General purpose coordsGlobal $xGlobal $yGlobal $cxGlobal $cyWhile 1 TalkToEgo() Check()WEndFunc TalkToEgo() Send("{/}") Sleep(5000) MouseClick("Primary", 430, 783, 1) Sleep(4000) MouseClick("Primary", 253, 783, 1) Sleep(2000)EndFuncFunc Check() $c = _ImageSearch("unhappy.BMP",0,$cx,$cy,30) If $c=1 Then Feed() Return EndIf $c = _ImageSearch("fine.BMP",0,$cx,$cy,30) If $c=1 Then CloseEgo() Return EndIfEndFuncFunc Feed() MouseClick("Primary", 342, 783, 1) Sleep(4000) MouseClick("Primary", 251, 785, 1) Sleep(2000) MouseClick("Primary", 807, 506, 1) Sleep(2000) MouseClick("Primary", 907, 581, 1) Sleep(4000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 500, 700, 1) Sleep(1000) MouseClick("Primary", 1000, 583, 1) ; cancel Sleep(2000) MouseClick("Primary", 257, 785, 1) ; continue Sleep(4000) MouseClick("Primary", 545, 785, 1) ; finish Sleep(4000) MouseClick("Primary", 272, 782, 1) ; end Sleep(4000)EndFuncFunc CloseEgo() MouseClick("Primary", 545, 785, 1) ; finish Sleep(4000) MouseClick("Primary", 272, 782, 1) ; end Sleep(4000)EndFuncFunc cc() MouseClick("Primary", 143, 865, 1) ; cross Sleep(4000) MouseClick("Primary", 210, 533, 1) ;cc Sleep(4000) MouseClick("Primary", 823, 568, 1) ;close Sleep(4000) MouseClick("Primary", 604, 440, 1) ;ch1 Sleep(4000) MouseClick("Primary", 607, 594, 1) ;ok Sleep(420000)EndFuncFunc Terminate() Exit 0EndFunc Share this post Link to post Share on other sites