Search for color and move to it?

[vivec45]

How do I search an entire window for a color, then move to that color?

Can somebody give me an example script?

Whats wrong with this script? Also, when they say sizes, what is this in? Pixels around the mouse? What is a reasnable number for a normal sized window?

HotKeySet("{f7}", "tp")
$left = 1000
$top = 1000
$right = 1000
$bottom = 1000
$color = 0xff0000
$shadevar = 25
$step = 1

Func tp()
$pos = PixelSearch($left, $top, $right, $bottom, $color, $shadevar, $step)
sleep(2000)
MouseMove($pos[0], $pos[1])
sleep(2000)
MouseClick("Left")
EndFunc

while 1
    sleep(1)
WEnd

Edited May 26, 2008 by vivec45

[d4rk]

PixelSearch()
MouseMove()

[vivec45]

PixelSearch()
MouseMove()

HotKeySet("{f7}", "tp")
$left = 1000
$top = 1000
$right = 1000
$bottom = 1000
$color = 0xff0000
$shadevar = 25
$step = 1

Func tp()
$pos = PixelSearch($left, $top, $right, $bottom, $color, $shadevar, $step)
sleep(2000)
MouseMove($pos[0], $pos[1])
sleep(2000)
MouseClick("Left")
EndFunc

while 1
    sleep(1)
WEnd

Whats wrong with this script? Also, when they say sizes, what is this in? Pixels around the mouse? What is a reasnable number for a normal sized window?

[Drew]

This may not work but heres the logic behind it:

WinGetClientSize gets the Size of the CLIENT of the window. Returns the Width of window's client area, and the Height of window's client area.

Well PixelSearch searchs a rectangle that you provide ( in this case the entire window ) for a certain pixel. You have to provide the following coordinates:

The Left Most Coordinate of the Rectangle: In this case, half of your Y return for your size of the window.

The Top Mose Coordinate of the Rectangle: In this case, half of the X return for your size of the window.

And the bottom and Right will be the same as their corresponding axis.

I added Opt( "MouseCoord blah so that it will read coordinates based on the windows Client area... not your entire screen.

I rarely use PixelSearch , so I can't say I used it right. But the logics there, the helpfiles open... Maybe this helps though.

If not, I can look everything up and do it right.

Func Tp()
          $Size = WinGetClientSize ( "ENTER WINDOWS FULL TITLE HERE" ); <--- The Window Tool is Awesome.
      $Pix = PixelSearch( $Size[1]/2, $Size[0]/2, $Size[1]/2, $Size[0]/2, 0xff0000, 25, 1)
      Opt( "MouseCoordMode", 2)
      Sleep( 2000 )
      MouseClick( "Left", $pix[0], $pix[1])
EndFunc

While 1
    Sleep( 5000 )
WEnd

Edited May 26, 2008 by Drew