<b>
BOO:
    MOV     A,R7
    ANL     A,#0FH
    MOV     R7,A
    MOV     A,x
    ANL     A,#0F0H
    ORL     A,R7
    MOV     x,A
    RET     
</b>