anchor.diff:  
   
   //Make the area around to be avoided by common houses
  -procedure TKMInfluences.AddAvoidBuilding(aX,aY: Word; aRad: Single; aValue: Byte = 255; aDecreasing: Boolean = False; aDecreaseSpeed: Single = 1);
  +procedure TKMInfluences.AddAvoidBuilding(aX,aY: Word; aRad: Single; aValue: Byte = 255; aDecreaseCoef: Single = 0);
   var
     X,Y: Integer;
     SqrDist, SqrMaxDist: Single;
  
positive.code:     property EvalArea[const aY,aX: Word]: Byte read GetAreaEval;
  
      // Avoid building
      procedure AddAvoidBuilding(aX,aY: Word; aRad: Single; aValue: Byte = 255; aDecreasing: Boolean = False; aDecreaseSpeed: Single = 1);
      procedure RemAvoidBuilding(aArea: TKMRect);
      // Army presence
      // City influence
  
negative.code:     begin
        SqrDist := Sqr(aX-X) + Sqr(aY-Y);
        if (SqrDist <= SqrMaxDist) then
          AvoidBuilding[Y,X] := Min(AvoidBuilding[Y,X] + Max(0, Round(aValue - SqrDist * aDecreaseCoef)), 255);
      end;
  end;
  
  