数码管显示 0-9999计数器

;===========================================
四位显示器，是可以显示0000~9999的，但是在设计工程实际的产品时，前三个0，是不应该显示的。
一个成熟的程序，都应该有消除无效0的程序段。
消除无效0，其实就是用“空白”的代码来代替“0”。
在程序中，大家都知道有个七段码表，一般是把0123...的七段码依次排列在里面，那么第0~15个，通常就是0~F的七段码。
如果把“空白”七段码FFH，排在第16个位置，那么“空白”的代码就是16。
消除无效0的程序，应该从高位到低位（千位、百位、十位）依次判断，个位的0，是应该显示的，则不用判断。
某一位是0，就替换为16，如果不是0，不仅不用替换，还要停止判断后面其它的位。
比如：
千位是0：替换成16；
百位不是0：不用改，正常显示百位；
十位：无论是不是0，都应该正常显示，不用判断了。
做而论道看过不少大学的教材和参考书，都没有看到消除无效0的程序（也许，还是没有看全）。
呵呵，这大概就是“教学”和“工程”的区别吧。
;===========================================
下面做而论道把自己编写的“消除无效0的程序”公布出来，希望能够抛砖引玉。
消除无效0，话是说了很多，可是做而论道编写的程序，都是很简练的，看了不要失望。
程序如下：
;
ORG0000H
LJMPMAIN
ORG0030H
MAIN:
MOV70H,#0;显示缓冲区.
MOV71H,#0
MOV72H,#0
MOV73H,#0
MOV74H,#00H;计数单元.
MOV75H,#80H;都是BCD码.
;-------------------------------
M_LOOP:
LCALLDISP
JNBP3.2,JIA_YI
JNBP3.3,QING_L
AJMPM_LOOP
;-------------------------------
JIA_YI:
LCALLDISP
JBP3.2,M_LOOP
MOVA,75H
ADDA,#1
DAA
MOV75H,A
MOVA,74H
ADDCA,#0
DAA
MOV74H,A
J_L:
LCALLDISP
JNBP3.2,J_L
AJMPM_LOOP
;-------------------------------
QING_L:
LCALLDISP
JBP3.3,M_LOOP
MOV74H,#0
MOV75H,#0
AJMPM_LOOP
;-------------------------------
DISP:
MOVR0,#70H
MOVA,74H
SWAPA
ANLA,#0FH
MOV@R0,A
INCR0
MOVA,74H
ANLA,#0FH
MOV@R0,A
INCR0
MOVA,75H
SWAPA
ANLA,#0FH
MOV@R0,A
INCR0
MOVA,75H
ANLA,#0FH
MOV@R0,A
;---------------------------下面是消除无效的0
MOVR0,#70H
LL:
CJNE@R0,#0,QQ
MOV@R0,#16
PP:
INCR0
CJNER0,#73H,LL
QQ:
;---------------------------下面是显示部分
MOVDPTR,#D_TAB
MOVR2,#254
MOVR0,#70H
D_LOOP:
MOVA,@R0
MOVCA,@A+DPTR
MOVP2,#255;消隐.
MOVP0,A;输出段码.
MOVP2,R2;输出位码.
LCALLDL_1MS
MOVA,R2
RLA
MOVR2,A
INCR0
CJNER0,#74H,D_LOOP
RET
D_TAB:
DB0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H
DB80H,90H,88H,83H,86H,0A1H,86H,8EH,0FFH;FF是空白的代码
;-------------------------------
DL_1MS:
DJNZR7,$
DJNZR7,$
RET
;-------------------------------
END