[讨论] 两位数显示的自动加计数器

硬件设置如b.htm试验

a_bit equ 20h         ;个位数存放处
b_bit equ 21h         ;十位数存放处
temp equ 22h          ;计数器寄存器

star:   mov temp,#0   ;初始化计数器
stlop:  acall display
        inc temp
        mov a,temp
        cjne a,#100,next ;=100重来
        mov temp,#0
next:   ljmp stlop

;显示子程序
display: mov a,temp  ;将temp中的十六进制数转换成10进制 
         mov b,#10   ;10进制/10=10进制
         div ab
         mov b_bit,a ;十位在a
         mov a_bit,b ;个位在b

         mov dptr,#numtab ;指定查表启始地址
         mov r0,#4 
dpl1:    mov r1,#250 ;显示1000次
dplop:   mov a,a_bit ;取个位数
         MOVC A,@A+DPTR ;查个位数的7段代码
         mov p0,a ;送出个位的7段代码
         clr p2.0 ;开个位显示
         acall d200us ;显示200us
         setb p2.0
         mov a,b_bit ;取十位数
         MOVC A,@A+DPTR ;查十位数的7段代码
         mov p0,a ;送出十位的7段代码
         clr p2.1 ;开十位显示
         acall d200us ;显示200us
         setb p2.1
         djnz r1,dplop ;100次没完循环
         djnz r0,dpl1 ;4个100次没完循环
         ret
;200uS延时(按12MHZ算)
;====================================================
D200uS: MOV R7,#98 
      DJNZ R7,$
   nop
      RET

;7段数码管各划的数字排列表
numtab: db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h
        ;0 1 2 3 4 5 6 7 8 9
        db 88h,83h,0c6h,0a1h,86h,8eh
        ;a b c d e f


       end