p = peripheral.wrap("right")
p.clear()
p.setTextScale(5)

text = {
	"F",
	"R",
	"U",
	"I",
	"T",
	"O",
        "M",
        "A",
	"N"
}

while true do
	p.clear()
	for k,v in ipairs(text) do
		p.setCursorPos(1,8)
		p.write(v)
		os.sleep(0.5)
		p.scroll(1)
	end
	os.sleep(0.5)
	for i=1,7 do
		p.scroll(1)
		os.sleep(0.5)
	end
end