1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
|
#include <reg52.h> //调用单片机头文件
#define uchar unsigned char //无符号字符型 宏定义 变量范围0~255
#define uint unsigned int //无符号整型 宏定义 变量范围0~65535
#include "E2PROM52\_Sumjess.h"
#include "Dateconversion\_Sumjess.h"
#include "intrins.h"
bit flag_200ms ;
bit flag_100ms ;
sbit beep = P1^4; //蜂鸣器定义
bit flag_beep_en;
uint clock_value; //用作闹钟用的
uchar flag_nl,flag_n2; //农历 阳历显示标志位
uchar menu_1,menu_2;
uchar key_time,flag_value; //用做连加的中间变量
bit key_500ms ;
uchar n_nian,n_yue,n_ri; //农历显示的函数
#include "DS1302\_Sumjess.h"
#include "LCD1602\_Sumjess.h"
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*把数据保存到单片机内部eeprom中\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void write\_eeprom()
{
SectorErase(0x2000);
byte\_write(0x2000, fen1);
byte\_write(0x2001, shi1);
byte\_write(0x2002, open1);
byte\_write(0x2058, a_a);
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*把数据从单片机内部eeprom中读出来\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void read\_eeprom()
{
fen1 = byte\_read(0x2000);
shi1 = byte\_read(0x2001);
open1 = byte\_read(0x2002);
a_a = byte\_read(0x2058);
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*开机自检eeprom初始化\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void init\_eeprom()
{
read\_eeprom(); //先读
if(a_a != 1) //新的单片机初始单片机内问eeprom
{
fen1 = 3;
shi1 = 8;
open1 = 1;
a_a = 1;
write\_eeprom(); //保存数据
}
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*1ms 延时函数\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void delay\_1ms(uint q)
{
uint i,j;
for(i=0;i<q;i++)
for(j=0;j<120;j++);
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*写星期函数\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void write\_week(uchar hang,uchar add,uchar week)//写星期函数
{
if(hang==1)
write\_com(0x80+add);
else
write\_com(0x80+0x40+add);
switch(week)
{
case 1:write\_data('M');//星期数为1时，显示
write\_data('O');
write\_data('N');
break;
case 2:write\_data('T');//星期数据为2时显示
write\_data('U');
write\_data('E');
break;
case 3:write\_data('W');//星期数据为3时显示
write\_data('E');
write\_data('D');
break;
case 4:write\_data('T');//星期数据为4是显示
write\_data('H');
write\_data('U');
break;
case 5:write\_data('F');//星期数据为5时显示
write\_data('R');
write\_data('I');
break;
case 6:write\_data('S');//星期数据为6时显示
write\_data('T');
write\_data('A');
break;
case 7:write\_data('S');//星期数据为7时显示
write\_data('U');
write\_data('N');
break;
}
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*时钟显示\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void init\_1602\_ds1302()
{
if(flag_n2 == 0) //显示24
{
write\_sfm2\_ds1302(1,1,shi); //显示时
write\_sfm2\_ds1302(1,4,fen); //显示分
write\_sfm2\_ds1302(1,7,miao); //显示秒
write\_week(2,12,week);
}
else
{
if(shi==0x20) shi=0x08;
else if(shi==0x13) shi=0x01;
else if(shi==0x14) shi=0x02;
else if(shi==0x15) shi=0x03;
else if(shi==0x16) shi=0x04;
else if(shi==0x17) shi=0x05;
else if(shi==0x18) shi=0x06;
else if(shi==0x19) shi=0x07;
else if(shi==0x21) shi=0x09;
else if(shi==0x22) shi=0x10;
else if(shi==0x23) shi=0x11;
write\_sfm2\_ds1302(1,1,shi); //显示时
write\_sfm2\_ds1302(1,4,fen); //显示分
write\_sfm2\_ds1302(1,7,miao); //显示秒
write\_week(2,12,week);
}
if(flag_nl == 0) //显示阳历
{
write\_sfm2\_ds1302(2,2,nian); //显示年
write\_sfm2\_ds1302(2,5,yue); //显示月
write\_sfm2\_ds1302(2,8,ri); //显示日
}
else //显示农历
{
write\_sfm2\_ds1302(2,2,n_nian); //显示年
write\_sfm2\_ds1302(2,5,n_yue); //显示月
write\_sfm2\_ds1302(2,8,n_ri); //显示日
}
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*定时器0初始化程序\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void init\_time0()
{
EA = 1; //开总中断
TMOD = 0X01; //定时器0、工作方式1
ET0 = 1; //开定时器0中断
TR0 = 1; //允许定时器0定时
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*闹钟报警函数\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void menu\_dis()
{
static uchar mm,value;
if(flag_100ms == 1) //100ms执行一次
{
flag_100ms = 0;
if(open1 == 1) //如果闹钟打开
{
if((miao == 0) && (fen == fen1) && (shi == shi1))
{
flag_beep_en = 1; //有报警 打开蜂鸣器响的标志位
}
if(flag_beep_en == 1) //闹钟以被打开
{
clock_value++;
if(clock_value <= 30)
beep = ~beep; //蜂鸣器叫3秒
else if(clock_value > 30)
{
beep = 1; //蜂鸣器停1秒
if(clock_value > 40)
{
clock_value = 0;
}
}
// 1 分钟后自动关闭闹钟
value ++;
if(value >= 10)
{
value = 0;
mm++;
if(mm >= 60)
{
mm = 0;
flag_beep_en = 0;
beep = 1;
}
}
}
}
}
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*独立按键程序\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
uchar key_can; //按键值
void key() //独立按键程序
{
static uchar key_new;
key_can = 20; //按键值还原
P3 |= 0xff; //对应的按键IO口输出为1
if((P3 & 0xff) != 0xff) //按键按下
{
delay\_1ms(1); //按键消抖动
if(((P3 & 0xff) != 0xff) && (key_new == 1))
{ //确认是按键按下
key_new = 0;
switch(P3 & 0xff)
{
case 0xfe: key_can = 4; break; //得到按键值
case 0xfd: key_can = 3; break; //得到按键值
case 0xfb: key_can = 2; break; //得到按键值
case 0xf7: key_can = 1; break; //得到按键值
case 0xef: key_can = 5; break; //得到按键值
}
// write\_sfm2(1,0,key\_can); //显示按键值
}
}
else
key_new = 1;
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*设置函数\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*设置函数\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void key\_with()
{
if(key_can == 1) //设置键
{
menu_1++;
if(menu_1 == 1) //设置时间
{
menu_2 = 1;
write\_string(1,0," : : W: ");
write\_string(2,0," 20 - - ");
}
if(menu_1 == 2) //设置闹钟
{
menu_2 = 1;
write\_string(1,0," set clock ");
write\_string(2,0," Y 00:00 ");
}
if(menu_1 > 2) //回到正常显示
{
menu_1 = 0;
write\_guanbiao(1,2,0); //关闭光标
init\_1602\_dis\_csf(); //初始化液晶显示
}
}
if(key_can == 2) //选择键
{
flag_200ms = 1;
if(menu_1 == 1) //设置时间
{
menu_2 ++;
if(menu_2 > 7)
menu_2 = 1;
}
if(menu_1 == 2) //设置闹钟
{
menu_2 ++;
if(menu_2 > 3)
menu_2 = 1;
}
}
if(menu_1 == 1)
{
if(menu_2 == 1) //设置时
{
if(key_can == 3) //加
{
shi+=0x01;
if((shi & 0x0f) >= 0x0a)
shi = (shi & 0xf0) + 0x10; ///\*\*\*shi & 0xf0低四位清零，(shi & 0xf0) + 0x10向高位进1（高四位加1）\*\*\*///
if(shi >= 0x24)
shi = 0;
}
if(key_can == 4) //减
{
if(shi == 0x00)
shi = 0x24;
if((shi & 0x0f) == 0x00)
shi = (shi | 0x0a) - 0x10; ///\*\*\*如果个位为0，高四位减1\*\*\*///
shi -- ;
}
}
if(menu_2 == 2) //设置分
{
if(key_can == 3) //加
{
fen+=0x01;
if((fen & 0x0f) >= 0x0a)
fen = (fen & 0xf0) + 0x10;
if(fen >= 0x60)
fen = 0;
}
if(key_can == 4) //减
{
if(fen == 0x00)
fen = 0x5a;
if((fen & 0x0f) == 0x00)
fen = (fen | 0x0a) - 0x10;
fen -- ;
}
}
if(menu_2 == 3) //设置秒
{
if(key_can == 3) //加
{
miao+=0x01;
if((miao & 0x0f) >= 0x0a)
miao = (miao & 0xf0) + 0x10;
if(miao >= 0x60)
miao = 0;
}
if(key_can == 4) //减
{
if(miao == 0x00)
miao = 0x5a;
if((miao & 0x0f) == 0x00)
miao = (miao | 0x0a) - 0x10;
miao -- ;
}
}
if(menu_2 == 4) //设置星期
{
if(key_can == 3) //加
{
week+=0x01;
if((week & 0x0f) >= 0x0a)
week = (week & 0xf0) + 0x10;
if(week >= 0x08)
week = 1;
}
if(key_can == 4) //减
{
if(week == 0x01)
week = 0x08;
if((week & 0x0f) == 0x00)
week = (week | 0x0a) - 0x10;
week -- ;
}
}
if(menu_2 == 5) //设置年
{
if(key_can == 3) //加
{
nian+=0x01;
if((nian & 0x0f) >= 0x0a)
nian = (nian & 0xf0) + 0x10;
if(nian >= 0x9a)
nian = 1;
}
if(key_can == 4) //减
{
if(nian == 0x01)
nian = 0x9a;
if((nian & 0x0f) == 0x00)
nian = (nian | 0x0a) - 0x10;
nian -- ;
}
}
if(menu_2 == 6) //设置月
{
if(key_can == 3) //加
{
yue+=0x01;
if((yue & 0x0f) >= 0x0a)
yue = (yue & 0xf0) + 0x10;
if(yue >= 0x13)
yue = 1;
}
if(key_can == 4) //减
{
if(yue == 0x01)
yue = 0x13;
if((yue & 0x0f) == 0x00)
yue = (yue | 0x0a) - 0x10;
yue -- ;
}
}
if(menu_2 == 7) //设置日
{
if(key_can == 3) //加
{
ri+=0x01;
if((ri & 0x0f) >= 0x0a)
ri = (ri & 0xf0) + 0x10;
if(ri >= 0x32)
ri = 0;
}
if(key_can == 4) //减
{
if(ri == 0x01)
ri = 0x32;
if((ri & 0x0f) == 0x00)
ri = (ri | 0x0a) - 0x10;
ri -- ;
}
}
write\_sfm2\_ds1302(1,2,shi); ///\*\*\*第一行第二字节开始显示时，从十位开始写\*\*\*///
write\_sfm2\_ds1302(1,5,fen); //显示分
write\_sfm2\_ds1302(1,8,miao); //显示秒
write\_sfm1(1,14,week); //显示星期
write\_sfm2\_ds1302(2,3,nian); //显示年
write\_sfm2\_ds1302(2,6,yue); //显示月
write\_sfm2\_ds1302(2,9,ri); //显示日
switch(menu_2) // 光标显示
{
case 1: write\_guanbiao(1,2,1); break;
case 2: write\_guanbiao(1,5,1); break;
case 3: write\_guanbiao(1,8,1); break;
case 4: write\_guanbiao(1,14,1); break;
case 5: write\_guanbiao(2,3,1); break;
case 6: write\_guanbiao(2,6,1); break;
case 7: write\_guanbiao(2,9,1); break;
}
write\_time(); //把时间写进去
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*设置闹钟\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
if(menu_1 == 2)
{
if(menu_2 == 1) //设置闹钟开关
{
if(key_can == 3)
{
open1 = 1; //闹钟开
}
if(key_can == 4)
{
open1 = 0; //闹钟关
}
}
if(menu_2 == 2) //设置闹钟时
{
if(key_can == 3) //加
{
shi1+=0x01;
if((shi1 & 0x0f) >= 0x0a)
shi1 = (shi1 & 0xf0) + 0x10;
if(shi1 >= 0x24)
shi1 = 0;
}
if(key_can == 4) //减
{
if(shi1 == 0x00)
shi1 = 0x24;
if((shi1 & 0x0f) == 0x00)
shi1 = (shi1 | 0x0a) - 0x10;
shi1 -- ;
}
}
if(menu_2 == 3) //设置分
{
if(key_can == 3) //加
{
fen1+=0x01;
if((fen1 & 0x0f) >= 0x0a)
fen1 = (fen1 & 0xf0) + 0x10;
if(fen1 >= 0x60)
fen1 = 0;
}
if(key_can == 4) //减
{
if(fen1 == 0x00)
fen1 = 0x5a;
if((fen1 & 0x0f) == 0x00)
fen1 = (fen1 | 0x0a) - 0x10;
fen1 -- ;
}
}
if(open1 == 1)
write\_string(2,4,"Y");
else
write\_string(2,4,"N");
write\_sfm2\_ds1302(2,7,shi1); //显示闹钟时
write\_sfm2\_ds1302(2,10,fen1); //显示闹钟分
switch(menu_2) // 光标显示
{
case 1: write\_guanbiao(2,4,1); break;
case 2: write\_guanbiao(2,7,1); break;
case 3: write\_guanbiao(2,10,1); break;
}
write\_eeprom(); //保存闹钟时间
}
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*主函数\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void main()
{
beep = 0; //开机叫一声
delay\_1ms(150);
P0 = P1 = P2 = P3 = 0xff; //单片机IO口初始化为1
init\_time0(); //初始化定时器
init\_1602(); //lcd1602初始化
init\_1602\_dis\_csf(); //lcd1602初始化显示
init\_eeprom(); //开始初始化保存的数据
delay\_1ms(650);
while(1)
{
key(); //按键程序
if(key_can < 10)
{
if(flag_beep_en == 0) //只有闹钟关了的时候才能进入设置
key\_with();
else
{
flag_beep_en = 0; //按下任意键可关闭闹钟
beep = 1;
clock_value = 0;
read\_time();
}
if(menu_1 == 0)
{
if(key_can == 4) //减键
{
flag_nl = ~flag_nl; //切换农历和阳历的显示标志位
if(flag_nl == 0)
write\_string(2,0,"2016");
else
write\_string(2,0,"N ");
}
else if(key_can == 5) //进制键
{
flag_n2 = ~flag_n2; //切换24进制12进制的显示标志位
}
}
}
if(flag_200ms == 1)
{
flag_200ms = 0;
if(menu_1 == 0)
{
read\_time(); //读时间
init\_1602\_ds1302(); //显示时钟
}
}
menu\_dis(); //闹钟报警函数
delay\_1ms(1);
}
}
/\*\*\*\*\*\*\*\*\*\*\*\*\*\*定时器0中断程序\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*/
void time0() interrupt 1
{
static uchar value;
TH0 = 0X3C;
TL0 = 0XB0; //50ms
value ++;
if((value % 2) == 0) //100ms
flag_100ms = 1;
if(value >= 6) //200ms
{
value = 0;
flag_200ms = 1;
}
}
|
