单片机电子钟设计

这里给大家介绍一个51单片机电子钟汇编程序设计方法：

org 00h
a_bit equ 30h         ;秒寄存器
b_bit equ 31h         ;10秒寄存器
c_bit equ 32h         ;分寄存器
d_bit equ 33h         ;10分寄存器
e_bit equ 34h         ;小时寄存器
f_bit equ 35h         ;10小时集存器

 org 0000h
 ajmp star
 org 0030h

star:
 mov a,#00h  ;把各个位全部清0
 mov a_bit,a
 mov b_bit,a
 mov c_bit,a
 mov d_bit,a
 mov e_bit,a
 mov f_bit,a
stlop:  acall display  ;51单片机电子钟程序的计算部分

       inc a_bit       ;秒位加1
        mov a,a_bit    ;送a
        cjne a,#10,stlop;如果秒到10那么转到10秒处理
        mov a_bit,#00h  ;秒位清0
        inc b_bit       ;10秒位加1
        mov a,b_bit     ;送a
        cjne a,#6,stlop ;如果10秒到了6那么到分处理
        mov b_bit,#00h  ; 10秒位清0
        inc c_bit
        mov a,c_bit
        cjne a,#10,stlop
        mov c_bit,#00h
        inc d_bit
        mov a,d_bit
        cjne a,#6,stlop
        mov d_bit,#00h
        inc e_bit
        mov a,e_bit
        cjne a,#10,stlop
        mov e_bit,#00h
        inc f_bit
        mov a,f_bit
        cjne a,#3,stlop
        mov f_bit,#00h
 ajmp stlop  ;重新开始计算

display: ;显示子程序-51单片机电子钟直接显示在七段数码管上
         mov dptr,#numtab ;指定查表启始地址
         mov r0,#4
dpl1:    mov r1,#250     ;显示1000次
dplop:   mov a,a_bit     ;取秒位的值
         MOVC A,@A+DPTR  ;查秒位数的7段代码
         mov p0,a        ;送出到P0口显示
         clr p2.6        ;开个位显示
         acall d1ms      ;显示1ms
         setb p2.6     ;关闭显示

         mov a,b_bit    ;取10秒位的值
         MOVC A,@A+DPTR ;查10秒位的7段代码
         mov p0,a      ;送出10秒位到P0口显示

         clr p2.5      ;开10秒位显示
         acall d1ms    ;显示1ms
         setb p2.5

         mov a,c_bit   ;取分位
         MOVC A,@A+DPTR ;

         mov p0,a ;
         clr p2.4 ;
         acall d1ms ;

         setb p2.4

         mov a,d_bit   ;取10分位
         MOVC A,@A+DPTR ;

         mov p0,a ;

         clr p2.3 ;

         acall d1ms ;        

 setb p2.3

         mov a,e_bit   ;取小时位
         MOVC A,@A+DPTR ;
         mov p0,a ;
         clr p2.2 ;
         acall d1ms ;

         setb p2.2

         mov a,f_bit ;取10小时位
         MOVC A,@A+DPTR ;
         mov p0,a ;
         clr p2.1 ;
         acall d1ms ;
         setb p2.1

         djnz r1,dplop ;100次没完循环
         djnz r0,dpl1 ;4个100次没完循环
         ret
D1MS: MOV R7,#20 ;1MS延时(按12MHZ算)
      DJNZ R7,$
      RET
;七段数码管各划的数字排列表-http://www.51hei.com/  提供
numtab: db 28h,7eh,0a2h,62h,74h,61h,21h,7ah,20h,60h
;0 1 2 3 4 5 6 7 8 9
end