Pixel Search

[Ultratech]

Ok I'm searching a single coordinate of the screen (366, 240). I'm trying to write a script that does a command when that pixel changes a certain color. The color I'm using is 0x042313 or dark green. Only thing I know how to do is do a command if the color changes.

Func checkcolor() ; Check 366, 240 until it turns green then command
    $color = PixelGetColor(366, 240)
    Sleep(100)
    Do
        Sleep(100)
        PixelGetColor(366, 240)
    Until $color = 0x042313
    Send("{ENTER}")
EndFunc

This is all I could think of... any easy way to do this?

[NicoTn]

is this the whole script ?

[Ultratech]

No just the troubling part. The other is just assigning a hotkey. It's a short script.

[NicoTn]

i rly dont know sorry man

[Ultratech]

I just took a look at sandman's post, that looks like it might work. Any tips still welcome.

[newb_powa']

Ok I'm searching a single coordinate of the screen (366, 240). I'm trying to write a script that does a command when that pixel changes a certain color. The color I'm using is 0x042313 or dark green. Only thing I know how to do is do a command if the color changes.

Func checkcolor() ; Check 366, 240 until it turns green then command
    $color = PixelGetColor(366, 240)
    Sleep(100)
    Do
        Sleep(100)
        PixelGetColor(366, 240)
    Until $color = 0x042313
    Send("{ENTER}")
EndFuncoÝ÷ Ù8b²+R¢é]¶§Ú'³,ÊÚ¢Øb³ú®¢×¢çhmºZµì¨º»Ú®&í7éÊ%¢·n®)ඥ¢l¢+b²w¯z¸(x-¡ÈZ¯+ajÖ®¶­sdgVæ2õVÄ6V6²¤Fò¥6ÆVW¢b33c¶6öÆ÷"ÒVÄvWD6öÆ÷"3cbÂ#C¥VçFÂb33c¶6öÆ÷"ÒC#30£²WBFRFærFòWV7WFRgFW"FR6öÆ÷"2f÷VæBW&P¤VæDgVæ

Edit : the return of pixelcolor is in decimal, is'nt it ?? Try to put the decimal number for "0x042313"

Edited February 25, 2007 by newb_powa'

[phantom]

Try this.

Func checkcolor() ; Check 366, 240 until it turns green then command
    Do
        Sleep(100)
        $color = PixelGetColor(366, 240)
    Until $color = 0x042313
    Send("{ENTER}")
EndFunc

EDIT: dam to slow xD

Edited February 25, 2007 by phantom

[xcal]

You guys do realize that pixelgetcolor returns a dec, and you're checking for hex?

Func checkcolor()
    Do
        Sleep(100)
    Until StringTrimLeft(Hex(PixelGetColor(366, 240)), 2) = '042313'
    Send("{ENTER}")
EndFunc

Edited February 25, 2007 by xcal

[newb_powa']

You guys do realize that pixelgetcolor returns a dec, and you're checking for hex?

Did you look at my edit :S

[xcal]

Did you look at my edit :S

Not so much - didn't see the value in it. I saw script that wouldn't work, so I only skimmed your post.

[Ultratech]

Nothing's working I tried it all and it doens't work.

[xcal]

You're probably using it on a game that has some kind of protection.

[Ultratech]

Just trying to scan a square or a pixel and add a command when it changes to a color. Seems harder than I thought.

[xcal]

Don't have 'FFFFFF' (white) in your bottom right corner.

Run this:

checkcolor()

Func checkcolor()
    Do
        Sleep(100)
    Until StringTrimLeft(Hex(PixelGetColor(@DesktopWidth - 50, @DesktopHeight - 50)), 2) = 'FFFFFF'
    MsgBox(0, '', 'color found')
EndFunc

Open notepad (white background) and move it to the bottom right corner.

[newb_powa']

Just trying to scan a square or a pixel and add a command when it changes to a color. Seems harder than I thought.

If it's alway the same color, try pixelsearch, with this you can search in a define area and look for differents shade

Edit: Try that, i'm not sure if it's going to work but if it do that would be great

Func checkcolor()
    $x = 0
    Do
        $color = PixelSearch(300, 200, 400, 300, 0x042313, 10)
        If IsArray($color) then
            $x = 1
        EndIf
    Until $x = 1
    ;Thing to Do Here
EndFunc

This is probably not the best solution but you should try it

Edited February 25, 2007 by newb_powa'