Поиск многожество Картинок

[deny]

Как реализовать через Imagesearch в одном скрипте
примерно есть 10 скринов и надо чтоб он искал эти скрины и как реализовать ?
не все сразу ,а нашёл один ,если есть ещё на экране ,то опять движение и так к каждому, как
поисковик

while 1
#include <ImageSearch.au3>
$res = _ImageSearch("Скрин1",1,'',"",100)
    If $res = 1 Then
Msbox(0,'Нашёл', 'Скрин1',1)
MouseMove($x1, $y1, 1)

wend

 

[Zaramot]

А если так ?:

#include <ImageSearch.au3>

For $i = 0 To 10
   $res = _ImageSearch("Скрин1",1,'',"",100)
   If $res = 1 Then
      Msgbox(0,'Нашёл', 'Скрин1',1)
      MouseMove($x1, $y1, 1)
   Endif
Next

 

[deny]

и как чтоб он проверял 10 скринов?

 

[Arei]

#include <ImageSearch.au3>

For $i = 0 To 10
   $res = _ImageSearch("Скрин1",1,'',"",100)
   If $res = 1 Then
      Msgbox(0,'Нашёл', 'Скрин1',1)
      MouseMove($x1, $y1, 1)
   Endif
Next

для работы этого скрипта, ты в конце т.е

#include <ImageSearch.au3>
$w = "путь до картинки первый поиск кариинки"

For $i = 0 To 10
   $res = _ImageSearch($w,1,'',"",100)
   If $res = 1 Then
      Msgbox(0,'Нашёл', 'Скрин1',1)
      MouseMove($x1, $y1, 1)
   Endif
$w = "путь до картинки следующих 9"
Next

менять каждый раз данные расположения картинок.

 

[deny]

$I - это что?
а что если не найдёт,то будет просто дальше цикл идти?

 

[Arei]

$I

где ты это нашёл, может

$i

то это переменная,всё точнее почитай в справке про циклы,что бы разобраться.

 

[deny]

это тоже самое $i )

 

[deny]

вот не понел хоть убейся, можно примерчик ,надо чтоб скрипт искал все 10 скриншотов на экране . :-\

 

[eropov]

Я не совсем понял, что вы хотели получить, возможно так:

Спойлер

#include <ImageSearch.au3>

While 1
	$res = _ImageSearch("Скрин1",1,'',"",100)
	If $res = 1 Then
	Msgbox(0,'Нашёл', 'Скрин1',1)
	MouseMove($x1, $y1, 1)
	ContinueLoop 1 ;Заходим на новый круг
	Else
	ExitLoop 1 ;Выходим из цикла
   Endif
WEnd

 

[deny]

#include <ImageSearch.au3>

$x1 = 0
$x2 = 0
while 1

$res1 = _ImageSearch("test1.bmp",1,$x1,$x2,100)
    If $res1 = 1 Then
MsgBox(0,'Нашёл', 'Скрин1',1)
MouseMove($x1,$x2,1)


EndIf
$res2 = _ImageSearch("test2.bmp",1,$x1,$x2,100)
    If $res2 = 1 Then
MsgBox(0,'Нашёл', 'Скрин1',1)
MouseMove($x1, $y1, 1)

EndIf

$res2 = _ImageSearch("test3.bmp",1,$x1,$x2,100)
    If $res2 = 1 Then
MsgBox(0,'Нашёл', 'Скрин1',1)
MouseMove($x1, $y1, 1)
EndIf
wend

как это реализовать?
чтоб проходил по циклу .
или как чтоб выбирал из папки со скринами кадждый скрин

 

[Garrett]

deny [?]

как это реализовать?

Можно так:

#include <ImageSearch.au3>
#include <Array.au3>

Dim $aImgs[3][2] = [["1.bmp", 0], ["2.bmp", 0], ["3.bmp", 0]]
Dim $sDirPath = @ScriptDir & "\Screenshots\"

_ArrayDisplay($aImgs)

For $i = 0 To UBound($aImgs) -1
	
	Local $x, $y
	
	$aImgs[$i][1] = _ImageSearch($sDirPath & $aImgs[$i][0], 1, $x, $y,0)
	If $aImgs[$i][1] Then
		MsgBox(64,'Success', 'Скрин найден!' & @CRLF & $aImgs[$i][0], 2)
		MouseMove($x, $y, 1)
	Else
		MsgBox(48,'Failure', 'Скрин не найден!', 2)
	EndIf
Next

_ArrayDisplay($aImgs)

 

[deny]

Спасибо,большое :beer:
И как зациклить,что повторялся скрипт?
в
While 1
wend
поставить?
Все спс ,кто помог хотел и биг пасибо кто помог) :beer:

 

[Garrett]

deny [?]

в While 1 end поставить?

Ну, если While это оператор цикла, то да ;)

 

[deny]

спс уже сам понел) :beer: