Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uTeams.pas
changeset 14733 c760a2939b9c
parent 14656 db05d9bf7466
child 14734 e57c8ace7d96 
--- a/hedgewars/uTeams.pas	Mon Apr 01 18:49:08 2019 +0200
+++ b/hedgewars/uTeams.pas	Mon Apr 01 19:16:55 2019 +0200
@@ -736,6 +736,7 @@
     Gear:= AddGear(0, 0, gtHedgehog, 0, _0, _0, 0);
     SplitBySpace(s, id);
     Gear^.Health:= StrToInt(s);
+    Gear^.Pos:= GetRandom(19);
     if checkFails((Gear^.Health > 0) and (Gear^.Health <= cMaxHogHealth), 'Invalid hedgehog health (must be between 1 and '+IntToStr(cMaxHogHealth)+')', true) then exit;
     if (GameFlags and gfSharedAmmo) <> 0 then
         CurrentHedgehog^.AmmoStore:= Clan^.ClanIndex
hedgewars