Серый форум — AHK: ImageSearch. Найти все элементы, соответствующие критериям

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-09-18T12:03:11Z

serzh82saratov, функция DragSearch находит координаты на основе найденных изображений из предложенных. В моем случае, при удачном срабатывании сценария, изображение из конечной координаты для перетаскивания всегда меняется на одно из заданных, но так как скрипт не всегда срабатывает с первого раза, хотелось бы добавить сравнение данного изображения после команды MouseClickDrag, и в случае, если изображение осталось неизменным, повторить MouseClickDrag.

Например, в моем случае, конечной координатой может быть изображение с индексом от 1 до 4:


If DragSearch(100, 100, 1300, 725, [["image", 1, 2, "png"], ["2nd-image", 1, 4,"png"]], M) {
	MouseClickDrag, Left, M.X1, M.Y1, M.X2, M.Y2
}
Return

Далее, к примеру, функция обнаружила изображение 2nd-image3, после чего записала его положение в качестве конечной координаты для перетаскивания. Потом, после перетаскивания, это изображение сменилось на любое другое из заданных, например, 2nd-image1 или 2nd-image4 - это значит, что скрипт закончил работу корректно. Но если изображение осталось прежним, т.е. 2nd-image3 - необходимо повторить MouseClickDrag.

Как добавить в сценарий такое сравнение?

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-23T13:38:10Z

KusochekDobra, Спасибо! Попытаюсь проанализировать описание приложив его к сценарию.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-23T12:57:23Z

Циклы "While (условие)" выполняются, пока "условие" возвращает "истина". В том примере "истиной" является само условие, поэтому цикл бесконечный. Это просто пример. Вы же приобщаетесь ко всеобщей мудрости, верно? Полезно, когда примеры разнообразны.
В примере serzh82saratov нет регулярных выражений. Очень содержательный в плане разнообразия пример.
DragSearch() - принимает после координат области поиска, массив, с массивами данных о двух типах фрагментов, которые предполагается найти. В них параметры по счёту:
1 - имя/путь файла без расширения(напр.:"Изображение" или "C:\MyFolder\Изображение").
2 - первый индекс изображения(напр.:"Изображение0", где 0 - его индекс).
3 - последний индекс изображения(напр.:"Изображение3", где 3 - его индекс).
4 - расширение файла изображения.
После чего, оба массива перебираются по очереди в пределах разницы индексов между третьим и вторым параметром. Если изображение было найдено, его координаты присваиваются полям объекта "arr", который связан по ссылке с параметром "M" в вызове функции DragSearch() и происходит переход ко второму массиву, с данными о другом изображении. Если перебор цикла завершился а изображение не было найдено, DragSearch() завершает работу возвращая вызывающему коду "ложь". В этом случае "MouseClickDrag" произведено не будет, иначе, значения присвоенные полям объекта "M" извлекаются оператором "."(точка) прямо в процессе "MouseClickDrag" и происходит ожидаемый эффект.

Как всегда, "E=MC2"!

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T22:59:29Z

serzh82saratov, извиняюсь, все-таки я неверно внес данные о файлах. Все работает. Спасибо! Конечно, мне совсем не ясна структура функции в виду ее оформления посредством регулярных выражений. В этом смысле вариант от KusochekDobra проще для понимания. Только интересно, почему цикличный поиск в его варианте оформлен не с помощью loop, а с помощью while (true). Конечно, я бы его исключил, т.к. необходим поиск по горячей клавише, но все-таки интересно, в чем отличие и как это работает.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T22:17:58Z

[["PicOne", 1, 2, "png"], ["PicTwo", 1, 3, "png"]]

Из этого:

serzh82saratov пишет:

["", 0, 3, "png"] - ищем сначала от 0.png до 3.png.
["a", 1, 4,"png"] - после от a1.png до а4.png. Вместо первого ключа "a" (префикса) может быть и путь до числа.

Вроде такой же вывод получается.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T22:14:23Z

serzh82saratov, изображений в моем случае всего пять: PicOne1.png, PicOne2.png, PicTwo1.png, PicTwo2.png, PicTwo3.png.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T21:42:07Z

Ну то есть 2 картинки PicOne1.png и PicTwo1.png, а индексы зачем, если их всего 2?

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T21:39:58Z

serzh82saratov, изображения кладу рядом со скриптом, поэтому, полный путь выглядит именно так.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T21:33:32Z

Ну а искать то какие надо пути?

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T21:30:53Z

If DragSearch(100, 100, 1300, 725, [["", 0, 3, "PicOne.png"], ["a", 1, 4,"PicTwo.png"]], M)

Насчет необходимости дописывания индексов в Вашем варианте не в курсе, поэтому, пробовал указывать и оригинальные названия: PicOne1.png, PicTwo1.png

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T21:10:41Z

becauseim пишет:

Внес в кавычки вместо "png" полные пути к изображениям

Это как?

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T21:08:49Z

serzh82saratov, спасибо! Но кажется, я не понял, как использовать такой вариант. Внес в кавычки вместо "png" полные пути к изображениям - не сработало. Пользуюсь простым вариантом от Malcev.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T20:25:05Z

Лучше сразу так:

#SingleInstance Force
#NoEnv
ListLines Off
SetBatchLines -1
CoordMode, Pixel
CoordMode, Mouse

1:: 
	If DragSearch(100, 100, 1300, 725, [["", 0, 3, "png"], ["a", 1, 4,"png"]], M) 
		MouseClickDrag, Left, M.X1, M.Y1, M.X2, M.Y2, 10
	Return
 

DragSearch(x1, y1, x2, y2, r, byref arr)  { 
	For i, v in r, arr := {}
		Loop % (c := v[3] - v[2] + 1) {
			ImageSearch, mX, mY, x1, y1, x2, y2, % v[1] (v[2] - 1 + A_Index) "." v[4]
			If !ErrorLevel && (1, arr["X" i] := mX, arr["Y" i] := mY) 
				Break
			If (A_Index = c)
				Return 0, arr := ""
		} Return 1
}

Esc::
	ExitApp

А то вдруг понадобится не 2 группы картинок, а 10.

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T20:16:17Z

["", 0, 3, "png"] - ищем сначала от 0.png до 3.png.
["a", 1, 4,"png"] - после от a1.png до а4.png. Вместо первого ключа "a" (префикса) может быть и путь до числа.


#SingleInstance Force
#NoEnv
CoordMode, Pixel
CoordMode, Mouse 

1:: 
	If DragSearch(100, 100, 1300, 725, ["", 0, 3, "png"], ["a", 1, 4,"png"], M) 
		MouseClickDrag, Left, M.X1, M.Y1, M.X2, M.Y2, 0
	Return

DragSearch(x1, y1, x2, y2, r1, r2, byref arr)  {
	Loop % 2 . (arr := {})
		Loop % (i := A_Index) * 0 + (c := r%i%[3] - r%i%[2] + 1)
		{
			ImageSearch, mX, mY, x1, y1, x2, y2, % r%i%[1] (r%i%[2] - 1 + A_Index) "." r%i%[4]
			If !ErrorLevel && (1, arr["X" i] := mX, arr["Y" i] := mY) 
				Break
			If (A_Index = c)
				Return 0, arr := ""
		}
	Return 1
}

Esc::
	ExitApp

Re: AHK: ImageSearch. Найти все элементы, соответствующие критериям

2017-01-22T16:55:38Z

Интересно было бы взглянуть на функцию.

Так сделайте. По аналогии:
http://www.script-coding.com/AutoHotkey/Functions.html