- 22
- 0
- 约1.92千字
- 约 3页
- 2020-07-26 发布于河北
- 举报
#includereg52.h
#define uint unsigned int
#define uchar unsigned char
/**********************************数码管查表法*****************************************************/
uchar code dula[] = {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40};//段码控制
//此表为8个数码管位选控制, 共阴数码管 1-8个
uchar code wela[] = {0xfe,0xfd,0xfb,0xf7,0xef,0xdF,0xbF,0x7F};//位选控制查表的方法控制
uchar cnt=0;
uchar LedNumVal;
sbit key1 = P1^0;//开始计时
sbit key2 = P1^1;//暂停
sbit key3 = P1^2;//复位
/**********************************延迟函数********************************************************/
void Delay_ms(uint i)
{
uchar j;
for(;i0;i--)for(j=123;j0;j--);
}
/**********************************定时器初始化程序************************************************/
void Timer_Init(void)
{
TMOD |= 0x01;//启用定时器1,模式1
TH0 = 0x3c;//定时初值50ms
TL0 = 0xb0;
ET0 = 1;//定时器0允许
EA = 1;//全局中断
}
/*********************************按键程序*******************************************************/
void Key_Scan(void)
{
if(!key1) //开始计时
{
Delay_ms(5);
if(!key1)
{
TR0 = 1;//开定时器
}
}
if(!key2) //暂停
{
Delay_ms(5);
if(!key2)
{
TR0 = 0;//关定时器
}
}
if(!key3) //复位
{
Delay_ms(5);
if(!key3)
{
LedNumVal=0;
}
}
}
/***********************************主函数********************************************************/
void main(void)
{
uchar LedOut[2],i;
Timer_Init();
while(1)
{
Key_Scan();
if(cnt20)//一秒到了
{
cnt=0;
LedNumVal++;
if(LedNumVal99)LedNumVal=0;
}
LedOut[0]=dula[LedNumVal%100/10];//十位
LedOut[1]=dula[LedNumVal%10];//个位
for(i=0;i2;i++)
{
P0 = LedOut[i];
P2 = wela[i];//使用查表法进行位选
Delay_ms(150);//扫描间隔时间(太长会数码管会有闪烁感)
}
}
}
/**********************************定时器服务程序*********************************************/
void Timer0_(void) interrupt 1
{
TH0 = 0x3c;//启用定时器1,模式1
TL0 = 0xb0;//定时初值50ms
cnt++;
}
您可能关注的文档
- 电子吊秤标定步骤.doc
- 电子喉镜检查须知.doc
- 电子备课封面(模板).doc
- 电子天平的几种常用称量方法.doc
- 电子天平示值误差不确定度评定.doc
- 电子学院学生请假条(word版本).doc
- 电子式金属硬币分拣装置(C题).doc
- 电子小报-珍爱生命.doc
- 电子技术简答题.doc
- 电子支付的含义.doc
- 2026中职(化妆品工艺)技能资格考核试题及答案.doc
- 2025新疆喀什经济开发区投资开发有限责任公司面向社会市场化招聘副总经理、财务总监2人参考试题附答案.docx
- 2025新疆喀什经济开发区投资开发有限责任公司面向社会市场化招聘副总经理、财务总监2人历年题库附答案.docx
- 2025新疆哈密巴里坤县招聘政府专职消防人员招聘笔试题库(47人)附答案解析.docx
- 2025新疆哈密巴里坤县招聘政府专职消防人员招聘备考试题(47人)附答案解析.docx
- 2025新疆唐辉商业服务有限公司招聘2人笔试历年题库带答案解析.docx
- 2025新疆哈密市事业单位面向西部计划志愿者和三支一扶人员招聘笔试题库附答案解析.docx
- 2025新疆哈密市事业单位面向西部计划志愿者和三支一扶人员招聘备考试题附答案解析.docx
- 2025新疆哈密伊吾县城市建设投资管理有限公司招聘笔试题库(7人)附答案解析.docx
- 2025新疆哈密市事业单位面向西部计划志愿者和三支一扶人员招聘备考试题附答案解析.docx
原创力文档

文档评论(0)