已阅读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年福建省武夷山市高二化学下册期末考试模拟考试卷及参考答案【典型题】
- 2026年河北省唐山市事业单位人员招聘笔试备考题库及答案详解
- 2026安徽芜湖鸠兹水务有限公司下属子公司第一批工作人员招聘笔试历年备考题库附带答案详解
- 2026年合肥妇幼保健院(南区)劳务派遣药房工作人员招聘1名考试备考试题及答案详解
- 2026安徽滁州市鸿皓人力资源有限公司招聘劳务派遣人员参加考生笔试历年备考题库附带答案详解
- 2026安徽安庆市人力资源服务有限公司招聘项目制外包员工1人笔试历年难易错考点试卷带答案解析
- 2026中国融通资产管理集团有限公司部分管理人员岗位招聘备考题库附答案详解
- 江苏省苏州市区2025-2026学年四年级下学期数学期末试题一(试卷+答案)
- 2026云南锐达民爆有限责任公司职工招聘7人备考题库及一套答案详解
- 眼科超声生物显微镜(UBM)眼前节检查
- 译林版小学英语三年级下册 Unit 8 Colours 单元整体教学设计(导学案)
- 眼科感染控制与预防
- 机械加工安全生产管理制度
- 帕金森病患者的中医护理方法
- 空姐职业素养培训
- 二年级下册数学时间的简单计算专项练习
- 安全生产大排查自查问题隐患整改及长效措施
评论
0/150
提交评论