Trash Manager 2.1

local trashListChest = peripheral.wrap("back")
local aeNetwork = peripheral.wrap("right")
while true do
   trashList = {}
   for i,data in pairs(trashListChest.getAllStacks(false)) do
      if aeNetwork.getItemDetail({["id"] = data["id"], ["dmg"] = data["dmg"]}, false) ~= nil then
         while aeNetwork.getItemDetail({["id"] = data["id"], ["dmg"] = data["dmg"]}, false).qty > ( data["qty"] * 1000 ) do
            if trashList[data["display_name"]] == nil then
               trashList[data["display_name"]] = aeNetwork.exportItem({ ["id"] = data["id"], ["dmg"] = data["dmg"] }, "up", math.min(aeNetwork.getItemDetail({["id"] = data["id"], ["dmg"] = data["dmg"]}, false).qty - ( data["qty"] * 1000 ), data["max_size"])).qty
            else
               trashList[data["display_name"]] = trashList[data["display_name"]] + aeNetwork.exportItem({ ["id"] = data["id"], ["dmg"] = data["dmg"]}, "up", math.min(aeNetwork.getItemDetail({["id"] = data["id"], ["dmg"] = data["dmg"]}, false).qty - ( data["qty"] * 1000 ), data["max_size"])).qty
            end
            sleep(.05)
         end
      end
   end
   print("Cleaned out:")
   for name,i in pairs(trashList) do
      print(name.." - "..i)
   end
   sleep(30)
end