Guest User

Untitled

a guest
Jul 24th, 2018
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.57 KB | None | 0 0
  1. WinWaitActive("MyWebSite")
  2.  
  3. HotKeySet("{PAUSE}", "Start")
  4. HotKeySet("!{PAUSE}","Quit")
  5.  
  6. TogglePause()
  7.  
  8. func Start()
  9. HotKeySet("{PAUSE}")
  10. HotKeySet("{PAUSE}", "TogglePause")
  11. ToolTip('Anti_AwayFromKeyboard started.',0,0)
  12. While 1
  13. Send("{F5}")
  14. ToolTip('Just sent another key stroke!',0,0)
  15. Sleep(500)
  16. ToolTip('Waiting for a while...',0,0)
  17. Sleep(Random(120000,180000))
  18. WEnd
  19. EndFunc
  20.  
  21. Func TogglePause()
  22. ToolTip('Anti_AwayFromKeyboard Stopped.',0,0)
  23. HotKeySet("{PAUSE}")
  24. HotKeySet("{PAUSE}", "Start")
  25. While 1
  26. sleep(100)
  27. WEnd
  28. EndFunc
  29.  
  30. func Quit()
  31. Exit
  32. EndFunc
Add Comment
Please, Sign In to add comment