equal
deleted
inserted
replaced
746 if (GameFlags and gfPlaceHog) <> 0 then |
746 if (GameFlags and gfPlaceHog) <> 0 then |
747 PlacingHogs:= true; |
747 PlacingHogs:= true; |
748 if (ClansCount = 2) and ((GameFlags and gfDivideTeams) <> 0) then |
748 if (ClansCount = 2) and ((GameFlags and gfDivideTeams) <> 0) then |
749 begin |
749 begin |
750 t:= 0; |
750 t:= 0; |
751 TryDo(ClansCount = 2, 'More or less than 2 clans on map in divided teams mode!', true); |
751 if checkFails(ClansCount = 2, 'More or less than 2 clans on map in divided teams mode!', true) then exit; |
752 for p:= 0 to 1 do |
752 for p:= 0 to 1 do |
753 begin |
753 begin |
754 with ClansArray[p]^ do |
754 with ClansArray[p]^ do |
755 for j:= 0 to Pred(TeamsNumber) do |
755 for j:= 0 to Pred(TeamsNumber) do |
756 with Teams[j]^ do |
756 with Teams[j]^ do |