mon.lua

local furnace = peripheral.find("ic2:electric_furnace")

local macerator = peripheral.find("ic2:macerator")

local extractor = peripheral.find("ic2:extractor")

local mon = peripheral.find("monitor")
mon.setTextScale(0.5)
local fWin = window.create(term.current(),45,1,15,5)
local mWin = window.create(term.current(),65,1,15,5)
local eWin = window.create(term.current(),85,1,15,5)


term.redirect(mon)
while true do
    local input = furnace.getItem(7)
    local output = furnace.getItem(2)

    local input2 = macerator.getItem(7)
    local output2 = macerator.getItem(2)

    local input3 = extractor.getItem(7)
    local output3 = extractor.getItem(2)

    if input then
        input = input.getMetadata()
    end

    if input2 then
        input2 = input2.getMetadata()
    end

    if input3 then
        input3 = input3.getMetadata()
    end

    if output then
        output = output.getMetadata()
    end

    if output2 then
        output2 = output2.getMetadata()
    end

    if output3 then
        output3 = output3.getMetadata()
    end

    term.redirect(mon)
    fWin.clear()
    mWin.clear()
    eWin.clear()

    term.redirect(fWin)
    term.setCursorPos(1,1)
    print("E-Furnace")
    if input then
        print("I: "..(input.displayName or "").." "..(input.count and "x"..input.count or ""))
    end
    if output then
        print("O: "..(output.displayName or "").." "..(output.count and "x"..output.count or ""))
    end


    term.redirect(mWin)
    term.setCursorPos(1,1)
    print("Macerator")
    if input2 then
        print("I: "..(input2.displayName or "").." "..(input2.count and "x"..input2.count or ""))
    end
    if output2 then
        print("O: "..(output2.displayName or "").." "..(output2.count and "x"..output2.count or ""))
    end

    term.redirect(eWin)
    term.setCursorPos(1,1)
    print("Extractor")
    if input3 then
        print("I: "..(input3.displayName or "").." "..(input3.count and "x"..input3.count or ""))
    end
    if output3 then
        print("O: "..(output3.displayName or "").." "..(output3.count and "x"..output3.count or ""))
    end


    sleep(0.1)
end