Что нового

Простой бот по определению цвета в области экрана ( оплата 2000р)

Igoreh96

Новичок
Сообщения
2
Репутация
0
Нужен бот который ищет в выделенной области экрана 3 цвета и по нахождению определённого цвета , нажимает определённую кнопку. Появился красный, бот нажимает кнопку вниз, появился синий , бот жмет кнопку вверх, появился сиреневый , жмет контр.
Сообщение автоматически объединено:

Готов оплатить 2к рублей за работу.
 

ra4o

AutoIT Гуру
Сообщения
1 121
Репутация
231
Координаты и более точно цвета поставьте свои
Скрипт будет ждать появление одного из цвета , нажмёт кнопку , потом дождётся , пока этот цвет исчезнет и будет дальше ждать появление цвета
Код:
Local $Color[3] = [0xFF0000, 0xFF0000, 0x5F04B4]
Local $Key[3] = ['{DOWN}', '{UP}', '{LCTRL}']
Local $shade_variation = 100;Число от 0 до 255, показывающее, на сколько может отличаться красная, зелёная и синяя компоненты цвета. 0-точное совпадение.
Local $left=0;Координата x левой стороны прямоугольника
Local $top=0;Координата y верхней стороны прямоугольника
Local $right=150;Координата x правой стороны прямоугольника
Local $bottom=200;Координата y нижней стороны прямоугольника

While 1
    For $i = 0 To 2
        PixelSearch($left, $top, $right, $bottom, $Color[$i], $shade_variation)
        If Not @error Then
            Send($Key[$i])
            While  PixelSearch($left, $top, $right, $bottom, $Color[$i], $shade_variation)
                Sleep(500)
            WEnd
        EndIf
       Sleep(200)
    Next
WEnd
 
Автор
I

Igoreh96

Новичок
Сообщения
2
Репутация
0
Цвета никуда не исчезают а остаются, просто съезжают, я вам ответил в личку и по поводу оплаты задал вопрос
Сообщение автоматически объединено:

Координаты и более точно цвета поставьте свои
Скрипт будет ждать появление одного из цвета , нажмёт кнопку , потом дождётся , пока этот цвет исчезнет и будет дальше ждать появление цвета
Код:
Local $Color[3] = [0xFF0000, 0xFF0000, 0x5F04B4]
Local $Key[3] = ['{DOWN}', '{UP}', '{LCTRL}']
Local $shade_variation = 100;Число от 0 до 255, показывающее, на сколько может отличаться красная, зелёная и синяя компоненты цвета. 0-точное совпадение.
Local $left=0;Координата x левой стороны прямоугольника
Local $top=0;Координата y верхней стороны прямоугольника
Local $right=150;Координата x правой стороны прямоугольника
Local $bottom=200;Координата y нижней стороны прямоугольника

While 1
    For $i = 0 To 2
        PixelSearch($left, $top, $right, $bottom, $Color[$i], $shade_variation)
        If Not @error Then
            Send($Key[$i])
            While  PixelSearch($left, $top, $right, $bottom, $Color[$i], $shade_variation)
                Sleep(500)
            WEnd
        EndIf
       Sleep(200)
    Next
WEnd
посмотрите личку пожалуйста
 

Вложения

Верх