hedgewars/uGears.pas
changeset 1063 a86328091611
parent 1061 a30296274c46
child 1064 9e0701c56fb3
--- a/hedgewars/uGears.pas	Sun Jul 06 23:11:02 2008 +0000
+++ b/hedgewars/uGears.pas	Sun Jul 06 23:32:10 2008 +0000
@@ -505,7 +505,11 @@
                     end
                  end;
        stHealth: begin
-                 if TotalRounds = 15 then cHealthDecrease:= 5;
+                 if (TotalRounds = 15) and (cHealthDecrease = 0) then
+                    begin
+                    cHealthDecrease:= 5;
+                    AddCaption(trmsg[sidSuddenDeath], $FFFFFF, capgrpGameState)
+                    end;
 
                  if (cHealthDecrease = 0)
                    or bBetweenTurns