diff -r 93d260c96635 -r 38d3e31556d3 hedgewars/PascalExports.pas --- a/hedgewars/PascalExports.pas Sat Jul 10 15:39:07 2010 +0200 +++ b/hedgewars/PascalExports.pas Sat Jul 10 18:42:47 2010 +0200 @@ -20,6 +20,8 @@ implementation {$IFDEF HWLIBRARY} +var xx, yy: LongInt; + // retrieve protocol information procedure HW_versionInfo(netProto: PShortInt; versionStr: Ppchar); cdecl; export; begin @@ -174,6 +176,18 @@ CursorPoint.Y:= y; end; +procedure HW_saveCursor(reset: boolean); cdecl; export; +begin + if reset then + begin + CursorPoint.X:= xx; + CursorPoint.Y:= yy; + end + else + xx:= CursorPoint.X; + yy:= CursorPoint.Y; +end; + function HW_isAmmoOpen:boolean; cdecl; export; begin exit(bShowAmmoMenu);