loop:
    mov     c,p1.1
    jnb     p1.0, xor_skip
    cpl     c
xor_skip:
    mov     p2.0,c
    sjmp    loop
