- 3
- 0
- 约2.44千字
- 约 9页
- 2018-07-08 发布于湖北
- 举报
单片机c语言可调时钟程序rkdk2w
/*CMS所做的可调时钟程序*/
#includereg51.h
char led[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};//数码管显示数字
unsigned int i=0,j=0,k=0;
unsigned char time=0,sec=0,min=0,hour=0,keyy=0;
sbit key1=P2^0;
sbit key2=P2^1;
sbit key3=P2^2;
unsigned char keyn;
void display(unsigned char sec,unsigned char min,unsigned char hour);
void delay(unsigned int j)//延时函数
{
for(j=0;j200;j++);
}
void display(unsigned char sec,unsigned char min,unsigned char hour)//显示函数
{
P3=0xfe;
P1=led[sec%10];//珊哥个秒
delay(10);
P3=0xfd;
P1=led[sec/10];//珊哥十秒
delay(10);
P3=0xfb;
P1=0x40;
delay(10);
P3=0xf7;
P1=led[min%10];//珊哥个分
delay(10);
P3=0xef;
P1=led[min/10];//珊哥十分
delay(10);
P3=0xdf;
P1=0x40;
delay(10);
P3=0xbf;
P1=led[hour%10];//珊哥个时
delay(10);
P3=0x7f;
P1=led[hour/10];//珊哥十时
delay(10);
}
void key()//开关检测
{
if(key1==0)//检测开关1
{
delay(10);//开关抖动
if(key1==0)
{
keyn++;
while(!key1){display(sec,min,hour);};
if(keyn==1)//确认开关已弹起
{
TR0=0;
}
if(keyn==2)
{
TR0=0;
}
if(keyn==3)
{
TR0=0;
}
if(keyn==4)
{
keyn=0;
TR0=1;
}
}
}
if(keyn!=0)
{
if(key2==0)//检测开关2
{
delay(10);
if(key2==0)
{
while(!key2){display(sec,min,hour);}
if(keyn==1)
{
hour++;//调测小时
if(hour==24)
hour=0;
display(sec,min,hour);
}
if(keyn==2)
{
min++;//调测分钟
if(min==60)
min=0;
display(sec,min,hour);
}
if(keyn==3)
{
sec++;//调测秒
if(sec==60)
sec=0;
display(sec,min,hour);
}
}
}
if(key3==0)//检测开关3
{
delay(10);
if(key3==0)
{
while(!key3){display(sec,min,hour);}
if(keyn==1)
{
hour--;//调测小时
if(hour==-1)
hour=23;
display(sec,min,hour);
}
if(keyn==2)
{
min--;//调测分钟
if(min==-1)
min=59;
display(sec,min,hour);
}
if(keyn==3)
{
sec--;//调测秒
if(sec==-1)
sec=59;
display(sec,min,hour);
}
}
}
}
}
您可能关注的文档
- 关于开办校园水果店的营销方案llcvpc.docx
- 关于开展一二九爱国运动主题班会的总结书heg4b4.doc
- 关于开展人民币收付业务自查情况报告jzogpt.doc
- 关于开展教育乱收费专项检查工作自查自纠报告kf2xyp.doc
- 关于强化钢结构施工安全控制管理探索探究ilf_gk.doc
- 关于当下社会中国传统家庭观念的浅谈uw5x9d.doc
- 关于当前农村药品市场监管状况调查报告ird2kf.doc
- 关于当前农村药品市场监管状况调查报告范文qdw5im.doc
- 关于成长的话题作文ov_e6r.docx
- 关于我国个人信用管理体系发展的思考b_aw3t.doc
- (正式版)DB51∕T 1867-2014 《袋栽黑木耳生产技术规程》.docx
- (正式版)DB51∕T 2413-2023 《油橄榄密植丰产栽培技术规程》.docx
- (正式版)DB51∕T 2436-2017 《川菜东坡一品肉烹饪工艺技术规范》.docx
- (正式版)DB51∕T 2396-2017 《农村电子商务服务站(点)服务与管理规范》.docx
- (正式版)DB51∕T 2419-2017 《桢楠扦插育苗技术规程》.docx
- CN105145773B 一种无花果曲奇饼干及其制作方法 (江苏农林职业技术学院).docx
- CN105203825A 微测量电极的制作方法和热电势的测量方法及相关装置 (国家纳米科学中心).docx
- CN105137533B 一种啁啾光纤光栅及其制作方法 (南京航空航天大学).docx
- (正式版)DB51∕T 2453-2018 《巴山新居公共管理指南》.docx
- (正式版)DB51∕T 1892-2014 《川西北地区沙化土地治理技术规程》.docx
原创力文档

文档评论(0)