--- a/hedgewars/PascalExports.pas	Thu Jun 24 01:08:57 2010 +0200
+++ b/hedgewars/PascalExports.pas	Sat Jun 26 04:36:04 2010 +0200
@@ -13,7 +13,7 @@
 unit PascalExports;
 
 interface
-uses uKeys, GLunit, uWorld, hwengine;
+uses uKeys, GLunit, uWorld, uMisc, uConsole, hwengine;
 
 {$INCLUDE "config.inc"}
 
@@ -152,6 +152,17 @@
         cOffsetY:= 120;
     end;
 end;
+
+procedure HW_setCursor(x,y: LongInt); cdecl; export;
+begin
+    CursorPoint.X:= x;
+    CursorPoint.Y:= y;
+end;
+
+function HW_isAmmoOpen:boolean; cdecl; export;
+begin
+    exit(bShowAmmoMenu);
+end;
 {$ENDIF}
 
 end.