root/as/cmd/XOR/xor_r_adr__z.casl

/* [<][>][^][v][top][bottom][index][help] */
;;; XOR r,adr 演算結果が零
MAIN    START
        LD      GR1,A
        XOR     GR1,B
        RET
A       DC      #0001
B       DC      #FFFE
        END

/* [<][>][^][v][top][bottom][index][help] */