anchor.diff:            if (U <> nil) AND not U.IsDeadOrDying then
             begin
               PolyIdx := fNavMesh.KMPoint2Polygon[ U.CurrPosition ];
  -            Inc(fPresence[aAllianceIdx*5*fPolygons + 5*PolyIdx + 4],Increment);
  +            Inc(fPresence[aAllianceIdx*5*fPolygons + 5*PolyIdx + AVOID_TRAFFIC_IDX],Increment);
             end;
             L := L + EACH_X_MEMBER_COEF;
           end;
  
positive.code:     (    1.0,      1.0,       1.0,      2.0), // gtRanged
      (    1.0,      2.0,       0.0,      1.0)  // gtMounted
    );
    procedure EvaluatePolygon(aIdx, aEval: Word; aGT: TKMGroupType);
    begin
      Inc(fPresence[aIdx+0], Round(aEval*PENALIZATION_ARR[aGT,gtMelee]));
      Inc(fPresence[aIdx+1], Round(aEval*PENALIZATION_ARR[aGT,gtAntiHorse]));
  
negative.code:     procedure Paint(const aRect: TKMRect);
    end;
  
  const
    AVOID_TRAFFIC_IDX = 4; // Index of avoid traffic in the fOwnership array (0-3 are group types)
  
  implementation
  uses
  