单片机万年历程序

1、 单片机万年历程序#include /调用单片机头文件#define uchar unsigned char /无符号字符型 宏定义变量范围0255#define uint unsigned int /无符号整型 宏定义变量范围065535#include eeprom52.h#include nongli.hbit flag_200ms ;bit flag_100ms ;sbit beep = p37; /蜂鸣器定义bit flag_beep_en;uint clock_value; /用作闹钟用的sbit dq = p31; /18b20 io口的定义uint temperature ;

2、/温度变量uchar flag_nl; /农历 阳历显示标志位uchar menu_1,menu_2;uchar key_time,flag_value; /用做连加的中间变量bit key_500ms ;uchar n_nian,n_yue,n_ri;/农历显示的函数#include ds1302.h#include lcd1602.h/*把数据保存到单片机内部eeprom中*/void write_eeprom()sectorerase(0x2000);byte_write(0x2000, fen1);byte_write(0x2001, shi1);byte_write(0x2002,

3、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)/新的单片机初始单片机内问eepromfen1 = 3;shi1 = 8;open1 = 1;a_a = 1;write_eep

4、rom(); /保存数据/*18b20初始化函数*/void init_18b20()bit q;dq = 1;/把总线拿高delay_uint(1); /15usdq = 0;/给复位脉冲delay_uint(80);/750usdq = 1;/把总线拿高 等待delay_uint(10);/110usq = dq;/读取18b20初始化信号delay_uint(20);/200usdq = 1;/把总线拿高 释放总线/*写18b20内的数据*/void write_18b20(uchar dat)uchar i;for(i=0;i= 1;/*读取18b20内的数据*/uchar read_

5、18b20()uchar i,value;for(i=0;i= 1; /读数据是低位开始dq = 1; /释放总线if(dq = 1) /开始读写数据 value |= 0x80;delay_uint(5); /60us读一个时间隙最少要保持60us的时间return value; /返回数据/*读取温度的值 读出来的是小数*/uint read_temp()uint value;uchar low; /在读取温度的时候如果中断的太频繁了，就应该把中断给关了，否则会影响到18b20的时序init_18b20(); /初始化18b20write_18b20(0xcc); /跳过64位romwri

6、te_18b20(0x44); /启动一次温度转换命令delay_uint(50); /500usinit_18b20(); /初始化18b20write_18b20(0xcc); /跳过64位romwrite_18b20(0xbe); /发出读取暂存器命令ea = 0;low = read_18b20(); /读温度低字节value = read_18b20(); /读温度高字节ea = 1;value = 8; /把温度的高位左移8位value |= low; /把读出的温度低位放到value的低八位中value *= 0.625; /转换到温度值 小数return value; /返回读

7、出的温度 带小数/*1ms 延时函数*/void delay_1ms(uint q)uint i,j;for(i=0;iq;i+)for(j=0;j120;j+);/*写星期函数*/void write_week(uchar hang,uchar add,uchar week)/写星期函数if(hang=1) write_com(0x80+add);elsewrite_com(0x80+0x40+add); switch(week)case 1:write_data(m);/星期数为1时，显示 write_data(o); write_data(n); break; case 2:write_

8、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_dat

9、a(t); write_data(a); break;case 0:write_data(s);/星期数据为7时显示 write_data(u); write_data(n); break;/*时钟显示*/void init_1602_ds1302()write_sfm2_ds1302(1,1,shi); /显示时write_sfm2_ds1302(1,4,fen); /显示分write_sfm2_ds1302(1,7,miao); /显示秒write_week(2,12,week);/write_sfm1(1,14,week); /显示星期write_sfm3_18b20(1,11,temp

10、erature); /显示温度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;

11、/定时器0、工作方式1et0 = 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 = 1;

12、 /蜂鸣器停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 |= 0x78; /对应的按键io口输出为1if(p3 & 0x78) != 0x78)/按键按下delay_1ms(1); /按键消抖动if(p3

13、 & 0x78) != 0x78) & (key_new = 1)/确认是按键按下key_new = 0;switch(p3 & 0x78)case 0x70: key_can = 4; break; /得到按键值case 0x68: key_can = 3; break; /得到按键值case 0x58: key_can = 2; break; /得到按键值case 0x38: key_can = 1; break; /得到按键值/write_sfm2(1,0,key_can); /显示按键值else key_new = 1;/*设置函数*/void key_with()if(key_can

14、 = 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)/选择键fl

15、ag_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;if(shi = 0x24)shi = 0;if(key_can = 4)/减if(shi = 0x00)shi = 0x24;if(shi & 0x

16、0f) = 0x00)shi = (shi | 0x0a) - 0x10;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+

17、=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)

18、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) = 0

19、x00)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

20、;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

21、(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_

22、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 = 0x5a;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 =