因仑“3+1”工程特种兵精英论坛

标题: 003、跑马灯设计 [打印本页]

作者: 张衍波    时间: 2015-4-29 20:25
标题: 003、跑马灯设计
/********************************************************************
                            汇诚科技
网址:http://www.ourhc.cn
产品有售淘宝店:http://shop36330473.taobao.com   
*********************************************************************/
#include <iom16v.h>
/**********************************************************************
                                  函数数据类型说明                                                                  
**********************************************************************/
#define uchar unsigned char
#define uint unsigned int
/**********************************************************************
                                  MS级延时函数程序,参数i 延时时间                                                                          
**********************************************************************/
void DelayMS(uint i)
{
uint j;
for(;i!=0;i--)
{
for(j=8000;j!=0;j--);
}
}
/**********************************************************************
                                  跑马灯程序,通过跑过的步数进行判断来点亮相应的LED
                                  低电平点亮LED                                                                          
**********************************************************************/
void horse(uchar i)
{switch (i)
{
case 0ORTA=0X00;break;//0000 0000B 点亮LED1~LED8
case 1ORTA=0X01;break;//0000 0001B 点亮LED2~LED8
case 2ORTA=0X03;break;//0000 0011B 点亮LED3~LED8
case 3ORTA=0X07;break;//0000 0111B 点亮LED4~LED8
case 4ORTA=0X0f;break;//0000 1111B 点亮LED5~LED8
case 5ORTA=0X1f;break;//0001 1111B 点亮LED6~LED8
case 6ORTA=0X3f;break;//0011 1111B 点亮LED7~LED8
case 7ORTA=0X7f;break;//0111 1111B 点亮LED8
case 8ORTA=0Xff;break;//1111 1111B 全熄灭
default:break;
}
}
/**********************************************************************
                                   主函数                                                          
**********************************************************************/
void main(void)
{
uchar i;
DDRA=0XFF;//端口设置,PA口设置为推挽1输出
PORTA=0XFF;
PORTA=0XFF;//PORTA初始化为1,灭掉所有的LED
DelayMS(10);
while(1)//程序无条件执行
{
for(i=0;i<9;i++)
{
horse(i);
DelayMS(10);//延时时间约10MS
}
for(i=7;i!=0;i--)
{
horse(i);
DelayMS(10);
}
}
}
/**********************************************************************
                                                 结束                                                  
**********************************************************************/

[attach]2564[/attach]







欢迎光临 因仑“3+1”工程特种兵精英论坛 (http://bbs.enlern.com/) Powered by Discuz! X3.4