Generate exe files, unable to respond to trigger hotkey

[kyjdp]

In the following code, I can not end by pressing SHIFT + F12 :oops:

Macro Macro4

Code:

Copy      Help

__RegisterHotKey hk1.Register(0 1 MOD_CONTROL VK_F10)
__RegisterHotKey hk2.Register(0 2 MOD_CONTROL VK_F11)
__RegisterHotKey hk3.Register(0 3 MOD_SHIFT VK_F12)
MSG m
rep
,if(GetMessage(&m 0 0 0)<1) break
,sel m.message
,,case WM_HOTKEY
,,sel m.wParam
,,,case 1
,,,mac "sub.no1"
,,,
,,,case 2
,,,mac "sub.no2"
,,,
,,,case 3
,,,ret
,,,
,DispatchMessage &m

#sub no1
mes "NO1"

#sub no2
mes "NO2"