Что нового

Написать быстрый макрос

LVNVIN

Новичок
Сообщения
1
Репутация
0
Здравствуйте, у меня есть макрос на быстрое нажатие "ц", при удерживании той же "ц". Макрос старый, по этому я не уверен, что он работает достаточно быстро, а самостоятельно не могу его изменить или написать новый, так как совсем новенький в этой теме. Кто сможет помочь или написать подобное?

Вот то что у меня есть:
Код:
#include <Misc.au3>
Opt("MouseClickDelay", 1)
Opt("MouseClickDownDelay", 0)
Global $paused, $t, $hDll
Global $iTimeMS = 0
OnAutoItExitRegister("OnExit")
HotKeySet("{F5}", "start")
HotKeySet("{F6}", "pause")
HotKeySet("{ESC}", "quit")
start()
$hDll = DllOpen("user32.dll")
While 1
    $pressed = _IsPressed("57", $hDll); CTRL key
    If $pressed Then
        click()
    EndIf
    Sleep($iTimeMS)
WEnd
DllClose($hDlll)

Func OnExit()
    ToolTip("")
    DllClose($hDll)
EndFunc   ;==>OnExit
Func start()
    ; ToolTip("")
    ToolTip("Script started... Press F6 to pause.", 1, 1)
    $paused = False
EndFunc   ;==>start
Func pause()
    $paused = True
    ; ToolTip("")
    ToolTip("Script paused... Press F5 to start.", 1, 1)
    While $paused = True
        Sleep(-10)
    WEnd
    ; ToolTip("")
EndFunc   ;==>pause
Func click()
    If $t = True Then Return SetError(1, 0, 0)
    $t = True
    MouseClick("left", Default, Default, 1)
    $t = False
EndFunc   ;==>click
 
Верх