scroll

-- The text to show on the monitor
local tText = {
"==========================",
"Creeper Head Industry Shop",
"=======Comming Soon=======",
"==========================",}
-- The side the monitor is on
local sSide = "top"
-- The text scale
local nTextScale = 3

local function printScroll(mon, t)
        local w, h = mon.getSize()
        local scroll = 1
        local maxLen
        for i, line in ipairs(t) do
                if not maxLen or #line > maxLen then
                        maxLen = #line
                end
        end
        while true do
                mon.clear()
                for i, line in ipairs(t) do
                        mon.setCursorPos(w - scroll, i)
                        mon.write(line)
                end
                scroll = scroll + 1
                if scroll >= w + maxLen then
                        scroll = 1
                end
                sleep(0.15)
        end
end

term.clear()
term.setCursorPos(12, 10)
print("Scrolling text on the monitor...")

local mon = peripheral.wrap(sSide)
mon.setTextColor(16)
mon.setBackgroundColor(32768)
mon.setTextScale(nTextScale)
printScroll(mon, tText, sx)