#DEFINE MOD_ALT     1
#DEFINE MOD_CONTROL 2
#DEFINE MOD_SHIFT   4
#DEFINE VK_TAB      9
#DEFINE VK_ESCAPE   0x1b
#DEFINE VK_C        0x0043
DO decl

LOCAL hWindow, nKeyId, nModifier
hWindow = _screen.HWnd
nKeyId=1001
nModifier=MOD_CONTROL

? RegisterHotKey(hWindow, nKeyId, nModifier, VK_C)
? UnregisterHotKey(hWindow, nKeyId)
* end of main

PROCEDURE decl
	DECLARE INTEGER RegisterHotKey IN user32;
		INTEGER hWnd, INTEGER id,;
		INTEGER fsModifiers, INTEGER vk

	DECLARE INTEGER UnregisterHotKey IN user32;
		INTEGER hWnd, INTEGER id