#INCLUDE "plumbing.module"

PROC main ()
  SEQ
    INITIAL BYTE x IS 1:
    serial.setup(TX0,300)
    WHILE TRUE
      SEQ
        serial.write.byte(TX0,x)
        serial.write.newline(TX0)
        x:=x+1
        delay(250)
: