7.1.6浮点符号函数.txt

来自「MCS51 单片机源码系列之 第七章 数学函数 」· 文本 代码 · 共 18 行

FLTSGN: 
INC 		R0 				
MOV 	A,@R0
INC 		R0
ORL 	A,@R0
DEC 	R0
DEC 	R0
JNZ 		SGN
RET 					
SGN: 
MOV 	A,@R0 			
RLC 	A 				
MOV 	A,#1 			
JNC 		SGN1 			
MOV 	A,#0FFH 			
SGN1: 
RET