STC15F104E/W系列单片机 DS1302时钟芯片驱动程序源码+软串口发送日期时间星期

GPIO

1. 
   
2. /*
   
3. 单片机型号:STC15F104E 晶振频率:11.0592Mhz 波特率:9600
   
4. */
   
5. #include "stc15f104e.h"
   
6. #include "intrins.h"
   
7. #define is_leap_year(year) ((year) %4 == 0 && (year) %100 !=0 || (year) %400 ==0)                //闰年判断
   
8. 
   
9. #define U8 unsigned char
   
10. #define U16 unsigned int
    
11. #define U32 unsigned long
    
12. sbit DS1302_SCLK = P3 ^ 2;        //时钟口
    
13. sbit DS1302_IO = P3 ^ 3;        //数据口
    
14. sbit DS1302_RST = P3 ^ 4;        //片选口
    
15. sbit KEY=P3^5;                        //低电平设置指定时间
    
16. sbit txd = P3 ^ 1;
    
17. 
    
18. void delay_uart() {     //11.0592Mhz 延时1/9600秒
    
19.     unsigned char a,b;
    
20.     for(b=114;b>0;b--)
    
21.         for(a=1;a>0;a--);
    
22. }
    
23. 
    
24. void delay1s(){
    
25.     unsigned char a,b,c;
    
26.     for(c=217;c>0;c--)
    
27.         for(b=171;b>0;b--)
    
28.             for(a=73;a>0;a--);
    
29. }
    
30. 
    
31. void TXD_Byte(U8 Byte) {   //串口发送1字节
    
32.         U8 j = 1;
    
33.         delay_uart();
    
34.         txd = 0;
    
35.         do {
    
36.                 delay_uart();
    
37.                 txd = Byte & j;
    
38.                 j <<= 1;
    
39.         } while (j);
    
40.         delay_uart();
    
41.         txd = 1;
    
42. }
    
43. 
    
44. void TXD_Text(U8* text) {      //串口发送字符串
    
45.         for (; *text; text++) {
    
46.                 TXD_Byte(*text);
    
47.         }
    
48. }
    
49. 
    
50. U8 code MonthTable[2][12] = {
    
51.         {31,28,31,30,31,30,31,31,30,31,30,31},                //平年月数表
    
52.         {31,29,31,30,31,30,31,31,30,31,30,31},                //闰年月数表
    
53. };
    
54. 
    
55. U32 code WeekText[7] = {                //星期字符串数组
    
56.         0x53554E20,                //SUN 周日
    
57.         0x4D4F4E20,                //MON 周一
    
58.         0x54554520,                //TUE 周二
    
59.         0x57454420,                //WED 周三
    
60.         0x54485520,                //THU 周四
    
61.         0x46524920,                //FRI 周五
    
62.         0x53415420,                //SAT 周六
    
63. };
    
64. 
    
65. U8 dec2bcd(U8 D) {                //将10进制的19转化成16进制的0x19
    
66.         return ((D / 10) << 4) + (D % 10);
    
67. }               
    
68. U8 bcd2dec(U8 H) {                //将16进制的0x19转化成10进制的19
    
69.         return (H >> 4) * 10 + (H & 15);
    
70. }               
    
71. 
    
72. union ds1302_now{        //10进制 DS1302时间 (24小时制)
    
73.         struct {
    
74.                 U8 sec;                //秒 0~59
    
75.                 U8 min;                //分钟 0~59
    
76.                 U8 hour;        //小时 0~23
    
77.                 U8 day;                //日 1~31
    
78.                 U8 month;        //月 1~12
    
79.                 U8 week;        //星期 1~7 (星期日为1 星期一为2)
    
80.                 U8 year;        //年 0~99
    
81.         } now;
    
82.         U8 dat[7];
    
83. };
    
84. 
    
85. union time_text {        //字符串时间 YYYY-MM-DD WWW HH:II:SS (24小时制)
    
86.         struct {
    
87.                 U8 year[4];                //年4位 前2位固定20
    
88.                 U8 sub1;                //减号 固定0x2D
    
89.                 U8 month[2];        //月2位
    
90.                 U8 sub2;                //减号 固定0x2D
    
91.                 U8 day[2];                //日 2位
    
92.                 U8 bla1;                //空格 固定0x20
    
93.                 U32 week;                //星期代码 4位 SUN MON TUE WED THU FRI SAT (最后1位空格)
    
94.                 U8 hour[2];                //小时2位
    
95.                 U8 col1;                //冒号 固定0x3A
    
96.                 U8 min[2];                //分钟 2位
    
97.                 U8 col2;                //冒号 固定0x3A
    
98.                 U8 sec[2];                //秒 2位
    
99.                 U8 null;                //字符串结束符(空字符) 固定0x00
    
100.         } str;
     
101.         U8 dat[24];
     
102. };
     
103. 
     
104. U8 *now2text(U8 *ds1302_now) {                //DS1302时间转字符串
     
105.         union ds1302_now *now= ds1302_now;
     
106.         static union time_text text;
     
107.         if (now->now.week >= 1 && now->now.week <= 7) {
     
108.                 text.str.week = WeekText[now->now.week - 1];
     
109.         }
     
110.         else {
     
111.                 text.str.week = 0x45525220;
     
112.         }
     
113.         text.str.year[0] = 0x32;
     
114.         text.str.year[1] = 0x30;
     
115.         text.str.sub1 = 0x2D;
     
116.         text.str.sub2 = 0x2D;
     
117.         text.str.col1 = 0x3A;
     
118.         text.str.col2 = 0x3A;
     
119.         text.str.bla1 = 0x20;
     
120.         text.str.null = 0x00;
     
121.         text.str.year[2] = (now->now.year / 10 % 10) | 0x30;
     
122.         text.str.year[3] = (now->now.year % 10) | 0x30;
     
123.         text.str.month[0] = (now->now.month / 10 % 10) | 0x30;
     
124.         text.str.month[1] = (now->now.month % 10) | 0x30;
     
125.         text.str.day[0] = (now->now.day / 10 % 10) | 0x30;
     
126.         text.str.day[1] = (now->now.day % 10) | 0x30;
     
127.         text.str.hour[0] = (now->now.hour / 10 % 10) | 0x30;
     
128.         text.str.hour[1] = (now->now.hour % 10) | 0x30;
     
129.         text.str.min[0] = (now->now.min / 10 % 10) | 0x30;
     
130.         text.str.min[1] = (now->now.min % 10) | 0x30;
     
131.         text.str.sec[0] = (now->now.sec / 10 % 10) | 0x30;
     
132.         text.str.sec[1] = (now->now.sec % 10) | 0x30;
     
133. 
     
134.         return text.dat;
     
135. }
     
136. 
     
137. void DS1302_Delay() {        //延时X微秒 (STC-Y3&12M)
     
138.         _nop_();
     
139.         _nop_();
     
140.         _nop_();
     
141.         _nop_();
     
142.         _nop_();
     
143.         _nop_();
     
144. 
     
145. }
     
146. 
     
147. U8 DS1302_RXD() {        //DS1302读1字节
     
148.         U8 i = 1, dat = 0;
     
149.         do {
     
150.                 DS1302_SCLK = 0;
     
151.                 DS1302_Delay();
     
152.                 if(DS1302_IO) dat |= i;
     
153.                 DS1302_SCLK = 1;
     
154.                 DS1302_Delay();
     
155.                 i <<= 1;
     
156.         } while (i);
     
157.         return dat;
     
158. }
     
159. 
     
160. void DS1302_TXD(U8 dat) {        //DS1302写1字节
     
161.         U8 i = 1;
     
162.         do {
     
163.                 DS1302_SCLK = 0;
     
164.                 DS1302_Delay();
     
165.                 DS1302_IO = dat & i;
     
166.                 DS1302_SCLK = 1;
     
167.                 DS1302_Delay();
     
168.                 i <<= 1;
     
169.         } while (i);
     
170. }
     
171. 
     
172. U8 DS1302_Read(U8 addr) {        //DS1302读地址
     
173.         U8 dat;
     
174.         DS1302_RST = 0;
     
175.         DS1302_Delay();
     
176.         DS1302_SCLK = 0;
     
177.         DS1302_Delay();
     
178.         DS1302_RST = 1;
     
179.         DS1302_Delay();
     
180.         DS1302_TXD(addr);
     
181.         dat = DS1302_RXD();
     
182.         DS1302_SCLK = 1;
     
183.         DS1302_RST = 0;
     
184.         return dat;
     
185. }
     
186. 
     
187. void DS1302_Write(U8 addr,U8 dat) {                //DS1302写地址
     
188.         DS1302_RST = 0;
     
189.         DS1302_Delay();
     
190.         DS1302_SCLK = 0;
     
191.         DS1302_Delay();
     
192.         DS1302_RST = 1;
     
193.         DS1302_Delay();
     
194.         DS1302_TXD(addr);
     
195.         DS1302_TXD(dat);
     
196.         DS1302_SCLK = 1;
     
197.         DS1302_RST = 0;
     
198. }
     
199. 
     
200. void DS1302(U8 *p) {                        //DS1302读时间 (自动转换BCD码)
     
201.         U8 addr = 0x81,n = 7;
     
202.         while(n--) {
     
203.                 *p++ = bcd2dec(DS1302_Read(addr));
     
204.                 addr += 2;
     
205.         }
     
206. 
     
207. }
     
208. 
     
209. void DS1302_Set(U8 *p) {                //DS1302设置时间 (自动转换BCD码)       
     
210.         U8 addr = 0x80, n = 7;
     
211.         DS1302_Write(0x8e, 0x00);   //关写保护
     
212.         while (n--) {
     
213.                 DS1302_Write(addr, dec2bcd(*p++));
     
214.                 addr += 2;
     
215.         }
     
216.         DS1302_Write(0x8e, 0x80);        //开写保护
     
217. }
     
218. 
     
219. void DS1302_Init() {        //DS1302初始化
     
220.         DS1302_RST = 0;
     
221.         DS1302_SCLK = 0;
     
222.         DS1302_Write(0x8e, 0x00);   //允许写操作
     
223.         DS1302_Write(0x90, 0xa6);   //一个二极管＋4K电阻充电
     
224.         DS1302_Write(0x8e, 0x80);   //写保护
     
225. }
     
226.                                                           
     
227. bit DS1302_now_check(U8* ds1302_now) {                //DS1302时间合法校验
     
228.         union ds1302_now* now = ds1302_now;
     
229.         if (now->now.year > 99) {
     
230.                 return 0;
     
231.         }else if (now->now.month > 12) {
     
232.                 return 0;
     
233.         }else if (now->now.day > MonthTable[is_leap_year(2000+now->now.year)][now->now.month-1]) {
     
234.                 return 0;
     
235.         }else if (now->now.hour > 23) {
     
236.                 return 0;
     
237.         }else if (now->now.min > 59) {
     
238.                 return 0;
     
239.         }else if (now->now.sec > 59) {                         
     
240.                 return 0;
     
241.         }
     
242.         return 1;
     
243. }
     
244. 
     
245. 
     
246. 
     
247. void main(){
     
248. union ds1302_now now;
     
249.         P3 = 0xFF;
     
250.         DS1302_Init();
     
251.         if(!KEY){        //2020年7月27日星期一 16时10分0秒 (修改成当前日期时间)
     
252.                 now.now.year=20;
     
253.                 now.now.month=7;
     
254.                 now.now.day=27;
     
255.                 now.now.hour=16;
     
256.                 now.now.min=10;
     
257.                 now.now.sec=0;
     
258.                 now.now.week=2;
     
259.                 DS1302_Set(&now.dat);
     
260.         }
     
261.         while (1){
     
262.                 WDT_CONTR = 0x37;
     
263.                 delay1s();
     
264.                 DS1302(&now.dat);
     
265.                 if (DS1302_now_check(&now.dat)) {
     
266.                         TXD_Text(now2text(now.dat));
     
267.                 }
     
268.                 else {
     
269.                         TXD_Text("DS1302 Time Error!");
     
270.                 }
     
271.                 TXD_Text("\r\n");
     
272. 
     
273.         }
     
274. }
     
275. 
     

复制代码