anchor.diff:        fCoalMiningTiles.Delete(I);
     end;
     Result := Output;
  +end;
  +
  +
  +function TKMEye.GetClosestTrees(aLoc: TKMPoint): TKMPointTagList;
  +begin
  +  Result := nil;
   end;
   
   
  
positive.code:     Exit;
  
    // Make sure that we dont put new house into another plan (just entrance is enought because houses have similar size)
    if gHands[fOwner].BuildList.HousePlanList.HasPlan(KMPoint(aLoc.X,aLoc.Y)) then
      Exit;
  
    // Scan tiles inside house plan
    for I := Low(fHousesMapping[aHT].Tiles) to High(fHousesMapping[aHT].Tiles) do
  
negative.code:     function CanPlaceHouse(aLoc: TKMPoint; aHT: THouseType; aIgnoreTrees: Boolean = False): Boolean;
      function CanAddHousePlan(aLoc: TKMPoint; aHT: THouseType; aIgnoreAvoidBuilding: Boolean = False; aIgnoreTrees: Boolean = False): Boolean;
  
      function GetMineLocs(aHT: THouseType): TKMPointTagList;
      function GetStoneLocs(): TKMPointTagList;
      function GetCoalLocs(): TKMPointTagList;
      function GetForests(): TKMPointTagList;
  