Advertisement
Guest User

Untitled

a guest
May 15th, 2019
127
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 1.00 KB | None | 0 0
  1. WinActivate("Microsoft")
  2. sleep(2000)
  3. Local $control=0
  4. HotKeySet("{F2}", "StopTYPE")
  5.  
  6. Global $StopTYPE = False
  7. do
  8. Send ("^1")
  9. MouseClick("left",1454,118)
  10. Sleep(500)
  11. MouseClick("left",1114,364)
  12. sleep(100)
  13. MouseClick("left",1050,924)
  14. If $StopTYPE Then ExitLoop
  15. sleep(500)
  16. Send ("^v")
  17. Sleep(100)
  18. Send ("{ENTER}")
  19. Sleep(1000)
  20.  
  21. Send ("^2")
  22. MouseClick("left",1454,118)
  23. Sleep(500)
  24. MouseClick("left",1114,364)
  25. sleep(100)
  26. MouseClick("left",1050,924)
  27. If $StopTYPE Then ExitLoop
  28. sleep(500)
  29. Send ("^v")
  30. Sleep(100)
  31. Send ("{ENTER}")
  32. Sleep(1000)
  33.  
  34.  
  35. Send ("^3")
  36. MouseClick("left",1389,122)
  37. Sleep(500)
  38. MouseClick("left",1105,364)
  39. sleep(100)
  40. MouseClick("left",1050,924)
  41. If $StopTYPE Then ExitLoop
  42. sleep(500)
  43. Send ("^v")
  44. Sleep(100)
  45. Send ("{ENTER}")
  46. sleep(1000)
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  If $StopTYPE Then ExitLoop
  53. $control=$control + 1
  54. until $control=40023423423423423432423423423423423423423423423423423423423423423423423423423400 ; does the loop x times
  55.  
  56.  
  57. Func StopTYPE()
  58.     $StopTYPE = True
  59.     EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement