Einfache Uhr

CONTROL_START

THREAD(mainloop)
        dnl Update the time ...
        TTY_SELECT(clock)
        TTY_HOME()
        TTY_WRITE_TIME()

        WAIT(1)
THREAD_END(mainloop)

ON STARTUP DO
        dnl Initialize display and write out greeting
        TTY_CLEAR()
        TTY_GOTO(1,0)
        TTY_WRITE("Hallo stesie\n")

        dnl Create sub-window to display a clock at the upper right-hand side
        TTY_CREATE_WINDOW(clock, 1, 8, 0, COLS - 8)

        THREAD_START(mainloop)
END

CONTROL_END