anchor.diff:  
   
   implementation
  +uses
  +  KM_CommonUtils;
   
   
   { TKMResTileset }
  
positive.code: 
  {Check if requested tile is sand suitable for crabs}
  function TKMResTileset.TileIsSand(aTile: Word): Boolean;
  begin
    Result := aTile in [31..33, 70,71, 99,100,102,103, 108,109, 112,113, 116,117, 169, 173, 181, 189];
  end;
  
  
  
negative.code: 
  {Check if requested tile is sand suitable for crabs}
  function TKMResTileset.TileIsSnow(aTile: Word): Boolean;
  const
    SNOW_TILES: array[0..24] of Word =
                  (45, 46, 47, 49, 52, 64, 65, 166, 171, 203, 204, 205, 212, 213, 220, 256, 257, 261, 262,
                   286, 290, 294, 298, 305, 306);
  begin
    Result := ArrayContains(aTile, SNOW_TILES);
  end;
  
  
  