SSQRT:
MOV	R1,#81H			
MOV	R2,#01H
MOV	A,R1
MOV	R6,A
MOV	A,R2
ADD		A,R2
DA		A				
MOV	R0,A					
MOV	A,#9AH
SUBB	A,#01H
ADD		A,R0
DA		A				
CPL		C
MOV	R5,A
MOV	A,#9AH
SUBB	A,R5
ADD		A,R6
DA		A					
CPL		C
JZ		A,RT
INC		R2
SJMP	SSQRT
RT:
DEC		R2
RET