[ICCAVR C 例程]8 LED发光管跑马灯实验 C 程序 - 单片机应用 - 博趣

  无线电   专题策划 行业动态 测试测量 单片机 精彩制作 精品套件 基础入门 试阅与下载 往期目录 官方淘宝店 制汇节
当前位置:博趣 -> 无线电 -> 单片机应用

TOP

[ICCAVR C 例程]8 LED发光管跑马灯实验 C 程序
发表日期:2012-03-02 08:51:12 来源:麦克鼠单片机学习网 作者: 【 】 浏览:2835次 评论:0

是一个简单的供单片机入门学习者练习用的8LED发光二极管跑马灯的C程序,控制8个LED发光二极管做往返的循环闪亮。用ICCAVR-V7开发,在AVR单片机Atmega48上调试通过。学习者可以举一反三应用到其他类型的单片机芯片。
本实验的详细说明和硬件搭建请参考>>

//-----------------------------------------------------------------------------------
//---------单片机入门实验 8 LED发光管跑马灯 C 实验程序---------------
//-----------------------------------------------------------------------------------
//作者: 超简单工作室
//Email: fullmous@hotmail.com
//软件版本: ICCAVR ver 7.14
//创建日期: 2008.3
//版本 V1.00
// Target : M48
// Crystal: 8.0000Mhz

#include <iom48v.h>
#include <macros.h>
//一个粗略的延时子程
void delay_1ms(void)
{
unsigned int i;
for (i = 1;i < 1000;i++)
;
}
void delay(unsigned int n)
{
unsigned int i = 0;
while (i < n)
{
delay_1ms();
i++;
}
}

void main()
{
int i;
DDRB = 0xFF; // 定义端口B输出
PORTB = 0x00; // 所有位置零
while (1)
{
// 从位0移动到位7
for (i = 0; i < 8; i++)
{
PORTB = BIT(i); // 第i位置1
delay(500);
}
// 从位7移动到位0
for (i = 7; i >= 0; i--)
{
PORTB = BIT(i); // 第i位置1
delay(500);
}
}
}

 > 相关内容:

 
Tags:ICCAVR 例程 LED 发光 管跑 马灯 实验 程序 责任编辑:博趣
】【打印繁体】【投稿】【收藏】 【推荐】【举报】【评论】 【关闭】 【返回顶部
上一篇[ICCAVR C 例程]AVR单片机控制8段.. 下一篇[ICCAVR C 例程]双色二极管实验 C..

赞助商链接

最新文章

热门文章

推荐文章