Messages

1

Общие вопросы / Re: Очередной глюк Кликермана

« on: March 10, 2016, 08:44:06 PM »

Спасибо.

Проверил новую версию, бага нет, круто 

2

Общие вопросы / Re: Очередной глюк Кликермана

« on: March 09, 2016, 09:13:54 PM »

Спасибо, что отписались 

Пока решил проблему с помощью Ctrl+C и Ctrl+V.

А когда можно будет скачать Clickermann v4.12?

3

Общие вопросы / Очередной глюк Кликермана

« on: March 08, 2016, 10:45:56 PM »

Как получить текст из поля? Кликерманн не дает его получить, если в нем символ $ (доллар)!

Специально провел эксперимент:
Открываю окно "Выполнить" (Win + R).
Пишу туда "Hello $ hello".
Запускаю следующий скрипт

Code: [Select]

#name "TEST"

define($str)
define($hText)

$hText = hget(150, 110)
$str = hgettext($hText)

print($str)

halt
Выходит сообщение "Ошибка интерпретации строки $str = hgettext($hText) бла бла бла"
Убираю в поле знак доллара - нормально получает текст.
О запрещенных символах в строке в справке ни слова 

4

Использование / Re: Скрипт глючит или я

« on: March 07, 2016, 08:48:00 PM »

Заработало наконец.

Уменьшил ширину области до 1 пикселя. Прогнал по нескольку десятков списков закладок по шесть раз каждый - ни одной ошибки 

5

Использование / Re: Скрипт глючит или я

« on: March 06, 2016, 03:29:20 PM »

Зачем эти подпрограммы на 1 раз?

В будущем будет больше процедур и главный цикл будет сложнее, поэтому я хочу все распихать по модулям. А здесь выложил все в одном для удобства. Программа пока еще не выросла.

6

Использование / Скрипт глючит или я

« on: March 06, 2016, 01:55:16 PM »

Написал код, а он глючит.

Задача скрипта перемещать на один вверх курсор выделения в списке закладок браузера Mozilla Firefox (это все в окне "Показать все закладки"). Код работает до конца списка.

Проблема в том, что код примерно в 50% случаев прогона даже по одному списку закладок внезапно останавливается на случайном значении. Я думал, что просто не успевает обновиться экран после нажатия #up или что-то вроде этого, поэтому понапихал везде задержек. Задержка после keypress(#up) вроде себя оправдывает, но остальные не помогают - код все-равно глючит.

Code: [Select]

#name "test script"

define($_) // Произвольная пер-я, чтобы dialogbox работала.
define($n, 0) // Счетчик для имен файлов скриншотов.
define($endlist, 0) // Если 1, то конец списка.
define($file) // Файл скриншота.

sub(fname) // Формируем имя файла скриншота на основе счетчика.
 if ($n < 10)
  $file = strconcat("screens\stt000", $n, ".bmp")
 else
  if ($n < 100)
   $file = strconcat("screens\stt00", $n, ".bmp")
  else
   $file = strconcat("screens\stt0", $n, ".bmp")
  end_if
 end_if
 
 inc($n)
end_sub

sub (uplist) // На один пункт вверх в списке закладок.
 if ($n = 0)
  getscreen
  screenshotex(254, 59, 275, 595, "stt")
 end_if
 
 keypress(#up)
 waitms(100)
 getscreen
 fname()
 if_picture_in(254, 59, 275, 595, $file)
  $endlist = 1
 else
  screenshotex(254, 59, 275, 595, "stt")
  waitms(100)
 end_if
end_sub

waitms(100)

while ($endlist = 0) // Пока весь список не закончится ...
 waitms(100) // ... делаем что-то с закладкой.
 uplist ()
end_cyc

waitms(100)

execute("auto_del.bat") // Очищаем папку со скриншотами.

$_ = dialogbox($n, 0, 4) // Отладка.
//$_ = dialogbox("ГОТОВО", 0, 4)

halt

7

Использование / Re: Поиск изображения

« on: March 05, 2016, 06:14:24 PM »

Спасибо

Все переписал, теперь работает 

Я гайд просто невнимательно читал, пропустил else ... end_if

8

Использование / Поиск изображения

« on: March 05, 2016, 05:26:17 PM »

Приветствую всех 

Как определить, что функция if_picture_in нашла изображение? Вообще, по-моему, она работает как-то странно или я что-то намудрил.

Алгоритм такой:
1) Запускаю этот скрипт. Теперь на диске - участок экрана в .bmp;
2) Убираю строку "третья";
3) Экран не меняю. Запускаю скрипт снова. Он печатает правильные результат;
4) Меняю экран. Запускаю скрипт. Результат тот-же  . Переменные $_return1 и $_return2 не поменялись. Как определить, что экран изменился.

Кстати, если ввести строки "первая" и "вторая" и повторить весь алгоритм, то функция if_picture_in вообще никогда не меняет результаты - как были -1, так и остаются  .

Как правильно определить, что область экрана изменилась?

Code: [Select]

#name "test script"

sub (print_res)
 define($str)

 $str = $_return1
 $str = strconcat($str, "_", $_return2)
 
 print($str)
end_sub

//$_return1 = -1 // первая
//$_return2 = -1 // вторая

print_res ()

wait(1)

getscreen

screenshotex(254, 59, 275, 595, "stt") // третья

if_picture_in(254, 59, 275, 595, "screens\stt0000.bmp")

print_res ()

//dialogbox($str, 0, 4)

halt