汇编语言GetKeyState函数:获得键盘状态
通过测试单个键盘按键可以发现当前按下的是哪个键。方法是调用 API 函数 GetKeyState。
GetKeyState PROTO, nVirtKey:DWORD
向该函数传递如下表所示的虚拟键值。测试程序必须按照同一个表来测试 EAX 里面的返回值。
| 按键 | 虚拟键符号 | EAX 中被测试的位 |
|---|---|---|
| NumLock | VK_NUMLOCK | 0 |
| Scroll Lock | VK_SCROLL | 0 |
| Left Shift | VK_LSHIFT | 15 |
| Right Shift | VK_tRSHIFT | 15 |
| Left Ctrl | VK_LCONTROL | 15 |
| Right Ctrl | VK_RCONTROL | 15 |
| Left Menu | VK_LMENU | 15 |
| Right Menu | VK_RMENU | 15 |
下面的测试程序通过检查 NumLock 键和左 Shift 键的状态来演示 GetKeyState 函数:
; 键盘切换键 (Keybd.asm)
INCLUDE Irvine32.inc
INCLUDE Macros.inc
; 如果当前触发了切换键 (CapsLock, NumLock, ScrollLock),
; 则 GetKeyState 将 EAX 的位 0 置 1
; 如果当前按下了特殊键,则将 EAX 的最高位置 1
.code
main PROC
INVOKE GetKeyState, VK_NUMLOCK
test al,1
.IF !Zero?
mWrite <"The NumLock key is ON",0dh,0ah>
.ENDIF
INVOKE GetKeyState, VK_LSHIFT
call DumpRegs
test eax,80000000h
.IF !Zero?
mWrite <"The Left Shift key is currently DOWN",0dh,0ah>
.ENDIF
exit
main ENDP
END main
发表评论