5.1.2 bcd码移位.txt

里面有好多的原码,大家都来下载.用asm编写的

BCDRL10: 
MOV 	A,R7 				
MOV 	R2,A
ADD 	A,R0 				
MOV 	R0,A
MOV 	R3,#0 				
BCDRL1: 
DEC 	R0 					
MOV 	A,@R0 				
SWAP 	A 					
MOV 	@R0,A 				
MOV 	A,R3 				
XCHD 	A,@R0 				
MOV 	R3,A 				
DJNZ 	R2,BCDRL1 			
RET