已阅读5页,还剩1页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
#include#include#include#define uchar unsigned char#define uint unsigned int uchar value,shi=23,fen=59,miao=50,SI;uchar code table16= 时 分 秒;uchar code table116=0123456789;void time_display(uchar add,uchar dat);sbit rs=P24;sbit rw=P25;sbit e=P26;/sbit rst=P23;sbit s1=P10;sbit s2=P11;sbit s3=P12;void delayu(uint t)while(-t);void delaym(uint t)while(-t)delayu(245);delayu(245);void write_com(uchar com)rs=0;rw=0;e=1;delayu(1);P0=com;delayu(10);e=0;void write_data(uchar date)rs=1;rw=0;e=1;delayu(1);P0=date;delayu(10);e=0;delayu(2);void scy()if(s1=0)delaym(10);if(s1=0)SI+;while(!s1);ET0=0; if(SI=1)write_com(0x84); write_com(0x0f);while(s1&s2&s3);if(SI=2)write_com(0x82);while(s1&s2&s3);if(SI=3)write_com(0x80);delayu(20);while(s1&s2&s3);if(SI=4)SI=0;write_com(0x0c);ET0=1;if(!SI=0)if(s3=0)delaym(10);if(s3=0)delaym(100);if(SI=1)miao-;if(miao=0) miao=60;time_display(4,miao);write_com(0x84);if(SI=2)fen-;if(fen=0) fen=60;time_display(2,fen);write_com(0x82);if(SI=3)shi-;if(shi=0) shi=24;time_display(0,shi);/将时间立即改变write_com(0x80);if(s2=0)delaym(10);if(s2=0)delaym(100);if(SI=1)miao+;if(miao=60)miao=0;time_display(4,miao);write_com(0x84);if(SI=2)fen+;if(fen=60)fen=0;time_display(2,miao);write_com(0x82);if(SI=3)shi+;if(shi=24)shi=0;time_display(0,miao);write_com(0x80);void init()write_com(0x30);delayu(10);write_com(0x30);delayu(10);write_com(0x0e);delayu(10);write_com(0x01);delayu(1);write_com(0x06);delayu(10);/write_com(0x1a);TMOD=0X01;TH0=(65536-50000)/256;TL0=(65536-50000)%256;TR0=1;EA=1;ET0=1; void time_display(uchar add,uchar dat)uchar ge,sh;ge=dat%10;sh=dat/10;write_com(0x80+add);write_data(0x30+sh);write_data(0x30+ge);write_com(0x80+add);void time_deal()if(value=20)value=0;miao+;if(miao=60) miao=0;fen+;if(fen=60)fen=0;shi+;if(shi=24)shi=0; if(s1=1)time_display(4,miao);time_display(2,fen);time_display(0,shi);void main()uchar i;init(); write_com(0x80);delayu(100);for(i=0;i12;i+)write_data(tablei); w
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2026年高标准农田建设试题及答案
- 2026年国家公务员行测试题及答案
- 护理健康宣教与跨学科团队合作
- 护理人文素养提升
- 高温作业防护知识培训试题及答案
- 护理学导论:基础与前沿
- 2026 育儿幼儿舞蹈舞台创意课件
- 手部护理中的卫生与消毒
- 2026年a15问卷星试题及答案
- 2025年时代金融分析师面试题库及答案
- 管理学说课设计比赛(精美模板)
- 粉末产品原辅材料入库检验规范
- 电子线路设计、测试与实验(一)-华中科技大学中国大学mooc课后章节答案期末考试题库2023年
- 天然气管道置换记录表
- tcp-ip协议基础教学课件
- 2007年高考试题理综卷
- 城市绿地系统专项规划说明书
- GB/T 17215.321-2008交流电测量设备特殊要求第21部分:静止式有功电能表(1级和2级)
- 工程教育认证学校培训课程专项测试卷含答案
- 小学英语时态总结课件
- 家政培训之衣物洗涤2课件
评论
0/150
提交评论