hedgewars/uGears.pas
changeset 1782 e7589e37a6d6
parent 1781 28f674367d68
child 1784 dfe9bafb4590
--- a/hedgewars/uGears.pas	Sat Jan 31 11:58:09 2009 +0000
+++ b/hedgewars/uGears.pas	Sat Jan 31 15:39:53 2009 +0000
@@ -518,7 +518,7 @@
 			end;
 	stWater: if (not bBetweenTurns) and (not isInMultiShoot) then
 				begin
-				if TotalRounds = 17 then bWaterRising:= true;
+				if TotalRounds = cSuddenDTurns + 2 then bWaterRising:= true;
 
 				if bWaterRising then
 				AddGear(0, 0, gtWaterUp, 0, _0, _0, 0);
@@ -530,7 +530,7 @@
 			inc(step)
 			end;
 	stHealth: begin
-			if (TotalRounds = 15) and (cHealthDecrease = 0) then
+			if (TotalRounds = cSuddenDTurns) and (cHealthDecrease = 0) then
 				begin
 				cHealthDecrease:= 5;
 				AddCaption(trmsg[sidSuddenDeath], $FFFFFF, capgrpGameState)