Red Pixel

[trung]

hey guys im playing tantra and i need help with the healing right quick

im using this code right now

HotKeySet("[", "Start")

HotKeySet("]", "Pause")

HotKeySet("\", "Leave")

While 1

Sleep(1000)

WEnd

Func Start()

$x = 167

$y = 647

While 1

If PixelGetColor($x, $y) < 0xEA0E05 Then Send("1")

Wend

EndFunc

Func Pause()

While 1

Sleep(1)

WEnd

EndFunc

Func Leave()

Exit

EndFunc

the pixel is the red im using

and i need help

i was wondering if there is a way to turn that red into any red.....

forinstance

the red i have can sumtimes change and i have to retake the pixel

is there a way to sai

if the spot is not "red" then press one ( it turns to a dark color thats y i have <)

instead of a specific red

i need it to sai any red

thnkx!

[Blue_Drache]

hey guys im playing tantra and i need help with the healing right quick

im using this code right now

HotKeySet("[", "Start")

HotKeySet("]", "Pause")

HotKeySet("\", "Leave")

While 1

Sleep(1000)

WEnd

Func Start()

$x = 167

$y = 647

While 1

If PixelGetColor($x, $y) < 0xEA0E05 Then Send("1")

Wend

EndFunc

Func Pause()

While 1

Sleep(1)

WEnd

EndFunc

Func Leave()

Exit

EndFunc

the pixel is the red im using

and i need help

i was wondering if there is a way to turn that red into any red.....

forinstance

the red i have can sumtimes change and i have to retake the pixel

is there a way to sai

if the spot is not "red" then press one ( it turns to a dark color thats y i have <)

instead of a specific red

i need it to sai any red

thnkx!

Well...hmm... how many reds are there? And is pink a red? What about flourescent puce? .... Ah that IS the question now isn't it? Considering reds range from 0x220000 to 0xff0000 as long as the green and blue portions each stay approximately below 0x50 respectively..... Isn't the moon made of green cheese? And why doesn't your program do anything when I try to run it? Ah....I see ... Everything's in a function.

And now to make sense....

Find the upper range of your red, and your lower range of your red. Convert from Hex to Decimal.

$pixel = PixelGetColour($x,$y)If $pixel <= Dec($UpperRed) and $pixel >= Dec($LowerRed) then   ; Do whateverEndif

Unfotunately, I am on a system that doesn't recognize the @CRLF ....

Edited November 29, 2006 by Blue_Drache

[trung]

lol

rawrr i kno

confusing me

i guess pink would b in the red area haha

kool would my darker red be the upper or the other way around?

Edited November 29, 2006 by trung

[trung]

like this?

i thikn i did it rong lol

its not working

HotKeySet("[", "Start")

HotKeySet("]", "Pause")

HotKeySet("\", "Leave")

While 1

Sleep(1000)

WEnd

Func Start()

$x = 167

$y = 647

$pixel = PixelGetColor($x,$y)

$UpperRed = 15502970

$LowerRed = 10687511

While 1

If $pixel <= dec($UpperRed) and $pixel >= dec($LowerRed) then Send("1")

Wend

EndFunc

Func Pause()

While 1

Sleep(1)

WEnd

EndFunc

Func Leave()

Exit

EndFunc

[trung]

ahh nvm got it

hehe

thnkx

[Blue_Drache]

Glad you were able to finger it out.