2 * Keyboard related functions
4 * Copyright 1993 Bob Amstadt
10 extern BOOL MouseButtonsStates
[3];
11 extern BOOL AsyncMouseButtonsStates
[3];
12 extern BYTE KeyStateTable
[256];
13 extern BYTE AsyncKeyStateTable
[256];
15 /**********************************************************************
16 * GetKeyState [USER.106]
18 INT
GetKeyState(INT keycode
)
24 return MouseButtonsStates
[0];
26 return MouseButtonsStates
[1];
28 return MouseButtonsStates
[2];
30 retval
= ( (INT
)(KeyStateTable
[keycode
] & 0x80) << 8 ) |
31 (INT
)(KeyStateTable
[keycode
] & 0x01);
37 /**********************************************************************
38 * GetKeyboardState [USER.222]
40 void GetKeyboardState(BYTE
*lpKeyState
)
42 if (lpKeyState
!= NULL
) {
43 KeyStateTable
[VK_LBUTTON
] = MouseButtonsStates
[0] >> 8;
44 KeyStateTable
[VK_MBUTTON
] = MouseButtonsStates
[1] >> 8;
45 KeyStateTable
[VK_RBUTTON
] = MouseButtonsStates
[2] >> 8;
46 memcpy(lpKeyState
, KeyStateTable
, 256);
50 /**********************************************************************
51 * SetKeyboardState [USER.223]
53 void SetKeyboardState(BYTE
*lpKeyState
)
55 if (lpKeyState
!= NULL
) {
56 memcpy(KeyStateTable
, lpKeyState
, 256);
57 MouseButtonsStates
[0] = KeyStateTable
[VK_LBUTTON
]? 0x8000: 0;
58 MouseButtonsStates
[1] = KeyStateTable
[VK_MBUTTON
]? 0x8000: 0;
59 MouseButtonsStates
[2] = KeyStateTable
[VK_RBUTTON
]? 0x8000: 0;
63 /**********************************************************************
64 * GetAsyncKeyState (USER.249)
66 * Determine if a key is or was pressed. retval has high-order
67 * byte set to 1 if currently pressed, low-order byte 1 if key has
70 * This uses the variable AsyncMouseButtonsStates and
71 * AsyncKeyStateTable (set in event.c) which have the mouse button
72 * number or key number (whichever is applicable) set to true if the
73 * mouse or key had been depressed since the last call to
76 int GetAsyncKeyState(int nKey
)
82 retval
= AsyncMouseButtonsStates
[0] |
83 MouseButtonsStates
[0]? 0x0001: 0;
86 retval
= AsyncMouseButtonsStates
[1] |
87 MouseButtonsStates
[1]? 0x0001: 0;
90 retval
= AsyncMouseButtonsStates
[2] |
91 MouseButtonsStates
[2]? 0x0001: 0;
94 retval
= AsyncKeyStateTable
[nKey
] |
95 (KeyStateTable
[nKey
] << 8);
99 memset( AsyncMouseButtonsStates
, 0, 3 ); /* all states to false */
100 memset( AsyncKeyStateTable
, 0, 256 );