Что нового

Выполнение скрипта по удержанию кнопки.

AlexOsscr

Новичок
Сообщения
3
Репутация
0
Здравствуйте.
Я очень далек от программирования так что не пинайте сильно.
Нашел пару скриптов и переделал под свои нужды. Возникла проблема с запуском. Если точней я нашел как сделать клавишу старта, остановки и завершения скрипта.
Код:
HotKeySet ("{Q}","_Pause" )
HotKeySet ("{W}","_NotPause")
HotKeySet("{Z}", "_Exit")
Global $Paused
Func _Pause()
$Paused = True
While $Paused
Sleep(100)
WEnd
EndFunc
Func _NotPause()
$Paused = False
EndFunc

А хотелось бы чтоб скрипт выполнялся при нажатии на клавишу, а не старт/стоп. Тоесть удерживаешь клавишу скрипт работает. Отпустил клавишу перестает работать.
Подскажите пожалуйста как это сделать.
 

joiner

Модератор
Локальный модератор
Сообщения
3 196
Репутация
540
Код:
#include <Misc.au3>

Global $hDLL = DllOpen("user32.dll")
HotKeySet("{Esc}", "_Exit")

While Sleep(10)
    If _IsPressed(51, $hDLL) Then _Console(); удерживаем Q
WEnd

Func _Console()
    Local $n
    While _IsPressed(51, $hDLL)
        Sleep(10)
        $n += 1
        ConsoleWrite('pause ' & $n & @LF)
    WEnd
    ConsoleWrite('выход из функции' & @LF)
EndFunc   ;==>_Pause

Func _Exit()
    Exit
EndFunc   ;==>_Exit
 
Верх