AOX     START
        LAD   GR0,#00FF
                             ;  1 �¨ GR1 ... ƒCƒ“ƒfƒbƒNƒVƒ“ƒO—p
        AND   GR0,DAT        ; #00FF �È #0FF3 �¨ GR0
        ST    GR0,RSLT       ; <GR0> �¨ <RSLT> 
                             ; GR0 �É #F0FC �¨ GR0
                             ; <GR0> �¨ <RSLT�{1> 
                             ; 2 �¨ GR1 ... ƒCƒ“ƒfƒbƒNƒVƒ“ƒO—p
        XOR   GR0,DAT,GR1    ; GR0 xor #FF00 �¨ GR0
        ST    GR0,RSLT,GR1   ; <GR0> �¨ <RSLT�{2>
        RET
DAT     DC    #0FF3,#F0FC,#FF00
RSLT    DS    3
        END