MCS-51单片机应用子程序：3.5.1单字节开方

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