anchor.diff:              VisitArr[Point.Y,Point.X] := VISITED_TILE;
           end;
         end;
  -      if (Ownership < RANDOM_POINTS_OWNERSHIP_LIMIT) AND (SparePointsCnt < High(SparePoints)) AND (KaMRandom() > 0.7) then
  +      if (Ownership < GA_EYE_GetForests_RndOwnLim) AND (SparePointsCnt < High(SparePoints)) AND (KaMRandom() > 0.7) then
         begin
           SparePoints[SparePointsCnt] := I;
           SparePointsCnt := SparePointsCnt + 1;
  
positive.code: var
    PartOfForest: Boolean;
    Ownership, AvoidBulding: Byte;
    I,K,X,Y, Distance, SparePointsCnt: Integer;
    Cnt: Single;
    Point, sumPoint: TKMPoint;
  
negative.code:   for I := 0 to Length(Polygons) - 1 do
    begin
      Ownership := gAIFields.Influences.OwnPoly[fOwner, I];
      if (Ownership > GA_EYE_GetForests_OwnLimit) then
      begin
        for K := Polygons[I].Poly2PointStart to Polygons[I].Poly2PointCnt - 1 do
        begin
  