ShowIncome AE2

local comp = require("component");

local  gpu = comp.gpu
local  me = comp.me_controller
local maxx, maxy = gpu.maxResolution()

--print(gpu.maxResolution)
--print(maxx, maxy)
--gpu.set(maxx / 2, maxy / 2, "pouet")

local arg = {...}

local delay
if arg[2] then
delay = arg[2]
else
delay = 1
end

items = me.getItemsInNetwork()
os.sleep(delay)
items2 = me.getItemsInNetwork()
--print("prout")
local i = 0
totalItems = items["n"]
totalItems2 = items2["n"]
items["n"], items2["n"] = nil

function swapKey(a,b, table)
  local tmp = table[a]
  table[a] = table[b]
  table[b] = tmp
end

function printTab(tab)
for k,v in pairs(tab) do
print(k,v)
end
end

function getDiff(items, items2)
  diff = {}
  for l,m in pairs(items) do
    for k,v in pairs(items2) do
      if m.name == v.name and m.size ~= v.size and m.label == v.label and l == k then
        diff[m.label] = v.size - m.size
      end
    end
  end
  return diff
end

diff = getDiff(items, items2)

printTab(diff)

function tablesort(tab)

for l,m in pairs(tab) do
  for k,v in pairs(l) do
    if m.size > v.size then
      swapKey(l,k,tab)
    end
  end
end

end

--tablesort(items)

function printTable(tableDouble)
for k,v in pairs(items) do
  print("--------------------")
  print(k,v)
  print("--------------------")
  for x,y in pairs(v) do
    print(x,y)
  end
end
end

--printTable(items)

function showItem(name, tab)
for k,v in pairs(tab) do
  if v.label == name then
  for i,j in pairs(v) do
    print(i,j)
  end
  end
end
end

function showAll(name, tab)
for k,v in pairs(tab) do
  if string.find(string.lower(v.label), string.lower(name)) then
  for i,j in pairs(v) do
    print (i,j)
  end
  print("-----------------------")
  end
end

end
--[[
if arg[1] then
--showItem(arg[1], items)
  showAll(arg[1], items)
end
--]]
--showItem("Cobblestone", items)

--printTable(items)


-- Commentaires --


--[[
  print("____________________")
for k,v in pairs(items[1757]) do
  print(k,v)
end--]]

--[[
while(items[i]) do
  print(items[i])
  i = i + 1
end


for k,v in ipairs(items) do
    print(k,v)
end
--]]