Rev 7521 | Rev 7742 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7521 | Rev 7628 | ||
---|---|---|---|
Line 56... | Line 56... | ||
56 | #define SCAN_CODE_F9 067 |
56 | #define SCAN_CODE_F9 067 |
57 | #define SCAN_CODE_F10 068 |
57 | #define SCAN_CODE_F10 068 |
58 | #define SCAN_CODE_F11 087 |
58 | #define SCAN_CODE_F11 087 |
59 | #define SCAN_CODE_F12 088 |
59 | #define SCAN_CODE_F12 088 |
Line -... | Line 60... | ||
- | 60 | ||
- | 61 | #define SCAN_CODE_1 002 |
|
- | 62 | #define SCAN_CODE_2 003 |
|
- | 63 | #define SCAN_CODE_3 004 |
|
- | 64 | #define SCAN_CODE_4 005 |
|
- | 65 | #define SCAN_CODE_5 006 |
|
- | 66 | #define SCAN_CODE_6 007 |
|
- | 67 | #define SCAN_CODE_7 008 |
|
- | 68 | #define SCAN_CODE_8 009 |
|
- | 69 | #define SCAN_CODE_9 010 |
|
- | 70 | #define SCAN_CODE_10 011 |
|
60 | 71 | ||
61 | #define SCAN_CODE_KEY_A 030 |
72 | #define SCAN_CODE_KEY_A 030 |
62 | #define SCAN_CODE_KEY_B 048 |
73 | #define SCAN_CODE_KEY_B 048 |
63 | #define SCAN_CODE_KEY_C 046 |
74 | #define SCAN_CODE_KEY_C 046 |
64 | #define SCAN_CODE_KEY_D 032 |
75 | #define SCAN_CODE_KEY_D 032 |
Line 92... | Line 103... | ||
92 | #define KEY_NUMLOCK 00010000000b |
103 | #define KEY_NUMLOCK 00010000000b |
93 | #define KEY_SCROLLLOCK 00100000000b |
104 | #define KEY_SCROLLLOCK 00100000000b |
94 | #define KEY_LWIN 01000000000b |
105 | #define KEY_LWIN 01000000000b |
95 | #define KEY_RWIN 10000000000b |
106 | #define KEY_RWIN 10000000000b |
Line 96... | Line -... | ||
96 | - | ||
97 | inline fastcall word GetKey() //+Gluk fix |
- | |
98 | { |
- | |
99 | $push edx |
- | |
100 | GETKEY: |
- | |
101 | $mov eax,2 |
- | |
102 | $int 0x40 |
- | |
103 | $cmp eax,1 |
- | |
104 | $jne GETKEYI |
- | |
105 | $mov ah,dh |
- | |
106 | $jmp GETKEYII //jz? |
- | |
107 | GETKEYI: |
- | |
108 | $mov dh,ah |
- | |
109 | $jmp GETKEY |
- | |
110 | GETKEYII: |
- | |
111 | $pop edx |
- | |
112 | $shr eax,8 |
- | |
113 | } |
- | |
114 | 107 | ||
115 | :unsigned char key_ascii; |
108 | :unsigned char key_ascii; |
116 | :dword key_scancode, key_modifier, key_editbox; |
109 | :dword key_scancode, key_modifier, key_editbox; |
117 | :int GetKeys() |
110 | :int GetKeys() |
118 | { |
111 | { |