Добрый день! Подскажите пожалуйста, как в функции PixelSearch задать исключение из заданного квадрата пикселей с определёнными координатами? И как потом убрать это ограничение?
Смысл:
Есть квадрат, в нём ищется пиксель определённого цвета, после этого идёт проверка, чтобы вокруг найденного пикселя отсутствовали пиксели определённого цвета, если пиксели данного цвета присутствуют, то координаты должны игнорироваться (желательно добавлять такие координаты в массив) После окончания проверка квадрата идёт обновление страницы и новый поиск, перед обновлением нужно очистить список исключённых координат. (Если координаты добавляются в массив, то особенных проблем возникать не должно)
Добавлено:
Попытался реализовать. Не знаю насколько успешно получилось, утром проверю. Полный скрипт:http://autoit-script.ru/index.php/topic,12090.0.html
Как выглядит в общем:
Добавлено:
Данный код рассредоточен по остальному коду, я вырезал только его самое =)
Добавлено:
Мдя =( Выяснил, что не умею задавать двумерные массивы =(( Подскажите пожалуйста, как исправить Dim !!!
Смысл:
Есть квадрат, в нём ищется пиксель определённого цвета, после этого идёт проверка, чтобы вокруг найденного пикселя отсутствовали пиксели определённого цвета, если пиксели данного цвета присутствуют, то координаты должны игнорироваться (желательно добавлять такие координаты в массив) После окончания проверка квадрата идёт обновление страницы и новый поиск, перед обновлением нужно очистить список исключённых координат. (Если координаты добавляются в массив, то особенных проблем возникать не должно)
Добавлено:
Сообщение автоматически объединено:
Попытался реализовать. Не знаю насколько успешно получилось, утром проверю. Полный скрипт:http://autoit-script.ru/index.php/topic,12090.0.html
Как выглядит в общем:
Код:
Dim $time2, $fail[100][2],$1Fail, $2Fail
$1Fail = 0 ; ]
; }Отвечают за координаты X,Y забракованного пикселя
$2Fail = 0 ; ]
If @error Then
For $1Fail=0 To 99
For $2Fail = 0 To 1
If (($a<>$fail[$1Fail][$2Fail]) And ($b<>$fail[$1Fail][$2Fail])) Then
;Жмем на $res
Sleep(100)
MouseClick("left", $a, $b,2)
Sleep(1000)
EndIf
Next
Next
Func Obnulenie ()
For $1Fail=0 To 99
For $2Fail = 0 To 1
$fail[$1Fail][$2Fail]=0
Next
Next
EndFunc
Добавлено:
Сообщение автоматически объединено:
Данный код рассредоточен по остальному коду, я вырезал только его самое =)
Добавлено:
Сообщение автоматически объединено:
Мдя =( Выяснил, что не умею задавать двумерные массивы =(( Подскажите пожалуйста, как исправить Dim !!!