RemotePresentation Sharer

for k, side in pairs(rs.getSides()) do
  rednet.open(side)
end

local nativeTerm = term.native or term

local function invoke(sMethod, ...)
    tArgs = {...}
    nativeTerm[sMethod](...)
    broad = ""
    if sMethod == "write" then
        rednet.broadcast(sMethod .. ":" .. textutils.serialize(...))
    else
        if #tArgs == 1 then
            broad = tostring(tArgs[1])
        end
        if #tArgs > 1 then
            for i = 1,#tArgs do
                broad = broad .. tostring(tArgs[i]) .. ","
            end
        end
        rednet.broadcast(sMethod .. ":" .. broad)
    end
end

term.write = function(text) invoke("write", text) end
term.scroll = function(n) invoke("scroll", n) end
term.setCursorPos = function(x, y) invoke("setCursorPos", x, y) end
term.setCursorBlink = function(B) invoke("setCursorBlink", B) end
term.clear = function() invoke("clear") end
term.clearLine = function() invoke("clearLine") end

nativeTerm.clear()
nativeTerm.setCursorPos(1, 1)