SHARE
TWEET

Untitled

a guest Jul 20th, 2019 74 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include <AutoItConstants.au3>
  2. HotKeySet("{f1}", "myExit")
  3.  
  4. Global $Counter = 1
  5.  
  6. init(); changed all that to a function to call one time(  readability)
  7.  
  8. while 1
  9.     $timer = timerinit()
  10.     Do
  11.         MouseClick("Left", 614, 532, 1, 2)
  12.         sleep(500)
  13.         MouseClick("Left", 713, 598, 1, 2)
  14.         Call ( "myResult", $Counter )
  15.         sleep(2000)
  16.         MouseClick("Left", 472, 333, 1, 2)
  17.         sleep(500)
  18.         MouseClick("Left", 713, 598, 1, 2)
  19.         Call ( "myResult", $Counter )
  20.         sleep(2000)
  21.         MouseClick("Left", 614, 532, 1, 2)
  22.         sleep(500)
  23.         MouseClick("Left", 713, 598, 1, 2)
  24.         Call ( "myResult", $Counter )
  25.         sleep(2000)
  26.         MouseClick("Left", 614, 532, 1, 2)
  27.         sleep(500)
  28.         MouseClick("Left", 713, 598, 1, 2)
  29.         Call ( "myResult", $Counter )
  30.         sleep(2000)
  31.         MouseClick("Left", 472, 333, 1, 2)
  32.         sleep(500)
  33.         MouseClick("Left", 713, 598, 1, 2)
  34.         Call ( "myResult", $Counter )
  35.         sleep(2000)
  36.         MouseClick("Left", 472, 333, 1, 2)
  37.         sleep(500)
  38.         MouseClick("Left", 713, 598, 1, 2)
  39.         Call ( "myResult", $Counter )
  40.         Sleep(2000)
  41.     until timerdiff($timer) > 960;
  42. WEnd
  43.  
  44.  
  45. func myResult($Counter)
  46.     ;ConsoleWrite(" Function myresult is called " & @CRLF)
  47.     $Variable = PixelSearch(1240, 250, 1450, 420, 0x0E0E0E, 1)
  48.     If IsArray($Variable) = True Then
  49.         ConsoleWrite(" Red is found " & @CRLF)
  50.         MouseClick("Left", 888, 597, 1, 1)
  51.         MouseClick($MOUSE_CLICK_LEFT,  $Variable[0], $Variable[1], $Counter)
  52.     Else
  53.         $Variable = PixelSearch(1240, 250, 1450, 420, 0x54835D, 1)
  54.         If IsArray($Variable) = True Then
  55.             ConsoleWrite(" 0x00B1C5 is found " & @CRLF)
  56.             For $vElement In $Variable
  57.                 $Counter = $Counter * 2
  58.             Next
  59.             MouseClick($MOUSE_CLICK_LEFT, $Variable[0], $Variable[1], $Counter)
  60.         EndIf
  61.     EndIf
  62. EndFunc
  63.  
  64. Func init()
  65.     WinActivate("Identikit")
  66.     WinWaitActive("Identikit", "", 10); wait for 10 sec to appear
  67.     MouseClick("Left", 529, 594, 1, 1)
  68.     sleep(4000)
  69.     MouseWheel($MOUSE_WHEEL_DOWN, 2)
  70.     sleep(500)
  71.     MouseClick("Left", 755, 578, 1, 1)
  72.     sleep(2000)
  73.     MouseClick("Left", 823, 598, 1, 1)
  74.     sleep(16000)
  75.     MouseWheel($MOUSE_WHEEL_DOWN, 1)
  76.     sleep(1000)
  77. EndFunc
  78.  
  79. func myExit()
  80.     Exit
  81. 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