Pixel Seach Question

[Guest TeraNox]

ok

Im kinda newbish, ive only had the prgram for about 6 hours

well, im trying to create a script that will automatically find a hotspot in a program,

well its a game, im doing this for, and what happebns, is a chest dropps, and you have to click on it to open it, no other way i know of doing it.

and then a little bock will appear with 6 slots and some items in it, and you click on the items to grab them

What ive been trying to do is, ahve it automatically grab all this stuff, becasue its would be ausome to automatically grab an item, and not acidently miss it, becasue the box disapears before you get to click on it.

MY idea so far was, scan for a certain color, and when it found that color, scan for another color in smaller region around the pixel that was found (becasue the terrain has many of teh same colors as the chest and it continually will clikc on the teraain, and mess my movement up) and then if it finds the second pixel, right click on that pixel.

once that happens, i want to increase the pixel scaning area, and search for another color, (then search for antoher in a small area areound the first, like before) so it can pick up the item, and once it finds the pixel, left click.

and repeat

Ive been having trouble getting it to work, isd there a better way that searching for colors?, i know there is diferent pixel scans, but ive tried them ,adn so far teh color works the best for me.

------------Here is my script so far------------

$coord = Pixelsearch(120, 450, 900, 700, 0x100c00, 10, 3)

Dim $x1 = "$coord[0]" + "50"

Dim $x2 = "$coord[0]" - "50"

Dim $y1 = "$coord[1]" + "50"

Dim $y2 = "$coord[1]" - "50"

if not @error then

Dim $coord2 = pixelsearch($x1, $y1, $x2, $y2, 0x6b6163, 3, 5)

endif

  if not @error then

  Mouseclick("right", $coord2[0], $coord2[1])

endif

Dim $xxx1 = "$coord2[0]" + "300"

Dim $xxx2 = "$coord2[0]" - "300"

Dim $yyy1 = "$coord2[1]" + "300"

Dim $yyy2 = "$coord2[1]" - "300"

if not @error then

dim $coord3 = PixelSearch($xxx1, $yyy1, $xxx2, $yyy2, 0xffffef, 0)

endif

Dim $xxxx1 = "$coord3[0]" + "50"

Dim $xxxx2 = "$coord3[0]" - "50"

Dim $yyyy1 = "$coord3[1]" + "50"

Dim $yyyy2 = "$coord3[1]" - "50"

  if not @error then

dim $coord4 = pixelsearch($xxxx1, $yyyy1, $xxxx2, $yyyy2, 0x000000, 0

endif

 

If not @error then

mouseclick("left",$coord4[0], $coord4[1], 1, 0)

endif

  if not @error then

  sleep(3000)

endif

I had a loop too, but that started messign up, cant figure out why, it woul say, WEnd sisnt have valid While

My whiel looked liek this

$i = 1

while $i <=15

---script---

WEnd

thanks in advance.

[Guest TeraNox]

*BUMP*

[dexxa]

wut kinda game?

it might be hard to search for one color cuz in games like cs, almost every pixel has a different color. and the color of a pixel also changes.

[Guest TeraNox]

its called knight online, its similar to diablo 2

[Blue_Drache]

its called knight online, its similar to diablo 2

<{POST_SNAPBACK}>

One thing I'm seeing is all the @error checks. DIM doesn't return an @error...so why are you checking for it, besides the pixelsearch failure?

I'd think that you'd be better off checking to see if your $coord# variable is returned as an array with IsArray()