5.3.5格式化浮点数转换成双字节定点数.txt

来自「51单片机数据变换程序」· 文本 代码 · 共 64 行

FLTTOFXD: 
MOV 	A,@R0 				
MOV 	C,ACC.7 				
MOV 	1FH,C
MOV 	C,ACC.6 				
MOV 	ACC.7,C
MOV 	R2,A 				
INC 		R0
MOV 	A,@R0 				
MOV 	R3,A
INC 		R0
MOV 	A,@R0 				
MOV 	R4,A
DEC 	R0 					
DEC 	R0
MOV 	A,R2
JZ 		FTD4 				
JB 		ACC.7				
SETB 	C
SUBB 	A,#10H
JC 		LOOP1
SETB 	OV 					
RET
LOOP1: 
SETB 	C
MOV 	A,R2
SUBB 	A,#8 				
JC 		LOOP3
LOOP2: 
MOV 	B,#10H 				
LCALL 	LOOP8
SETB 	F0 					
CLR 	C
CLR 	OV
RET
LOOP3: 
MOV 	B,#8 				
LCALL 	LOOP8
SETB 	C 					
CLR 	F0
CLR 	OV
RET
LOOP4: 
MOV 	B,#0 				
LCALL 	LOOP8
CLR 	OV 					
CLR 	F0
CLR 	C
RET
LOOP8: 
MOV 	A,R2 				
CJNE 	A,B, LOOP9
MOV 	A,R3 				
MOV 	@R0,A
INC 		R0
MOV 	A,R4
MOV 	@R0,A
DEC 	R0
RET 
LOOP9: 
CLR 	C
LCALL 	FLTRRN 				
SJMP 	LOOP8