bcd neg.asm

来自「《Proteus在MCS-51&ARM7系统中的应用百例》书中附带原程序代码」· 汇编 代码 · 共 26 行

		ORG		00H
		MOV	30H,#12H
		MOV	31H,#44H
		MOV	32H,#89H

		MOV		R7,#03H
		MOV		R0,#30H
NEG: 	MOV 	A,R7		;取（字节数减一）至R2中 
		DEC 	A 
		MOV 	R2,A 
		MOV 	A,R0		;保护指针 
		MOV 	R3,A 
NEG0: 	CLR 	C 
		MOV 	A,#99H 
		SUBB 	A,@R0		;按字节十进制取补 
		MOV 	@R0,A		;存回[R0]中 
		INC 	R0			;调整数据指针 
		DJNZ 	R2,NEG0		;处理完（R2）字节 
		MOV 	A,#9AH		;最低字节单独取补 
		SUBB 	A,@R0 
		MOV 	@R0,A 
		MOV 	A,R3		;恢复指针 
		MOV 	R0,A 
		SJMP	$
		END