サンプルとしてこんな感じでどうでしょうか?
//ショートカットキー登録用配列
scKey.0 = $44 ;[D] 各キーはキーコード指定
scKey.1 = $53|$100 ;[s+S] Shift併用は +$100
scKey.2 = $31|$200 ;[c+1] Ctrl併用は +$200
Repeat Length(scKey) ;参考出力
Mes StrF("scKey.%02d = $%03x",cnt,scKey.cnt)
Loop
//キー押下時にショートカットチェック
oncmd gosub *sys_KeyDown, $100 ;WM_KeyDown
Stop
*sys_KeyDown
Dim i :k = wParam&$ff
If(k==0)||(lParam>>30)||((k<19)&&(k>15)){Return}
GetKey i, 16 :k|=i<<8 ;Shift併用チェック +$100
GetKey i, 17 :k|=i<<9 ;Ctrl併用チェック +$200
;Getkey i, 18 :k|=i<<10 ;Alt併用チェック(困難なので除外)
LogMes StrF("KEY:$%03x",k) ;キー値確認用
i = Length(scKey)-1
Repeat
If(i<0){Break}
If(k==scKey(i)){Break}
i--
Loop
//この時点で i=該当ショートカットのインデックス
If(i<0){Return} ;i = -1 なら該当無し
Title StrF("ショートカット#%d押した",i)
Return