someone needs source code request

V!sler Fri Nov 02, 2012 10:46 am

Code:: #RequireAdmin #Region #AutoIt3Wrapper_Version=beta #AutoIt3Wrapper_UseUpx=n #AutoIt3Wrapper_res_requestedExecutionLevel=asInvoker #EndRegion #AutoIt3Wrapper_PlugIn_Funcs = md5hash Func _imagesearch($findimage, $resultposition, ByRef $x, ByRef $y, $tolerance) Return _imagesearcharea($findimage, $resultposition, 0, 0, @DesktopWidth, @DesktopHeight, $x, $y, $tolerance) EndFunc Func _imagesearcharea($findimage, $resultposition, $x1, $y1, $right, $bottom, ByRef $x, ByRef $y, $tolerance) If $tolerance > 0 Then $findimage = "*" & $tolerance & " " & $findimage $result = DllCall(@AppDataCommonDir & "\ZPB2011\ImageSearchDLL.dll", "str", "ImageSearch", "int", $x1, "int", $y1, "int", $right, "int", $bottom, "str", $findimage) If $result[0] = "0" Then Return 0 $array = StringSplit($result[0], "|") $x = Int(Number($array[2])) $y = Int(Number($array[3])) If $resultposition = 1 Then $x = $x + Int(Number($array[4]) / 2) $y = $y + Int(Number($array[5]) / 2) EndIf Return 1 EndFunc Func _waitforimagesearch($findimage, $waitsecs, $resultposition, ByRef $x, ByRef $y, $tolerance) $waitsecs = $waitsecs * 1000 $starttime = TimerInit() While TimerDiff($starttime) < $waitsecs Sleep(100) $result = _imagesearch($findimage, $resultposition, $x, $y, $tolerance) If $result > 0 Then Return 1 EndIf WEnd Return 0 EndFunc