FINDS:
MOV    	B,A
MOV    	DPL,R1
MOV    	DPH,R0
FINDB1:
MOVX	A,@DPTR
CJNE	A,B,FINDB2
MOV	R1,DPL					
MOV	R0,DPH
CLR		A						
RET
FIND2:
INC    	DPTR
DJNZ   	R7,FINDB1
MOV    	A,#0FFH
RET