software/assembly_fragments/echo.asm

echo
    WORD_134217728      # XBUF
    WORD_134217732      # XCSR
    WORD_134217736      # RBUF
    WORD_134217740      # RCSR

getchar
    LDSP+0
    LOAD
    TEST
    BRZ>getchar
    LDSP+1
    LOAD
                        # A character is now on the TOS and ready to be printed to the terminal.
putchar
    LDSP+3
    LOAD
    TEST
    BRZ>putchar
    LDSP+4
    STORE
                        # Now wait for the next incoming character.
    IM_0
    TEST
    BRZ>getchar