写在前面:
前天晚上断网之后闲来无事忽然心血来潮想起和谁说过以我现在的水平做个时钟没有什么问题,就准备将它实现了。借用老师的学习板子,一直搞到凌晨2点做出了一个24小时的计数器显示,因为没有学过按键的使用方法,昨天实验课下课后问了老师,她给出了查询方式。昨晚搞了下,可以置数,但是不能实现0~60范围加,只能0~99加。今天上午在老师的指导下,终于可以了,总算没有食言啊。呵呵,下面贴出程序了。
先来个效果图:
mini_second equ 30h ;设置0.05秒、秒、分、时的地址
second equ 31h
minute equ 32h
clock equ 33h
k1 equ p3.2 ;设置按键地址,为外部中断口int0和int1
k2 equ p3.3
org 0000h
ljmp start
org 000bh
ljmp t0_x ;使用中断计时
org 0050h
start: mov mini_second,#00h ;清零
mov second,#00h
mov minute,#00h
mov clock,#00h
mov tmod,#01h ;置工作方式1,开定时器
mov th0,#3ch
mov tl0,#0b0h
setb ea
setb et0
setb tr0
start1: lcall show_led ;主程序跳转程序显示
lcall key_d ;置数程序
ljmp start1 ;一直循环显示
t0_x:
push acc ;保护现场
push psw
mov th0,#3ch ;置初值,这个不是很准确,
mov tl0,#0b4h ;估计一分钟慢个2~3秒
inc mini_second
mov a,mini_second
cjne a,#20,ret0 ;20次为1秒,没有20次均跳出中断重新跳
mov mini_second, #00h
mov a,second
add a,#01h
da a
mov second,a
cjne a,#60h,ret0 ;1秒后出循环,每秒后秒清零,跳到分计时加1
mov second,#00h
mov a,minute
add a,#01h ;分同秒
da a
mov minute,a
cjne a,#60h,ret0
mov minute,#00h
mov a,clock
add a,#01h
da a
mov clock,a
cjne a,#24h,ret0
mov clock,#00h
ret0: pop psw ;结束保护,跳出
pop acc
reti
nop
nop
nop
;======================================显示子程序
show_led:
mov a,second ;个位秒显示
anl a,#0fh
mov 40h,a
clr p1.5 ;片选数码管
clr p1.6
setb p1.7
mov a,40h
lcall led_x
lcall delay
mov a,second ;十位秒显示
anl a,#0f0h
swap a
mov 41h,a
setb p1.5
clr p1.6
setb p1.7
mov a,41h
lcall led_x
lcall delay
mov a,minute ;个位分显示
anl a,#0fh
mov 42h,a
setb p1.5
setb p1.6
setb p1.7
mov a,42h
lcall led_x
lcall delay
mov a,minute ;十位分显示
anl a,#0f0h
swap a
mov 43h,a
clr p1.5
clr p1.6
clr p1.7
mov a,43h
lcall led_x
lcall delay
mov a,clock ;个位时显示
anl a,#0fh
mov 44h,a
clr p1.5
setb p1.6
clr p1.7
mov a,44h
lcall led_x
lcall delay
mov a,clock ;十位时显示
anl a,#0f0h
swap a
mov 45h,a
setb p1.5
setb p1.6
clr p1.7
mov a,45h
lcall led_x
lcall delay
ret
led_x: mov dptr,#led_data
movc a,@a+dptr
mov p0,a
ret
;====================================延迟子程序
delay: mov r7,#10
de1: mov r6,#100 ;延时1ms多一点,因为晶振为11.0592MHZ
djnz r6,$
djnz r7,de1
ret
;===================================数码管的段选码
led_data: db 0c0h,0f9h,0a4h,0b0h,099h,92h,82h,0f8h,80h,90h
;=====================================置数子程序
key_d: jnb k1,key1
jnb k2,key2
ret
key1: mov a,minute ;查询方式 ————> 分位置数
clr c ;清零进位,防止干扰da和cjne指令的操作
inc a ;累加器自加一 ,此为加法置数
da a ;十进制处理
cjne a, #60h, k_01 ;判断是否为60,为60清零,跳出
mov a,#00h
k_01: mov minute,a
jnb k1,$
ret
key2: mov a,clock ;时位 置数同上
clr c
inc a
da a
cjne a, #24h,k_11
mov a,#00h
k_11: mov clock,a
jnb k2,$
ret
本程序如有雷同,纯属不可能 ?
我的不够成熟或称之为幼稚的汇编编程,郑文老师的独特学习板子(显示数码管是p0口,片选竟然是用p1口3个I/O口接138,——!这个独特焊接方式让我程序写得这么长),郑子含老师对我置数程序的修改,才出来的程序,虽然不是什么成功,至少是一个开始,我会继续疯下去的。这个时钟的弊端挺多的,比如置数的时候,会有闪屏现象,程序我会再改进的。 ?
后记:对于院系电子设计竞赛我的失败我得向我的组员道歉,虽然我知道那些所谓成功的几组也比我们好不到哪里去(看过答辩了),但是我会继续我们的课题,加油吧 ?
编译工具:wave6000 ?
烧制工具:stc-isp(话说国产的stc公司要统一全球51市场,呵呵) 、RS232串口