




已阅读5页,还剩3页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
#include #include #define uchar unsigned charvoid lcd_ini();void ascii_change(void);void delay();void wri_add(uchar com);void wri_dat(uchar com1);void shan(void);void disp();void tkey(void);sbit cs=P17;sbit sid=P16;sbit sclk=P15;bit flag=1; uchar dat,count,f=1;/f测试哪个单元为当前闪烁状态 uchar data clock3=23,45,12;uchar code clockname10=北京时间:;uchar data num6;/*主程序*/void main()lcd_ini();count=10;/机器周期为1us,每次定时50ms,此变量用来控制循环次数,在下面赋值为20,共定时1秒TMOD=0x01;TL0=0XB0;TH0=0X3C;EA=1;ET0=1;IT0=1;EX0=1;TR0=1;while(1)back:ascii_change();disp();delay();if(flag=1)goto back;tkey();shan();delay();/*lcd初始化*/void lcd_ini()wri_add(0x30);delay();wri_add(0x0c);delay();wri_add(0x01);delay();wri_add(0x06);delay();/*定时程序*/void timer1() interrupt 1 using 2TL0=0XB0;TH0=0X3C;count-;if(count=0) count=10; clock2+;/秒/ else goto out; if(clock2=60) clock2=0; clock1+;/分/ if(clock1=60) clock1=0; clock0+; if(clock0=24)/时/ clock0=0; out:_nop_();/*十位个位转换成ASCII码*/void ascii_change(void) num5=clock2-(clock2/10)*10+0x30; num4=clock2/10+0x30; num3=clock1-(clock1/10)*10+0x30; num2=clock1/10+0x30; num1=clock0-(clock0/10)*10+0x30; num0=clock0/10+0x30;/*廷时程序*/ void delay() uchar i,j; for (i=250;i0;i-) for (j=250;j0;j-);/*Write address*/void wri_add(uchar com)uchar i,j,k;cs=0;cs=1;dat=0xf8;for(i=1;i=8;i+) sid=(bit)(dat&0x80); sclk=0; sclk=1; sclk=0; dat=dat1;dat=com;dat=dat&0xf0;for(j=1;j=8;j+)sid=(bit)(dat&0x80); sclk=0; sclk=1; sclk=0; dat=dat1;dat=com;dat=_cror_(dat,4);/ 此为高低四位交换dat=dat&0xf0;for(k=1;k=8;k+) sid=(bit)(dat&0x80); sclk=0; sclk=1; sclk=0; dat=dat1; /*Write data*/void wri_dat(uchar com1)uchar i,j,k;cs=0;cs=1;dat=0xfa;for(i=1;i=8;i+) sid=(bit)(dat&0x80); sclk=0; sclk=1; sclk=0; dat=dat1; dat=com1; dat=dat&0xf0; for(j=1;j=8;j+) sid=(bit)(dat&0x80); sclk=0; sclk=1; sclk=0; dat=dat1;dat=com1; dat=_cror_(dat,4);/ 此为高低四位交换dat=dat&0xf0;for(k=1;k=8;k+) sid=(bit)(dat&0x80); sclk=0; sclk=1; sclk=0; dat=dat1; /*display program*/void disp()uchar i,k=0;wri_add(0x80);for (i=1;i=9;i+)wri_dat(clocknamei-1);wri_add(0x90);for (i=1;i=6;i+)k+;if(k=3|k=5)wri_dat(clockname8);/时间之间的冒号。wri_dat(numi-1);/*闪烁程序*/void shan(void)uchar i,k=0;wri_add(0x90);if(f=1)num0= ;num1= ;elsegoto next; for (i=1;i=6;i+)k+;if(k=3|k=5)wri_dat(clockname8);/时间之间的冒号。wri_dat(numi-1);goto return1;next: if(f=2)num2= ;num3= ;elsegoto next1; for (i=1;i=6;i+)k+;if(k=3|k=5)wri_dat(clockname8);/时间之间的冒号。wri_dat(numi-1);goto return1;next1: if(f=3)num4= ;num5= ;elsegoto return1; for (i=1;i=6;i+)k+;if(k=3|k=5)wri_dat(clockname8);/时间之间的冒号。wri_dat(numi-1);return1:_nop_();/*外部中断*/void intr0() interrupt 0 using 2flag=flag;/判断是否闪烁位/TR0=TR0; /闪关定时否则开定时f=1; /*按键程序*/void tkey(void) uchar judcekey; judcekey=P1&0x0f; if(judcekey=0x0f) goto return2; /*移位键*/ if (judcekey=0x0e) f+; if (f=4) f=1; /*加一键*/ if(judcekey=0x0d) clockf-1+; if (f=1) if (clockf-1=24) clockf-1=0; else if (clockf-1=
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025年加油站人员面试题及答案
- 2025云南机场集团有限责任公司航行管制员公开招聘笔试历年参考题库及答案
- 汽车驾驶维修考工试题及答案
- 外加工合同4篇
- 高空施工终身劳动合同(3篇)
- 安徽二建市政考试题真题及答案
- 2025国考试题及答案
- 现代农业企业设立与农业科技合作合同
- 钢铁企业职工工伤事故赔偿及保险协议
- 水工专业笔试试题及答案
- 电气值班员现场问答50题
- 2025-2030矿山工程机械租赁市场商业模式与风险防控报告
- 公务用车管理培训课件
- 跨文化视野下《哪吒之魔童降世》字幕翻译探究
- 2026年高考语文复习:文言文背诵篇目理解性默写练习题汇编(含答案)
- 2025高考新课标二卷语文试卷(含答案)
- 2025年新为父母设立居住权协议书
- 食材配送退换货方案
- 安宁疗护服务创新创业项目商业计划书
- 2025年上海市少先队试题及答案
- 肥料及基础知识培训课件
评论
0/150
提交评论