自己做的个性流水灯—皇冠

ID:208358 · 发表于 2017-6-6 13:28

纯属是为了好看
自己做的可以按键控制闪烁与流水

这个非常有个性的流水灯皇冠的实物图如下

单片机仿真图：

程序大致如下：

#include<reg51.h>
bit K;
unsigned char code table0[]={0x1e,0x2e,0x4e,0x8e,0x1d,0x2d,0x4d,0x8d,0x1b,0x2b,0x4b,0x8b,0x17,0x27,0x47,0x87};
unsigned char code table1[]={0x87,0x47,0x27,0x17,0x8b,0x4b,0x2b,0x1b,0x8d,0x4d,0x2d,0x1d,0x8e,0x4e,0x2e,0x1e};
unsigned char code table2[]={0xf0,0xf1,0xf3,0xf7,0x00};
unsigned char code table3[]={0x00,0xfe,0xfc};
void mDelay(unsigned int Delay)
{
unsigned int i;
for(;Delay>0;Delay--)
{
for(i=0;i<54;i++);
}
}
void main()
{
int i;
IT0=1;
EA=1;
EX0=1;
while(1)
{ if(K==0)
{
P0=0xf0;
P1=0xf0;
P2=0xf0;
mDelay(500);
P0=0x00;
P1=0x00;
P2=0x00;
mDelay(500);
P1=0xfe;
mDelay(1000);
P1=0x00;
mDelay(1000);
P1=0xf3;
P0=0xfc;
mDelay(1000);
P1=0x00;
P0=0x00;
mDelay(1000);
P0=0xf3;
P2=0xf3;
mDelay(1000);
P0=0x00;
P2=0x00;
mDelay(1000);
P1=0xf2;
P0=0xf0;
P2=0xf0;
mDelay(1000);
P0=0x00;
P1=0x00;
P2=0x00;
mDelay(1000);
}
else
{
for(i=0;i<5;i++)
{P1=table2[i];
mDelay(100);
P0=0xf0;
P2=0xf0;}
P1=0x00;
for(i=0;i<5;i++)
{P0=table2[i];
mDelay(100);
P1=0x00;
P2=0xf0;
}
P0=0x00;
for(i=0;i<5;i++)
{P2=table2[i];
mDelay(100);
P0=0x00;P1=0x00;}
P2=0x00;
for(i=0;i<2;i++)
{ P1=table3[i];
mDelay(500);}
P1=0xf3;
P0=0xfc;
mDelay(500);
P0=0xf0;
P1=0xf0;
P2=0xf0;
mDelay(500);
for(i=0;i<16;i++)
{
P1=table1[i];
mDelay(100);
}
P1=0xf0;
for(i=0;i<16;i++)
{
P0=table1[i];
mDelay(100);
}
P0=0xf0;
for(i=0;i<16;i++)
{
P2=table0[i];
mDelay(100);
}
P2=0xf0;
for(i=0;i<16;i++)
{
P2=table1[i];
mDelay(100);
}
P2=0xf0;
for(i=0;i<16;i++)
{
P0=table0[i];
mDelay(100);
}
P0=0xff;
for(i=0;i<16;i++)
{
P1=table0[i];
mDelay(100);
}
P1=0xff;}
for(i=0;i<5;i++)
{
P0=0xaa; P1=0xaa; P2=0xaa;
mDelay(100);
P0=~P0; P1=~P1; P2=~P2;
mDelay(100);
}
for(i=0;i<5;i++)
{
P0=0xaa; P1=0xaa; P2=0xaa;
mDelay(200);
P0=~P0; P1=~P1; P2=~P2;
……………………
…………限于本文篇幅余下代码请从51黑下载附件…………