Автор Тема: Если курсор стоит на месте, то ожидание, иначе HALT  (Прочитано 548 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Dlmx

  • Зашел в гости
  • *
  • Сообщений: 9
    • Просмотр профиля
Всем программистам добра!

Код: 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
« Последнее редактирование: Июнь 03, 2021, 03:07:07 pm от Dlmx »

Vint

  • Супермодератор
  • Герой форума
  • *
  • Сообщений: 3831
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • Просмотр профиля
Код: Clickermann
  1. $sx = $_xmouse
  2. $sy = $_ymouse
  3. WHILE(($sx = $_xmouse) & ($sy = $_ymouse))
  4.    IF(ISKEYDOWN(#ALT) = 1)
  5.        LCLICK($sx, $sy)
  6.        WHILE(ISKEYDOWN(#ALT) = 1)
  7.            WAITMS(20)
  8.        END_CYC
  9.    END_IF
  10.    WAITMS(20)
  11. END_CYC
  12. HALT


Dlmx

  • Зашел в гости
  • *
  • Сообщений: 9
    • Просмотр профиля
Код: 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 ов, но я исправил и стало работать как часы))