FXDTOFLT:
MOV R2,A
MOV A,@R0
MOV R3,A
INC R0
MOV A,@R0
MOV R4,A
DEC R0
FLTRLN:
MOV A,R3
ORL A,R4
JNZ RLN1
MOV R2,#0C1H
RET
RLN1:
MOV A,R3
JB ACC.7,RLN2
CLR C
LCALL RL1
SJMP FLTRLN
RLN2:
CLR OV
LJMP MOV0
RET