Серый форум — AHK: Запуск скрипта любой комбинацией

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (Ya ) — Fri, 06 Sep 2013 15:39:42 +0000

Спасибо. Сейчас буду пробывать.

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (serzh82saratov) — Thu, 05 Sep 2013 20:58:28 +0000

А вот чтобы снимать так с Pause, код надо запускать отдельным скриптом.

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (serzh82saratov) — Thu, 05 Sep 2013 20:44:34 +0000

Повторное действие только после отпускания Ctrl:


SetBatchLines -1
Hook := DllCall("SetWindowsHookEx" . (A_IsUnicode ? "W" : "A")
        , Int, 13 ; WH_KEYBOARD_LL := 13
        , Ptr, RegisterCallback("LowLevelKeyboardProc", "Fast")
        , Ptr, DllCall("GetModuleHandle", UInt, 0, Ptr)
        , UInt, 0, Ptr)
OnExit, Exit 
Return

CtrlKEYDOWN:
    ToolTip Ctrl && KEYDOWN
    Return
 
LowLevelKeyboardProc(nCode, wParam, lParam)  {
    Static KEYDOWN, Ctrl, CtrlUP
    SaveFormat := A_FormatInteger
    SetFormat, IntegerFast, H
    VkCode := NumGet(lParam+0, 0, "UInt")
    
    IF (wParam = 0x100 || wParam = 0x104)    ;    WM_KEYDOWN := 0x100, WM_SYSKEYDOWN := 0x104
    {
        IF (VkCode = 0xA2 || VkCode = 0xA3) 
            Ctrl := 1
        Else
            KEYDOWN := 1 
    }
    
    Else IF (wParam = 0x101 || wParam = 0x105)  ;  WM_KEYUP := 0x101, WM_SYSKEYUP := 0x105 
    {
        IF (VkCode = 0xA2 || VkCode = 0xA3)
            Ctrl := CtrlUP := 0
        Else
            KEYDOWN := 0 
    }
 
    IF (Ctrl && KEYDOWN  && !CtrlUP)
    {
        CtrlUP := 1
        SetTimer CtrlKEYDOWN, -10
    }
    SetFormat, IntegerFast, %SaveFormat%
    Return DllCall("CallNextHookEx", Ptr, 0, Int, nCode, UInt, wParam, UInt, lParam) 
}

Exit:
    DllCall("UnhookWindowsHookEx", Ptr, Hook)
    ExitApp

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (serzh82saratov) — Thu, 05 Sep 2013 20:35:24 +0000


SetBatchLines -1
Hook := DllCall("SetWindowsHookEx" . (A_IsUnicode ? "W" : "A")
        , Int, 13 ; WH_KEYBOARD_LL := 13
        , Ptr, RegisterCallback("LowLevelKeyboardProc", "Fast")
        , Ptr, DllCall("GetModuleHandle", UInt, 0, Ptr)
        , UInt, 0, Ptr)
OnExit, Exit 
Return
 
CtrlKEYDOWN:
    ToolTip Ctrl && KEYDOWN
    Return

LowLevelKeyboardProc(nCode, wParam, lParam)  {
    Static KEYDOWN, Ctrl
    SaveFormat := A_FormatInteger
    SetFormat, IntegerFast, H
    VkCode := NumGet(lParam+0, 0, "UInt")
       
    IF (wParam = 0x100 || wParam = 0x104)    ;    WM_KEYDOWN := 0x100, WM_SYSKEYDOWN := 0x104
    {
        IF (VkCode = 0xA2 || VkCode = 0xA3)
            Ctrl := 1
        Else
            KEYDOWN := 1 
    }
    
    Else IF (wParam = 0x101 || wParam = 0x105)  ;  WM_KEYUP := 0x101, WM_SYSKEYUP := 0x105 
    {
        IF (VkCode = 0xA2 || VkCode = 0xA3)
            Ctrl := 0
        Else
            KEYDOWN := 0 
    }
    
    IF (Ctrl && KEYDOWN)
        SetTimer CtrlKEYDOWN, -10 
    SetFormat, IntegerFast, %SaveFormat%
    Return DllCall("CallNextHookEx", Ptr, 0, Int, nCode, UInt, wParam, UInt, lParam) 
}

Exit:
    DllCall("UnhookWindowsHookEx", Ptr, Hook)
    ExitApp

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (Ya ) — Thu, 05 Sep 2013 18:24:09 +0000

любой комбинацией с кнопкой CTRL

Ctrl+любая кнопка
Любая кнопка+Ctrl
Удерживание Ctrl+любая кнопка
Удерживание любой кнопки+Ctrl

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (serzh82saratov) — Thu, 05 Sep 2013 18:11:56 +0000


*RCtrl::
*LCtrl:: Pause

Что значит:

любой комбинацией с кнопкой CTRL

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (Ya ) — Thu, 05 Sep 2013 18:07:32 +0000

Нет. Паузу вообще игнорирует. Нужно чтобы скрипт, снимался и ставился на паузу любой комбинацией с кнопкой CTRL

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (serzh82saratov) — Thu, 05 Sep 2013 17:50:26 +0000

Что заработало?

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (Ya ) — Thu, 05 Sep 2013 17:41:50 +0000

Просите, я не совсем правильно выразился.
Конторол ставит/снимает скрипт с паузы. То есть, строка такая

Control::Pause

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

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (serzh82saratov) — Thu, 05 Sep 2013 17:22:45 +0000


*RCtrl::
*LCtrl:: ToolTip ToolTip

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (Ya ) — Thu, 05 Sep 2013 17:13:12 +0000

teadrinker пишет:

Ya , ознакомьтесь с этой темой, отредактируйте заголовок.

Простите, забылся.

Re: AHK: Запуск скрипта любой комбинацией

null@example.com (teadrinker) — Thu, 05 Sep 2013 17:05:43 +0000

Ya , ознакомьтесь с этой темой, отредактируйте заголовок.

AHK: Запуск скрипта любой комбинацией

null@example.com (Ya ) — Thu, 05 Sep 2013 17:01:38 +0000

В общем, есть скрипт, который запускается кнопкой CTRL, но не это не всегда удобно. Хотелось бы добавить возможность запускать скрипт любой комбинацией с кнопкой CTRL