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