电子圣诞树制作含LED单片机程序与实物图

ID:140725 · 发表于 2017-4-4 02:59

分享一个小电子制作很简单 led电子圣诞树：

151701pjj1jrfj6pjzvq6f.jpg.thumb.jpg

单片机程序源码：

#include
unsigned char i,j;
void delay_ms (unsigned int a)
{
unsigned int i;
while( a-- != 0)
{
for(i = 0; i < 125; i++);
}
}
void main(void)
{
while(1)
{
/**********旋转亮灯*************************/
for(j=0;j<6;j++)
{ P0=0;
for(i=0;i<7;i++)
{
P2 = 1<<i;
delay_ms (500);
}
P0=0;
for(i=0;i<7;i++)
{
P2 = 0x20>>i;
delay_ms (500);
}
}
P0=0;
P2=0xff;
delay_ms (6500);
delay_ms (6500);
/**********螺旋上升，灯数增加。*************************/
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(1<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0x03<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0x07<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0x0f<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0x1f<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0x3f<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0x7f<<i);
P2 = 1<<j;
delay_ms (300);
}
}
for(i=0;i<8;i++)
{
for(j=0;j<6;j++)
{
P0 =~(0xff<<i);
P2 = 1<<j;
delay_ms (300);
}
}
P0=0;
P2=0xff;
delay_ms (6500);
delay_ms (6500);
/**********上下单层闪烁*************************/
for(j=0;j<5;j++)
{
for(i=0;i<9;i++)
{
P0 =~(1<<i);
P2=0xff;
delay_ms (500);
}
for(i=0;i<9;i++)
{
P0 =~(0x80>>i);
P2=0xff;
delay_ms (500);
}
for(i=0;i<9;i++) //
{
P0 =~(0x03<<i);
P2=0xff;
delay_ms (500);
}
for(i=0;i<9;i++)
{
P0 =~(0xc0>>i);
P2=0xff;
delay_ms (500);
}
for(i=0;i<9;i++)
{
P0 =~(0x07<<i);
P2=0xff;
delay_ms (500);
}
for(i=0;i<9;i++)
{
P0 =~(0xe0>>i);
P2=0xff;
delay_ms (500);
}
}
P0=0;
P2=0xff;
delay_ms (6500);
delay_ms (6500);
/**********上下多层闪烁*************************/
for(j=0;j<7;j++)
{
for(i=0;i<9;i++)
{
P0 =0xff>>i;
P2=0xff;
delay_ms (200);
}
for(i=0;i<9;i++)
{
P0 =~(0xff>>i);
P2=0xff;
delay_ms (200);
}
}
/************上下多层闪烁***********************/
for(j=0;j<7;j++)
{
for(i=0;i<9;i++)
{
P0 =0xff<<i;
P2=0xff;
delay_ms (200);
}
for(i=0;i<9;i++)
{
P0 =~(0xff<<i);
P2=0xff;
delay_ms (200);
}
}
P0=0;
P2=0xff;
delay_ms (6500);
delay_ms (6500);
/**********旋转灭灯*************************/
for(j=0;j<7;j++)
{
for(i=0;i<8;i++)
{ P0=0;
P0 =0x03<<i;
for(j=0;j<6;j++)
{
P2 = 1<<j;
delay_ms (400);
}
}
for(i=0;i<8;i++)
{ P0=0;
P0 =1<<i;
for(j=0;j<6;j++)
{
P2 = 0x30>>j;
delay_ms (400);
}

复制代码

下载：

圣诞树LED程序.rar (21.83 KB, 下载次数: 15)

帐号		自动登录	找回密码
密码			立即注册

电子圣诞树制作 含LED单片机程序与实物图

相关帖子

电子圣诞树制作含LED单片机程序与实物图