DraconicPocket

modem = peripheral.wrap("back");
modem.open(0);
modem.open(1);
sizex, sizey = term.getSize();

--Clearing
term.setCursorPos(1, 1);
term.clear();

while (true) do
    event, side, freqRX, freqTX, message, dis = os.pullEvent("modem_message");
    -- FIRST STORAGE
    if freqRX == 0 then
        -- message to variables
        rfStored = message.stored;
        rfMax = message.max;
        rfFlow = message.flow;

        -- rfLevel display
        -- clearing
        term.setCursorPos(1, 1);
        term.clearLine();
        term.setCursorPos(1, 2);
        term.clearLine();
        term.setCursorPos(1, 3);
        term.clearLine();

        term.setCursorPos(1, 1);
        term.setTextColor(colors.white);
        term.write(rfStored .. " RF");

         -- status bar display
        term.setCursorPos(1, 2);

        percentage = (rfStored / rfMax) * sizex;

        term.setTextColor(colors.green);
        for i = 1, percentage do
            term.write("I");
        end

        term.setTextColor(colors.red);
        for j = 0, (sizex - percentage) do
            term.write("I");
        end

        -- rfFlow display
        term.setCursorPos(1, 3);
        if rfFlow >= 0 then
            term.setTextColor(colors.green)
        else
            term.setTextColor(colors.red)
        end

        term.write(rfFlow  .. " RF/tick");
    end

    -- SECOND STORAGE
    if freqRX == 1 then
        -- message to variables
        rfStored = message.stored;
        rfMax = message.max;
        rfFlow = message.flow;

        -- rfLevel display
        -- clearing
        term.setCursorPos(1, 5);
        term.clearLine();
        term.setCursorPos(1, 6);
        term.clearLine();
        term.setCursorPos(1, 7);
        term.clearLine();

        term.setCursorPos(1, 5);
        term.setTextColor(colors.white);
        term.write(rfStored .. " RF");

         -- status bar display
        term.setCursorPos(1, 6);

        percentage = (rfStored / rfMax) * sizex;

        term.setTextColor(colors.green);
        for i = 1, percentage do
            term.write("I");
        end

        term.setTextColor(colors.red);
        for j = 0, (sizex - percentage) do
            term.write("I");
        end

        -- rfFlow display
        term.setCursorPos(1, 7);
        if rfFlow >= 0 then
            term.setTextColor(colors.green)
        else
            term.setTextColor(colors.red)
        end

        term.write(rfFlow  .. " RF/tick");
    end
end

--pastebin get MSBbQEUR DraconicPocket