mirror of https://github.com/minexew/Shrine.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
23 lines
698 B
23 lines
698 B
U0 MsgLoop() |
|
{ |
|
I64 arg1,arg2,msg_code; |
|
"Use $LK,"msg_code",A="MN:MSG_CMD"$ defines in your programs instead of hardcoded nums.\n" |
|
"<ESC> to Exit\n"; |
|
|
|
//We don't want the mouse bttns to reposition the cursor, |
|
//so we inhibit the window mgr from processing them. |
|
|
|
Fs->win_inhibit=WIF_SELF_MS_L|WIF_SELF_MS_R; |
|
|
|
do { |
|
msg_code=GetMsg(&arg1,&arg2,~(1<<MSG_NULL)); |
|
"CMD:%02X ARG1:%08X ARG2:%016X\n",msg_code,arg1,arg2; |
|
} while (msg_code!=MSG_KEY_DOWN || arg1!=CH_ESC && arg1!=CH_SHIFT_ESC); |
|
GetMsg(,,1<<MSG_KEY_UP); |
|
|
|
Fs->win_inhibit=WIG_USER_TASK_DFT; |
|
} |
|
|
|
MsgLoop; |
|
|
|
// Press <CTRL-SHIFT-L> and "Insert $LK,"ASCII",A="MN:CH_CTRLA"$/$LK,"ScanCode",A="FI:::/Doc/CharOverview.DD"$".
|
|
|