anchor.diff:    EnemyStats := gAIFields.Influences.InfluenceSearch.EnemiesStats;
   
     // Calculate strength of alliance, find best comparison - value in interval <-1,1>, positive value = advantage, negative = disadvantage
  +  BestComparison := -1;
     if (Length(EnemyStats) > 0) then
     begin
       // Find closest enemy
  
positive.code:           AvaiableSquads[K] := True;
            K := K + 1;
          end;
        for I := TagPositions.Count - 1 downto 0 do
        begin
          Position := TagPositions.Items[I];
  
negative.code:       if (MinDist > EnemyStats[I].Distance) then
          MinDist := EnemyStats[I].Distance;
  
      for I := 0 to Length(EnemyStats) - 1 do
      begin
        Comparison := gAIFields.Eye.ArmyEvaluation.CompareAllianceStrength(fOwner, EnemyStats[I].Player) - (EnemyStats[I].Distance / Max(1,MinDist) - 1) * DISTANCE_COEF;
  