标题:
AVR单片机跑马灯的仿真设计
[打印本页]
作者:
asd985
时间:
2017-5-29 16:18
标题:
AVR单片机跑马灯的仿真设计
简易的跑马灯设计。基于AVR单片机
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载):
0.png
(36.5 KB, 下载次数: 134)
下载附件
2017-5-30 01:31 上传
0.png
(68.04 KB, 下载次数: 132)
下载附件
2017-5-30 01:30 上传
单片机源程序如下:
/********************************************************************
汇诚科技
*********************************************************************/
#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 0:PORTA=0X00;break;//0000 0000B 点亮LED1~LED8
case 1:PORTA=0X01;break;//0000 0001B 点亮LED2~LED8
case 2:PORTA=0X03;break;//0000 0011B 点亮LED3~LED8
case 3:PORTA=0X07;break;//0000 0111B 点亮LED4~LED8
case 4:PORTA=0X0f;break;//0000 1111B 点亮LED5~LED8
case 5:PORTA=0X1f;break;//0001 1111B 点亮LED6~LED8
case 6:PORTA=0X3f;break;//0011 1111B 点亮LED7~LED8
case 7:PORTA=0X7f;break;//0111 1111B 点亮LED8
case 8:PORTA=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
}
……………………
…………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码
所有资料51hei提供下载:
跑马灯设计.rar
(47.38 KB, 下载次数: 22)
2017-5-29 16:17 上传
点击文件名下载附件
下载积分: 黑币 -5
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1