Repeat Imagesearch

[Hirnverbrannt]

Hello,

im pretty new to coding.
i tried to create a script which should do the following steps:

1. search for image
2. if it appears right click on it
3. if it doesnt appear do some mouse clicks
4. search for image again
5. if it appears right click on it
6 if it doesnt appear do some mouse clicks
and so on and so on

my result is:
without the else part the script is fine and it would right click on the image if it appears, however when i added the else part it wouldnt click on the image anymore if it appeared. (i think i use the else function wrong but let me know what you guys think)

 Spoiler

#include <ImageSearch.au3>

HotKeySet("s", "Start")
HotKeySet("e", "_Exit")

Global $y = 0, $x = 0

Func Start()
While 1
sleep (100)
$file = @DesktopDir & '\Coronet.bmp'
local $search = _ImageSearch($file, 1, $x, $y, 0)
if $search = 1 Then
MouseClick("right", $X, $Y)
Sleep (50)
Else
MouseClick ("left", 929, 691)
Sleep (200)
MouseClick ("left", 960, 459)
Sleep (200)
MouseClick ("left", 960, 359)
Sleep (500)
EndIf
Wend
EndFunc



Func _Exit()
Exit
EndFunc

While 1
Sleep(100)
WEnd

[Moneypulation]

Try using WaitForImageSearch instead and see if that solves your problem

[Hirnverbrannt]

thanks for the help but that didnt work

[Moneypulation]

Give it more shade-variation maybe

[Hirnverbrannt]

i found the mistake. the picture wasnt good somehow and i had to remake it x.x

[VitorCornelius]

Originally Posted by Hirnverbrannt

Hello,

im pretty new to coding.
i tried to create a script which should do the following steps:

1. search for image
2. if it appears right click on it
3. if it doesnt appear do some mouse clicks
4. search for image again
5. if it appears right click on it
6 if it doesnt appear do some mouse clicks
and so on and so on

my result is:
without the else part the script is fine and it would right click on the image if it appears, however when i added the else part it wouldnt click on the image anymore if it appeared. (i think i use the else function wrong but let me know what you guys think)

 Spoiler

#include <ImageSearch.au3>

HotKeySet("s", "Start")
HotKeySet("e", "_Exit")

Global $y = 0, $x = 0

Func Start()
While 1
sleep (100)
$file = @DesktopDir & '\Coronet.bmp'
local $search = _ImageSearch($file, 1, $x, $y, 0)
if $search = 1 Then
MouseClick("right", $X, $Y)
Sleep (50)
Else
MouseClick ("left", 929, 691)
Sleep (200)
MouseClick ("left", 960, 459)
Sleep (200)
MouseClick ("left", 960, 359)
Sleep (500)
EndIf
Wend
EndFunc



Func _Exit()
Exit
EndFunc

While 1
Sleep(100)
WEnd

Try to avoide unnessesery orders:
move this line outsed of the While loop, since u do not have to reload the file over and over again.
$file = @DesktopDir & '\Coronet.bmp'

the sleep functions not realy needed between clicks, you can set a click speed in mouseclick("button", $x, $y, number of clicks, speed) "speed [optional] the speed to move the mouse in the range 1 (fastest) to 100 (slowest). A speed of 0 will move the mouse instantly. Default speed is 10."

As Moneypulation said, use higher tolerance in imagesearch. Something like 50 or 100. value 0 mean find the exactly same image as your image stored in the file.

[FasTZiinnN]

Just alternative

#include <ImageSearch.au3>

HotKeySet("s", "Start")
HotKeySet("e", "_Exit")

;Global $y = 0, $x = 0; dont need Global, you will use in same script
Local $y = 0, $x = 0, $Time_Out = 0
Local $Patch = @DesktopDir & '\Coronet.bmp'

Func Start()
While 1
sleep (100)

Do
Sleep(80)
$Time_Out += 1
Until _ImageSearch($Patch, 1, $x, $y, 0) = 1 Or $Time_Out = 10

If $Time_Out >= 10 Then
MouseClick ("left", 929, 691, 200)
MouseClick ("left", 960, 459, 200)
MouseClick ("left", 960, 359, 500)
Else
MouseClick("right", $X, $Y, 50)
EndIf
Wend
EndFunc

Func _Exit()
Exit()
EndFunc

While 1
Sleep(35)
WEnd

[Goliard2k6]

#RequireAdmin
#include <ImageSearch.au3>

HotKeySet("s", "Start")
HotKeySet("e", "_Exit")

$y = 0, $x = 0

While 1
sleep (100)
$result = _WaitForImageSearch("Coronet.bmp",15,1,$x1,$y1,0)
if $result=1 Then

MouseClick("right", $X, $Y)
Sleep (50)
Else
MouseClick ("left", 929, 691)
Sleep (200)
MouseClick ("left", 960, 459)
Sleep (200)
MouseClick ("left", 960, 359)
Sleep (500)
EndIf
Wend




Func _Exit()
Exit
EndFunc

While 1
Sleep(100)
WEnd


PROBIER DAS MAL