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

text = {
	"H",
	"Y",
	"D",
	"R",
	"O",
	"X",
	"I",
	"O",
	"S"
}

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