Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Request by soreau. Placement time proportional to map size.
authornemo
Mon, 08 Feb 2010 12:54:44 +0000
changeset 2768 b7e0b0751179
parent 2767 77c030ac978e
child 2769 82bfcc006afb
Request by soreau. Placement time proportional to map size.
hedgewars/uTeams.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uTeams.pas	Mon Feb 08 12:49:58 2010 +0000
+++ b/hedgewars/uTeams.pas	Mon Feb 08 12:54:44 2010 +0000
@@ -20,7 +20,7 @@
 
 unit uTeams;
 interface
-uses SDLh, uConsts, uKeys, uGears, uRandom, uFloat, uStats, uVisualGears, uCollisions,
+uses SDLh, uConsts, uKeys, uGears, uRandom, uFloat, uStats, uVisualGears, uCollisions, uLand,
 {$IFDEF GLES11}
 	gles11,
 {$ELSE}
@@ -282,7 +282,7 @@
 
 if PlacingHogs then
    begin
-   if CurrentHedgehog^.Unplaced then TurnTimeLeft:= 10000
+   if CurrentHedgehog^.Unplaced then TurnTimeLeft:= 1000 * (MaxHedgehogs div 4) + 1000
    else TurnTimeLeft:= 0
    end
 else TurnTimeLeft:= cHedgehogTurnTime
hedgewars