Messages

31

Общие вопросы / Re: Поиск текста и клик с отступом в пикселях

« on: October 30, 2017, 10:02:10 PM »

Доброго дня подскажите пожалуйста как сделать макрос попроще... Ищу текст через ctrl+f как задать нажатие левый клик например на 5 пикселей правее от найденного текста ?
И второе если текст найден остановить макрос, или повторить действие до начала поиска текста

Code: (clickermann) [Select]

LCLICK(900,10)   //  клик по целевому окну (если нужно)
WAITMS(500)

//    Тут действия до начала поиска
PRINT("Начало")

KEYDOWN(#CTRL)
WAITMS(50)
KEYPRESS(#F)
WAITMS(50)
KEYUP(#CTRL)
WAITMS(500)
KEYPRESS(#BACKSPACE)
WAITMS(50)
KEYSTRING("нажатие")   //   ищем на этой странице слово "нажатие"
WAITMS(500)

GETSCREEN
IF_PIXEL_IN(0,0,$_xmax,$_ymax,3906036)   //   цвет выделенного текста
   PRINT("Текст есть")
   $x=$_return1
   $length=(PXLCOUNT($_return1,$_return2,$_xmax,$_return2,3906036)+5)   //   считаем длину выделенного текста и прибавляем 5 пикселей
   LCLICK($x+$length,$_return2)   //   кликаем на 5 пикселей правее от найденного текста
   WAITMS(500)
   $var=RND(1,2)   //   выбираем вариант развития сценария
ELSE
   
   //  Тут действия если текст не найден
   PRINT("Текста нет. Чё делать - ХЗ.")
   HALT
   
END_IF

SWITCH($var)   //   если текст найден
CASE(1)
   PRINT("СТОП")   //   остановить макрос
   HALT
CASE(2)
   PRINT("В начало")   //   или повторить действие до начала поиска текста
   WAITMS(500)
END_SWITCH

32

Общие вопросы / Re: СOLORMOD

« on: October 26, 2017, 09:14:36 AM »

"точность"- это процент совпадения искомого, с тем что на экране. Если не писать это значение в условии, то по умолчанию оно равно 100%
(IF_PICTURE_IN(0,0, 666,666, "sl.bmp",-1,100) = IF_PICTURE_IN(0,0, 666,666, "sl.bmp")).
При использовании COLORMODE лучше прописывать этот параметр, но не менее 70%, иначе может находить картинку даже там где её нет. А при 5%-10% так вообще найдет где угодно.

33

Общие вопросы / Re: ПОМОГИТЕ УПРОСТИТЬ

« on: October 19, 2017, 07:27:33 PM »

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

Процессор сгорит.

34

Предложения / Re: [Alpha/Beta Testing]

« on: September 22, 2017, 09:39:14 PM »

SWITCH не понимает латиницу. На символы и русские буквы отвечает верно, а на латинские выдает в лог "Другая буква".
v4.13.004b. Windows 7 Максимальная x86 SP1

Code: (clickermann) [Select]

$_test = "s"

SWITCH ($_test)
CASE("w")
   LOGWRITE("Буква w")
CASE("s")
   LOGWRITE("Буква s")
CASE("ц")
   LOGWRITE("Буква ц")
CASE("ы")
   LOGWRITE("Буква ы")
CASE("+")
   LOGWRITE("Плюс")
DEFAULT
   LOGWRITE("Другая буква")
END_SWITCH
HALT

35

Предложения / Re: [Alpha/Beta Testing]

« on: September 21, 2017, 05:33:16 PM »

После обновления появилась ошибка  "Run-time error at line:IF($a!$b)", до этого нормально работало
значение переменных 3763620110 и 3763620109

Ага, отныне так.

Code: (clickermann) [Select]

IF($a!=$b)

36

Прочее / Re: AGClient - распознавание капчи для кликера

« on: September 17, 2017, 02:13:40 PM »

В чем может быть дело?

Если версия кликера v4.13.004b, то замени все знаки неравно (!)

Code: (clickermann) [Select]

WHILE(PXLCOUNT($x1_rc+$x_inc,$y1_scan,$x1_rc+$x_inc,$y2_scan,16777215) ! $y2_scan-$y1_scan+1)на новые (!=)

Code: (clickermann) [Select]

WHILE(PXLCOUNT($x1_rc+$x_inc,$y1_scan,$x1_rc+$x_inc,$y2_scan,16777215) != $y2_scan-$y1_scan+1)

37

Общие вопросы / Re: Не переходит дальше,помогите

« on: September 16, 2017, 03:10:41 PM »

А можно вот в такой код применить ELSE?

А нафига ? ? ?  Где логика? 

38

Общие вопросы / Re: Метки в 4.12 работают?

« on: September 16, 2017, 02:45:34 PM »

Но я от goto тоже отказался, в пользу установки счетчика цикла в максимальное значение.

Это правильно. А вот криминал.

39

Общие вопросы / Re: Метки в 4.12 работают?

« on: September 16, 2017, 12:44:55 PM »

Мало того. Еще и из цикла через GOTO() выпрыгиваешь. А этого делать не рекомендуется.

40

Общие вопросы / Re: Метки в 4.12 работают?

« on: September 16, 2017, 12:29:33 PM »

Тогда где я косячу?

GOTO

Синтаксис
GOTO (label) - переводит интерпретацию на строку с меткой


Параметры
label - имя метки


Пример

goto(skip)

logwrite("nope") // пропускается
skip:
logwrite("yea")  // выполнится



Примечания
Переход на метку допускается в рамках блоков одного уровня вложенности. Текстовая метка задается без кавычек, в тексте скрипта после текстовой метки обязательно должно идти двоеточие ":", как в примере. Метка занимает всю строку
Вопрос: ГДЕ ТЫ КОСЯЧИШЬ?
Ответ: СПРАВКУ НЕ ЧИТАЕШЬ!

41

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

« on: September 15, 2017, 07:16:53 PM »

Что за новая переменная $_return3 ? В справке не нашел, на форуме тоже нет информации. Что она возвращает? 

42

Общие вопросы / Re: Можно ли написать пользовательскую функцию скриптом?

« on: September 09, 2017, 10:35:14 PM »

Зачем усложнять?

Code: (clickermann) [Select]

$X=10
$Y=10

GETSCREEN
IF(PXL($X,$Y)=0)
   PRINT("Темно")
ELSE
   PRINT("Светло")
END_IF

43

Использование / Re: Цикл повтора

« on: September 09, 2017, 08:38:07 PM »

Code: (clickermann) [Select]

FOR ($i=0, $i<50)
   WAIT(5)
   LCLICK(1230,310)  //- открывает задание
   WAIT(12)
   LCLICK(740,445)  //- выполняет задание
   WAIT(3)
   LCLICK(1166,9)  //- закрывает задание
   WAIT(7)
   LCLICK(74,47)  //- обновляет страницу
END_CYC
WAIT(3600)        //- задержка 1 час

44

Предложения / Re: Коментарии к коду

« on: September 08, 2017, 12:41:06 PM »

Скоро ты поймешь что записывать действия а потом править их гораздо сложнее чем писать код самостоятельно. И строк в таком коде раза в три-четыре меньше. Комментарии добавлять тоже не трудно

Code: (clickermann) [Select]

MOVE(100,100)  //  КОММЕНТАРИЙВ редакторе, под кнопками "СТАРТ", "СТОП" указано текущее положение курсора.
А если-бы читал справку, "Приложение 1. Коды клавиш", то знал бы, что при нажатии контролов и прочих шифтов появляется десятичный код клавиши.

45

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

« on: September 07, 2017, 05:44:22 PM »

А можешь написать код, если бы можно было выделить текст, мне пригодится в дальнейшем и как извлекать текст с кнопок.

Code: (clickermann) [Select]

MOVE(100,100)            //  ставим курсор в начало текста
WAITMS(50)
LDOWN($_xmouse,$_ymouse) //  зажимаем левую кнопку мыши
WAITMS(50)
MOVE(900,100)            //  переводим курсор в конец текста
WAITMS(50)
LUP($_xmouse,$_ymouse)   //  отпускаем левую кнопку мыши
WAITMS(50)
KEYDOWN(#CTRL)           //  копируем
WAITMS(50)
KEYDOWN(#C)              //            текст
WAITMS(50)
KEYUP(#C)                //                   в
KEYUP(#CTRL)             //                      буфер
WAITMS(50)
$text=FROMCLIP()         //  записываем скопированный текст в переменную
LOGWRITE($text)          //  выводим результат своей деятельности в ЛОГ
HALTПо тексту с кнопок ничем помочь не могу.