Check for a color and then click where that color is?

[sandman]

How is this possible to do something like this? I know how to check the pixel colors, but how can i search for the color of a pixel and then get its coordinates? I am really unsure about this and I need some help badly.

Thanks,

sandman

[NicoTn]

very simple

its in the help file

$xy = PixelSearch( 0, 0, 20, 300, 0xFF0000, 10 )
MsgBox(0, "X and Y are:", $xy[0] & "," & $xy[1])

$xy[0] = the x

$xy[1] = the y

Edited February 25, 2007 by Str!ke

[sandman]

No but searching anywhere on the screen, not just in one place.

[BuddyBoy]

I have had much help from the autoit community, so its time to help others

While 1
                  $pixelsearch = Pixelsearch(0, 0, @Desktopwidth, @DesktopHeight, "0x000000", 1, 38);color goes after 0x, 1, cant remember what that does lol, and the 38 means it searches every 38 pixels for the color
                If @error <> 1 then
                  MouseClick("right", $pixelsearch[0], $pixelsearch[1] )
                Endif
            Wend

[sandman]

Ah, okay. Thanks for the help, although I designed it a bit differently than yours while I was thinking about it.

Func loot()
    While 1
        $treasure = PixelSearch(0, 0, 1280, 1024, "40281e") ; Search for a treasure box
        If Not @error Then
            MouseClick("", $treasure[0], $treasure[1])
            Sleep(2000)
        EndIf
        $loot1 = PixelSearch(0, 0, 1280, 1024, "796d5f") ; Search for money if it is dropped
        If Not @error Then
            MouseClick("", $loot1[0], $loot1[1])
        EndIf       
        Sleep(1000)
    WEnd
EndFunc

[J0ker]

A scanner

For $i = 602 to 796 ; x coordinates
    For $j = 133 to 301 ; y coordinates
        $color = PixelGetColor($i, $j)
        If $color = "0" Then ConsoleWrite("(" & $i & "," & $j & ")" & @CRLF)
    Next
Next