Advertisement
Guest User

dota lumberjack

a guest
May 19th, 2016
764
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include <AutoItConstants.au3>
  2. Local $xAxis = 370
  3. Local $yAxis = 347
  4.  
  5.  
  6. Func Toggle()
  7.     Sleep(2000)
  8.     While 0 < 1
  9.         For $i = 0 To 8 Step +1
  10.             For $s = 0 To 4 Step +1
  11.             MouseClick($MOUSE_CLICK_PRIMARY, $xAxis, $yAxis, 1, 0)
  12.             Sleep(10)
  13.             Next
  14.            
  15.         $xAxis = $xAxis + 100
  16.             If $xAxis > 1170 Then
  17.             $xAxis = 370
  18.             EndIf
  19.         Next
  20.        
  21.     $yAxis = $yAxis + 100
  22.         If $yAxis > 747 Then
  23.         $yAxis = 347
  24.         EndIf
  25.     WEnd
  26. Exit
  27. EndFunc
  28.  
  29. ; Function to end the script
  30. Func Off()
  31.     Exit
  32. EndFunc
  33.  
  34. ; Set the hotkeys up
  35. HotkeySet('{,}', 'Toggle')
  36. HotkeySet('{.}', 'Off')
  37.  
  38. ; Do nothing (keeps the script around to process the keys)
  39. While 1
  40.     Sleep(1000)
  41. WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement