CLR    A            ; initial clear A
     MOV    R0, #2       ; indirect pointer to R2
     XCH    A, @R0       ; get R2 byte to A
     DEC    R0           ; indirect pointer to R1
     XCHD   A, @R0       ; swap low nibble of R1 into A