- 200 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/06/14(日) 10:26:41 ID:aFW/syKk0]
- ALT押しながらテンキーの061ということでいいのかな。
前にも似たようなスクリプト貼られた気がするけど。
seq:="!Numpad0!Numpad6!Numpad1|UPUPDOWNDOWNLEFTRIGHTLEFTRIGHTba" ; 検出するキーシーケンス
endkeys:="{Backspace}{Enter}{Left}{Right}{Up}{Down}{Delete}{Insert}{Escape}{Home}{End}{PgUp}{PgDn}"
. "{Numpad0}{Numpad1}{Numpad2}{Numpad3}{Numpad4}{Numpad5}{Numpad6}{Numpad7}{Numpad8}{Numpad9}"
. "{NumpadDot}{NumpadDiv}{NumpadMult}{NumpadAdd}{NumpadSub}{NumpadEnter}"
. "{F1}{F2}{F3}{F4}{F5}{F6}{F7}{F8}{F9}{F10}{F11}{F12}{Pause}{Break}{PrintScreen}"
. "ba" ; endkeysには検出するキーを含める
hist:=""
Loop
{
Input, var, L1 V, %endkeys%
if ErrorLevel=Max
hist:=""
else if InStr(ErrorLevel,"EndKey:")
{
hist.=GetKeyState("Alt","P") ? "!":""
hist.=SubStr(ErrorLevel,8)
}
Loop,Parse,seq,|
if ( SubStr(hist,StrLen(hist)-StrLen(A_LoopField)+1) = A_LoopField )
Gosub % A_LoopField . hist:=""
}
!Numpad0!Numpad6!Numpad1:
TrayTip,, %A_ThisLabel%:%A_TickCount%
return
UPUPDOWNDOWNLEFTRIGHTLEFTRIGHTba:
TrayTip,, FullPower:%A_TickCount%
return
|
 |
