单片机32 io口控制心形led灯

ID:63924 · 发表于 2014-7-13 08:53

Program.zip (53.56 KB, 下载次数: 37)

/*******************************************************
/*******************************************************************************************/
/****************************************五周年纪念*****************************************/
/*******************************************************************************************/
/***********************Copyright 2010 Happy Genius，All rights reserved********************/
/*******************************************************************************************/
/*******************************************Version：V1.0***********************************/
#include<reg52.h>
#include<intrins.h>
#include<math.h>
#define uchar unsigned char
#define uint unsigned int
uint a,b,c,d,e;
uchar mifly,mifly1,mifly2,mifly3,t;
sbit D1=P0^0;
sbit D2=P0^1;
sbit D3=P0^2;
sbit D4=P0^3;
sbit D5=P0^4;
sbit D6=P0^5;
sbit D7=P0^6;
sbit D8=P0^7;
sbit D9=P1^0;
sbit D10=P1^1;
sbit D11=P1^2;
sbit D12=P1^3;
sbit D13=P1^4;
sbit D14=P1^5;
sbit D15=P1^6;
sbit D16=P1^7;
sbit D17=P2^0;
sbit D18=P2^1;
sbit D19=P2^2;
sbit D20=P2^3;
sbit D21=P2^4;
sbit D22=P2^5;
sbit D23=P2^6;
sbit D24=P2^7;
sbit D25=P3^0;
sbit D26=P3^1;
sbit D27=P3^2;
sbit D28=P3^3;
sbit D29=P3^4;
sbit D30=P3^5;
sbit D31=P3^6;
sbit D32=P3^7;
void delay(unsigned z);
void QDSHWC(t);
void DDSHZXH(t);
void SDSHZXH(t);
void SanDSHZXH(t);
void DDZFYCDL(t);
void GKSHZXH(t);
void GKNSZXH(t);
void SXXH(t);
void DDXHDL(t);
void WXDL(t);
void main()
{
while(1)
{
P0=P1=P2=P3=0;
delay(500);
delay(500);
delay(500);
delay(500);
delay(500);
delay(500);
delay(500);
QDSHWC(200);
GKSHZXH(30);
GKSHZXH(20);
GKSHZXH(10);
QDSHWC(200);
DDSHZXH(30);
DDSHZXH(25);
DDSHZXH(20);
DDSHZXH(15);
DDSHZXH(10);
DDSHZXH(10);
DDSHZXH(10);
DDSHZXH(10);
DDSHZXH(10);
GKNSZXH(30);
GKNSZXH(10);
GKNSZXH(10);
SDSHZXH(10);
SDSHZXH(20);
SDSHZXH(20);
DDZFYCDL(50);
GKNSZXH(30);
SanDSHZXH(30);
SanDSHZXH(25);
SanDSHZXH(20);
SanDSHZXH(15);
SanDSHZXH(10);
SanDSHZXH(10);
SanDSHZXH(10);
QDSHWC(200);
SXXH(80);
SXXH(60);
SXXH(40);
SXXH(20);
SXXH(40);
SXXH(60);
SXXH(80);
QDSHWC(200);
DDXHDL(10);
GKNSZXH(50);
GKNSZXH(30);
QDSHWC(200);
P0=P1=P2=P3=0xff;
delay(500);
WXDL(100);

}
}
/******************************全灯闪烁五次******************************/
void QDSHWC(t)
{
a=5;
while(a)
{
P0=P1=P2=P3=0;
delay(t);
P0=P1=P2=P3=0xff;
delay(t);
a--;
}
}
/*****************************单灯顺时针循环*****************************/
void DDSHZXH(t)
{
mifly=0xfe;
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
mifly=0x7f;
a=8;
while(a)
{
P1=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P1=0xff;
}
/*****************************双灯顺时针循环*****************************/
void SDSHZXH(t)
{
mifly=0xfc;
a=7;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0x7f;
P2=0x7f;
delay(t);
P0=0xff;
P2=0x7f;
mifly=0x3f;
a=7;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xfe;
P3=0x7f;
delay(t);
P2=0xff;
P3=0x7f;
mifly=0x3f;
a=7;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xfe;
P1=0x7f;
delay(t);
P3=0xff;
P1=0x7f;
mifly=0x3f;
a=7;
while(a)
{
P1=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P1=0xfe;
P0=0xfe;
delay(t);
P1=0xff;
P0=0xfe;
}
/*****************************三灯顺时针循环*****************************/
void SanDSHZXH(t)
{
mifly=0xf8;
a=6;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0x3f;
P2=0x7f;
delay(t);
P0=0x7f;
P2=0x3f;
delay(t);
P0=0xff;
mifly=0x1f;
a=6;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xfc;
P3=0x7f;
delay(t);
P2=0xfe;
P3=0x3f;
delay(t);
P2=0xff;
mifly=0x1f;
a=6;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xfc;
P1=0x7f;
delay(t);
P3=0xfe;
P1=0x3f;
delay(t);
P3=0xff;
mifly=0x1f;
a=6;
while(a)
{
P1=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P1=0xfc;
P0=0xfe;
delay(t);
P1=0xfe;
P0=0xfc;
delay(t);
P1=0xff;
}
/*****************************单灯正反依次点亮*****************************/
void DDZFYCDL(t)
{
uchar b,c;
mifly=0xfe;
a=8;
b=1;
while(a)
{
P0=mifly;
c=pow(2,b);
mifly=mifly-c;
b++;
a--;
delay(t);
}
mifly=0x7f;
a=8;
b=6;
while(a)
{
P2=mifly;
c=pow(2,b);
mifly=mifly-c;
b--;
a--;
delay(t);
}
mifly=0x7f;
a=8;
b=6;
while(a)
{
P3=mifly;
c=pow(2,b);
mifly=mifly-c;
b--;
a--;
delay(t);
}
mifly=0x7f;
a=8;
b=6;
while(a)
{
P1=mifly;
c=pow(2,b);
mifly=mifly-c;
b--;
a--;
delay(t);
}
P0=P1=P2=P3=0xff;
delay(t);
P0=0xfe;
delay(t);
mifly=0xfe;
a=8;
b=1;
while(a)
{
P1=mifly;
c=pow(2,b);
mifly=mifly-c;
b++;
a--;
delay(t);
}
mifly=0xfe;
a=8;
b=1;
while(a)
{
P3=mifly;
c=pow(2,b);
mifly=mifly-c;
b++;
a--;
delay(t);
}
mifly=0xfe;
a=8;
b=1;
while(a)
{
P2=mifly;
c=pow(2,b);
mifly=mifly-c;
b++;
a--;
delay(t);
}
mifly=0x7e;
a=7;
b=6;
while(a)
{
P0=mifly;
c=pow(2,b);
mifly=mifly-c;
b--;
a--;
delay(t);
}
P0=P1=P2=P3=0xff;
delay(t);
}
/*****************************各口顺时针循环*****************************/
void GKSHZXH(t)
{
b=4;
while(b)
{
mifly=0xfe;
mifly1=0x7f;
a=8;
while(a)
{
P0=mifly;
P1=P2=P3=mifly1;
mifly=_crol_(mifly,1);
mifly1=_cror_(mifly1,1);
delay(t);
a--;
}
b--;
P0=P1=P2=P3=0xff;
}
}
/*****************************各口逆时针循环*****************************/
void GKNSZXH(t)
{
b=4;
while(b)
{
mifly=0xfe;
mifly1=0x7f;
a=8;
while(a)
{
P0=mifly1;
P1=P2=P3=mifly;
mifly=_crol_(mifly,1);
mifly1=_cror_(mifly1,1);
delay(t);
a--;
}
b--;
P0=P1=P2=P3=0xff;
}
}
/*****************************双向循环*****************************/
void SXXH(t)
{
mifly=0xfe;
mifly1=0x7f;
P0=mifly;
delay(t);
a=7;
while(a)
{
mifly=_crol_(mifly,1);
mifly1=_crol_(mifly1,1);
P0=mifly;
P1=mifly1;
delay(t);
a--;
}
P0=0xff;
P1=0x7f;
P2=0x7f;
delay(t);
mifly1=0x7f;
P1=0xff;
a=7;
while(a)
{
mifly=_crol_(mifly,1);
mifly1=_cror_(mifly1,1);
P3=mifly;
P2=mifly1;
delay(t);
a--;
}
P3=0x7f;
P2=0xff;
delay(t);
P3=0xff;
}
/*****************************单灯循环点亮*****************************/
void DDXHDL(t)
{
/**********************************P1**********************************/
DDSHZXH(t);    //1
P1=0xfe;
mifly=0xfe;    //2
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x7e;
delay(t);
P1=0xbe;
delay(t);
P1=0xde;
delay(t);
P1=0xee;
delay(t);
P1=0xf6;
delay(t);
P1=0xfa;
delay(t);
P1=0xfc;
delay(t);
mifly=0xfe;    //3
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x7c;
delay(t);
P1=0xbc;
delay(t);
P1=0xdc;
delay(t);
P1=0xec;
delay(t);
P1=0xf4;
delay(t);
P1=0xf8;
delay(t);    //4
mifly=0xfe;
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x78;
delay(t);
P1=0xb8;
delay(t);
P1=0xd8;
delay(t);
P1=0xe8;
delay(t);
P1=0xf0;
delay(t);
mifly=0xfe;    //5
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x70;
delay(t);
P1=0xb0;
delay(t);
P1=0xd0;
delay(t);
P1=0xe0;
delay(t);
mifly=0xfe;    //6
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x60;
delay(t);
P1=0xa0;
delay(t);
P1=0xc0;
delay(t);
mifly=0xfe;    //7
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x40;
delay(t);
P1=0x80;
delay(t);
mifly=0xfe;    //8
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xff;
P1=0x00;
delay(t);
/**********************************P3**********************************/
mifly=0xfe;          //1
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
mifly=0x7f;
a=8;
while(a)
{
P3=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P3=0xfe;
delay(t);      //2
mifly=0xfe;
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x7e;
delay(t);
P3=0xbe;
delay(t);
P3=0xde;
delay(t);
P3=0xee;
delay(t);
P3=0xf6;
delay(t);
P3=0xfa;
delay(t);
P3=0xfc;
delay(t);
mifly=0xfe;    //3
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x7c;
delay(t);
P3=0xbc;
delay(t);
P3=0xdc;
delay(t);
P3=0xec;
delay(t);
P3=0xf4;
delay(t);
P3=0xf8;
delay(t);
mifly=0xfe;    //4
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x78;
delay(t);
P3=0xb8;
delay(t);
P3=0xd8;
delay(t);
P3=0xe8;
delay(t);
P3=0xf0;
delay(t);
mifly=0xfe;          //5
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x70;
delay(t);
P3=0xb0;
delay(t);
P3=0xd0;
delay(t);
P3=0xe0;
delay(t);
mifly=0xfe;          //6
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x60;
delay(t);
P3=0xa0;
delay(t);
P3=0xc0;
delay(t);
mifly=0xfe;       //7
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x40;
delay(t);
P3=0x80;
delay(t);
mifly=0xfe;       //8
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xff;
P3=0x00;
delay(t);
/**********************************P2**********************************/
mifly=0xfe;       //1
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
mifly=0x7f;
a=8;
while(a)
{
P2=mifly;
mifly=_cror_(mifly,1);
delay(t);
a--;
}
P2=0xfe;
mifly=0xfe;       //2
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x7e;
delay(t);
P2=0xbe;
delay(t);
P2=0xde;
delay(t);
P2=0xee;
delay(t);
P2=0xf6;
delay(t);
P2=0xfa;
delay(t);
P2=0xfc;
delay(t);
mifly=0xfe;       //3
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x7c;
delay(t);
P2=0xbc;
delay(t);
P2=0xdc;
delay(t);
P2=0xec;
delay(t);
P2=0xf4;
delay(t);
P2=0xf8;
delay(t);
mifly=0xfe;       //4
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x78;
delay(t);
P2=0xb8;
delay(t);
P2=0xd8;
delay(t);
P2=0xe8;
delay(t);
P2=0xf0;
delay(t);
mifly=0xfe;       //5
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x70;
delay(t);
P2=0xb0;
delay(t);
P2=0xd0;
delay(t);
P2=0xe0;
delay(t);
mifly=0xfe;       //6
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x60;
delay(t);
P2=0xa0;
delay(t);
P2=0xc0;
delay(t);
mifly=0xfe;       //7
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x40;
delay(t);
P2=0x80;
delay(t);
mifly=0xfe;       //8
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0xff;
P2=0x00;
/**********************************P0**********************************/
mifly=0xfe;       //1
a=8;
while(a)
{
P0=mifly;
mifly=_crol_(mifly,1);
delay(t);
a--;
}
P0=0x7f;
P0=0x7e; //2
delay(t);
P0=0x7d;
delay(t);
P0=0x7b;
delay(t);
P0=0x77;
delay(t);
P0=0x6f;
delay(t);
P0=0x5f;
delay(t);
P0=0x3f;
delay(t);
P0=0x3e;    //3
delay(t);
P0=0x3d;
delay(t);
P0=0x3b;
delay(t);
P0=0x37;
delay(t);
P0=0x2f;
delay(t);
P0=0x1f;
delay(t);
P0=0x1e;    //4
delay(t);
P0=0x1d;
delay(t);
P0=0x1b;
delay(t);
P0=0x17;
delay(t);
P0=0x0f;
delay(t);
P0=0x0e;    //5
delay(t);
P0=0x0d;
delay(t);
P0=0x0b;
delay(t);
P0=0x07;
delay(t);
P0=0x06;          //6
delay(t);
P0=0x05;
delay(t);
P0=0x03;
delay(t);
P0=0x02;    //7
delay(t);
P0=0x01;
delay(t);
P0=0x00;       //8
delay(t);
P1=P1=P2=P3=0;
delay(t);

}
/*****************************无序全灯点亮*****************************/
void WXDL(t)
{
D10=0;
delay(t);
D20=0;
delay(t);
D27=0;
delay(t);
D9=0;
delay(t);
D18=0;
delay(t);
D3=0;
delay(t);
D25=0;
delay(t);
D32=0;
delay(t);
D28=0;
delay(t);
D17=0;
delay(t);
D7=0;
delay(t);
D2=0;
delay(t);
D19=0;
delay(t);
D11=0;
delay(t);
D6=0;
delay(t);
D4=0;
delay(t);
D21=0;
delay(t);
D29=0;
delay(t);
D24=0;
delay(t);
D8=0;
delay(t);
D5=0;
delay(t);
D12=0;
delay(t);
D15=0;
delay(t);
D22=0;
delay(t);
D26=0;
delay(t);
D30=0;
delay(t);
D13=0;
delay(t);
D16=0;
delay(t);
D23=0;
delay(t);
D14=0;
delay(t);
D31=0;
delay(t);
D1=0;
delay(t);
}
void delay(unsigned z)
{
int x,y;
for(x=z;x>0;x--)
for(y=111;y>0;y--);
}