单片机入门程序三

;实验名称：一位数码管静态显示0-9实验 ；
;作者： 龙谊 ；
;版本： VER 1.0；
;说明： 采用共阴极数码管 ；
;修改： 无；
;编程语言：汇编语言 ；

;*****************************************;

ORG00H
START: MOVDPTR,#TABLE;把表TABLE的地址存入数据指针
BEGIN: CLRA ;清除ACC
MOVCA,@A+DPTR ;在表TABLE所指的地址中取码
CJNEA,#01,QIDONG;码=01H？不等跳到QIDONG
JMPSTART ;等于返回重新开始
QIDONG:MOVP0,A ;将码送P0,即P0显示数码管的段码
CALLDELAY ;调延时子程序
INCDPTR ;数据指针加1,指向下一个码
JMPBEGIN
DELAY: MOVR5,#100 ;采用12MHZ晶振，延时时间为1秒
D1: MOVR6,#20
D2: MOVR7,#248
DJNZR7,$
DJNZR6,D2
DJNZR5,D1
RET
TABLE: DB3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH ;共阴极数码管0-9的编码
DB01H ;结束码
END