binbcd.asm

十六进制转十进制的汇编源码程序 可以直接调用使用

	rbcd	equ	20h
;	a存放着要转换的数据；
;	B是存放低8位数据
;把要转换的数据放入A中;就可以通过RBCD存储器
;得到你想要的使进制数据
;注意要保存好状态
;只要调试时观察窗口的变化就可以看到运行结果正确与否

		org  0000h
		mov	a,#01h
		lcall	binbcd
		mov	a,#02h
		lcall	binbcd
		mov	a,#03h
		lcall	binbcd
		mov	a,#04h
		lcall	binbcd
		mov	a,#05h
		lcall	binbcd
		mov	a,#06h
		lcall	binbcd
		mov	a,#07h
		lcall	binbcd
		mov	a,#08h
		lcall	binbcd
		mov	a,#09h
		lcall	binbcd
		mov	a,#0ah
		lcall	binbcd
		mov	a,#0bh
		lcall	binbcd
		mov	a,#0ch
		lcall	binbcd
		mov	a,#0dh
		lcall	binbcd
		mov	a,#0eh
		lcall	binbcd
		mov	a,#0fh
		lcall	binbcd
		mov	a,#010h
		lcall	binbcd
		mov	a,#020h
		lcall	binbcd
		mov	a,#0ffh
		lcall	binbcd
;*********16进制转十进制****************
BINBCD:		push    a
                push    b
		MOV	B,#100
		DIV	AB
		MOV	A,#10
		XCH	A,B
		DIV	AB
		SWAP	A
		CLR	C
		ADD	A,B
		MOV	RBCD,A
		pop     b
		pop     a
		RET
;*************可以减到零的BCD减1********
BCDB:		MOV	A,RBCD
		ANL	A,#0FH
		CJNE	A,#00H,BCDB1
		MOV	A,RBCD
		ANL	A,#0F0H
		SWAP	A
		DEC	A
		SWAP	A
		ADD	A,#09H
		RET
BCDB1:		DEC	A
		MOV	B,A
		MOV	A,RBCD
		ANL	A,#0F0H
		ADD	A,B
		RET