Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - bulgachevarada

Pages: [1]
1
Для борьбы с изменяющейся графикой применяй цветокоррекцию
Code: (clickermann) [Select]
// Получение скриншота с цветокоррекцией (фильтр 6)
GETSCREEN
COLORMODE(6)
SCREENSHOT
HALT

Нужно вырезать из этого скриншота картинку рупора.

Вот цикл поиска картинки. Если не найдено прокручиваем страницу. цикл ограничен 20ю секундами, если за это время не найдет то цикл завершится, если найдет то кликаем и завершаем цикл.
Code: (clickermann) [Select]
$time = $_time_t + 20 // таймер на 20 секунд
WHILE($time > $_time_t)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "file.bmp", -1, 70) // поиск картинки с 70% процентов совпадения
      $time = 0
      LCLICK($_return1+2, $_return2+2)
      WAITMS(100)
   ELSE
      WHEELDOWN
      WAITMS(500)
   END_IF
END_CYC

А вот как выглядит поиск двух картинок "1.bmp" или "2.bmp"
Code: (clickermann) [Select]
$time = $_time_t + 10 // таймер на 20 секунд
WHILE($time > $_time_t)
   GETSCREEN
   COLORMODE(6)
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "1.bmp", -1, 80)
      $time = 0
      LCLICK($_return1+2, $_return2+2)
      WAITMS(100)
   ELSE
      IF_PICTURE_IN (0,0, $_xmax,$_ymax, "2.bmp", -1, 80)
         $time = 0
         LCLICK($_return1+2, $_return2+2)
         WAITMS(100)
      ELSE
         WHEELDOWN
         WAITMS(500)
      END_IF
   END_IF
END_CYC

Спасибо большое! все проделую, но не ищет ничего почему то, скрин через COLORMODE(6), открываю через пейнт выделяю рупор уменьшаю оставляя только нужный єлемент сохраняя в том же формате как бы просто сохранить все указываю как вы описали прокрутка идет а фотку никак не находит, уже и браузера меняла все никак в чем может быть проблема? изменяю процент на меньше ловит все подрят и текст но не то что надо...(

2
Доброго дня помогите пожалуйста с макросом надо реализовать  поиск иконки кнопки репоста в вк через картинку и нажатие на нее, так как записи бывают разного размера картинку надо искать по всей странице в невидимой части экрана в том числе где без прокрутки не добраться возможно ли как то проще это сделать? или прокрутку обязательно и как вообще написать макрос, чтоб картинка находилась по любому цвету выставить диапазон неограниченный, так как цвет изменится если уже сделан был репост, а кнопку надо находить несколько раз не обновляя страницу...
И второе как если нашел такую страницу просто остановить макрос или повторять действие пока картинка не будет найдена с определенным интервалом. Спасибо. Заранее прошу прощения если повтор, но из всех тем что нашла никак не получалось реализовать, возможно из за смены цветовых гамм картинки

3
укороченный вариант с циклом число не повторяющихся действий можно изменять.
Code: (clickermann) [Select]

// для Clickermann v4.13.004
//  цикл из вАСьми действий
// выполнял в случайном порядке  указанное число не повторяющихся действия:

$str="12345678" //объявляет переменную
$var1 = 4 //указать число выполняемых действий
FOR($a=0,$a<$var1) // повторяем $var1 раз
   $simv= STRCUT($str,RND(1,STRLEN($str)),1)// возвращает случайный символ строки
   $str=STRFILTER($str,$simv, 0) //удаляет выпавший символ из строки
   SWITCH($simv)
   CASE(1)
      LOGWRITE ("выполнение  действие № 1")  // выполнение  действие№ 1
   CASE(2)
      LOGWRITE ("выполнение  действие № 2")  // выполнение  действие№ 2
   CASE(3)
      LOGWRITE ("выполнение  действие № 3")  // выполнение  действие№ 3
   CASE(4)
      LOGWRITE ("выполнение  действие № 4")  // выполнение  действие№ 4
   CASE(5)
      LOGWRITE ("выполнение  действие № 5")  // выполнение  действие№ 5
   CASE(6)
      LOGWRITE ("выполнение  действие № 6")  // выполнение  действие№ 6
   CASE(7)
      LOGWRITE ("выполнение  действие № 7")  // выполнение  действие№ 7
   CASE(8)
      LOGWRITE ("выполнение  действие № 8")  // выполнение  действие№ 8   
   END_SWITCH
END_CYC
HALT  // выход


А как прописать если переменных больше 10 штук? через запятую 10,11,12 не видит, только работает если сменить на буквы переменные, но это очень не удобно(

4
Спасибо большое!!

5
Подскажите пожалуйста, как сделать чтоб макрос например из восьми действий выполнял в случайном порядке допустим 4 действия не повторяющихся, на примере:
$random = RND(1,8) // генерация случайного числа 1-8
SWITCH($random)
CASE(1)
   // выполнние  действие№ 1
CASE(2)
   // выполнние  действие№ 2
CASE(3)
   // выполнние  действие№ 3
CASE(4)
   // выполнние  действие№ 4
CASE(5)
   // выполнние  действие№ 5
CASE(6)
   // выполнние  действие№ 6
CASE(7)
   // выполнние  действие№ 7
CASE(8)
   // выполнние  действие№ 8
DEFAULT
END_SWITCH


или лучше делать через ?

$random = RND(1,3) // генерация случайного числа 1-3
 
 
    IF($random = 1)
      // выполнние   действие№ 1
    END_IF
 
 
    IF($random = 2)
      // выполнние   действие№ 2
    END_IF
 
 
    IF($random = 3)
      // выполнние   действие№ 3
    END_IF

Тогда как сделать задать что б выпадало несколько сразу чисел и выполнить именно номера действий что будут

6
Помогите пожалуйста Как реализовать чтоб брало из строки вида логин:пароль+емейл все строки по очереди в файле блокнота и удаляло?
Для двух строк использую
IF(TFCOUNT("C:\Users\Admin\Desktop\xxx.txt") = 0)
   HALT
END_IF
$str = TFREAD ("C:\Users\Admin\Desktop\xxx.txt", 1)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))
LCLICK(1222,270)
WAITMS (50)
TOCLIP($log)
WAITMS (50)
KEYDOWN (#CTRL)
WAITMS (1)
KEYDOWN (#V)
WAITMS (1)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (1)
LCLICK(1222,318)
WAITMS (50)
TOCLIP($pass)
WAITMS (50)
KEYDOWN (#CTRL)
WAITMS (1)
KEYDOWN (#V)
WAITMS (1)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (1)
Пож. очень нужно как приделать 3 строку?

7
Общие вопросы / Re: Пауза по картинке
« on: July 12, 2017, 06:23:15 PM »
Спасибо!

8
Общие вопросы / Пауза по картинке
« on: July 12, 2017, 04:37:14 PM »
Возможно ли написать такой макрос?
Производится регистрация, доходит до  гугл капчи в картинках и останавливается когда вылетает фото капчи до правильного ввода, например задать на координаты картинки x:500  y:550 где будет капча, если по данным координатам картинка пропадает (разгадал капчу), то продолжается сценарий?, чтоб  не использовать паузу. Спасибо.

9
Доброго дня подскажите пож. как реализовать...
Сделала макрос регистрация, в конце надо скопировать логин и пароль, как сделать чтоб сохраняло в отдельный файл блокнота в формате
логин:пароль

----------

И еще как сделать команду скрипту что б продолжалась робота только после полной загрузки страницы если такое возможно?

10
Общие вопросы / Задержка
« on: March 04, 2017, 04:30:47 PM »
Доброго дня возможно ли в кликере сделать случайную задержку например от 1 секунды до 2.5 секунд как это реализовать? Спасибо за помощь.

11
Общие вопросы / Re: подскажите
« on: January 18, 2017, 10:52:29 PM »
Спасибо но команда не работает почему то, читала бывают проблемы с клавиатурой клавиши какие то не подскажите в чем может быть проблема? никакой реакции на команду #PRINTSCREEN

12
Общие вопросы / подскажите
« on: January 18, 2017, 08:21:44 PM »
Доброго дня подскажите пожалуйста как обозначить в коде нажатие клавиши Принскрин? как сокращение будет никак не могу найти... спасибо

13
Oraven спасибо большое! очень помогли...
Vint буду тестировать оба, просто скриптом у меня сотник разные базу уже привыкла проще все в отдельности держать, еще база всегда перемешивается после выполнения потому приоритет на удаление больше но запоминать удобней если не трогать оба способы очень хорошие я ваша должница!)

14
Доброго дня не подскажите а как реализовать чтобы при остановке скрипта все логины что использовал удалялись с блокнота?? а то при остановке и включении все идет с начала и очень не удобно... подскажите как реализовать... и если можно полную остановку если логины закончились спасибо

Зачем что то удалять когда можно записывать номер текущей строки

Code: (clickermann) [Select]
IF($count = 0)
   IF(TFCOUNT("conf.ini") > 0)
      $count = INT(INIREAD("conf.ini", "count")) // считываем номер строки
   END_IF
END_IF

IF(TFCOUNT("LogPass.txt") > $count)
   INC($count,1)
   INIWRITE("conf.ini", "count", $count) // записываем номер строки
ELSE
   HALT // стоп если строки кончились
END_IF
$str = TFREAD ("LogPass.txt", $count)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))

LCLICK(10,10) // клик по полю логина
WAITMS (50)
TOCLIP($log) // скопировать в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(10,10) // клик по полю пароля
WAITMS (50)
TOCLIP($pass)
WAITMS (50)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(10,10) // клик по "Вход"
WAITMS(100)

Сейчас объясню. У меня для примера база логинов паролей 1000 шт. сегодня по 1 голосованию я начала, в процесе подвисла страница, я остановила чтобы продолжить мне надо знать где закончила на каком аккаунте, если удалить в блокноте то все просто, завтра пришла доделала, удобно... если у меня так 100 скриптов где надо делать через день например.  В том же вк часто подвисает страница и надо не всегда сразу всю базу... вот потому и ищу вариант как лучше... и проще. Если подсчет вести если не ошибаюсь то будет сбиваться все если я буду добавлять в блокнот пополнение базы новыми аккаунтами, что постоянно делаю(

15
Хочу задать вопрос:
Как прочитать с блокнота логин;пароль (написаны в столбик), и вставить в соответствующие поля в браузере, а затем удалить эту строку?

Создаешь рядом со скриптом файл "LogPass.txt" и в него записываешь строки по образцу

Code: [Select]
Тест1@mail.ru:111111111
Тест2@mail.ru:абвгд
Тест3@mail.ru:тестТестТЕСТ

Сам скрипт:
Code: (clickermann) [Select]
IF(TFCOUNT("LogPass.txt") > $count)
   INC($count,1)
ELSE
   $count = 1
END_IF
$str = TFREAD ("LogPass.txt", $count)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))

LCLICK(10,10) // клик по полю логина
WAITMS (50)
TOCLIP($log) // скопировать в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(10,10) // клик по полю пароля
WAITMS (50)
TOCLIP($pass)
WAITMS (50)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(10,10) // клик по "Вход"
WAITMS(100)

каждый новый проход скрипт будет считывать новую строку и так по кругу

И как прочитать из блокнота рандомную строку и вставить в браузер?

Записываешь строки в файл "Text.txt"
Code: (clickermann) [Select]
$str = TFREAD ("Text.txt", RND(1,TFCOUNT("Text.txt")))

LCLICK(10,10) // клик по ввода
WAITMS (50)
TOCLIP($str) // скопировать в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (50)

Доброго дня не подскажите а как реализовать чтобы при остановке скрипта все логины что использовал удалялись с блокнота?? а то при остановке и включении все идет с начала и очень не удобно... подскажите как реализовать... и если можно полную остановку если логины закончились спасибо

Pages: [1]