anchor.diff:  end;
   
   
  -{Check if requested tile is water suitable for fish and/or sail. No waterfalls, but swamps/shallow water allowed}
  +// Check if requested tile is water suitable for fish and/or sail. No waterfalls, but swamps/shallow water allowed
   function TKMResTileset.TileIsWater(aTile: Word): Boolean;
   begin
     Result := aTile in [48,114,115,119,192,193,194,196, 200, 208..211, 235,236, 240,244];
   end;
   
   
  -//Check if requested tile has ice
  +// Check if requested tile has ice
   function TKMResTileset.TileIsIce(aTile: Word): Boolean;
   begin
     Result := aTile in [4, 10, 12, 22, 23, 44];
   end;
   
   
  -//Check if requested tile has any water, including ground-water transitions
  +// Check if requested tile has any water, including ground-water transitions
   function TKMResTileset.TileHasWater(aTile: Word): Boolean;
   begin
     Result := aTile in [48,105..107,114..127,142,143,192..194,196,198..200,208..211,230,232..244];
   end;
   
   
  -{Check if requested tile is sand suitable for crabs}
  +// Check if requested tile is sand suitable for crabs
   function TKMResTileset.TileIsSand(aTile: Word): Boolean;
   const
     SAND_TILES: array[0..55] of Word =
  
positive.code: end;
  
  
  {Check if requested tile is generally suitable for road building}
  function TKMResTileset.TileIsRoadable(aTile: Word): Boolean;
  begin
    //Do not include 1/2 and 1/4 walkable as roadable
  
negative.code: end;
  
  
  // Check if requested tile is Stone and returns Stone deposit
  function TKMResTileset.TileIsStone(aTile: Word): Word;
  begin
    case aTile of
  