ORG 0000H
MOV A,#00100101B
MOV R1,A
ANL A,#11110000B
SWAP A

ANL  A,#1010B
MOV R0,A
MOV A,R1
ANL A,#00001111B
ADD A,R0
MOV 30H,A
RET
end