sliding cc text image

-- The text to show on the monitor
local tText = {
"---------------------------------::////////:///////////:-------------------------------:::::///+++oo",
".............................:///:-------..............-:::::-.........-----..-----------::::////+++",
"..........................-::-..............................-:/:...................-------::::///+++",
"...............-:/:....-::......................................::-..................-----::::///+++",
"`````````````--.``.::-/.``````````````````````````````````````````-:-.................----::::////++",
"````````````.:```..`.::.````````````````````````````````````````````.:-```````........----::::////++",
"````````````:.``oNmy/``--.`  `````````````````````````````````````````-/.``````........---::::////++",
"````````````:```mNNNNh:```                  ```````````````````````````./.`````.......----::::////++",
"```````````-.``/NNNNNNN+`                             ```````````````````/-````.......----::::////++",
"```````````/```yNNNNNNNNo`                            ```````````....`````/-```.......----::::////++",
"````````` `/``.mNNNNNNNNN/                            ````````````````---../..........----::::///+++",
"````````` `/ `+NNNNNNNNNNh`                             ````````````````..-:/----.....----::::////++",
"````````` `/ `+NNNNNNNNNNh`                             ````````````````..-:/----.....----::::////++",
"``````````:.`.NNNNNNNNNNNN:                               ````````````..:ohNNy...o....----::::////++",
"````    ``:` -NNNNNNNNNNNN+`                              ```````````-omNNNNd....+...-----::::///+++",
"``````````:``.mNNNNNNNNNNNy`                             ``````````-ymNNNNNm-...::...-----::::///+++",
"````````` :```hNNNNNNNNNNNm`                           ``````````-yNNNNNNNm:..../..-//o/-::::////+++",
"````.:--``--` /NNNNNNNNNNNN-                           ````````-yNNNNNNNNd:```../:/:-o:o-::::////+++",
"````:``.:-`/```hNNNNNNNNNNN+`                     ```````````.oNNNNNNNNmo..``..//-.-od:s:::::////+++",
"````/.-//.:o` `.mNNNNNNNNNNd``                 ```````.`````:dNNNNNNmy+.`.```.:-..:+Ns-s:::::////+++",
"````:``ymo-.::``.hNNNNNNNNNNy``    .``        ``````.-:+.``omNNNNds/..`.```.....-//:d/:s:::://///+++",
"`   :``y/-:+```  `oNNNNNNNNNNh:`` `:`+`       ```````-.-//+sso/:.`````````.....:yssmh-:s:::://///+++",
"``  :``yhodms.`````:hNNNNNNNNNNh:-:-:/````  ` ```````..````````````````......-///NNyo:++::::////++++",
"``` .-`:mNNh/+:-`````-/+oo++/-.``````.````..```+```````````````````````/+..:sh--:mos::o:::://///++++",
"`````/``yNNN+..-:/.``````````````````````/d:```hh-````````````````````.-y+o::m//syh/:o/:::://///++++",
"`````--`-NNNh:../mms:.```-.`````````````.mh````oN:```````````````.+.`.-/mNy:omNNh+o-/+::::://///++++",
"``````/-`yNNNNdsmNm/:/+-.y...`....``````.od..``:h.```````````````.o::/:.dNNNNNNhdh:/o::::://///+++++",
"```````:-:/hNNNNNNNmhdd/+o-....o.....-.......``..``````````.+...-:yo:...yNNNNNs:+/:o:::::://///+++++",
"..``````/-/:dNNNNNNNNm:---:/y+:y.....s..........````..```..-h::/-.ys:+sdNNNNNN//+/o::::::://///+++++",
"....````./-+mNNNNNNNNNdo:--dNs/+/:--:y-.....o:.....`:/`..::/ds--..sNNNNNNNNNNmdo/+-::::::://///+++++",
".......`../:+odNNNNNNNNNNmmNN+/::yd++y/:-...h:....-:/o:/+s--yy:+sdNNNNNNNNNNs+s++----::::://////++++",
"...........:/:ommNNNNNNNNNNNNNNNmNds++mh//+/+sh//oNo-...oy/smNNNNNNNNNNNNNdym+++-----::::://////++++",
"............:/:o:/yNNNNNNNNNNNNNNNNNNNNo:-:..smossNd:://yNNNNNNNNNNNNNNNm+:/:o+------:::::://////+++",
"..............//:/:hNNNNNNNNNNNNNNNNNNNNNmmmmNNNNNNNNNNNNNNNNNNNNNNNNNNN+/+:o:.-------:::::://////++",
"...............-///y+:/NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNmNy/o+-..--------:::::://////+",
".................-///+/Nh/+ymNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNdsoodNd++//-......--------::::://////",
"...................-///so/:::mNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN/::./y+//-.........--------::::://///",
"....................--/+//+:/mNdoshNNhshmNNNNNNNNNhso+/+dNNmyNN+:////:.............-------::::::////",
"...................-----:+//odN++::dNo/:::dNNNNNNN:-.-..sNh-:odo+//-...............-------::::::////",
"................-----------://++++/mN+/:::dhyNsssNs-----:Nd/+o++----...-...........-------::::://///",
"..........--------------------/++//os+/+//mood/:/my:/:/:/++++:--------------.....--------:::::://///",
"---------------------::::::::::::/++++/:::://////++++++///-----------------------------::::://///+++",
}
-- The side the monitor is on
local sSide = "back"
-- The text scale
local nTextScale = 0.5

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(1, 1)
print("Scrolling text on the monitor...")

local mon = peripheral.wrap(sSide)
mon.setTextScale(nTextScale)
printScroll(mon, tText, sx)