Решил сделать функцию, которая в отличие от Pixelsearch ищет в заданной области пиксели, по цвету отличающиеся от заданного и , если находит, то присваивает @error=true, иначе false. Однако не находит пиксели (а они точно есть в данной области).
Код:
Global $Oblast
Local $OptOblast[5] = [1, 1, 100, 100, 0x000000] ;область 100х100
Pixelmono($OptOblast[0], $OptOblast[1], $OptOblast[2], $OptOblast[3], $OptOblast[4]) ;ищем, есть ли в указанной области пиксели другого цвета, кроме указанного (черного)
If @error Then
$Oblast = "Есть пиксели другого цвета"
Else
$Oblast = "Нет пикселей другого цвета"
EndIf
Func PixelMono ($x1, $y1, $x2, $y2, $cv)
Local $x, $y
Local $error = 0
$y=$y1
While $y<=$y2 & $error = 0
$x=$x1
While $x<=$x2 & $error = 0
PixelSearch ($x, $y, $x, $y, $cv)
If @error Then
$error = 1
EndIf
$x=$x+1
WEnd
$y=$y+1
WEnd
EndFunc