poly     START 0
        RSUB
        LDB x1
         END   poly

x1 WORD 1