Lua

function time()
  return textutils.formatTime(os.time(), true)
end

local side = 'right'
local mon = peripheral.wrap(side)
local ok, err = pcall( function()
  parallel.waitForAny(
        function()
          while true do
                mon.clear()
                mon.setCursorPos(2,3)
                mon.write(time())
                sleep(1)
          end
        end,
        function()
          os.run( {}, "rom/programs/lua" )
        end
        )
  end )