Advertisement
Guest User

Untitled

a guest
Mar 21st, 2017
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.53 KB | None | 0 0
  1. #include <AutoItConstants.au3>
  2. func send_input()
  3.     $val = Random(1, 7, 1 )
  4.     If $val > 1   Then
  5.         Send("{SPACE}")
  6.     Elseif $val = 1 Then
  7.         Send("w")
  8.     ElseIf $val = 2 Then
  9.         Send("s")
  10.     ElseIf $val = 3 Then
  11.         Send("a")
  12.     ElseIf $val = 4 Then
  13.         Send("d")
  14.     ElseIf $val = 6 Then
  15.         MouseClick("left", Random(0,0, 1), Random(0,0, 1), Random(1, 1, 1))
  16.     ElseIf $val = 7 Then
  17.         MouseClick("right", Random(0,0, 1), Random(0,0, 1), Random(1, 1, 1))
  18.     EndIf
  19. EndFunc
  20.  
  21. While 1
  22.     WinWaitActive("For Honor™")
  23.     sleep(250 )
  24.     send_input()
  25. WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement