Messages

1

Общие вопросы / Re: Анализ картинок

« on: February 05, 2020, 01:14:59 AM »

Спасибо за подсказку походу получилась

Code: (clickermann) [Select]

GETSCREEN
SCREENSHOTFIX ($1_x, $1_y, $1_x1, $1_y1, "1.bmp")


GETSCREEN //1
IF_PICTURE_IN ($1_x, $1_y, $1_x1, $1_y1, "1.bmp")
   LOGWRITE ("Одинаковая1")
   IF_PICTURE_IN ($2_x, $2_y, $2_x1, $2_y1, "1.bmp")
      LOGWRITE ("Одинаковая2")
      GETSCREEN
      IF_PICTURE_IN ($3_x, $3_y, $3_x1, $3_y1, "1.bmp")
         LOGWRITE ("Одинаковая3")
         GETSCREEN
         IF_PICTURE_IN ($4_x, $4_y, $4_x1, $4_y1,"1.bmp")
            LOGWRITE ("Одинаковая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
            END_IF
            LOGWRITE ("Другая5")
            LOGWRITE ("Выход5")           
         ELSE
            LOGWRITE ("Другая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE
            END_IF
            LOGWRITE ("Выход4")
         END_IF
      ELSE
         LOGWRITE ("Другая3")
         GETSCREEN
         IF_PICTURE_IN ($4_x, $4_y, $4_x1, $4_y1,"1.bmp")
            LOGWRITE ("Одинаковая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE
            END_IF
            LOGWRITE ("Выход3")
         ELSE
            LOGWRITE ("Другая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE
               LOGWRITE ("Другая5")
            END_IF
         END_IF
      END_IF
   ELSE
      LOGWRITE ("Другая2")
      GETSCREEN
      IF_PICTURE_IN ($3_x, $3_y, $3_x1, $3_y1, "1.bmp")
         LOGWRITE ("Одинаковая3")
         GETSCREEN
         IF_PICTURE_IN ($4_x, $4_y, $4_x1, $4_y1,"1.bmp")
            LOGWRITE ("Одинаковая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE               
            END_IF
            LOGWRITE ("Выход2")
         ELSE
            LOGWRITE ("Другая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE
               LOGWRITE ("Другая5")
            END_IF
         END_IF
      ELSE
         LOGWRITE ("Другая3")
         GETSCREEN
         IF_PICTURE_IN ($4_x, $4_y, $4_x1, $4_y1,"1.bmp")
            LOGWRITE ("Одинаковая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE
            END_IF
            LOGWRITE ("Выход3")
         ELSE
            LOGWRITE ("Другая4")
            GETSCREEN
            IF_PICTURE_IN ($5_x, $5_y, $5_x1, $5_y1, "1.bmp")
               LOGWRITE ("Одинаковая5")
            ELSE
               LOGWRITE ("Другая5")
            END_IF
            LOGWRITE ("Выход1")
         END_IF
      END_IF
   END_IF
ELSE
   
END_IF

2

Общие вопросы / Re: Подскажите пожалуйста как сделать такой анализ

« on: January 30, 2020, 10:25:48 PM »

Есть рабочий скрипт

Code: (clickermann) [Select]

//-----------------------------ПЕРЕМЕННЫЕ-------------
//-----------------------------Удвоить------------
$Udvoit_x=412
$Udvoit_y=599


//-----------------------------Минимум-----------
$sbros_x=446
$sbros_y=595


// окно Размер ставоки
$r_st_x=352
$r_st_x1=458
$r_st_y=622


// Поле профита
$green_x1=516
$green_y1=611
$green_x2=746
$green_y2=630
$green_color=3407667 //зеленая надпись
$green_color1=6711039  //красная надпись


$hide_x=564 //кнопка Меньше
//$hide_x=685//кнопка Больше
$hide_y=589


$povtor=20 // 20 повторов скрипта

$n_x=367  // Нехватает денег
$n_y=165  // Нехватает денег
$n_x1=891 // Нехватает денег
$n_y1=410 // Нехватает денег
$n_color= 3130362

//----------------------------ПРОГРАММА----------------
1:
LOGWRITE (" Начало ")
LCLICK($sbros_x,$sbros_y) 
2:
LOGWRITE ("Нажимаем кнопку ")
LCLICK($hide_x,$hide_y)   //кнопка Больше
GETSCREEN ($n_x,$n_y,$n_x1,$n_y1)
IF_PICTURE_IN ($n_x,$n_y,$n_x1,$n_y1, "Нехватает.bmp", -1, 100)
   GETSCREEN (($n_x,$n_y,$n_x1,$n_y1))
   IF_PIXEL_IN($n_x,$n_y,$n_x1,$n_y1, $n_color)
     
      WAITMS(100)
   END_IF
   
   LOGWRITE (" Стоп ")
   HALT
END_IF
WAIT(3)
GETSCREEN ($green_x1,$green_y1,$green_x2,$green_y2)
IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color)
   LOGWRITE ("вылезла зеленая надпись  ")
   //   WAITMS(50)
   INC($count,1)
   IF($count = $povtor) // 20 повторов скрипта
      LOGWRITE ("стоп")
      HALT // стоп
   END_IF
   GOTO(1) //начать чтение файла с начала
ELSE
   GETSCREEN  ($green_x1,$green_y1,$green_x2,$green_y2)
   IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color1)
      LOGWRITE ("вылезла красная надпись")
      GETSCREEN ($n_x,$n_y,$n_x1,$n_y1)
      IF_PICTURE_IN ($n_x,$n_y,$n_x1,$n_y1, "Нехватает.bmp", -1, 100)
         GETSCREEN (($n_x,$n_y,$n_x1,$n_y1))
         IF_PIXEL_IN($n_x,$n_y,$n_x1,$n_y1, $n_color)
           
            WAITMS(100)
         END_IF
         LOGWRITE (" Стоп ")
         HALT
      END_IF
      LCLICK($Udvoit_x,$Udvoit_y)
     
      GOTO(2)
   END_IF
   
END_IF

3

Общие вопросы / Анализ картинок

« on: January 30, 2020, 10:18:02 PM »

Здравствуйте.Кто нибуть сталкивался с распознанием такой капчи и как реализовать ее в кликер
Заранее спасибо!

Пробывал http://crapware.aidf.org/forum/index.php?topic=4714.msg32116#msg32116
Неполучается

4

Использование / Помогите довести до ума Скрипт для 999dice.com

« on: November 29, 2017, 09:04:35 PM »

Code: (clickermann) [Select]

INC($num,1)// наращиваем номер строки
IF($num > TFCOUNT("11.txt"))
   LOGWRITE("строки закончились")
   BEEP(800,200)
   HALT
END_IF
$str = TFREAD("11.txt", $num)  // в цикле, читаем строки из файла
STRSEPARATE($str, "   ", $arr)// разбираем строку в массив по разделителям ENTER ?
FOR($a=0,$a<ARRSIZE($arr))// в цикле читаем массив, копируем в буфер и вставляем
   WAITMS(300)
   
   LOGWRITE ("окно вставки")
   DBLCLICK($r_st_x,$r_st_y)
   WAITMS(300)
   TOCLIP($arr[$a])
   WAITMS(50)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAITMS (50)
   KEYUP (#V)
   KEYUP (#CTRL)
   WAITMS(300)
   
   
END_CYC
UNDEFINE($arr) // удаляем массив

LOGWRITE ("Нажимаем кнопку ")
LCLICK($hide_x,$hide_y)
WAIT(3)

GETSCREEN
IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color)
   
   LOGWRITE ("вылезла зеленая надпись  ")
   WAITMS(300)
   INC($count,1)
   IF($count = 10) // 10 повторов скрипта
      HALT // стоп
   END_IF
   
   $num=0  //начать чтение файла с начала
   
ELSE
   WAITMS(300)
   GETSCREEN
   IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color1)
     
      LOGWRITE ("вылезла красная надпись")
      WAITMS(300)
     
   END_IF
   
END_IF

5

Общие вопросы / Помогите остановить и начать заново при появлении зеленого круга

« on: November 29, 2017, 12:11:12 AM »

1:
INC($num,1)// наращиваем номер строки
IF($num > TFCOUNT("1.txt"))
END_IF
$str = TFREAD("1.txt", $num)  // в цикле, читаем строки из файла

STRSEPARATE($str, "   ", $arr)// разбираем строку в массив по разделителям ENTER
2:
FOR($a=0,$a<ARRSIZE($arr))// в цикле читаем массив, копируем в буфер и вставляем
WAIT(1)
LOGWRITE ("Открываем   браузер")
LCLICK($browser_x1,$browserl_y)
WAITMS(300)

LOGWRITE ("окно вставки")
DBLCLICK($r_st_x,$r_st_y)
WAITMS(300)
   TOCLIP($arr[$a])
   WAITMS(50)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAITMS (50)
   KEYUP (#V)
   KEYUP (#CTRL)
   WAITMS (50)
   KEYPRESS(#ENTER)
   WAIT(1)
END_CYC
UNDEFINE($arr) // удаляем массив

LOGWRITE ("Нажимаем кнопку ")
LCLICK($hide_x,$hide_y)
WAIT(1)

GETSCREEN                                               
IF_PIXEL_IN($green_x1,$green_y1,$green_x2,$green_y2, $green_color)
      LOGWRITE ("вылез зеленый круг  ")
    WAIT(1) 
   GOTO(1)
ELSE
   WAITMS(1000)
   GETSCREEN
   IF_PIXEL_IN($red_x1,$red_y1,$red_x2,$red_y2,$red_color) 
    LOGWRITE ("вылез  красный круг")
    WAIT(1)
    GOTO(2)
   ELSE   
   END_IF
END_IF