- 0
- 0
- 约3.27千字
- 约 6页
- 2019-07-05 发布于湖北
- 举报
任意时间倒计时加警报(最后2min)资料
#includereg51.h
#define uchar unsigned char
uchar code table[]={
0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40};
uchar num,num0,benum,flag;
char shi=23,fen=59,miao=59;
sbit k1=P3^0;
sbit k2=P3^1;
sbit k3=P3^2;
sbit k4=P3^3;
sbit k5=P3^4;
sbit k6=P3^5;
sbit k7=P3^6;
sbit k8=P3^7;
sbit beef=P1^5;
sbit deadline=P1^4;
sbit dishurry=P1^3;
sbit stop=P1^2;
sbit play=P1^1;
void delay(uchar z)
{ //延时子程序
uchar x,y;
for(x=z;x0;x--)
for(y=110;y0;y--);
}
void display() //显示子程序
{
uchar sshi,sge,fshi,fge,mshi,mge;
sshi=shi/10;sge=shi%10;
fshi=fen/10;fge=fen%10;
mshi=miao/10;mge=miao%10;
P0=table[sshi];P2=0x00;delay(1);P0=0;
P0=table[sge];P2=0x04;delay(1);P0=0;
P0=table[10];P2=0x08;delay(1);P0=0;
P0=table[fshi];P2=0x0c;delay(1);P0=0;
P0=table[fge];P2=0x10;delay(1);P0=0;
P0=table[10];P2=0x14;delay(1);P0=0;
P0=table[mshi];P2=0x18;delay(1);P0=0;
P0=table[mge];P2=0x1c;delay(1);P0=0;
}
void set() //设置子程序
{
if(flag==1)
{
if(k1==0)
{
delay(5);
if(k1==0)
{
shi++;
if(shi==24)
shi=0;
while(!k1);
}
}
if(k2==0)
{
delay(5);
if(k2==0)
{
fen++;
if(fen==60)
fen=0;
while(!k2);
}
}
if(k3==0)
{
delay(5);
if(k3==0)
{
miao++;
if(miao==60)
miao=0;
while(!k3);
}
}
if(k5==0)
{
delay(5);
if(k5==0)
{
shi--;
if(shi==-1)
shi=23;
while(!k5);
}
}
if(k6==0)
{
delay(5);
if(k6==0)
{
fen--;
if(fen==-1)
fen=59;
while(!k6);
}
}
if(k7==0)
{
delay(5);
if(k7==0)
{
miao--;
if(miao==-1)
miao=59;
while(!k7);
}
}
}
if(k4==0)
{
delay(5);
if(k4==0)
TR0=0;
flag=1;
while(!k4);
}
if(k8==0)
{
delay(5);
if(k8==0)
{
TR0=1;
flag=0;
}
while(!k8);
}
}
void alarm() //报警子程序
{
if(shi==0)
{
if(fen==2)
{
if(miao==0)
{
TR1=1;
benum=20;
}
}
if(fen==1)
{
if(miao==30)
benum=10;
}
if(fen==1)
{
您可能关注的文档
最近下载
- NB_T 31113-2017 陆上风电场工程施工组织设计规范.docx VIP
- Onkyo安桥TX-NR807中文说明书.pdf
- 基于语文核心素养的小学习作教学策略研究 .docx VIP
- 2022款凯迪拉克XT4_用户手册驾驶指南车主车辆说明书电子版.pdf VIP
- 基于语文核心素养的小学高年级习作教学策略研究.docx VIP
- 2018年高考文综政治北京卷.doc VIP
- 《广告策划创意学》全套课件.ppt VIP
- 第二届广州市中小学青年教师教学能力大赛方案.pdf VIP
- 2025年度事业单位公开招聘考试(D类)《小学综合应用能力》新版真题卷(附答案).pdf VIP
- 中级注册安全工程师注册管理系统使用指南.doc VIP
原创力文档

文档评论(0)