~A::
KeyWait, A, U
If (A_ThisHotkey = A_PriorHotkey && A_TimeSincePriorHotkey < 300)
 SendInput, !{A}
Return

~vk41::
KeyWait, %A_ThisHotkey%
KeyWait, %A_ThisHotkey%, D T0.2
If ErrorLevel
{
}
Else
{
    SendInput, {vkA4 down}{vk41 down}
    Sleep, 100
    SendInput, {vkA4 up}{vk41 up}
}
KeyWait, %A_ThisHotkey%
return

vk41::
N:=0
Loop {
   N++
   KeyWait, %A_ThisHotkey%
   KeyWait, %A_ThisHotkey%, D T0.3
} Until ErrorLevel
If N=1
   Send, {%A_ThisHotkey%}
Else
   Gosub % IsLabel(L := A_ThisHotkey . "_" . N) ? L : "NotCombo"
Return

NotCombo:
    Return



vk41_2:
    SendInput, {vkA4 down}{vk41 down}
    Sleep, 100
    SendInput, {vkA4 up}{vk41 up}
    Return