anchor.diff:      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
  
positive.code:           if (U <> nil) AND not U.IsDeadOrDying then
            begin
              PolyIdx := fNavMesh.KMPoint2Polygon[ U.CurrPosition ];
              EvaluatePolygon(aAllianceIdx*5*fPolygons + 5*PolyIdx, Increment, G.GroupType);
              with fNavMesh.Polygons[PolyIdx] do
                for M := 0 to NearbyCount - 1 do
                  EvaluatePolygon(aAllianceIdx*5*fPolygons + 5*Nearby[M], Increment, G.GroupType);
            end;
            L := L + EACH_X_MEMBER_COEF;
          end;
  
negative.code:           if (U <> nil) AND not U.IsDeadOrDying then
            begin
              PolyIdx := fNavMesh.KMPoint2Polygon[ U.CurrPosition ];
              Inc(fPresence[aAllianceIdx*5*fPolygons + 5*PolyIdx + AVOID_TRAFFIC_IDX],Increment);
            end;
            L := L + EACH_X_MEMBER_COEF;
          end;
  