| changeset 6954 | a61458a81480 |
| parent 6925 | 1fbf9266ba52 |
| child 6990 | 40e5af28d026 |
| 6953:4c2dd25630a7 | 6954:a61458a81480 |
|---|---|
26 * |
26 * |
27 * See also: C declarations on wikipedia |
27 * See also: C declarations on wikipedia |
28 * http://en.wikipedia.org/wiki/X86_calling_conventions#cdecl |
28 * http://en.wikipedia.org/wiki/X86_calling_conventions#cdecl |
29 *) |
29 *) |
30 interface |
30 interface |
31 uses uTypes, uConsts, uVariables, GLunit, uKeys, uSound, uAmmos, uUtils, uCommands; |
31 uses uTypes, uConsts, uVariables, GLunit, uInputHandler, uSound, uAmmos, uUtils, uCommands; |
32 |
32 |
33 {$INCLUDE "config.inc"} |
33 {$INCLUDE "config.inc"} |
34 procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export; |
34 procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export; |
35 |
35 |
36 function HW_getNumberOfWeapons:LongInt; cdecl; export; |
36 function HW_getNumberOfWeapons:LongInt; cdecl; export; |
116 end; |
116 end; |
117 |
117 |
118 procedure HW_allKeysUp; cdecl; export; |
118 procedure HW_allKeysUp; cdecl; export; |
119 begin |
119 begin |
120 // set all keys to released |
120 // set all keys to released |
121 uKeys.initModule; |
121 uInputHandler.initModule; |
122 end; |
122 end; |
123 |
123 |
124 procedure HW_walkLeft; cdecl; export; |
124 procedure HW_walkLeft; cdecl; export; |
125 begin |
125 begin |
126 leftKey:= true; |
126 leftKey:= true; |