--- a/hedgewars/PascalExports.pas	Tue Jul 20 05:37:58 2010 +0200
+++ b/hedgewars/PascalExports.pas	Tue Jul 20 23:30:54 2010 +0200
@@ -164,6 +164,12 @@
     CursorPoint.Y:= y;
 end;
 
+procedure HW_getCursor(x,y: PLongInt); cdecl; export;
+begin
+    x^:= CursorPoint.X;
+    y^:= CursorPoint.Y;
+end;
+
 procedure HW_saveCursor(reset: boolean); cdecl; export;
 begin
     if reset then