Помогите сделать авто-кликер

[wnc]

Мне нужно сделать программу которая при наведении на определённый цвет , будет срабатывать mouse1.

[ferget]

вам сюда (http://forum.oszone.net/forum-103.html)

[wnc]

Простите я случайно перепутал , перенесите пожалуйста .

[ferget]

вот простейший вариант


$i = 0
While $i <= 10
$aPos = MouseGetPos()
$var = PixelGetColor( $aPos[0] , $aPos[1] )
If $var = 15791353 Then
MouseClick("Left")
EndIf
WEnd

[wnc]

Где задан цвет ? Ну к примеру мне нужен этот RGB "000000255"

[ferget]

цвет задается здесь
If $var = 15791353 Then

[wnc]

А в чем он задан?

[ferget]

Десятичный цвет

[wnc]

А как мне вычислить цвет на который оно будет кликать ? Есть какая-то утилита ?

[ferget]

можно использовать вот такой скрипт

#include <Misc.au3>

While 1
If _IsPressed('01') Then
$aPos = MouseGetPos()
$var = PixelGetColor( $aPos[0] , $aPos[1] )
MsgBox(4096,"Цвет", 'Десятичный цвет: '&$var)
EndIf
Sleep(10)
WEnd

кликнуть в нужное место

[wnc]

А как сделать чтобы если я выхожу к примеру за територию цвета 0x212121 , срабатывался MouseClick("Left").

[ferget]

поясните вопрос

[wnc]

Предположим что это flash игра , и нужно собрать все цели , цели разного цвета , но фон один. Вот нужно что-бы я просто водил мышкой по целям , а при наведении на другой цвет кроме 0x212121 срабатывала MouseClick("Left").

[ferget]

проще всего


If $var <> нужный цвет Then
тут кликаем


только аккуратно, продумайте выход из скрипта

[wnc]

Скиньте пожалуйста код целиком. ))

[ferget]

HotKeySet("{ESC}", "Terminate")

While 1
$aPos = MouseGetPos()
$var = PixelGetColor( $aPos[0] , $aPos[1] )
If $var <> 15791353 Then
MouseClick("Left")
EndIf
WEnd

Func Terminate()
Exit 0
EndFunc

выход на клавишу ESC

[wnc]

Работает , но есть одна проблема оно клацает постоянно, нужно что-бы кликало 1 раз.

Оно место 1 раза , кликает 3 раза. Может можно блокировать клик на заданное количество времени после MouseClick?

Всё спасибо , сделал сам =)

[wnc]

А как в исключение добавить несколько цветов?

[ferget]

примерно так

If $var <>6 AND $var <>5 AND $var <>7 Then

[wnc]

А можно сделать что-бы оно игнорировала цвета начинающиеся на 0xC****** ?