Crafter

local aeNetwork = peripheral.wrap("top")
local fuzzyExport = peripheral.wrap("front")

while true do
   for i,data in pairs(fuzzyExport.getAllStacks()) do
      for j=1,1024
         while aeNetwork.countOfItemType(data["id"], j) > 0 do
            pcall( function () return aeNetwork.extractItem({ ["id"] = data["id"], ["dmg"] = j, ["qty"] = 64 }, "west") end )
         end
      end
   end
   sleep(1)
end