get paid to paste

Imagesearch - Przykład

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseX64=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include "ImageSearch.au3"

HotKeySet("p", "checkForImage")
HotKeySet("a", "checkForImage_a")
global $y = 0, $x = 0

Func checkForImage_a()
	traytip('Imagesearch','Szukam...',5)
Local $search = _ImageSearchArea('scr.bmp', 0, 1,1,800,800,$x, $y, 0)
If $search = 1 Then
MouseMove($x, $y, 10)
traytip('Imagesearch','Znaleziono. $x='&$x&' y='&$y,5)
Else
	traytip('Imagesearch','nie znaleziono...',5)
EndIf
EndFunc





Func checkForImage()
	traytip('Imagesearch','Szukam...',5)
Local $search = _ImageSearch('scr.bmp', 0, $x, $y, 0)
If $search = 1 Then
MouseMove($x, $y, 10)
traytip('Imagesearch','Znaleziono. $x='&$x&' y='&$y,5)
Else
	traytip('Imagesearch','nie znaleziono...',5)
EndIf
EndFunc

while 1
sleep(200)
WEnd

Pasted: Jul 26, 2015, 4:19:02 pm
Views: 9