hedgewars/PascalExports.pas
changeset 3779 3351a017d4ad
parent 3778 2e61bb50cc57
child 3789 c3eb56754e92
--- a/hedgewars/PascalExports.pas	Sat Aug 28 00:30:29 2010 +0200
+++ b/hedgewars/PascalExports.pas	Sat Aug 28 01:37:21 2010 +0200
@@ -199,6 +199,11 @@
     exit( isPaused );
 end;
 
+function HW_isWaiting: boolean; cdecl; export;
+begin
+    exit( ReadyTimeLeft > 0 );
+end;
+
 function HW_isWeaponRequiringClick: boolean; cdecl; export;
 begin
     if (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) and (CurrentHedgehog^.BotLevel = 0) then