- 1、本文档共6页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
24小时计时程序设计 山师大
此程序实验成功。
#includereg51.h
#define display1 0xdf
#define display2 0xef
#define display3 0xfb
#define display4 0xf7
#define display5 0xfd
#define display6 0xfe
#define Uchar unsigned char
Uchar a,b,c,d,sec0,sec1,min0,min1,hour0,hour1;
sbit set_save=P3^2;
sbit up=P1^0;
sbit sel=P1^2;
sbit e=P1^3;
code unsigned char led[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
code unsigned char led_point[]={0x40,0x79,0x24,0x30,0x19,0x12,0x02,0x78,0x00,0x10};
void delay_ms(Uchar count);
void disp_time();
void key_scan();
void time();
void up_down();
void delay_ms(Uchar count)
{
Uchar i,j;
do
{
for(i=5;i0;i--)
for(j=98;j0;j--);
}while(--count);
}
void main()
{a=0;b=0;d=0;sec0=0;sec1=0;min0=0;min1=0;hour0=0;hour1=0;
TMOD=0x01;
TH0=0x3c;
TL0=0xb0;
EA=1;
EX0=1;
ET0=1;
IT0=1;
TR0=1;
while(1) {
if(b==1){key_scan();}
disp_time();
}
}
void Timerupt() interrupt 1
{ a=a+1;
TH0=0x3c;
TL0=0xb0;
if(a==20){a=0;TH0=0x3c;TL0=0xb0;TF0=0;
time();
}
}
void Interrupt() interrupt 0
{
b=b+1;
if(b==1){ET0=0;TR0=0;e=0;}
if(b==2){e=1;b=0;d=0;TH0=0x3c;TL0=0xb0;TR0=1;ET0=1;}
}
void key_scan()
{
if(sel==0) {delay_ms(2);}
if(sel==0){if(d6)d=d+1;
else{d=0;}
}
while(!sel){disp_time();}
if(d==1){ if(up==0){delay_ms(2);}
if(up==0){if(hour12){hour1=hour1+1;disp_time();}
else{hour1=0;disp_time();}
}
while(!up){disp_time();}
}
if(d==2){if(up==0){delay_ms(2);}
if(up==0){if(hour12){if(hour09){hour0=hour0+1;disp_time();}
else{hour0=0;disp_time();}}
if(hour1==2){if(hour04){hour0=hour0+1;disp_time();}
else{hour0=0;disp_time();}}
}
while(!up){disp_time();}
}
if(d==3){if(up==0){delay_ms(2);}
if(up==0){if(min16){min1=min1+1;disp_time();}
else
您可能关注的文档
- 2-Power Module Overview.ppt
- 2-光学分析法与元素分析法.ppt
- 2-数据类型及输入输出函数.ppt
- 2.2.2 动物细胞融合与单克隆抗体·课件(精品).ppt
- 2.2小信号谐振放大器_20140414.ppt
- 2.3 加法器.ppt
- 2.2最大或然.ppt
- 2.ArcPy.docx
- 2.bones of trunk.ppt
- 2.第二章复习.ppt
- 2024年度党员干部专题组织生活会个人新四各方面对照检查材料3篇合集.docx
- 2023年民主生活会领导干部个人发言3篇范文.docx
- 第二批主题教育专题组织生活会普通党员个人对照检查材料合集2篇.docx
- 学习以案促改党纪教育专题组织生活会个人对照检查材料两篇.docx
- 党员领导干部2023年民主生活会“六个方面”个人对照检查材料3篇范文.docx
- 党员干部“严守纪律规矩 加强作风建设”组织生活会个人对照检查材料集合篇.docx
- 2024班子防治统计造假专题民主生活会对照检查材料两篇范文.docx
- 2024公司机关党支部教育专题组织生活会个人对照检查材料两篇.docx
- 2023年度专题民主生活会个人对照新6个对照方面检查材料3篇文稿.docx
- 2024第二批主题教育专题组织生活会对照检查材料2篇文本.docx
文档评论(0)