用stc89c51单片机做的心形流水灯效果非常棒，下面是实物图：
背面：
下面是视频：
原理图我就不画了4个p口全部接上led灯即可，下面是控制程序：
#include
#include
#define uint unsigned int
#define uchar unsigned char
uchar code table0[]={0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00};//P0-P7依次点亮
uchar code table1[]={0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff};//P0-P7依次熄灭
uchar code table2[]={0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00};//P7-P0依次点亮
uchar code table3[]={0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff};//P7-P0依次熄灭
uchar temp,aa,bb,temp,temp1;
void delay(uint z);
void h();
void hh();
void hhh();
void hhhh();
void init();
void main()//主函数
{
init();
while(520)//大循环
{
h();
hh();
hhh();
hhhh();
}
}
void delay(uint z)//延时函数
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void h()
{
for(aa=0;aa<3;aa++)
{
for(bb=0;bb<8;bb++)
{
P0=table0[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P1=table0[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P3=table0[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P2=table0[bb];
delay(50);
}
delay(500);
for(bb=0;bb<8;bb++)
{
P0=table1[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P1=table1[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P3=table1[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P2=table1[bb];
delay(50);
}
}
for(aa=0;aa<3;aa++)
{
for(bb=0;bb<8;bb++)
{
P2=table2[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P3=table2[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P1=table2[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P0=table2[bb];
delay(50);
}
delay(500);
for(bb=0;bb<8;bb++)
{
P2=table3[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P3=table3[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P1=table3[bb];
delay(50);
}
for(bb=0;bb<8;bb++)
{
P0=table3[bb];
delay(50);
}
}
}
void hh()
{
for(bb=0;bb<3;bb++)
{
for(aa=0;aa<8;aa++)
{
P0=table0[aa];
P2=table2[aa];
delay(100);
}
for(aa=0;aa<8;aa++)
{
P3=table2[aa];
P1=table0[aa];
delay(100);
}
for(aa=0;aa<8;aa++)
{
P2=table3[aa];
P0=table1[aa];
delay(100);
}
for(aa=0;aa<8;aa++)
{
P1=table1[aa];
P3=table3[aa];
delay(100);
}
}
}
void init()
{
P1=P2=P3=P0=0x00;
delay(1000);
P1=P2=P3=P0=0xff;
delay(200);
temp=0xfe;
temp1=0x7f;
}
void hhh()
{
for(bb=0;bb<10;bb++)
{
for(aa=0;aa<8;aa++)
{
P0=temp;
temp=_crol_(temp,1);
delay(40);
}
P0=0xff;
for(aa=0;aa<8;aa++)
{
P1=temp;
temp=_crol_(temp,1);
delay(40);
}
P1=0xff;
for(aa=0;aa<8;aa++)
{
P3=temp;
temp=_crol_(temp,1);
delay(40);
}
P3=0xff;
for(aa=0;aa<8;aa++)
{
P2=temp;
temp=_crol_(temp,1);
delay(40);
}
P2=0xff;
}
}
void hhhh()
{
for(aa=0;aa<30;aa++)
{
P0=P1=0x00;
delay(100);
P1=P0=0xff;
P2=P3=0x00;
delay(100);
P2=P3=0xff;
}
}
-电子元器件采购网（www.ruidan.com）是本土元器件目录分销商，采用“小批量、现货、样品”销售模式，致力于满足客户多型号、高质量、快速交付的采购需求。 自建高效智能仓储，拥有自营库存超过50,000种，提供一站式正品现货采购、个性化解决方案、选型替代等多元化服务。
