liston
*       sample relocatable module
* this program gets input and echoes it to output putting the character
* in a variable.
        .data
data    db      0
  db 0,0,0
str fcc "This is a test."
        .text
go      jsr     input
        staa    data
        jsr     output
        staa    absadd
        rts
        .abs
absadd  equ     1234h
        end