/**
*Function:数码管显示数字为流水灯亮的个数
*Author: 徐冉
*Time: 2013-07-28
**/
/*************基于AT89C52-RC MCU************/
/************基于HL-1开发板****************/
#include
typedef unsigned int uint;
typedef unsigned char uchar;
/*数码管锁存器位声明*/
sbit wela = P2^7;
sbit dula = P2^6;
/*数码管编码表*/
uchar code table[] = {
0x3F, //"0"
0x06, //"1"
0x5B, //"2"
0x4F, //"3"
0x66, //"4"
0x6D, //"5"
0x7D, //"6"
0x07, //"7"
0x7F, //"8"
0x6F //"9"
};
/*全局变量定义*/
uchar num, counter;
/*延时子程序*/
void delay(uint xms)
{
uint x, y;
for(x = xms; x > 0; x--)
for(y = 125; y > 0; y--);
}
/*定时器T0初始化程序*/
void Time0_init()
{
P1 = 0xff;//关闭led灯
TMOD = 0x01;//设置定时器T0工作方式0
TH0 = 0xB8;//设定T0定时20ms
TL0 = 0x00;
TR0 = 1;//打开定时器T0
EA = 1;//开总中断
ET0 = 1;//开定时器T0中断
}
/*数码管显示子程序*/
void Display(uint num)
{
uchar shi, ge;
shi = num / 10 % 10;
ge = num % 10;
dula = 1;
P0 = table[shi];
dula = 0;
P0 = 0xff;
wela = 1;
P0 = 0xfe;
wela = 0;
P0 = 0x00;
delay(5);
dula = 1;
P0 = table[ge];
dula = 0;
P0 = 0xff;
wela = 1;
P0 = 0xfd;
wela = 0;
P0 = 0x00;
delay(5);
}
/*主程序main()*/
void main(void)
{
Time0_init();
while(1)
{
if(num == 0)
{
P1 = 0xff;//1111 1111
}
else if(num == 1)
{
P1 = 0xfe;//1111 1110
}
else if(num == 2)
{
P1 = 0xfc; //1111 1100
}
else if(num == 3)
{
P1 = 0xf8;//1111 1000
}
else if(num == 4)
{
P1 = 0xf0;//1111 0000
}
else if(num == 5)
{
P1 = 0xe0;//1110 0000
}
else if(num == 6)
{
P1 = 0xc0;//1100 0000
}
else if(num == 7)
{
P1 = 0x80;//1000 0000
}
else if(num == 8)
{
P1 = 0x00;//0000 0000
}
Display(num);
}
}
/*定时器T0中断服务子程序*/
void Time0_int() interrupt 1
{
TH0 = 0xB8;
TL0 = 0x00;
counter++;
if(counter == 50)
{
counter = 0;
num++;
if(num > 8)
{
num = 0;
}
}
}
上一篇:单片机程序-利用C52库函数实现左右流水灯
下一篇:单片机驱动点阵向上流动显示I Love U -Love漂亮的心形
推荐阅读最新更新时间:2024-03-16 14:00
设计资源 培训 开发板 精华推荐
- 有奖直播|TI 芯技术助力电机开发
- 下载赢好礼!40张京东卡等你拿!
- 现场抽取PS5等诸多好礼 SiFive RISC-V 中国技术论坛 上海、北京、深圳 3场线下活动邀您出席!
- 【EEWORLD第二十六届】2011年05月社区明星人物揭晓!
- 有奖活动|逛安富利人工智能云会展,解锁AI资料,赢好礼!
- TI有奖直播|借助Sitara™ AM263x MCU 创造电气化的未来
- 答题赢好礼|以人为本、生命无价 ADI 楼宇烟雾探测技术
- 有奖报名 | 安富利邀您参与2022国际工业博览会!(11月30日-12月4日,上海)
- 了解设计完整AC-DC系统的快速低风险方法,轻松答题赢好礼
- 您的电路保护有足够的空间吗?Littelfuse的881系列保险丝迎接这一挑战