单片机电子钟设计
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
评论