Asolidboat Posted August 10, 2017 Share Posted August 10, 2017 expandcollapse popupHotKeySet("(F6)", "myExit") $x = WinActivate ("[V93] SpawnPK") while(1) Teleport() Viewreset() LC1(1401,249) sleep(3500) $thieve = false while(not($thieve)) $pixels = PixelSearch(1406,257,1512,399,0x735429,1) if NOT(@error) Then LC($pixels[0],$pixels[1]) sleep(3350) Endif $pixels = PixelSearch(1361,162,1567,402,0x48B0C9,1) if NOT(@error) Then $thieve = true LC(1802, 299) sleep(2000) LC2(1730, 353) sleep(2000) LC1(1731,400) sleep(2000) endif wend Wend func LC2($x, $y) mouseclick("right", $x, $y, 1, 5) endfunc func LC1($x, $y) mouseclick("left", $x, $y, 1, 5) endfunc func LC($x, $y) mouseclick("left", $x, $y, 1, 1) endfunc Func Teleport() LC(1895,299) sleep(2000) LC1(1749,365) sleep(3000) LC1(1356,294) sleep(5000) endfunc Func Viewreset() LC1(1755,46) Send("{UP}") Send("{UP down}") sleep(2000) send("{DOWN}") Send("{UP UP}") sleep(3000) endfunc Func myExit() Exit Endfunc Link to comment Share on other sites More sharing options...
Moderators JLogan3o13 Posted August 10, 2017 Moderators Share Posted August 10, 2017 Apparently you did not want to be a part of this forum after all "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum! Link to comment Share on other sites More sharing options...
Recommended Posts