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

1、长春工业大学测控技术与仪器专业单片机LCD1602显示年月日时钟带星期和闹钟，可识别闰年下载文档即可完全复制#include <reg52.h>#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,coun

2、t,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=

3、xms;i>0;i-)for(j=114;j>0;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,

4、写第一行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,uc

5、har 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;num<24;num+) /将自定义字型码写入CGRAM中 write_data(cg_1602num); write_com(0xc4);/年 write

6、_data(0); write_com(0xc7);/月 write_data(1); write_com(0xca);/日 write_data(2); write_string(2,0,":");write_string(5,0,":");write_string(0x0a,0,":");write_string(0x0d,0,":");write_string(0x0c,1,"W");write_string(0x0d,1,"K");void init_1602()/初

7、始化led_cs=0;hour=23;min=59;sec=55;key1num=0;count=0;day=28;mon=2;ye1=20;ye2=13;year=ye1*100+ye2;boom=0;shi=0;fen=0;miao=0;week=7;write_com(0x38);write_com(0x0c);write_com(0x06);write_com(0x01);write_string(0,1,"2013");write_string(5,1,"02");write_string(8,1,"28");write_s

8、fm(8,shi);write_sfm(0x0b,fen);write_sfm(0x0e,miao);write_sfm(0,hour);write_sfm(3,min);write_sfm(6,sec);write_sfm(0x48,day);write_sfm(0x45,mon);write_sfm(0x40,ye1);write_sfm(0x42,ye2);write_sfm(0x4e,week);write_cg();TMOD=0x01;/设置定时器0工作模式1TH0=(65536-50000)/256;/定时器装初值TL0=(65536-50000)%256;EA=1; /开总中断E

9、T0=1; /开定时器0中断TR0=1; /启动定时器0/*键盘扫描函数*/void keyscan()/按键扫描函数/keyE =0;if(key1=0) delay(5);if(key1=0)/确认功能键被按下 key1num+;/功能键按下次数记录while(!key1);/释放确认if(key1num=1)/第一次被按下时TR0=0; /关闭定时器write_com(0x80+7);/光标定位到秒位置write_com(0x0f); /光标开始闪烁if(key1num=2)/第二次按下光标闪烁定位到分钟位置write_com(0x80+4);if(key1num=3)/第三次按下光标闪

10、烁定位到小时位置write_com(0x80+1);if(key1num=4)/第四次按下光标闪烁定位到日位置write_com(0x80+0x49);if(key1num=5)/第五次按下光标闪烁定位到月位置write_com(0x80+0x46);if(key1num=6)/第六次按下光标闪烁定位到年2位置write_com(0x80+0x43);if(key1num=7)/第七次按下光标闪烁定位到年1位置write_com(0x80+0x41);if(key1num=8)/第八次按下光标闪烁定位到星期位置write_com(0x80+0x4f);if(key1num=9)/第九次按下ke

11、y1num=0;/记录按键数清零write_com(0x0c);/取消光标闪烁TR0=1; /启动定时器使时钟开始走 if(key1num!=0)/只有功能键被按下后，增加和减小键才有效if(key2=0)delay(5);if(key2=0)/增加键确认被按下while(!key2);/按键释放if(key1num=1)/若功能键第一次按下sec+; /则调整秒加1if(sec=60)/若满60后将清零sec=0;write_sfm(6,sec);/每调节一次送液晶显示一下write_com(0x80+7);/显示位置重新回到调节处if(key1num=2)/若功能键第二次按下min+;/则

12、调整分钟加1if(min=60)/若满60后将清零min=0;write_sfm(3,min);/每调节一次送液晶显示一下write_com(0x80+4);/显示位置重新回到调节处if(key1num=3)/若功能键第三次按下hour+;/则调整小时加1if(hour=24)/若满24后将清零hour=0;write_sfm(0,hour);/每调节一次送液晶显示一下write_com(0x80+1);/显示位置重新回到调节处if(key1num=4)/若功能键第四次按下day+;/则调整日加1if(day>31)/若大于31后将置一day=1;write_sfm(0x48,day);

13、/每调节一次送液晶显示一下write_com(0x80+0x48);/显示位置重新回到调节处if(key1num=5)/若功能键第五次按下mon+;/则调整月加1if(mon>12)/若大于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(0x

14、80+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(week>7)/若大于7后置一week=1;write_sfm(0x4f,week);/每调节一次送液晶显示一下write_com(0x80+0x4f);/显示位置重新回到调节处i

15、f(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);

16、/显示位置重新回到调节处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-;/

17、则调整月减1if(mon=0)/若月为零将置一mon=12;write_sfm(0x45,mon);/每调节一次送液晶显示一下write_com(0x80+0x45);/显示位置重新回到调节处if(key1num=6)/若功能键第六次按下ye2-;/则调整年减1if(ye2<0)/若小于零后将设置为99ye2=99;year=ye1*100+ye2;write_sfm(0x42,ye2);/每调节一次送液晶显示一下write_com(0x80+0x42);/显示位置重新回到调节处if(key1num=7)/若功能键第七次按下ye1-;/则调整年减100if(ye1<0)/若小于零后

18、将设置为99ye1=99;year=ye1*100+ye2;write_sfm(0x40,ye1);/每调节一次送液晶显示一下write_com(0x80+0x40);/显示位置重新回到调节处if(key1num=8)/若功能键第八次按下week-;/则调整周减一if(week=0)/若等于0后将置7week=7;write_sfm(0x4f,week);/每调节一次送液晶显示一下write_com(0x80+0x4f);/显示位置重新回到调节处if(keyE=0) delay(5);if(keyE=0)/确认功能键被按下 key2num+;/功能键按下次数记录while(!keyE);/释放

19、确认if(key2num=1)/第一次被按下时TR0=0; /关闭定时器write_com(0x80+0x0f);/光标定位到秒位置write_com(0x0f); /光标开始闪烁if(key2num=2)/第二次按下光标闪烁定位到分钟位置write_com(0x80+0x0c);if(key2num=3)/第三次按下光标闪烁定位到小时位置write_com(0x80+9);if(key2num=4)/第八次按下key2num=0;/记录按键数清零write_com(0x0c);/取消光标闪烁TR0=1; /启动定时器使时钟开始走 if(key2num!=0)/只有功能键被按下后，增加和减小键

20、才有效if(key2=0)delay(5);if(key2=0)/增加键确认被按下while(!key2);/按键释放if(key2num=1)/若功能键第一次按下miao+; /则调整秒加1if(miao=60)/若满60后将清零miao=0;write_sfm(0x0e,miao);/每调节一次送液晶显示一下write_com(0x80+0x0e);/显示位置重新回到调节处if(key2num=2)/若功能键第二次按下fen+;/则调整分钟加1if(fen=60)/若满60后将清零fen=0;write_sfm(0x0b,fen);/每调节一次送液晶显示一下write_com(0x80+0

21、x0b);/显示位置重新回到调节处if(key2num=3)/若功能键第三次按下shi+;/则调整小时加1if(shi=24)/若满24后将清零shi=0;write_sfm(8,shi);/每调节一次送液晶显示一下write_com(0x80+8);/显示位置重新回到调节处if(key3=0)delay(5);if(key3=0)/确认减小键被按下while(!key3);/按键释放if(key2num=1)/若功能键第一次按下miao-;/则调整秒减1if(miao=-1)/若减到负数则将其重新设置为59miao=59;write_sfm(0x0e,miao);/每调节一次送液晶显示一下w

22、rite_com(0x80+0x0e);/显示位置重新回到调节处if(key2num=2)/若功能键第二次按下fen-;/则调整分钟减1if(fen=-1)/若减到负数则将其重新设置为59fen=59;write_sfm(0x0b,fen);/每调节一次送液晶显示一下write_com(0x80+0x0b);/显示位置重新回到调节处if(key2num=3)/若功能键第三次按下shi-;/则调整小时减1if(shi=-1)/若减到负数则将其重新设置为23shi=23;write_sfm(8,shi);/每调节一次送液晶显示一下write_com(0x80+8);/显示位置重新回到调节处/*主函

23、数*/void main()led_cs=0;init_1602();while(1)keyscan();/*中断函数*/void timer0() interrupt 1/定时器0中断服务程序TH0=(65536-50000)/256;/再次装定时器初值TL0=(65536-50000)%256;count+; /中断次数累加if(count=20) /20次50毫秒为1秒count=0;sec+;if(sec=60)/秒加到60则进位分钟sec=0;/同时秒数清零min+;if(min=60)/分钟加到60则进位小时min=0;/同时分钟数清零hour+;/boom=1;/delay(5);/boom=0;if(hour=24)/小时加到24则小时清零hour=0;day+;week+;if(week>7)week=1;if(mon=1) if(day>31