diff -r 149416b948fc -r d4de36b3801a hedgewars/PascalExports.pas --- 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.