--Variables

local Connected_Inventories = {}
local Inventory = {}
local Slot_Count = 16

--Functions

local function readInventory(InventoryIndex,InventoryID)
	--make a list of every item,its count,and slot number.
	print("Reading inventory",InventoryIndex)
	local ItemInfo_List = {}
	local InventoryPeripheral = peripheral.wrap(InventoryID)
	Slot_Count = InventoryPeripheral.size()
	for i = 1,Slot_Count do
		local ItemInfo = InventoryPeripheral.getItemDetail(i)
		if ItemInfo then
			if ItemInfo[1] ~= nil and ItemInfo[2] ~= nil then
				local Item_Info = {ItemInfo[1],ItemInfo[2],i}
				table.insert(ItemInfo_List,Item_Info)
			end
		end
	end
	return ItemInfo_List
end

local function addItemToInvList(ItemInfos)
	--Add item and count to the general Inventory list.
	table.insert(Inventory,ItemInfos)
end

local function moveInfo(Inventory_List)
	for Item_Index,Item_Information in pairs(Inventory_List) do
		addItemToInvList(Item_Information)
	end
end

local function takeInventory()
	for Inventory_Index,Inventory_ID in pairs(Connected_Inventories) do
		local Current_Inventory = Inventory_ID
		local Inventory_Name,Peripheral_Type = peripheral.getType(Inventory_ID)
		local InvList = readInventory(Inventory_Index,Inventory_ID)
		--for every item in the readInventory lists, add its name and its count to the general Inventory list.
		moveInfo(InvList)
	end
	return Inventory
end

local function printInventory()
	takeInventory()
	print("Inventory: ")
	for ItemIndex,ItemInformation in pairs(Inventory) do
		print(tostring(ItemInformation[1])..";"..tostring(ItemInformation[2]))
	end
end

--Program starts

for Peripheral_Index,Peripheral_ID in pairs(peripheral.getNames()) do
	local Current_Peripheral = Peripheral_ID
	local Peripheral_Name,Peripheral_Type = peripheral.getType(Current_Peripheral)
	if Peripheral_Type == "inventory" then
		table.insert(Connected_Inventories,Current_Peripheral)
	end
end

printInventory()