]]>VariableH.Hkcombo("!F1" , "hotkey1",1)Пробовал так, не сработало.
VariableH.Hkcombo(%modkey1% , "hotkey1",1)#include VariableH.ahk
VariableH.Hkcombo("!F1" , "hotkey1",1) ; Alt+F1(один раз) будет переход на метку hotkey1.
VariableH.Hkcombo("!F1" , "hotkey2",2) ; Alt+F1(два раза) будет переход на метку hotkey2.
VariableH.Hkcombo("+F1" , "hotkey3",2) ; Shift+F1(два раза) будет переход на метку hotkey3.
Return
hotkey1:
hotkey2:
hotkey3:
ToolTip % A_ThisLabel
return
Положить рядом с скриптом
#Persistent
VariableH := new VariableH
Class VariableH
{
Static List := {}
Hkcombo(hk,LabelorFn="",pressed=1)
{
VariableH.List[hk "_" --pressed] := LabelorFn
Hotkey,% hk, EventPressHk
}
PressHKCount(hk)
{
Loop
{
N++
KeyWait, %hk%, T.3
IfEqual,ErrorLevel,1,Break
KeyWait, %hk%, D T0.25
} Until ErrorLevel
KeyWait, %hk%
Return N
}
_()
{
EventPressHk:
CountP := VariableH.PressHKCount( RegExReplace( A_ThisHotkey,"^\W")), CountP--
if VariableH.List[A_ThisHotkey "_" CountP ]
if IsFunc(VariableH.List[A_ThisHotkey "_" CountP ])
func(VariableH.List[A_ThisHotkey "_" CountP ] ).call()
Else if IsLabel(VariableH.List[A_ThisHotkey "_" CountP ])
Gosub % VariableH.List[A_ThisHotkey "_" CountP ]
Return
}
}Можно больше двух нажатий делать.
]]>]]>~hotkey1:
Это уже не клавиша а метка. лишние символы как ~ уже ошибка.
"~%hotkey1%"
Так же метка не содержит значения как переменная.
Вот вариант:
modkey1 = !
modkey2 = F1
Hotkey,% modkey1 modkey2, hotkey1
Return
hotkey1:
if (A_ThisHotkey = A_PriorHotkey and A_TimeSincePriorHotkey < 300)
{
MsgBox, Test
}
KeyWait, % A_ThisHotkey
Return
modkey1 = ! ; Первая клавиша alt
modkey2 = F1 ; Вторая клавиша F1
Hotkey,% modkey1 modkey2, hotkey1 ; В первый параметр заносим '!F1'. Второй параметр это название метки, куда скрипт будет ссылаться при нажатии кнопок указанных в первом параметре.
Return ; убираем лишнее срабатывание при старте скрипта.
hotkey1: ; метка.
if (A_ThisHotkey = A_PriorHotkey and A_TimeSincePriorHotkey < 300) ; если текущая клавиша равна предыдущей и при этом прошло менее 300 мс, то срабатывает условие.
{
MsgBox, Test
}
KeyWait, % A_ThisHotkey ; ждем отжатия клавиши. Это надо что бы избежать двойного нажатия при зажатии кнопки.
Return
Оригинал.
~Control::
if (A_PriorHotkey <> "~Control" or A_TimeSincePriorHotkey > 300)
{
KeyWait, Control
Return
}
KeyWait, Control
MsgBox, Test
ReturnПытался так, не работает.
modkey1 := Control
Hotkey, % modkey1, hotkey1
~hotkey1:
if (A_PriorHotkey <> "~%hotkey1%" or A_TimeSincePriorHotkey > 300)
{
KeyWait, % hotkey1
Return
}
KeyWait, % hotkey1
MsgBox, Test
Return