Постараюсь освободиться через минут 10-15 и потестить твой скрипт, заранее спасибо!Это всё реализованно в том скрипте.
HotKeySet("{Insert}", "_getpixel")
HotKeySet("{Esc}", "_exit")
While 1
Sleep(15)
WEnd
Func _getpixel()
$_color = 0xCCCCCC
$_coord = MouseGetPos ()
If PixelSearch($_coord[0], $_coord[1], $_coord[0], $_coord[1], $_color) Then
MsgBox(0,"Inf.","Good Work!")
EndIf
EndFunc
Func _exit()
Exit
EndFunc
HotKeySet("{Insert}", "_getpixel")
HotKeySet("{Esc}", "_exit")
While True
Sleep(15)
WEnd
Func _getpixel()
Local $_color = 0xCCCCCC
Local $_coordMouse = MouseGetPos ()
Local $_coord = PixelSearch ($_coordMouse[0], $_coordMouse[1], $_coordMouse[0] +1, $_coordMouse[1] +1, $_color, 70)
If @error Then MsgBox (0, "Inf.", "Fail! Got error.")
MsgBox (0, "Inf.", "Founded at "& $_coord[0] &"x"& $_coord[1])
EndFunc
Func _exit()
Exit
EndFunc
HotKeySet("{Insert}", "_getpixel")
HotKeySet("{Esc}", "_exit")
While True
Sleep(15)
WEnd
Func _getpixel()
Local $_color = 0x6699FF
Local $_coordMouse = MouseGetPos ()
Local $_coord = PixelSearch ($_coordMouse[0], $_coordMouse[1], $_coordMouse[0] +1, $_coordMouse[1] +1, $_color, 70)
If Not @error Then
MouseClick("left")
Else
MsgBox(0,"Inf.", "Error")
EndIf
EndFunc
Func _exit()
Exit
EndFunc
HotKeySet("{Insert}", "_getpixel")
HotKeySet("{Esc}", "_exit")
While True
Sleep(15)
WEnd
Func _getpixel()
Local $_color = 0xCCCCCC
Local $_coordMouse = MouseGetPos ()
Local $_coord = PixelSearch ($_coordMouse[0], $_coordMouse[1], $_coordMouse[0] +1, $_coordMouse[1] +1, $_color, 70)
If Not @error Then
MsgBox (0, "Inf.", "Founded at "& $_coord[0] &"x"& $_coord[1])
Else
MsgBox (0, "Inf.", "Fail! Got error.")
EndIf
EndFunc
Func _exit()
Exit
EndFunc
If IsArray ($_coord) Then
...
Быстрее не будет. Но бывают ситуации когда только через него можно добиться желаемого результата. Я как то наткнулся когда меня PixelSearch "подвёл". Пусть дольше но в итоге вопрос решился.Ты думаешь через WinApi будет быстрее и стоит обратить внимание на него?
HotKeySet("{Insert}", "_getpixel")
HotKeySet("{Esc}", "_exit")
While True
Sleep(15)
WEnd
Func _getpixel()
Local $_color = 0xFFFF00 ; жёлтый
;Local $_color = 0x99FFFF ; голубой
Local $_coordM = MouseGetPos ()
Local $_coord = PixelSearch ($_coordM[0], $_coordM[1], $_coordM[0] +20, $_coordM[1] +20, $_color, 20)
If Not @error Then
MsgBox (0, "Inf.", "Founded at "& $_coord[0] &"x"& $_coord[1])
Else
MsgBox (0, "Inf.", "Fail! Got error.")
EndIf
EndFunc
Func _exit()
Exit
EndFunc
HotKeySet("{Insert}", "_getpixel")
HotKeySet("{Esc}", "_exit")
While True
Sleep(15)
WEnd
Func _getpixel()
Dim $_color[3][3]
$_color[0][0] = 2 ; счётчик
$_color[1][1] = 0xFFFF00 ; цвет
$_color[1][2] = "yellow" ; описание
$_color[2][1] = 0x99FFFF
$_color[2][2] = "blue"
Local $_coordM = MouseGetPos ()
Local $_coord
For $i = 1 To $_color[0][0]
$_coord = PixelSearch ($_coordM[0], $_coordM[1], $_coordM[0] +20, $_coordM[1] +20, $_color, 20)
If Not @error Then
MsgBox (0, "Inf.", "Founded '"& $_color[$i][2] &"' ("& $_coord[0] &";"& $_coord[1]&").")
ExitLoop
EndIf
Next
MsgBox (0, "Inf.", "Nothing found.")
EndFunc
Func _exit()
Exit
EndFunc