FixBugUnpressKeys() {
for key, key in ["RCtrl", "LCtrl", "LShift", "RShift", "RAlt", "LAlt"]
if Direction := ["Down",0,"Up"][2+GetKeyState(Key)-GetKeyState(Key, "P")]
SendInput {%Key% %Direction%}
}F1::SendInput +^{Left}^!{1}FixBugUnpressKeys() {
Static ArrayKeys
ArrayKeys:=Object()
ArrayKeys:=["RCtrl", "LCtrl", "LShift", "RShift", "RAlt", "LAlt"]
i:= ArrayKeys.MaxIndex()
Loop %i%
{
Key:=ArrayKeys[A_Index]
GetKeyStatePhys := GetKeyState(Key, "P")
GetKeyStateLogi := GetKeyState(Key)
DiffKeyState := GetKeyStateLogi-GetKeyStatePhys
if DiffKeyState {
Direction := (DiffKeyState=1) ? "Up" : "Down"
SendInput {%Key% %Direction%}
MsgBox %Key% will be not %Direction%. I fix it.
}
}
}Вставлять после Send.
]]>F1::
Send,+^{Left}
Send,^!{1}
Send, {Ctrl}
ReturnНо почему вообще залипает Ctrl, вроде ничего сложного?
]]>$RAlt::
Send,+^{Left}
Send,^!{1}
ReturnRAlt::
Send,+^{Left}
Send,^!{1}может синтаксис неправильный?
]]>