when pixel is red press k one time

[mrtgtr]

expandcollapse popup

Global $Paused
HotKeySet("{Home}", "TogglePause")

HotKeySet("{End}", "Stop") ;script can be stopped by pressing -

Sleep(4000) ;wait some time before starting the Script cycle, to allow the user to navigate to the correct window

While 1 ;repeat endlessly

;Mana basma

PixelSearch( 43, 79, 43, 79, 0x000000 )
If Not @error Then
Send("{2 down}")
sleep(3000)
Send("{2 up}")
EndIf


$a1HIGH= PixelSearch( 965, 150, 965, 150, 0x000000 )
If Not @error Then
Opt("MouseClickDownDelay",500)
MouseClick("left", $a1HIGH[0], $a1HIGH[1], 1)
Send("{4 down}")
sleep(1500)
Send("{4 up}")
EndIf


PixelSearch( 1000, 154, 1000, 154, 0x099000 )
PixelSearch( 1000, 198, 1000, 198, 0x990000 )
PixelSearch( 1000, 244, 1000, 244, 0x990000 )
PixelSearch( 1000, 289, 1000, 289, 0x990000 )
PixelSearch( 1000, 336, 1000, 336, 0x990000 )
PixelSearch( 1000, 380, 1000, 380, 0x990000 )
PixelSearch( 1000, 424, 1000, 424, 0x990000 )
PixelSearch( 1000, 468, 1000, 468, 0x990000 )
If Not @error Then
send("{k down}")
sleep(100)
send("{k up}")
EndIf

ToolTip("runing")
WEnd ;repeat
Func TogglePause()
$Paused = not $Paused
While $Paused
ToolTip("paused")
sleep(100)
WEnd


EndFunc

Func Stop() ;to allow the script to stop
Exit ;same
EndFunc ;same

this macro is pressing "k" key continuous...

but I want to this...

if this coordinates are red press "k" key at one time, if they are red again press "k" key one time

I wrote coordinates at top I will rewrite

PixelSearch( 1000, 154, 1000, 154, 0x099000 )

PixelSearch( 1000, 198, 1000, 198, 0x990000 )

PixelSearch( 1000, 244, 1000, 244, 0x990000 )

PixelSearch( 1000, 289, 1000, 289, 0x990000 )

PixelSearch( 1000, 336, 1000, 336, 0x990000 )

PixelSearch( 1000, 380, 1000, 380, 0x990000 )

PixelSearch( 1000, 424, 1000, 424, 0x990000 )

PixelSearch( 1000, 468, 1000, 468, 0x990000 )

I guess what I'm saying

[MouseSpotter]

For one thing - @error is reset on each pixelsearch call - so only the last is relevant to @error

PixelSearch( 1000, 468, 1000, 468, 0x990000 )

If Not @error Then send("{k down}") sleep(100) send("{k up}")

[JohnOne]

Use PixelGetColor() you have incorrect usage of PixelSearch()

[water]

Can you please tell us which application you try to automate? There is often an easier and more reliable way to do what you want.

[mrtgtr]

up

[mrtgtr]

please give codes friends

I will do copy paste

because I have bad english I dont understand to writen

[Melba23]

mrtgtr,

Please do not bump your own threads within 24 hrs.

Remember this is not a 24/7 support forum - those who answer are only here because they like helping others and have some time to spare. You just have to wait until someone who knows something about your particular problem, and is willing to help, comes online.

And you have not told us what app you are trying to automate - please help us to help you.

M23