Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - Dlmx

Страницы: [1]
1
Общие вопросы / Re: Задержка в KEYSTRING
« : Декабрь 03, 2021, 11:48:44 am »
Цитата: Vint от Декабрь 03, 2021, 09:44:29 am
Код: Clickermann
  1. KEYSTRING("Всё очень просто", 75)

https://youtu.be/V3rjtOR27CU

Интересно, а возможно для реалистичности сделать так, чтобы задержка между буквами была рандомной?

Это даёт странный результат:
Код: Clickermann
  1. WAITMS(500)
  2. KEYSTRING("9037678567", RND(50,1150))
  3. HALT
Задержка разная при каждом запуске скрипта, но одинаковая при каждом наборе новой буквы. Можно конечно сделать каждую строчку под каждую букву и между строчками ставить рандомное время на задержку, но это очень длинный скрипт получается.

2
Общие вопросы / Re: Не корректно читает информацию с текстового файла и получается СообщениР
« : Декабрь 02, 2021, 06:54:22 am »
Заходишь в сам текстовый файл / сохранить как / внизу меняешь кодировку с UTF-8 на ANSI / Сохранить

3
Общие вопросы / Плохо видит картинки на виртуалках
« : Ноябрь 29, 2021, 12:14:06 pm »
Virtualbox.

Друзья, обнаружил проблему, что на виртуалках функция GETSCREEN работает через раз. Если нажать ожидание картинки, то обнаружит картинку через минуту. Через нормальную винду работает норм и видит сразу, но к сожалению, работа выполняется через виртуалки.

Что можно сделать?

4
Общие вопросы / Разделить текст на две части. (До запятой и после)
« : Ноябрь 24, 2021, 01:24:30 pm »
Здравствуйте! Очень прошу помочь.

Скопированный текст:
$adr = Антона Петрова, 63
$adr = Нарымская, 20
$adr = Гоголя, 43Б
И т.д.

Нужно разделить, чтобы было так в переменной:
$uliz = Антона Петрова
$dom = 63

$uliz = Нарымская
$dom = 20

$uliz = Гоголя
$dom = 43Б

Код: Clickermann
  1. KEYDOWN (#CTRL)
  2. WAITMS (50)
  3. KEYPRESS (#C)
  4. KEYUP (#CTRL)
  5. WAITMS (50)
  6. $adr = FROMCLIP()
  7. WAITMS (50)
  8. // разделение на 2 переменной, улица и номер дома
  9. WAITMS (50)
  10. LCLICK(103,153)  // Клик в поле, куда улицу вводить
  11. WAITMS (50)
  12. TOCLIP($uliz)
  13. WAITMS (50)
  14. KEYDOWN (#CTRL)
  15. WAITMS (50)
  16. KEYPRESS (#V)
  17. KEYUP (#CTRL)
  18. WAITMS (50)
  19. LCLICK(1224,604)  // Клик в поле, куда вводить номер дома
  20. WAITMS (50)
  21. TOCLIP($dom)
  22. WAITMS (50)
  23. KEYDOWN (#CTRL)
  24. WAITMS (50)
  25. KEYPRESS (#V)
  26. KEYUP (#CTRL)
  27. HALT

5
Общие вопросы / Re: Текстовое сообщение из Clickermann в Telegram
« : Июнь 23, 2021, 01:48:03 pm »
Код: Clickermann
  1. // Клики в строку сообщения
  2.  
  3. TOCLIP("Текст")
  4. WAITMS (10)
  5. KEYDOWN (#CTRL)
  6. WAITMS (50)
  7. KEYPRESS (#V)
  8. KEYUP (#CTRL)
  9. WAITMS (50)
  10.  
  11. // Скрипт отправляет сообщение

6
Общие вопросы / Re: Если курсор стоит на месте, то ожидание, иначе HALT
« : Июнь 03, 2021, 08:38:58 pm »
Цитата: Vint от Июнь 03, 2021, 03:17:17 pm
Код: Clickermann
  1. $sx = $_xmouse
  2. $sy = $_ymouse
  3. WHILE(($sx = $_xmouse) & ($sy = $_ymouse))
  4.     IF(ISKEYDOWN(#ALT) = 1)
  5.         WAITMS(300)
  6.         LCLICK($sx, $sy)
  7.         WAITMS(20)
  8.         WHILE(ISKEYDOWN(#ALT) = 1)
  9.             WAITMS(20)
  10.         END_CYC
  11.     END_IF
  12.     WAITMS(20)
  13. END_CYC
  14. HALT

Очень благодрен за ответ!!! Спасибо!!!
Была небольшая ошибка, не хватало Walt ов, но я исправил и стало работать как часы))

7
Общие вопросы / Re: Если окно развёрнуто и поверх всех окон, то произвести скрипт
« : Июнь 03, 2021, 08:29:02 pm »
Спасибо!!! Получилось))))))))

8
Общие вопросы / Если курсор стоит на месте, то ожидание, иначе HALT
« : Июнь 03, 2021, 03:00:46 pm »
Всем программистам добра!

Код: Clickermann
  1. $HWND = HGET($_xmouse,$_ymouse)
  2. $sx = $_xmouse
  3. $sy = $_ymouse
  4.  
  5. // Если курсор стоит на месте, то в ожидании. При нажатии на ALT срабатывает LCLICK($sx,$sy). Если курсор сдвинулся хотя бы на пиксель, то HALT и ALT уже не запускает продолжение скрипта.
  6.  
  7. IF($sx = $_xmouse)
  8.    IF($sy = $_ymouse)
  9.       WHILE(iskeydown(#ALT)=0)
  10.          WAITMS(20)
  11.       END_CYC
  12.       WHILE(iskeydown(#ALT)=1)
  13.          WAITMS(20)
  14.       END_CYC
  15.       WAITMS(20)
  16.       LCLICK($sx,$sy)
  17.    END_IF
  18. END_IF

9
Общие вопросы / Если окно развёрнуто и поверх всех окон, то произвести скрипт
« : Июнь 03, 2021, 01:08:19 pm »
Здравствуйте!

Помогите пожалуйста! Измучился! Не понимаю, как сделать!

Если открыто и развёрнуто окно "MicroSIP - 131", то проигрывается скрипт:

Код: Clickermann
  1. IF(WNDFIND("MicroSIP - 131"), 1)
  2.    WNDGETINFO(WNDFIND("MicroSIP - 131"), $var1, $var2, $var3, $var4) // Собирает информацию об окне
  3.    WAITMS(10)
  4.    LCLICK($var1+121, $var2+312)     // Нажать на кнопку
  5.    WAITMS(20)
  6.    WNDSTATE(WNDFIND("MicroSIP - 131"), 0) // Свернуть MicroSip
  7.    WAITMS(20)
  8. END_IF

Если окно свёрнуто, но открыто, то WAITMS(20)

С данным скриптом если окно развёрнуто, всё работает хорошо!
Если окно свёрнуто, оно кликает по координате, якобы окно развернуто! В итоге кликает не туда.

Страницы: [1]