anchor.diff:        aField.Add(Point);
     end;
     if (aField.Count > 0) then
  -  begin
  -    fPlannedHouses[aHT].Plans[aIdx].RemoveTreeInPlanProcedure := True;
       for I := Low(HMA[aHT].Tiles) to High(HMA[aHT].Tiles) do
       begin
         Point := KMPointAdd( fPlannedHouses[aHT].Plans[aIdx].Loc, HMA[aHT].Tiles[I] );
         if (gAIFields.Influences.AvoidBuilding[Point.Y, Point.X] = 0) then
           gAIFields.Influences.AvoidBuilding[Point.Y, Point.X] := 10;
       end;
  -  end;
     Result := aField.Count;
   end;
   
  
positive.code: 
    GA_PATHFINDING_BasePrice    : Word = 0;
    GA_PATHFINDING_HouseOutside : Word = 1;
    GA_PATHFINDING_Field        : Word = 3;
    GA_PATHFINDING_noBuildArea  : Word = 1;
    GA_PATHFINDING_Forest       : Word = 3;
    GA_PATHFINDING_OtherCase    : Word = 3;
  
negative.code: begin
    // Priority: function is called from CityBuilder only in right time
    CheckChopOnly := (aTick mod WOODCUT_CHOP_ONLY_CHECK = fOwner);
    // Find new houses which are added by player / script / at the start of mission etc. and connect them with city plan
    for I := 0 to gHands[fOwner].Houses.Count - 1 do
    begin
      H := gHands[fOwner].Houses[I];
  