--- a/hedgewars/PascalExports.pas	Tue Jul 06 03:33:01 2010 +0200
+++ b/hedgewars/PascalExports.pas	Wed Jul 07 02:52:11 2010 +0200
@@ -55,6 +55,21 @@
     rightClick:= true;
 end;
 
+procedure HW_walkingKeysUp; cdecl; export;
+begin
+    leftKey:= false;
+    rightKey:= false;
+    upKey:= false;
+    downKey:= false;
+end;
+
+procedure HW_otherKeysUp; cdecl; export;
+begin
+    spaceKey:= false;
+    enterKey:= false;
+    backspaceKey:= false;
+end;
+
 procedure HW_allKeysUp; cdecl; export;
 begin
     // set all keys to released