Program

local i = 1
while true do
    term.clear()
    term.setCursorPos(1,1)
    term.write(i.." press any key to increment")
    os.pullEvent("key")
    i = i+1
end