e12.asm

来自「单片机汇编例程学习,大量的汇编例程」· 汇编 代码 · 共 65 行

;///////////////////////////////////////////
;本程序源代码由单片机培训网提供.
;单片机培训网,让更多人学习单片机更容易.
;第一网址----www.mcuedu.com
;第二网址----http://51_train.nease.net
;创办人------刘永忠
;热线电话----[phone]
;[e-mail]
;在以2000H为首的存储区中，存放着20个用ASCII码表示的0~9之间的数，试编程将它们转换成BCD码，并以压缩BCD码
;（即一个单元存放二位BCD码）的形式存放在3000H~3090H单元中。
;程序难易等级--------稍难
;///////////////////////////////////////////
	
 	
 	
 	
 	
 	org 0000h
	ljmp main
	org 0030h
main:
;	mov dptr,#2000h
;	mov r3,#20
;loop1:
;	mov a,#39h
;	movx @dptr,a
;	inc dptr
;	djnz r3,loop1

	mov r1,#30h
	mov r2,#0ah
	mov dptr,#2000h
tt:
	movx a,@dptr
	clr c
	subb a,#30h
	swap a
	mov 41h,a
	inc dptr
	movx a,@dptr
	clr c
	subb a,#30h
	mov @r1,a
	mov a,41h
	xchd a,@r1
	mov @r1,a
	inc r1
	inc dptr
	djnz r2,tt
	mov dptr,#3000h
	mov r1,#30h
	mov r2,#0ah
tt1:
	mov a,@r1
	movx @dptr,a
	inc r1
	inc dptr
	djnz r2,tt1
	sjmp $
	end