Crate API

--[[    CrateAPI
  Easily summon chests
      with items!
     By RodrickLord ]]

if not commands then
  error("Crate API needs a Command Computer!", 0)
end

-- Thx awsumben13 for help in this function
local function formatTable(t)
  local s = ""
  for i, v in ipairs(t) do
    if type(v) == "table" then
      local tagType = ""
      if type(v.id) == "string" and not commands.blockdata then
        error("Crate API: Name IDs aren't supported in 1.7.10",0)
      elseif type(v.id == "number" and commands.blockdata then
        error("Crate API: Number IDs aren't supported in 1.8",0)
      end
      v.data = v.data or 0
      s = s .. "," .. ("{id:%d,Count:%db,Slot:%db,Damage:%ds}"):format(v.id,v.count,v.slot,v.data)
    end
  end
  return s:sub( 2 )
end

function summonCrate(x,y,z,itemTable)
  local items = formatTable(itemTable)
  commands.summon("FallingSand",x,y,z,"{TileID:54,Time:1,TileEntityData:{Items:["..items.."]}}")
end