anchor.diff:      for HT in HOUSE_DEPENDENCE[aHT] do
         for I := 0 to fPlannedHouses[HT].Count - 1 do
         begin
  -        Bid := KMDistanceAbs(aLoc, fPlannedHouses[HT].Plans[I].Loc);
  +        with fPlannedHouses[HT].Plans[I].Loc do
  +          Bid := abs(aLoc.X - X) + abs(aLoc.Y - Y) * 1.5;
           if (Bid < Output) then
             Output := Bid;
         end;
  
positive.code:     I := I - 1;
      Point := fForestsNearby.Items[I]; // Get the best forest
      Output := FindPlaceForWoodcutter(Point);
      if Output then
        gAIFields.Influences.AddAvoidBuilding(Point.X, Point.Y, GA_PLANNER_FindPlaceForWoodcutter_Radius, Min(255, Round(AVOID_BUILDING_FOREST_MINIMUM + GA_PLANNER_FindPlaceForWoodcutter_MaxAB)), True, GA_PLANNER_FindPlaceForWoodcutter_ABDecSpeed);
    end;
    Result := Output;
  
  
negative.code:     begin
        X := aCoalLoc.X + HMA[htCoalMine].Tiles[I].X;
        Y := aCoalLoc.Y + HMA[htCoalMine].Tiles[I].Y;
        if (gTerrain.TileIsCoal(X, Y) > 0) then
          Exit;
      end;
      Result := True;
  