液晶1602显示时钟.doc_第1页
液晶1602显示时钟.doc_第2页
液晶1602显示时钟.doc_第3页
液晶1602显示时钟.doc_第4页
液晶1602显示时钟.doc_第5页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

#include#define uchar unsigned char #define uint unsigned intuchar code table= 2011-5-25 ;uchar code table1= 23:59:55;sbit rs=P25;sbit rw=P26;sbit en=P27;sbit d1=P10;sbit d2=P11;sbit d3=P12;sbit d4=P14;uchar count,shi,fen,miao,dnum;void delay(uchar z)/延时uint x,y;for(x=110;x0;x-)for(y=z;z0;z-);void write_com(uchar com) /写指令 rs=0; rw=0; en=0; P0=com; delay(5); en=1; delay(5); en=0;void write_date(uchar date)/写数据rs=1;rw=0;en=0;P0=date;delay(5);en=1;delay(5);en=0;void write_sfm(uchar add,uchar date) uchar shi,ge; shi=date/10; ge=date%10; write_com(0x80+0x40+add);/只想要写的地址 write_date(0x30+shi);/0x30代表的数字是0,+shi表示shi的数字 write_date(0x30+ge);/ge的数字void unit()uchar num;en=0;write_com(0x38); /显示write_com(0x0c); /光标不显示write_com(0x06); /指针加1,整屏不移动write_com(0x01); /清屏write_com(0x80); /指针指向0x80for(num=0;num12;num+) /第一行显示table数组write_date(tablenum);delay(20);write_com(0x80+0x40);for(num=0;num11;num+) /第二行显示table1数组write_date(table1num);delay(20);TMOD=0X01;TH0=(65536-50000)/256;/开启中断TL0=(65536-50000)%256;EA=1;ET0=1;TR0=1;shi=23;fen=59;miao=55;void jishu() /计数 if(count=20)count=0;miao+; /秒加if(miao=60)miao=0;fen+; /分加if(fen=60)fen=0;shi+; if(shi=24)shi=0; /时加write_sfm(3,shi);write_sfm(6,fen);write_sfm(9,miao);void change()d4=0;if(d1=0) /移光标delay(10);if(d1=0)while(!d1);dnum+;if(dnum=1)TR0=0;write_com(0x0f);write_com(0x80+0x40+10);if(dnum=2) write_com(0x80+0x40+7);if(dnum=3)write_com(0x80+0x40+4);if(dnum=4)dnum=0;TR0=1;write_com(0x0c);if(d2=0) /加数据delay(10);if(d2=0)while(!d2);if(dnum=1)miao+;if(miao=60)miao=0;write_sfm(9,miao); /顺序不能换write_com(0x80+0x40+10); /顺序不能换if(dnum=2)fen+;if(fen=60)fen=0;write_sfm(6,fen);write_com(0x80+0x40+7);if(dnum=3)shi+;if(shi=24)shi=0;write_sfm(3,shi);write_com(0x80+0x40+4);if(d3=0) /减数据delay(10);if(d3=0)while(!d3);if(dnum=1)miao-;if(miao=-1)miao=59;write_sfm(9,miao);write_com(0x80+0x40+10);if(dnum=2)fen-;if(fen=-1)fen=59;write_sfm(6,fen);write_com(0x80+0x40+7);if(dnum=3)shi-;if(shi=-1)shi=23;write_sfm(3,shi);write_com(0x80+0x40+4);void main()unit(

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论