無変換キーを鬼のように使い倒すスレ

8 ：unnamed.ahk：2008/04/18(金) 00:13:13

vi 風カーソル移動

vk1Dsc07B & h::withShiftKey("Left")
vk1Dsc07B & j::withShiftKey("Down")
vk1Dsc07B & k::withShiftKey("Up")
vk1Dsc07B & l::withShiftKey("Right")

withShiftKey(keyName) {
　modifier := ""
　GetKeyState, state, Ctrl
　if (state = "D")
　　modifier := modifier . "^"
　GetKeyState, state, Alt
　if (state = "D")
　　modifier := modifier . "!"
　GetKeyState, state, Shift
　if (state = "D")
　　modifier := modifier . "+"
　Send, %modifier%{%keyName%}
　return
}