单片机LCD1602显示年月日时钟带星期和闹钟.doc

长春工业大学测控技术与仪器专业单片机LCD1602显示年月日时钟带星期和闹钟，可识别闰年下载文档即可完全复制#include #define uchar unsigned char#define uint unsigned int sbit lcdrs = P07;/液晶引脚定义sbit led_cs = P06;sbit lcden = P05;sbit boom = P36;sbit key1 = P35;sbit key2 = P34;sbit key3 = P33;sbit keyE = P32;uchar num,key1num,key2num,count,hour,min,sec,day,mon,year,shi,fen,miao,week;char ye1,ye2;uchar code cg_1602= 0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02,0x0f,0x09,0x0f,0x09,0x0f,0x09,0x11,0x00,0x0f,0x09,0x09,0x0f,0x09,0x09,0x0f,0x00,0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02,;/年月日/*延时函数*/void delay(uint xms)uint i,j; for(i=xms;i0;i-)for(j=114;j0;j-);/*1602液晶*/void write_com(uchar com)/写命令lcdrs=0;lcden=0;P2=com;delay(5);lcden=1;delay(5);lcden=0;void write_data(uchar date)/写数据lcdrs=1;lcden=0;P2=date;delay(5);lcden=1;delay(5);lcden=0;void write_by_xy(uchar x,uchar y)/坐标定位uchar address;if(y=0) address=0x80+x;/y=0,写第一行else address=0xc0+x;/y=1,写第二行write_com(address); /*void write_char(uchar x,uchar y,uchar date)/坐标定位显示write_by_xy(x,y);/先定位 write_data(date);/后写数*/void write_string(uchar x,uchar y,uchar *s)/写字符串write_by_xy(x,y);/设定显示位置 while(*s)/write characterP2=*s;write_data(*s); s+;void write_sfm(uchar add,uchar date)/写时分秒函数uchar hour,ge;hour=date/10;/分解一个2位数的十位和个位ge=date%10;write_com(0x80+add);/设置显示位置write_data(0x30+hour);/送去液晶显示十位write_data(0x30+ge); /送去液晶显示个位void write_cg()/写入固定汉字和符号write_com(0x40); /设定CGRAM地址 for(num=0;num31)/若大于31后将置一day=1;write_sfm(0x48,day);/每调节一次送液晶显示一下write_com(0x80+0x48);/显示位置重新回到调节处if(key1num=5)/若功能键第五次按下mon+;/则调整月加1if(mon12)/若大于12后将置一mon=1;write_sfm(0x45,mon);/每调节一次送液晶显示一下write_com(0x80+0x45);/显示位置重新回到调节处if(key1num=6)/若功能键第六次按下ye2+;/则调整年加1if(ye2=0x0a)/若满99后将清零ye2=0;year=ye1*100+ye2;write_sfm(0x42,ye2);/每调节一次送液晶显示一下write_com(0x80+0x42);/显示位置重新回到调节处if(key1num=7)/若功能键第七次按下ye1+;/则调整年加100if(ye1=0x0a)/若满99后将清零ye1=0;year=ye1*100+ye2;write_sfm(0x40,ye1);/每调节一次送液晶显示一下write_com(0x80+0x40);/显示位置重新回到调节处if(key1num=8)/若功能键第八次按下week+;/则调整周加一if(week7)/若大于7后置一week=1;write_sfm(0x4f,week);/每调节一次送液晶显示一下write_com(0x80+0x4f);/显示位置重新回到调节处if(key3=0)delay(5);if(key3=0)/确认减小键被按下while(!key3);/按键释放if(key1num=1)/若功能键第一次按下sec-;/则调整秒减1if(sec=-1)/若减到负数则将其重新设置为59sec=59;write_sfm(6,sec);/每调节一次送液晶显示一下write_com(0x80+7);/显示位置重新回到调节处if(key1num=2)/若功能键第二次按下min-;/则调整分钟减1if(min=-1)/若减到负数则将其重新设置为59min=59;write_sfm(3,min);/每调节一次送液晶显示一下write_com(0x80+4);/显示位置重新回到调节处if(key1num=3)/若功能键第三次按下hour-;/则调整小时减1if(hour=-1)/若减到负数则将其重新设置为23hour=23;write_sfm(0,hour);/每调节一次送液晶显示一下write_com(0x80+1);/显示位置重新回到调节处if(key1num=4)/若功能键第四次按下day-;/则调整日减1if(day=0)/若日为零时将置一day=31;write_sfm(0x48,day);/每调节一次送液晶显示一下write_com(0x80+0x49);/显示位置重新回到调节处if(key1num=5)/若功能键第五次按下mon-;/则调整月减1if(mon=0)/若月为零将置一mon=12;write_sfm(0x45,mon);/每调节一次送液晶显示一下write_com(0x80+0x45);/显示位置重新回到调节处if(key1num=6)/若功能键第六次按下ye2-;/则调整年减1if(ye20)/若小于零后将设置为99ye2=99;year=ye1*100+ye2;write_sfm(0x42,ye2);/每调节一次送液晶显示一下write_com(0x80+0x42);/显示位置重新回到调节处if(key1num=7)/若功能键第七次按下ye1-;/则调整年减100if(ye17)week=1;if(mon=1) if(day31) day=1; mon+; if(mon=2) if(year%4=0 & year%100!=0)|year%4=0) if(day29) day=1; mon+; else if(day28) day=1; mon+; if(mon=3) if(day31) day=1; mon+; if(mon=4) if(day30) day=1; mon+; if(mon=5) if(day31) day=1; mon+; if(mon=6) if(day30) day=1; mon+; if(mon=7) if(day31) day=1; mon+; if(mon=8) if(day31) day=1; mon+; if(mon=9) if(day30) day=1; mon+; if(mon=10) if(day31) day=1; mon+; if(mon=11) if(day30) day=1; mon+; if(mon=12) if(day31) day=1; mon=1; ye2+; write_sfm(0x4e,week); write_sfm(0x48,day); write_sfm(0x45,mon); wri