SHARE
TWEET

harvest.au3

Xyberviri Feb 25th, 2020 (edited) 274 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ; hold middle mouse button to left click
  2. ; Shift+pause to terminate the script, pause key to pause it... no more RIP LMB
  3. Global $Paused
  4. HotKeySet("{PAUSE}", "TogglePause")
  5. HotKeySet("+{PAUSE}", "Terminate")
  6.  
  7. #Include <Misc.au3>
  8. While 1
  9. $end = 1
  10.  
  11. while _IsPressed(04)
  12. ;swing the whatever
  13. mousedown("left")
  14. mouseup("left")
  15. sleep(100)
  16. ;throw a bomb
  17. mousedown("right")
  18. mouseup("right")
  19. sleep(100)
  20. tooltip("clicking",0,0)
  21.     wend
  22.   tooltip("",0,0)
  23. WEnd
  24.  
  25. Func TogglePause()
  26.   $Paused = NOT $Paused
  27.   While $Paused
  28.     sleep(100)
  29.     ToolTip('Script is "Paused"',0,0)
  30.   WEnd
  31.   ToolTip("")
  32. EndFunc
  33.  
  34. Func Terminate()
  35.     Exit 0
  36. EndFunc
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top