51单片机的电子钟 显示时间 年月日 闹钟 整点报时 秒表 硬件原理图 仿真结果都有

一、系统概述：

1．基本要求：

(1) 显示准确的北京时间（时、分、秒），可用24小时制式；

(2) 随时可以调校时间。

(3) 增加公历日期显示功能（年、月、日），年号只显示最后两位；

(4) 随时可以调校年、月、日；

(5) 允许通过转换功能键转换显示时间或日期。

(6) 所有按键需要通过串口自发自收来调校各种功能。

2．发挥部分

（1）增加秒表功能

（2）增加闹铃功能

（3）增加整点报时功能。

实验功能：

本系统是基于单片机AT89S52制作的数字电子钟。根据实验要求，在完成实验所要求的基本功能外，扩展了几个功能。

硬件系统设计方面：

采用六位LED数码管，用切换的方式显示日期或时间和设置的闹钟时间；

可调整日期或时间以及闹钟时间；

具有设置闹钟的功能；

软件系统设计方面：

程序采用汇编语言编写，使自己更加理解硬件语言以及其工作原理。

“时钟”基准时间由单片机内部的定时中断提供用一个计数器对定时中断的次数进行计数，可实现“秒”定时，同理可以进行“分”﹑“时”定时，以及“日”﹑“月”﹑“年”定时，并充分考虑闰年等情况下的日期的差异

采用按键查询功能复用，简化了程序的设计

采用动态扫描法显示6位数码管

方案考虑：

1、硬件方案

（1）、采用6位LED数码管显示日期或者时间。

（2）、显示器的驱动可采用“静态显示驱动”（如7段译码/锁存/驱动芯片CD4511）；也可采用“动态扫描驱动”，但后者比前者所需驱动电流要大。

（3）显示部分也可采用液晶，但液晶成本较高。

（4）、键盘的按键数目较多时则采用行列式矩阵结构为好。“一键多用”的构思和设计能大为减少按键的数目。  

（5）、整体设计上应考虑其结构简单﹑操作简便﹑布局美观﹑成本低廉。

2、软件方案

（1）、“时钟”基准时间由单片机内部的定时中断提供，定时时间应是“秒”的整除数，且长短适宜。最长不能超过16位定时器的最长定时时间；最短不

能少于中断服务程序的执行时间。通常来说基准时间越短，越有利于提高时钟的运行精确度。

（2）、用一个计数器对定时中断的次数进行计数，可实现“秒”定时，同理可以进行“分”﹑“时”定时，以及“日”﹑“月”﹑“年”定时。

（3）、LED 数码管显示器采用“动态扫描驱动”时要注意的是：驱动信号的维持时间必须大于“起辉时间”（电流大起辉时间短），而驱动信号的间歇时间必须小于“余辉时间”（电流大余辉时间长），但驱动电流大小受硬件电路能力和LED数码管极限功耗的制约。

（4）、动态扫描显示方式在更新显示内容时，因LED数码管余辉的存在可能会造成显示字符的模糊，新内容写入显示器之前须将所有的LED数码管熄灭。

（5）、关于自动识别“月大﹑月小”和“平年﹑润年”问题的考虑

方案比较：

显示部分：

我们采用了数码管显示，鉴于数码管也能实现基本的功能，而且液晶成本又太昂贵，同时我们放弃了用译码芯片，一方面进一步降低成本，另一方面少了部分电路，减少错误产生。

焊接部分：

印制电路板的特点是布线紧凑、优点是美观，跳线少，线路稳定，主要的工作量在于前期原理图的绘制跟PCB板的布线，缺点是腐蚀容易不均匀而断线；而手工焊万用板优点是可变性高，自由度高，主要工作量是原理图的布线与跳线的构思跟焊接，缺点是电路板焊接麻烦。

我们选择手工焊万用板的原因：

1 原材料提供的只是万用板，从按照题目要求的方面考虑

2 万用板便于功能的扩展，板上也留了很多空位为创新功能使用。

按键部分

按键方面，主要是采用矩阵键盘扫描跟按键查询。矩阵键盘扫描法用到比较多的按键，使操作复杂，资源得不到充分利用。为了避免不必要的失误，所以采用“按键查询，一个功能一个按键”的方式，排列整齐，简洁美观

单片机作品实物图：

二、元器件清单:

IC



89S52
1

IC座


40脚
3

晶体振荡器

12MHz
1

微型按钮

4脚

5

LED发光二极管
红色
1

电阻


4.7K
2

电阻


1k

6

电阻


3K


6

电阻


330  
7

排阻            1k      1

电解电容

10UF
1

万能电路板

块

1

LED七段数码管
共阳BS
6

晶体三极管

PNP8550
6

蜂鸣器                  1

三．按键使用

（1）。P0.7口按键具有切换显示模式的功能

（2）。P0.6口按键具有闪烁位移位的功能

（3）。P0.5 口按键具有对闪烁位加一的功能

（4）。P0.4口按键具有计秒的功能，即开始秒表/停止秒表/清楚秒表，同时还具有停止闹钟的功能。

（5）第9口具有复位的功能。即一按下去后恢复到初始化状态

（6）串口自收自发功能，当p3.0与p3.1连接起来后，按键有效，但当p3.0与p3.1断开后，按键无效。

系统使用调试说明：

按开关key1次数	系统状态
0	(50)＝00H，(51H)＝00H，正常显示时间
1	(50)＝01H，(51H)＝00H，正常显示日期
2	(50)＝02H，(51H)＝00H，正常显示闹铃
3	(50)＝03H，(51H)＝00H，正常显示秒表
4	(50)＝00H，(51H)＝00H，正常显示时间

按键2：

按开关key2次数	系统状态
0	(50)＝00H，(51H)＝00H，不闪烁
1	(50)＝00H，(51H)＝01H，低两位闪烁
2	(50)＝00H，(51H)＝02H，中两位闪烁
3	(50)＝00H，(51H)＝03H，高两位闪烁
4	(50)＝00H，(51H)＝00H，不闪烁

数码管显示代码表：

数码管管脚号	Dp	g	f	e	d	c	b	a	数码管显示值	编码数值
P1端口	P1.7	P1.6	P1.5	P1.4	P1.3	P1.2	P1.1	P1.0
端口电平	1	1	0	0	0	0	0	0	0	C0H
	1	1	1	1	1	0	0	1	1	0F9H
	1	0	1	0	0	1	0	0	2	0A4H
	1	0	1	1	0	0	0	0	3	0B0H
	1	0	0	1	0	1	0	0	1	99H
	1	0	0	1	0	0	1	0	5	92H
	1	0	0	0	0	0	1	0	6	82H
	1	1	1	1	1	0	0	0	7	0F8H
	1	0	0	0	0	0	0	0	8	80H
	1	0	0	1	0	0	0	0	9	90H

主程序流程图：

当有不同按键，进入不同的服务子程序，同时在查询的时候判断是不是整点，有没有到达闹铃设置的时间

进入服务子程序采用的是查询的模式。

显示模式调整流程图：

显示标志位位50h

闪烁位移位：其中设定闪烁标志位为51H.当它变化时标志着不同的闪烁位

闪烁位加一子程序：对当前闪烁的位进行加一

file:///D:/Personal/Temp/ksohtml/wps_clip_image-8871.png其中

同理对于分，时，日，月，年，都要判断是否到达最大数，是则分，时，清0，日，月，年置一，

秒表子程序

闹铃功能子程序：

整点报时子程序流程图：

TO中断子程序：

日历子程序

1. 
   
2. 附程序清单：
   
3. ;;;;;;;;;;;;;;;;;;;
   
4. ;预定义部分;;;;;;;;
   
5. ;;;;;;;;;;;;;;;;;;;
   
6. 
   
7. ;预定义用来显示小时、分钟、秒钟的存储单元
   
8. secL equ 30h;秒的十位
   
9. secH equ 31h;秒的个位
   
10. minL equ 32h;
    
11. minH equ 33h;
    
12. hourL equ  34h;
    
13. hourH equ 35h;
    
14. dayL equ 36h
    
15. dayH equ 37h
    
16. monL equ 38h
    
17. monH equ 39h
    
18. yearL equ 3ah
    
19. yearH equ 3bh
    
20. als_l equ 40h;
    
21. als_h equ 41h;
    
22. alm_l equ 42h;
    
23. alm_h equ 43h;
    
24. alh_l equ 44h;
    
25. alh_h equ 45h;
    
26. xsbz  equ 50h;
    
27. shanshou  equ 51h;
    
28. mao_sfw equ 5ah;秒的十分位
    
29. mao_bfw equ 5bh;秒的百分位
    
30. mao_sw  equ 5ch;秒的十位
    
31. mao_gw  equ 5dh; 秒的各位
    
32. mao_qw  equ 5eh;qianwei
    
33. mao_bw  equ 5fh;baiwei
    
34. 
    
35. org 0000h;复位入口
    
36. ljmp main
    
37. org 000bh;定时器T0入口
    
38. ljmp time0
    
39. org 0003h;外部中断0入口
    
40. reti;
    
41. org  0013h;外部中断1入口
    
42. reti
    
43. org 001bh;定时器T1入口
    
44. ljmp time1;
    
45. org 0023h;串行中断入口
    
46. reti
    
47. 
    
48. 
    
49. ;;;;;;;;;;;;;;;;;;;;;;
    
50. ;主程序入口;;;;;;;;;;;
    
51. ;;;;;;;;;;;;;;;;;;;;;;
    
52. main:
    
53. ;放置初始值,H表示低地址，L表示高地址
    
54. mov secH,#0h
    
55. mov secL,#5h
    
56. mov minH,#9h
    
57. mov minL,#5h
    
58. mov hourH,#2h
    
59. mov hourL,#1h
    
60. mov yearH,#8h
    
61. mov yearL,#0h
    
62. mov monH,#1h
    
63. mov monL,#1h
    
64. mov dayH,#0h
    
65. mov dayL,#2h
    
66. mov als_l,#3h;
    
67. mov als_h,#1h;
    
68. mov alm_l,#3h;
    
69. mov alm_h,#0h;
    
70. mov alh_l,#1h;
    
71. mov alh_h,#2h;
    
72. mov mao_sfw ,#00h;秒的十分位
    
73. mov mao_bfw ,#00h;秒的百分位
    
74. mov mao_sw,#00h  ;秒的十位
    
75. mov mao_gw,#00h  ; 秒的各位
    
76. mov mao_qw,#00h;  
    
77. mov mao_bw,#00h;
    
78. mov 50h,#00h;
    
79. mov 51h,#00h;
    
80. clr p3.2;
    
81. MOV SCON,#90H;串行口工作于方式2
    
82. ;定时器T0，T1设置
    
83. mov TMOD,#11H;设置T0与T1为16位定时器
    
84. mov TL0,#0b0h;
    
85. mov TH0,#3ch;T0初值为3cb0h定时50ms
    
86. mov TL1,#0f0h;
    
87. mov TH1,#0d8h;T1初值为fc18h定时10ms
    
88. setb pt0;
    
89. setb EA;总中断允许
    
90. setb et0;
    
91. setb TR0;开启T0中断开始记时
    
92. mov r4,#20;定时次数，刚好1s
    
93. mov 60h,#0ah;定时器1定时次数10次
    
94. start:
    
95.      lcall display;
    
96.        jnb P0.7,k0;
    
97.        jnb p0.6,k1;
    
98.        jnb p0.5,k3;
    
99.        jnb p0.4,k4;
    
100.        lcall naoling1;
     
101.        lcall zhengdi
     
102.        jmp start;
     
103. 
     
104. k0:    lcall chxianshi;
     
105. k1:    lcall k2
     
106. k4:    ljmp jimiao;
     
107. ;;;;;;;;;;;;;;;;;;;;;;;;;
     
108. ;;;;闪烁位加一
     
109. ;;;;;;;;;;;;;;;;;;;;;;;;;
     
110. k3:      lcall dl30ms;
     
111.          jb p0.5,outout;
     
112. set12:   jnb p0.5,set12;
     
113.          lcall chuan;
     
114.          mov a,50h;
     
115.          cjne a,#01h,sjiantz;
     
116.          mov a,51h;
     
117.          cjne a,#01h,zhwei;
     
118.          mov r1,#dayH;
     
119.          lcall add1;
     
120.          mov a,r3;
     
121.          cjne a,#32h,ftiao;分若小于则转退出
     
122.          mov dayH,#01h;否则清0
     
123.          mov dayL,#00h;
     
124. ftiao:   ljmp outout;  
     
125. zhwei:  cjne a,#02h,gwei;
     
126.         mov r1,#monH;
     
127.         lcall add1;
     
128.         mov a,r3;
     
129.         cjne a,#13h,outout;
     
130.         mov monH,#01h;
     
131.         mov monL,#00h;
     
132.         ljmp outout;
     
133. gwei:   cjne a,#03h,outout;
     
134.         mov r1,#yearH;
     
135.         lcall add1;
     
136.         mov a,r3;
     
137.         cjne a,#99h,outout;
     
138.         mov yearH,#00h;
     
139.         mov yearL,#00h;
     
140.         ljmp outout;
     
141. outout: ljmp start; 跳出
     
142. sjiantz:cjne a,#00h,naozhtz;转闹钟调整
     
143.         mov a,51h;
     
144.         cjne a,#01h,zhwei2;
     
145.         mov r1,#secH;
     
146.         lcall add1;
     
147.         mov a,r3;
     
148.         cjne a,#60h,ftiao2;分若小于则转退出
     
149.         mov secH,#00h;否则清0
     
150.         mov secL,#00h;
     
151. ftiao2: ljmp outout;        
     
152. zhwei2: cjne a,#02h,gwei2;
     
153.         mov r1,#minH;
     
154.         lcall add1;
     
155.         mov a,r3;
     
156.         cjne a,#60h,outout;
     
157.         mov minH,#00h;
     
158.         mov minL,#00h;
     
159.         ljmp outout;
     
160. gwei2:  cjne a,#03h,outout;
     
161.         mov r1,#hourH;
     
162.         lcall add1;
     
163.         mov a,r3;
     
164.         cjne a,#24h,outout;
     
165.         mov hourH,#00h;
     
166.         mov hourL,#00h;
     
167.         ljmp outout;
     
168. 
     
169. naozhtz:mov a,51h;
     
170.         cjne a,#01h,zhwei3;
     
171.         mov r1,#als_h;
     
172.         lcall add1;
     
173.         mov a,r3;
     
174.         cjne a,#60h,ftiao3;分若小于则转退出
     
175.         mov als_h,#00h;否则清0
     
176.         mov als_l,#00h;
     
177. ftiao3: ljmp outout;        
     
178. zhwei3: cjne a,#02h,gwei3;
     
179.         mov r1,#alm_h;
     
180.         lcall add1;
     
181.         mov a,r3;
     
182.         cjne a,#60h,outout;
     
183.         mov alm_h,#00h;
     
184.         mov alm_l,#00h;
     
185.         ljmp outout;
     
186. gwei3:  cjne a,#03h,outout;
     
187.         mov r1,#alh_h;
     
188.         lcall add1;
     
189.         mov a,r3;
     
190.         cjne a,#24h,outout;
     
191.         mov alh_h,#00h;
     
192.         mov alh_l,#00h;
     
193.         ljmp outout;
     
194. ;;;;;;;;;;;;;;;;;;;;;;;;
     
195. ;;;;naoling
     
196. ;;;;;;;;;;;;;;;;;;;;;;;;;
     
197. naoling1:push acc;
     
198.          setb p0.1
     
199.          mov a,31h;
     
200.          cjne a,41h,out6;
     
201.          mov a,30h;
     
202.          cjne a,40h,out6;
     
203.          mov a,33h;
     
204.          cjne a,43h,out6;
     
205.          mov a,32h;
     
206.          cjne a,42h,out6;
     
207.          mov a,35h;
     
208.          cjne a,45h,out6;
     
209.          mov a,34h;
     
210.          cjne a,44h,out6;
     
211. nao:    clr P0.1
     
212.          lcall display
     
213.          jnb P0.4,stopnao
     
214.          sjmp nao
     
215. stopnao: lcall dl30ms
     
216.          mov P0,#0ffH
     
217. out6:   pop acc;
     
218.         lcall display;
     
219.          ret;  
     
220. 
     
221. 
     
222. 
     
223. ;;;;;;;;;;;;;;;;;;;;;;;;
     
224. ;;;;;整点报时;;;;;;;;;;;;
     
225. ;;;;;;;;;;;;;;;;;;;;;;;;;
     
226. zhengdi: push acc;
     
227.          mov a,31h;
     
228.          cjne a,#00h,out7;
     
229.          mov a,30h;
     
230.          cjne a,#00h,out7;
     
231.          mov a,33h;
     
232.          cjne a,#00h,out7;
     
233.          mov a,32h;
     
234.          cjne a,#00h,out7;
     
235.          mov a,#0ah;
     
236.          clr p0.1;
     
237.          clr p0.3
     
238.          lcall display;
     
239.          lcall display;
     
240.          lcall display;
     
241.          lcall display;
     
242.          lcall display;
     
243.          lcall display;
     
244.          lcall display;
     
245.          lcall display;
     
246.          lcall display;
     
247.          lcall display;
     
248.          lcall display;
     
249.          lcall display;
     
250.          lcall display;
     
251.          lcall display;
     
252.          lcall display;
     
253.          lcall display;
     
254.          lcall display;
     
255.          lcall display;
     
256.          lcall display;
     
257.          lcall display;
     
258.          lcall display;
     
259.          lcall display;
     
260.          lcall display;
     
261.          lcall display;
     
262.          lcall display;
     
263.          lcall display;
     
264.          lcall display;
     
265.          lcall display;
     
266.          setb p0.1;
     
267.          setb p0.3
     
268. out7:    pop acc;
     
269.          lcall display;
     
270.          ret;
     
271. 
     
272. 
     
273. 
     
274. ;**************************************************
     
275. ;函数名：
     
276. ;功能：   串口发送数据函数
     
277. ;传入参数： 无
     
278. ;传出参数： A
     
279. ;**************************************************
     
280. chuan: MOV  A,p0  ;读取P1口数据
     
281. MOV  SBUF,A
     
282. JNB  TI,$  ;等待发送完毕
     
283. CLR   TI
     
284.         lcall  dl30ms;
     
285. wait:   jnb  ri,out9;
     
286. MOV  A,SBUF
     
287. CLR  RI
     
288.         sjmp  out10;
     
289. out9:   lcall  display;
     
290.         jmp  chuan;   
     
291. out10:  ret;
     
292. 
     
293.    
     
294. ;**************************************************
     
295. ;函数名：chxianshi
     
296. ;功能：   显示调整函数
     
297. ;传入参数： 无
     
298. ;传出参数：
     
299. ;**************************************************
     
300. chxianshi: lcall dl30ms;
     
301.            jb P0.7,set2;
     
302. set1:      jnb p0.7,set1;
     
303.            lcall chuan;
     
304.            mov a,50h;
     
305.            cjne a,#00h,nianfen
     
306.            mov a,#01h;
     
307.            mov 50h,a;;
     
308.    sjmp set2;
     
309. nianfen:   cjne a,#01h,naoling;
     
310.            mov a,#02h;
     
311.            mov 50h,a;
     
312.            sjmp set2;
     
313. naoling:   cjne a,#02h,maobiao;
     
314.            mov a,#03h;
     
315.    mov 50h,a;
     
316.            sjmp set2;
     
317. maobiao:   mov a,#00h;
     
318.            mov 50h,a;
     
319. set2:      lcall display;
     
320. out:       ret;
     
321.    
     
322.    
     
323. ;**************************************************
     
324. ;函数名：k2
     
325. ;功能：   调整位移位函数
     
326. ;传入参数： 无
     
327. ;传出参数：
     
328. ;**************************************************
     
329. 
     
330. k2:        lcall dl30ms;
     
331.            jb P0.6,set11;判断是否有键按下  
     
332. set10:     jnb p0.6,set10;
     
333.            lcall chuan;
     
334.            mov a,51h;
     
335.            cjne a,#00h,zliang
     
336.            mov a,#01h;
     
337.            mov 51h,a;;
     
338.    sjmp set11;
     
339. zliang:    cjne a,#01h,gliang;
     
340.            mov a,#02h;
     
341.            mov 51h,a;
     
342.            sjmp set11;
     
343. gliang:    cjne a,#02h,bliang;
     
344.            mov a,#03h;
     
345.            mov 51h,a;
     
346.            sjmp set11;
     
347. bliang:    cjne a,#03h,set11
     
348.            mov a,#00h;
     
349.            mov 51h,a;
     
350. set11:     lcall display;
     
351.            ret;
     
352. 
     
353. 
     
354. 
     
355. ;**************************************************
     
356. ;函数名：       jimiao
     
357. ;功能：         计秒程序
     
358. ;传入参数： 无
     
359. ;传出参数： 无
     
360. ;**************************************************
     
361. 
     
362. jimiao: push PSW;
     
363.         push acc;
     
364.        lcall dl30ms;
     
365.        jb p0.4,out5;
     
366. jimao1:jnb p0.4,jimao1;第一次开中断计秒
     
367.        mov a,50h;
     
368.        cjne a,#03h,out5;
     
369.        setb et1;
     
370.        setb tr1;
     
371. 
     
372. jimao2:call display;第二次停止
     
373.        jb p0.4,jimao2;
     
374.        lcall display;
     
375.        jb p0.4,out5;
     
376. jimao3:jnb p0.4,jimao3;
     
377.        clr tr1;
     
378.        clr et1;
     
379. jimao4:call display;第三次清0
     
380. 
     
381.        jb p0.4,jimao4;
     
382.        lcall display;
     
383.        jb p0.4,out5;
     
384. jimao5:jnb p0.4,jimao5;
     
385.        mov mao_sfw ,#00h;秒的十分位
     
386.        mov mao_bfw ,#00h;秒的百分位
     
387.        mov mao_sw,#00h  ;秒的十位
     
388.        mov mao_gw,#00h  ; 秒的各位
     
389.        mov mao_qw,#00h;  
     
390.        mov mao_bw,#00h;
     
391. out5:  pop acc;
     
392.        pop PSW;
     
393.        ljmp start;
     
394. 
     
395. 
     
396. 
     
397. 
     
398. ;;***********************************************
     
399. ;函数名         time1
     
400. ;功能：   t1中断函数
     
401. ;传入参数： 无
     
402. ;************************************************
     
403. 
     
404. time1:
     
405. push  PSW
     
406. push acc
     
407. mov TL1,#0f0h;
     
408. mov TH1,#0d8h;T1初值为fc18h定时1ms
     
409. mov r1,#mao_bfw;指向秒计时单元
     
410. lcall add1;调用加1程序
     
411. mov a,r2;将经过处理的数据放入a中
     
412. cjne a,#99h,outT01;当秒到未到达60时跳出中断
     
413. mov 5ah,#00h
     
414. mov 5bh,#00h;将秒清零
     
415. mov r1,#mao_gw;指向分计时单元
     
416. lcall add1;调用加1程序
     
417. mov a,r2;将经过处理的数据放入a中
     
418. cjne a,#60h,outT01;当分钟未到达60时跳出中断
     
419. mov 5ch,#00h;
     
420. mov 5dh,#00h;
     
421. mov r1,#mao_bw;指向小时计时单元
     
422. lcall add1;调用加1程序
     
423. mov a,r2;将经过处理的数据放入a中
     
424. cjne a,#60h,outT0;当小时未到达60时跳出中断
     
425. mov 5eh,#00h;
     
426. mov 5fh,#00h;
     
427. 
     
428. outt01:
     
429. pop acc
     
430. pop psw;恢复现场
     
431. reti ;中断返回
     
432. 
     
433. 
     
434. ;**************************************************
     
435. ;函数名：       time0
     
436. ;功能：   t0中断处理程序函数
     
437. ;传入参数： 无
     
438. ;**************************************************
     
439. 
     
440. time0:
     
441. push  PSW
     
442. push acc
     
443. push b   ;保护现场
     
444. push 02h
     
445. push 01h
     
446. clr ET0;关T0中断允许
     
447. clr TR0;关T0定时中断
     
448. mov th0,#3ch;
     
449. mov a,#0b0h
     
450. add a,TL0
     
451. mov TL0,a;给定时器重新装值
     
452. setb TR0;允许计时
     
453. djnz r4,outT0;定时没到1s就退出中断
     
454. mov r4,#20;给r0重新赋值
     
455. mov r1,#secH;指向秒计时单元
     
456. lcall add1;调用加1程序
     
457. mov a,r2;将经过处理的数据放入a中
     
458. cjne a,#60h,outT0;当秒到未到达60时跳出中断
     
459. 
     
460. addmin: ;否则分钟加1
     
461. mov secL,#0
     
462. mov secH,#0;将秒清零
     
463. mov r1,#minH;指向分计时单元
     
464. lcall add1;调用加1程序
     
465. mov a,r2;将经过处理的数据放入a中
     
466. cjne a,#60h,outT0;当分钟未到达60时跳出中断
     
467. 
     
468. addhour:  ;否则小时加1
     
469. mov minL,#0
     
470. mov minH,#0;将分清零
     
471. mov r1,#hourH;指向小时计时单元
     
472. lcall add1;调用加1程序
     
473. mov a,r2;将经过处理的数据放入a中
     
474. cjne a,#24h,outT0;当小时未到达60时跳出中断
     
475. 
     
476. lcall rili     ;调用日历子程序
     
477. 
     
478. outT0:
     
479. pop 01h
     
480. pop 02h
     
481. pop b
     
482. pop acc
     
483. pop psw;恢复现场
     
484. setb ET0;开放中断
     
485. reti ;中断返回
     
486. 
     
487. ;**************************************************
     
488. ;函数名：       rili
     
489. ;功能：         日历处理程序函数
     
490. ;传入参数： 无
     
491. ;传出参数：
     
492. ;**************************************************
     
493. 
     
494. rili:
     
495. addday: mov hourL,#0
     
496. mov hourH,#0;将小时清零
     
497. mov r1,#dayH;指向天计时单元
     
498. lcall add1;调用加1程序
     
499. mov a,r2;将经过处理的数据放入a中
     
500. 
     
501. day31:      
     
502. cjne a,#32h,day30;看是不是31号
     
503. ajmp addmon;是的话，加月
     
504. 
     
505. day30:
     
506. mov r5,a
     
507. cjne a,#31h,day29;看是不是30号;是的话，处理
     
508. mov a,#0h
     
509. mov a,monL
     
510. swap a
     
511. orl a,monh;将月份放入a中
     
512. cjne a,#04h,outri;判断是不是4，6，9，11中的某一月
     
513. cjne a,#06h,outri
     
514. cjne a,#09h,outri
     
515. cjne a,#11h,outri;不是的话跳出
     
516. ajmp addmon;是的话,加月
     
517. 
     
518. day29:
     
519. mov a,r5
     
520. cjne a,#30h,day28;看是不是29号
     
521. mov a,#0h
     
522. mov a,monL
     
523. swap a
     
524. orl a,monH
     
525. cjne a,#02h,outri;是的话，看月份是不是2月
     
526. ajmp addmon
     
527. 
     
528. day28:
     
529. mov a,r5
     
530. cjne a,#29h,outri;看是不是28号，不是的话跳出
     
531. mov a,#0h
     
532. mov a,monL
     
533. swap a
     
534. orl a,monH
     
535. cjne a,#02h,outri;看月份是不是2月;是2月，则判断是不是润年
     
536. mov a,#0h
     
537. mov a,yearL
     
538. swap a
     
539. orl a,yearH
     
540. da a
     
541. mov b,#04h
     
542. div ab
     
543. mov r5,b
     
544. cjne r5,#0h,outri
     
545. ajmp addmon
     
546. 
     
547. addmon: ;月加1
     
548. mov dayL,#0
     
549. mov dayH,#0;将天清零
     
550. mov r1,#monH;指向月计时单元
     
551. lcall add1;调用加1程序
     
552. mov a,r2;将经过处理的数据放入a中
     
553. cjne a,#12h,outri;当月未到达12时
     
554. 
     
555. addyear: ;年加1
     
556. mov monL,#0
     
557. mov monH,#0;将月清零
     
558. mov r1,#yearH;指向年计时单元
     
559. lcall add1;调用加1程序
     
560. mov a,r2;将经过处理的数据放入a中
     
561. outri:
     
562. ret
     
563. 
     
564. 
     
565. ;**************************************************
     
566. ;函数名：       add1
     
567. ;功能：   加一函数
     
568. ;传入参数： r1存的是地址指针
     
569.                 ;r2存的是返回的处理数据
     
570. ;**************************************************
     
571. 
     
572. add1:
     
573. mov a,#0;对a进行清零
     
574. 
     
575. dec r1;指向高四位数据地址
     
576. mov a,@r1;将高四位移入a
     
577. inc r1;指向低四位
     
578. swap a;a中高四位与低四位互换
     
579. orl a,@r1;将低四位显示数据放入a中
     
580. add a,#01h;
     
581. da a;对a中数据进行加1，并作十进制调整
     
582. mov r2,a;将处理后的数据移入r2中，注意r2中存的是十进制对应的bcd码
     
583. mov r3,a;下面是将a中然数据恢复为高位与低位
     
584. anl a,#0f0h;取高四位
     
585. swap a
     
586. dec r1;
     
587. mov @r1,a;将高四位移入低位地址中
     
588. mov a,r3;将暂存数据移回
     
589. anl a,#0fh;取其低四位
     
590. inc r1;指针指向高四位地址
     
591. mov @r1,a;将低四位移到高位地址中
     
592. ret ;子程序返回
     
593. 
     
594. 
     
595. 
     
596. 
     
597. ;**************************************************
     
598. ;函数名：       display
     
599. ;功能：         显示处理程序函数
     
600. ;传入参数： 无
     
601. ;传出参数：
     
602. ;**************************************************
     
603. display:mov a,50h;
     
604. cjne a,#00H,dat;00h是时间显示不等则转到年份显示
     
605. timdis: mov r0,#secL;
     
606.         sjmp aa
     
607. dat: cjne a,#01h,ala;若为01h则显示年份，否则显示闹钟
     
608.         mov r0,#dayL;
     
609. sjmp aa;
     
610. ala:    cjne a,#02h,mbiao
     
611.         mov r0,#als_l;
     
612.         sjmp aa;
     
613. mbiao:  mov r0,#mao_sfw;
     
614.         nop;
     
615. aa:     mov p2,#0ffh;
     
616. mov a,@r0
     
617. mov dptr,#TAB
     
618. movc a,@a+dptr;
     
619. mov p1,a;
     
620.         mov a,51h;
     
621.         cjne a,#01h,aa01;
     
622.         mov a,r4;
     
623.         rrc a;
     
624. jnc aa02;
     
625. aa01:   mov p2,#0feh;
     
626. aa02: lcall dl5ms;
     
627.         lcall dl5ms;
     
628. 
     
629. 
     
630.         mov p2,#0FFh;
     
631. inc r0;
     
632.         mov a,@r0
     
633. mov dptr,#TAB
     
634. movc a,@a+dptr;
     
635. mov p1,a;
     
636.         mov a,51h;
     
637.         cjne a,#01h,bb01;
     
638. mov a,r4;
     
639. rrc a;
     
640. jnc bb02;
     
641. bb01:   mov p2,#0fdh;
     
642. bb02:   lcall dl5ms;
     
643.         lcall dl5ms;
     
644. 
     
645. 
     
646. mov p2,#0ffh;
     
647.         inc r0;
     
648.         mov a,@r0
     
649. mov dptr,#TAB
     
650. movc a,@a+dptr;
     
651. mov p1,a;
     
652. mov a,51h;
     
653. cjne a,#02h,cc01;
     
654. mov a,r4
     
655. rrc a;
     
656. jnc cc02
     
657. cc01:   mov p2,#0fbh;
     
658. cc02:   lcall dl5ms;
     
659.         lcall dl5ms;
     
660. 
     
661. 
     
662. 
     
663. mov p2,#0ffh;
     
664.         inc r0;
     
665.         mov a,@r0
     
666. mov dptr,#TAB
     
667. movc a,@a+dptr;
     
668. mov p1,a;
     
669. mov a,51h;
     
670. cjne a,#02h,dd01;
     
671. mov a,r4
     
672. rrc a;
     
673. jnc dd02
     
674. dd01:   mov p2,#0f7h;
     
675. dd02:   lcall dl5ms;
     
676.         lcall dl5ms;
     
677. 
     
678. 
     
679. 
     
680. mov p2,#0ffh;
     
681.         inc r0;
     
682.         mov a,@r0
     
683. mov dptr,#TAB
     
684. movc a,@a+dptr;
     
685. mov p1,a;
     
686. mov a,51h;
     
687. cjne a,#03h,ee01;
     
688. mov a,r4
     
689. rrc a;
     
690. jnc ee02
     
691. ee01:   mov p2,#0efh;
     
692. ee02:   lcall dl5ms;
     
693.         lcall dl5ms;
     
694. 
     
695. 
     
696. 
     
697. 
     
698. mov p2,#0ffh;
     
699.         inc r0;
     
700.         mov a,@r0
     
701. mov dptr,#TAB
     
702. movc a,@a+dptr;
     
703. mov p1,a;
     
704. mov a,51h;
     
705. cjne a,#03h,ff01;
     
706. mov a,r4
     
707. rrc a;
     
708. jnc ff02
     
709. ff01:   mov p2,#0dfh;
     
710. ff02:   lcall dl5ms;
     
711.         lcall dl5ms;
     
712.         ret;   
     
713.       
     
714. 
     
715. 
     
716. ;;;;;;;;;;;;
     
717. ;延时程序;;;
     
718. ;1ms延时;;;;
     
719. ;;;;;;;;;;;;
     
720. delay1ms:
     
721. mov R6,#14H
     
722. dl1:mov R7,#19H
     
723. dl2:djnz R7,dl2
     
724. djnz R6,dl1
     
725. ret
     
726. 
     
727. dl5ms:  mov  55h,#03h;
     
728. d2:     mov  56h,#0fh;
     
729. d1:     djnz 56h,d1;
     
730.         djnz 55h,d2;
     
731.         ret;
     
732. 
     
733. dl30ms: lcall dl5ms;
     
734. lcall dl5ms;
     
735. lcall dl5ms;
     
736. lcall dl5ms;
     
737. lcall dl5ms;
     
738. lcall dl5ms;
     
739.         ret;
     
740. dl20ms: lcall dl5ms;
     
741.         lcall dl5ms;
     
742.         lcall dl5ms;
     
743.         lcall dl5ms;
     
744.         ret;
     
745. 
     
746.       
     
747. TAB:DB 0C0H,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h;
     
748. end<!--EndFragment-->
     

复制代码

闹钟：

实现闹钟功能主要有两个步骤，首先是能在按键中把闹钟数值写进寄存器，实现存储功能。其次是根据在查询按键服务程序中作判别，检查当前时间是否与闹铃时间相等，如果相等，则使在相应时间时对蜂鸣器提供驱动电流即可。就实现了闹钟设置的功能。

整点报时：

整点报时是在查询按键程序中调用到zhengdi子程序，检查当前的时间是否整点，如果是，则点亮整点指示灯，并响蜂鸣器，停留约2秒钟，自行熄灭与关闭。

按键消抖：

按键消抖可以采用硬件消抖跟软件消抖。我们初定了两种方案：

1是利用数字电路的反相器或斯密特触发器进行整形，如图：

2是采用软件消抖技术

应该说用硬件消抖可以达到更好的效果，不过由于提供的材料跟自身手上的材料没有以上元件，故采用软件消抖。软件的消抖主要是调整出一个切到好处的延迟检测时间，一般为5-30ms。经过我们的多次调试，我们最终得到不错的去抖动效果。在程序中为DMS子程序实现。软件延时是用的最多的消抖方法，但是耗时间。在CPU耗不起时间的情况下，硬件消抖会更好

在本程序中设置了30ms的按键消抖。

感想体会：

   本实验花了我们四天的时间，由于该大作业是用汇编语言写的，很多语句掌握都不是很牢固，但是经过这么长时间的实验，我基本掌握了部分汇编语言的用法，特别是实验中经常用到的按键查询，跳转语句，以及汇编的方法。

刚开始的时候，我什麽都不懂，根本不知怎样入门，后来查找了一些系统资料，渐渐有了些了解，才开始写自己的程序。虽然如此，中间还是遇到过不少困难，不如些按键查询的时候，仿真不出来，不知道哪里出错了，也不知道是不是程序有问题，后来在小组成员的帮助下，终于找到问题所在，通过不断的琢磨，后来不仅实现了老师的要求的基本功能，更加了秒表，闹铃还有整点报时。本来还想加上纪念日和音乐闹铃，当一方面时间有限，另一方面尝试后失败了就暂时搁下。

  调试的时候，刚上去的时候，板子工作很不稳定，虽然有时候能够显示到正确的东西，当大多数时间都是显示的杂乱无章，鉴于有时候能够正确显示，我们是板子焊的不好，于是重新焊过，第二个版子刚上电的时候，还是不能很正确的工作，后来，一步一步的调试，先用简单的程序检查板子，发现板子是没有问题的，于是就确定是程序的问题，我把程序分为好几块，一块一块的调试，一段好了之后，在加上一段。最后发现是在一个子程序里边用了一个错误的ljmp。 改正了之后就完全正确了。

    经过这次试验，确实学到我好多好多的东西。

91331996clock.rar (1.55 MB, 下载次数: 296)

2010-5-25 22:42 上传

点击文件名下载附件

回复 1# admin


    太好了

很好的 想法，就是是汇编的，几乎不会看了

原理图怎么打开？{:13_801:}

thhhhhhhhssssssssssssss

不错啊   就是太简单了  {:13_779:}

恩，谢谢分享，只是是汇编，暂时看不懂

学习中，谢谢楼主

顶顶顶，好东西啊，赞一个

还是想看看，尽管不够