基于单片机的万年历源代码程序

基于单片机的万年历源代码程序源程序代码如下：#include<reg52.h>#include<intrins.h>unsignedcharcodedisplaywelcome[]={"WelcomeToMyLcdTimer"};//欢迎界面unsignedcharcodedisplaywish[]={"HappyEveryDay^_^"}; //欢迎界面unsignedcharcodeovertemperature[]={"OVERTEMPERATURE!"};unsignedcharcodedigit[]={"0123456789"}; //数字代码unsignedcharmode,TH，TL,TN,TD,length,tempswitch,Maxtemp=40,amode,alarmmode,minutes,hours,minutea,seconds,houra=12;sbitSCLK=P1^0; //DS1302时钟输入sbitDATE=P1^1; //DS1302数据输入 sbitREST=P1^2; //DS1302复位端口sbitSET=P1^4; //DS1302设置模式选择位sbitADD=P1^5; //增加sbitRED=P1^6; //减小sbitCANL=P1^7;voiddelay1ms(inti)//1毫秒延时{intj,k;while(i--)for(j=76;j>1;j--);for(k=29;k>1;k--); }voiddelaynus(unsignedcharn)//延时若干微秒{unsignedchari;for(i=0;i<n;i++); }/***********蜂鸣器模块************/sbitbeep=P3^6; //位定义，定义P.6位fmpvoiddely500(void){unsignedchari;for(i=250;i>0;i--){_nop_();}}voidbaojing(unsignedcharn){unsignedcharx,i;while(n--){for(i=0;i<5;i++){for(x=0;x<200;x++) { beep=~beep; dely500(); }}for(i=0;i<3;i++){ for(x=0;x<200;x++) { beep=~beep; dely500(); dely500(); }}}}/*******DS1302模块*************/voidWrite1302(unsignedchardate)//向1302写数据{ unsignedchari; SCLK=0; delaynus(2); for(i=0;i<8;i++) { DATE=date&0x01; SCLK=1; delaynus(2); SCLK=0; delaynus(2); date>>=1; }}voidWriteSet1302(unsignedcharcmd,unsignedchardate)//根据相应的命令输入相应的数据{ REST=0; SCLK=0; REST=1; Write1302(cmd); delaynus(5); Write1302(date);SCLK=1; REST=0;}unsignedcharRead1302(void) //读取1302数据{ unsignedchari,date; delaynus(2); for(i=0;i<8;i++) { date>>=1; if(DATE==1) date|=0x80; SCLK=1; delaynus(2); SCLK=0; delaynus(2); } returndate;}unsignedcharReadSet1302(unsignedcharcmd)//根据命令读取1302相应的值{ unsignedchardate; REST=0; SCLK=0; REST=1; Write1302(cmd); delaynus(2); date=Read1302(); SCLK=1; REST=0; returndate;}voidIntDS1302(void)//DS1302初始化{ unsignedcharflag;flag=ReadSet1302(0x81); if(flag&0x80) {//判断时钟芯片是否关闭WriteSet1302(0x8E,0x00);//根据写状态寄存器命令字，写入不保护指令 WriteSet1302(0x80,((0/10)<<4|(0%10)));//根据写秒寄存器命令字，写入秒的初始值 WriteSet1302(0x82,((0/10)<<4|(0%10)));//根据写分寄存器命令字，写入分的初始值 WriteSet1302(0x84,((0/10)<<4|(0%10)));//根据写小时寄存器命令字，写入小时的初始值 WriteSet1302(0x86,((0/10)<<4|(0%10)));//根据写日寄存器命令字，写入日的初始值 WriteSet1302(0x88,((0/10)<<4|(0%10)));//根据写月寄存器命令字，写入月的初始值WriteSet1302(0x8c,((10/10)<<4|(10%10)));//根据写年寄存器命令字，写入年的初始值 WriteSet1302(0x90,0xa5);//打开充电功能选择2K电阻充电方式 WriteSet1302(0x8E,0x80); //根据写状态寄存器命令字，写入保护指令}}/***************液晶显示模块*****************/sbitRS=P2^5;sbitRW=P2^6;sbitE=P2^7;sbitBF=P0^7;/*液晶忙检测*/bitBusyTest(void){ bitresult; RS=0; RW=1; E=1; _nop_(); _nop_(); _nop_(); result=BF; _nop_(); _nop_(); _nop_(); E=0; returnresult;}/*写指令*/voidWrite_com(unsignedcharcommand){ while(BusyTest()!=0); RS=0; RW=0; E=0; _nop_(); _nop_(); _nop_(); P0=command; _nop_(); _nop_(); _nop_(); E=1; _nop_(); _nop_();_nop_(); E=0;}/*写地址*/voidWrite_Address(unsignedcharaddress){ Write_com(address|0x80); delay1ms(1); }/*写数据*/voidWrite_Date(unsignedchardate){ RS=1; RW=0; E=0; _nop_(); _nop_(); _nop_(); P0=date; _nop_(); _nop_(); _nop_(); E=1; _nop_(); _nop_(); _nop_(); E=0; delay1ms(1);}/*初始化*/voidLcd_Int(void){ Write_com(0x38); delay1ms(1); Write_com(0x38); delay1ms(1); Write_com(0x06); delay1ms(1); Write_com(0x0c); delay1ms(1); Write_com(0x01); }voiddisplaymainpart(void)//显示液晶主要部分（不变化部分）{Write_Address(0x01); delay1ms(1); Write_Date('D'); Write_Date('A'); Write_Date('T'); Write_Date('E'); Write_Date(':'); delay1ms(1); Write_Address(0x0A); delay1ms(1); Write_Date('-'); Write_Address(0x0D); Write_Date('-'); Write_Address(0x42); Write_Date('T'); Write_Date('I'); Write_Date('M'); Write_Date('E'); Write_Date(':'); Write_Address(0x4A); Write_Date('-'); Write_Address(0x4D); Write_Date('-'); Write_Address(0x06); Write_Date('2'); Write_Date('0');}voiddisplay_Second(unsignedcharsecond)//在液晶上显示秒{ unsignedchari,j; i=second/10; j=second%10; Write_Address(0x4E); Write_Date(digit[i]); Write_Date(digit[j]); delay1ms(1);}voiddisplay_Minute(unsignedcharminute)//在液晶上显示分{ unsignedchari,j; i=minute/10; j=minute%10; Write_Address(0x4B); Write_Date(digit[i]);Write_Date(digit[j]); delay1ms(1);}voiddisplay_Hour(unsignedcharhour)//在液晶上显示时{ unsignedchari,j; i=hour/10; j=hour%10; Write_Address(0x48); Write_Date(digit[i]); Write_Date(digit[j]); delay1ms(1);}voiddisplay_Day(unsignedcharday) //在液晶上显示日{ unsignedchari,j; i=day/10; j=day%10; Write_Address(0x0E); Write_Date(digit[i]); Write_Date(digit[j]); delay1ms(1);}voiddisplay_Month(unsignedcharmonth) //在液晶上显示月{ unsignedchari,j; i=month/10; j=month%10; Write_Address(0x0B); Write_Date(digit[i]); Write_Date(digit[j]); delay1ms(1);}voiddisplay_Year(unsignedcharyear)//在液晶上显示年{ unsignedchari,j; i=year/10; j=year%10; Write_Address(0x08); Write_Date(digit[i]); Write_Date(digit[j]); delay1ms(1);}voiddisplay_houra(unsignedcharx) //闹钟小时部分显示{ unsignedchari,j; i=x/10; j=x%10; Write_Address(0x44); Write_Date(digit[i]); Write_Date(digit[j]); }voiddisplay_minutea(unsignedcharx)//闹钟分钟部分显示{ unsignedchari,j; i=x/10; j=x%10; Write_Address(0x47); Write_Date(digit[i]); Write_Date(digit[j]);}voiddisplay_Time(void) //显示实时时间{ unsignedcharvalue,day,month,year; Write_com(0x0c); value=ReadSet1302(0x81); seconds=(((value&0x70)>>4)*10+(value&0x0f)); display_Second(seconds); value=ReadSet1302(0x83); minutes=(((value&0x70)>>4)*10+(value&0x0f)); display_Minute(minutes); value=ReadSet1302(0x85); hours=(((value&0x70)>>4)*10+(value&0x0f)); display_Hour(hours); value=ReadSet1302(0x87); day=(((value&0x70)>>4)*10+(value&0x0f)); display_Day(day); value=ReadSet1302(0x89); month=(((value&0x70)>>4)*10+(value&0x0f)); display_Month(month); value=ReadSet1302(0x8D); year=(((value&0xf0)>>4)*10+(value&0x0f)); display_Year(year);}voiddisplaystar(void)//显示欢迎界面{ unsignedchari,j; Write_Address(0x0f);while(displaywelcome[i]!='\0') { Write_Date(displaywelcome[i]); i++; delay1ms(1); } i=0; Write_Address(0x4f); while(displaywish[i]!='\0') { Write_Date(displaywish[i]); i++; delay1ms(1); } j=40; while(j--) { Write_com(0x18);//循环左移 delay1ms(700); } Write_com(0x01); delay1ms(10);}voidgbdisplay(unsignedcharaddress)//时间调整时光标闪烁{ Write_Address(address); delay1ms(5); Write_com(0x0f); delay1ms(5); }voiddisplaymaxt(unsignedcharx)//显示最大温度{ unsignedchari,j,k; Write_com(0x0c); delay1ms(2); Write_Address(0x44); i=x/100; j=x/10; k=x%10; Write_Date(digit[i]); Write_Date(digit[j]); Write_Date(digit[k]); }/*****************时间调整部分*********************/voidhourset(void) //调时{ unsignedchartimevalue,hour; delay1ms(500); //防止多次触发 WriteSet1302(0x8e,0x00);//将写保护去掉，确保能正常将调整后的数值写入DS1302 timevalue=ReadSet1302(0x85);//读取此时的数值 hour=(((timevalue&0x70)>>4)*10+(timevalue&0x0f)); while(1) { if(ADD==0) { delay1ms(50); if(ADD==0) { hour++; delay1ms(300); while(ADD==0); } } if(RED==0) { delay1ms(50); if(RED==0) { hour--; delay1ms(300); if(hour==0)hour=23; while(RED==0); } } timevalue=(((hour)/10)<<4|(hour%10)); WriteSet1302(0x84,timevalue); delay1ms(1); display_Hour(hour); Write_Address(0x49); delay1ms(5); if(hour>=24)hour=0; delay1ms(5); if(CANL==0) { mode=0; Write_com(0x0c); break; } if(SET==0)break; } WriteSet1302(0x8e,0x80);}voidminuteset(void) //调分{ unsignedchartimevalue,minute; delay1ms(500); WriteSet1302(0x8e,0x00); timevalue=ReadSet1302(0x83); minute=(((timevalue&0x70)>>4)*10+(timevalue&0x0f)); while(1) { if(ADD==0) { delay1ms(10); if(ADD==0) { minute++; if(minute>=60)timevalue=0; while(ADD==0); } } if(RED==0) { delay1ms(10); if(RED==0) { minute--; delay1ms(300); if(minute==0)minute=59; while(RED==0); } } timevalue=((minute/10)<<4|(minute%10)); WriteSet1302(0x82,timevalue); delay1ms(1); display_Minute(minute); Write_Address(0x4c); delay1ms(5); if(minute>=60)minute=0; delay1ms(5); if(CANL==0) { mode=0; Write_com(0x0c); break; } if(SET==0)break; } WriteSet1302(0x8e,0x80);}voidsecondset(void) //秒归零{ unsignedcharsecond; delay1ms(500); WriteSet1302(0x8e,0x00); while(1) { if(ADD==0) { delay1ms(10); if(ADD==0) { second=0; WriteSet1302(0x80,0x00); while(ADD==0); } } delay1ms(1); display_Second(second); Write_Address(0x4f); delay1ms(5); if(CANL==0) { mode=0; Write_com(0x0c); break; } if(SET==0)break; } WriteSet1302(0x8e,0x80);}voidyearset(void) //调年{ unsignedchardatevalue,year; delay1ms(500);WriteSet1302(0x8e,0x00); datevalue=ReadSet1302(0x8d); year=(((datevalue&0x70)>>4)*10+(datevalue&0x0f)); while(1) { if(ADD==0) { delay1ms(10); if(ADD==0) { year++; while(ADD==0); } } if(RED==0) { delay1ms(10); if(RED==0) { year--; delay1ms(300); while(RED==0); } } datevalue=((year/10)<<4|(year%10)); WriteSet1302(0x8c,datevalue); delay1ms(5); display_Year(year); delay1ms(5); Write_Address(0x09); delay1ms(5); if(CANL==0) { mode=0; Write_com(0x0c); break; } if(SET==0)break; } WriteSet1302(0x8e,0x80);}voidmonthset(void) //调月{ unsignedchardatevalue,month;delay1ms(500); WriteSet1302(0x8e,0x00); datevalue=ReadSet1302(0x89); month=(((datevalue&0x70)>>4)*10+(datevalue&0x0f)); while(1) { if(ADD==0) { delay1ms(10); if(ADD==0) { month++; if(month>12)month=1; while(ADD==0); } } if(RED==0) { delay1ms(10); if(RED==0) { month--; delay1ms(300); if(month==0)month=12; while(RED==0); } } datevalue=((month/10)<<4|(month%10)); WriteSet1302(0x88,datevalue); delay1ms(1); display_Month(month); Write_Address(0x0c); delay1ms(5); if(CANL==0) { mode=0; Write_com(0x0c); break; } if(SET==0)break; } WriteSet1302(0x8e,0x80);}voiddayset(void) //调日{ unsignedchardatevalue,day; delay1ms(500); WriteSet1302(0x8e,0x00); datevalue=ReadSet1302(0x87); day=(((datevalue&0x70)>>4)*10+(datevalue&0x0f)); while(1) { if(ADD==0) { delay1ms(10); if(ADD==0) { day++; if(day>31)day=1; while(ADD==0); } } if(RED==0) { delay1ms(10); if(RED==0) { day--; delay1ms(300); if(day==0)day=31; while(RED==0); } } datevalue=((day/10)<<4|(day%10)); WriteSet1302(0x86,datevalue); delay1ms(1); display_Day(day); Write_Address(0x0f); delay1ms(5); if(CANL==0) { mode=0; Write_com(0x0c); break; } if(SET==0)break; } WriteSet1302(0x8e,0x80);}voidalarmhourset(void) //闹钟小时调整{ unsignedcharvalue; value=houra;while(1){ if(ADD==0) { delay1ms(20); if(ADD==0) { Write_com(0x0c); delay1ms(5); value++; if(value>23)value=0; while(ADD==0); } } if(RED==0) { delay1ms(20); if(RED==0) { value--; if(value==0)value=23; while(RED==0); } } houra=value; display_houra(houra); gbdisplay(0x45); if(CANL==0) { delay1ms(500); break; }}}voidalarmminuteset(void) //闹钟分钟调整{while(1){ if(ADD==0) { delay1ms(20); if(ADD==0) { minutea++; if(minutea>59)minutea=0; while(ADD==0); } } if(RED==0) { delay1ms(20); if(RED==0) { minutea--; if(minutea==0)minutea=59; while(RED==0); } } display_minutea(minutea); gbdisplay(0x48); if(CANL==0) { delay1ms(500); break; }}}voidTimeSet(void) //时间调整函数{ display_Time(); if(SET==0) { delay1ms(10); if(SET==0) { mode++; delay1ms(20); switch(mode) { case(1):{gbdisplay(0x48);hourset(); delay1ms(500);}break; case(2):{gbdisplay(0x4c);minuteset();delay1ms(500);}break; case(3):{gbdisplay(0x4f);secondset();delay1ms(500);}break; case(4):{gbdisplay(0x09);yearset();delay1ms(500);}break; case(5):{gbdisplay(0x0c);monthset();delay1ms(500);}break; case(6):{gbdisplay(0x0f);dayset();delay1ms(500);}break; } if(mode==7)mode=0; } }}/***************显示温度模块********************/unsignedcharcodedisplayexplain[]={"Digitthermometer"};unsignedcharcodedisplayerror[]={"DS18B20ERROR"};unsignedcharcodedisplayerror1[]={"PLEASECHECK"};unsignedcharcodedisplaypart1[]={"WenDu:"};unsignedcharcodedisplaypart2[]={"Cent"};unsignedcharflag;/**********************操作DS18B20模块***************************/sbitDQ=P3^3;unsignedchartime;/**********************DS18B20初始化****************************/bitIntDS18B20(void){ bittemp; DQ=1; for(time=0;time<2;time++); DQ=0; for(time=0;time<200;time++); DQ=1; for(time=0;time<10;time++); temp=DQ; for(time=0;time<200;time++); returntemp;}/**************************读DS18B20**********************/unsignedcharReadDS18B20(void){ unsignedchari; unsignedchardat; for(i=0;i<8;i++) { DQ=1; _nop_(); DQ=0; _nop_(); DQ=1; for(time=0;time<2;time++);dat>>=1; if(DQ==1) dat=dat|0x80; else dat=dat|0x00; for(time=0;time<10;time++); } returndat;}/*********************向DS18B20写数据**************************/voidWriteDS18B20(unsignedchardate){ unsignedchari; for(i=0;i<8;i++) { DQ=1; _nop_(); DQ=0; DQ=date&0x01; for(time=0;time<10;time++); DQ=1; for(time=0;time<1;time++); date>>=1; } for(time=0;time<4;time++);}/*******************为读取温度做好准备************************/voidReadyreadDS18B20(void){ IntDS18B20(); WriteDS18B20(0XCC); WriteDS18B20(0X44); delay1ms(200); IntDS18B20(); WriteDS18B20(0XCC); WriteDS18B20(0XBE); }/*************在1602液晶上显示相关信息模块**********************//****************当未检测到DS18B20时显示信息模块****************/voidDisplay_Error(void){ unsignedchari=0; Write_Address(0x00); while(displayerror[i]!='\0') { Write_Date(displayerror[i]); i++; delay1ms(100); } delay1ms(5); i=0; Write_Address(0x40); while(displayerror1[i]!='\0') { Write_Date(displayerror1[i]); i++; delay1ms(100); } delay1ms(3000);}/*************温度显示模块****************/voidDisplay_Explain(void){ unsignedchari=0; Write_Address(0x00); delay1ms(5); while(displayexplain[i]!='\0') { Write_Date(displayexplain[i]); i++; delay1ms(5); } i=0; Write_Address(0x40); while(displaypart1[i]!='\0') { Write_Date(displaypart1[i]); i++; delay1ms(5); } i=0; Write_Address(0x4C); while(displaypart2[i]!='\0') { Write_Date(displaypart2[i]); i++; delay1ms(5); } Write_Address(0x49); Write_Date('.'); delay1ms(5);}/*********************显示温度整数部分*************************/voidDisplay_Integer(unsignedcharx){ unsignedchari,j,k; i=x/100; j=x%100/10; k=x%10; Write_Address(0x46); if(flag==1)Write_Date('-'); Write_Date(digit[i]); Write_Date(digit[j]); Write_Date(digit[k]); delay1ms(50);}/************显示温度小数部分*********************/voidDisplay_Decimal(unsignedcharx){ Write_Address(0x4A); delay1ms(5); Write_Date(digit[x]); delay1ms(50);}voiddisplayovert(void){ unsignedchari; Write_com(0x01); delay1ms(10); Write_Address(0x03); delay1ms(10); Write_Date('W'); Write_Date('A'); Write_Date('R'); Write_Date('N'); Write_Date('I'); Write_Date('N'); Write_Date('G'); Write_Date('!'); Write_Address(0x40);while(overtemperature[i]!='\0') { Write_Date(overtemperature[i]); i++; delay1ms(10); }}/*******************温度主函数********************/voidTemperature(void){ unsignedchari; delay1ms(5); if(IntDS18B20()!=0) Display_Error(); else { delay1ms(1); Write_com(0x01); delay1ms(5); Display_Explain(); for(length=50;length>0;length--) { for(i=0;i<6;i++) { flag=0; ReadyreadDS18B20(); TL=ReadDS18B20(); TH=ReadDS18B20(); if((TH&0XF8)!=0X00) { flag=1; TL=~TL; TH=~TH; TL+=1; if(TL>255)TH+=1; TN=TH*16+TL/16; TD=(TL%16)*10/16; } TN=TH*16+TL/16; TD=(TL%16)*10/16; Display_Integer(TN); Display_Decimal(TD); delay1ms(10); } if(tempswitch==1){ if(TN>=Maxtemp) { Write_Address(0x03); delay1ms(5); displayovert(); while(1) { baojing(1); if(CANL==0) { Write_com(0x01); delay1ms(5); break; } } } } if(CANL==0)break; } }}voidtempset(void){ if(ADD==0) { delay1ms(10); if(ADD==0) { Maxtemp++; while(ADD==0); } } if(RED==0) { delay1ms(10); if(RED==0) { Maxtemp--; while(RED==0); } }}voidMaxtempset(void) //高温报警设置{ Write_com(0x01); delay1ms(10); Write_Address(0x03); delay1ms(10); Write_Date('T'); Write_Date('E'); Write_Date('M'); Write_Date('P'); Write_Address(0x09); Write_Date('S'); Write_Date('E'); Write_Date('T'); Write_Address(0x40); Write_Date('M'); Write_Date('A'); Write_Date('X'); Write_Date(':'); while(1) { if(SET==0) { delay1ms(20); if(SET==0) { Write_Address(0x4e); Write_com(0x0f); while(1) { if(ADD==0) { delay1ms(20); if(ADD==0) { Write_Address(0x4b); delay1ms(5); Write_Date('O'); Write_Date('N'); Write_Date(''); tempswitch=1; } } if(RED==0) { delay1ms(20); if(RED==0) { Write_Address(0x4b); Write_Date('O'); Write_Date('F'); Write_Date('F'); tempswitch=0; } } if(CANL==0) { delay1ms(500); break; } } } } if(tempswitch==1) { Write_Address(0x4b); Write_Date('O'); Write_Date('N'); Write_Date(''); tempset(); displaymaxt(Maxtemp); if(CANL==0) { Write_com(0x01); displaymainpart(); break; } } if(tempswitch==0) { Write_com(0x0c); Write_Address(0x4b); Write_Date('O'); Write_Date('F'); Write_Date('F'); } if(CANL==0) { Write_com(0x01);displaymainpart(); break; } }}voidalarmswitchset(void){ while(1) { if(ADD==0) { delay1ms(100); if(ADD==0) { alarmmode=1; Write_Address(0x4c); Write_Date('O'); Write_Date('N'); Write_Date(''); } } if(RED==0) { alarmmode=0; Write_Address(0x4c); Write_Date('O'); Write_Date('F'); Write_Date('F'); } if(CANL==0) { delay1ms(500); break; } }}/****************设置模块******************/voidSet(void){ if(SET==0) { delay1ms(10); if(SET==0) { Write_Address(0x40); Write_Date('T'); Write_com(0x0f); delay1ms(1000); Write_com(0x0c); while(1) { TimeSet(); if(ADD==0) { delay1ms(20); if(ADD==0) { Write_com(0x01); Write_Address(0x00); delay1ms(5); Write_Date('S'); delay1ms(10); Maxtempset(); } } if(RED==0) { delay1ms(20); if(RED==0) { Write_com(0x01); delay1ms(5); Write_Address(0x02); Write_Date('A'); Write_Date('L'); Write_Date('A'); Write_Date('R'); Write