基于51单片机的心形流水灯设计

基于51单片机的心形流水灯

（仿真＋程序＋原理图＋设计报告）

功能介绍

具体功能：

1.采用51单片机做为主控制器；

2.32个彩色ＬＥＤ接在单片机的32个双向ＩＯ口；

3.选好ＬＥＤ的限流电阻，使每种ｌｅｄ的亮度接近；

4.九种流水灯花样自动变换，循环往复；

演示视频：

基于51单片机的心形流水灯设计

#include<reg52.h>
#include <intrins.h>
#define uint unsigned int
#define uchar unsigned char
							            //延时
void delay(uint k)    
{	
	uint i,j;
	for(i=k;i--;i>0)
		for(j=100;j--;j>0);
}

void main()
{	
	uchar temp0,temp1;
	uchar yi;
	uchar yi0,yi1;                   
	uint i,j,k,a,b;
	j=k=a=b=3;	
									//全部亮
	P0=P1=P2=P3=0x00;
	delay(700);
	P0=P1=P2=P3=0xff;	
									//每个io口独自亮
	for(i=2;i--;i>0)
	{
		P1=P0=0x00;
		delay(500);
		P1=P0=0xff;
		P3=P2=0x00;
		delay(500);
		P3=P2=0xff;
	}
									//全部亮，闪三次
	for(i=2;i--;i>0)
	{
		P0=P1=P2=P3=0x00;
		delay(100);
		P0=P1=P2=P3=0xff;
		delay(100);
	}
									//P1、P2亮，P3、P0暗
	for(i=3;i--;i>0)
	{
		P1=0x00,P2=0x00; P3=0xff,P0=0xff;
		delay(500);
		P1=0xff,P2=0xff,P3=0x00,P0=0x00;
		delay(500);
	}

									//四个点的流水

	while(j>0)
	{
		temp0=0xfe,temp1=0x7f;
		P1=P3=temp0,P2=P0=temp1;
		delay(100);
		for(i=7;i--;i>0)
		{
			temp0=_crol_(temp0,1),temp1=_cror_(temp1,1);
			P1=P3=temp0,P2=P0=temp1;
			delay(100);
		} 
		 j--;
	 }
									 //全部亮，闪三次
	for(i=3;i--;i>0)
	{
		P0=P1=P2=P3=0x00;
		delay(300);
		P0=P1=P2=P3=0xff;
		delay(300);
	}			   

									//四个IO口同样跟踪流水
	while(k>0)
	{
		temp0=0xfe,temp1=0x7f;
		P1=P3=temp0,P2=P0=temp1;
		delay(60);
		for(i=7;i--;i>0)
		{
			temp0=temp0<<1,temp1=temp1>>1;
			P1=P3=temp0,P2=P0=temp1;
			delay(60);
		}
		k--;
	 }
	 P0=P1=P3=P2=0xff;
	 while(k<3)
	 {
	 	  temp0=0x7f,temp1=0xfe;
		  P1=P3=temp0,P2=P0=temp1;
		  delay(60);
		  for(i=7;i--;i>0)
		  {
		  	temp0=temp0>>1,temp1=temp1<<1;
			P1=P3=temp0,P2=P0=temp1;
			delay(60);
		  }
		  k++;
	 }
	 P3=P2=0xff;
						             //两边单个从上向下流水
	yi=0xfe;
	P1=P0=yi;
	delay(50);
	for(i=7;i--;i>0)
	{
		yi=_crol_(yi,1);
		P1=P0=yi;
		delay(50);
	}
	P1=P0=0xff;
	yi=0xfe;
	P3=P2=yi;
	delay(50);
	for(i=7;i--;i>0)
	{
		yi=_crol_(yi,1);
		P3=P2=yi;
		delay(50);
	}
	P3=P2=0Xff;
	 					                //两边单个返回流水
	for(i=7;i--;i>0)			 
	{
		yi=_cror_(yi,1);
		P3=P2=yi;
		delay(50);
	}
	P3=P2=0xff;
	for(i=7;i--;i>0)
	{
		yi=_cror_(yi,1);
		P0=P1=yi;
		delay(50);
	}				 				 
				                          //全部亮，闪三次
	P0=P1=P3=P2=0xff;
	for(i=3;i--;i>0)
	{
		P0=P1=P2=P3=0x00;
		delay(100);
		P0=P1=P2=P3=0xff;
		delay(100);
	}
	                                            //流水灯

	yi0=0xfe,yi1=0x7f;
	P3=P2=yi1,P1=P0=yi0;
	delay(100);
	for(i=7;i--;i>0)
	{
		 yi0=yi0<<1, yi1=yi1>>1;
		 P1=P0=yi0,P3=P2=yi1;
		 delay(100);
	}
	P1=P2=P3=P0=0xff;
	delay(200);
	yi0=0x7f,yi1=0xfe;
	P1=P0=yi0,P3=P2=yi1;
	for(i=7;i--;i>0)
	{
		yi0=yi0>>1,yi1=yi1<<1;
		P1=P0=yi0,P3=P2=yi1;
		delay(100);	
	}
	                                           	  //大循环跟踪流水
	P1=P2=P3=P0=0xff;
	for(i=8;i--;i>0)
	{
		 P1=P1<<1;
		 delay(50);
	}
	for(i=8;i--;i>0)
	{
		 P3=P3<<1;
		 delay(50);
	}

	for(i=8;i--;i>0)
	{
		 P2=P2>>1;
		 delay(50);
	}
	for(i=8;i--;i>0)
	{
		 P0=P0>>1;
		 delay(50);
	}						
			                    	            //逆向大循环跟踪流水

	P1=P2=P3=P0=0xff;
	for(i=8;i--;i>0)
	{
		 P0=P0<<1;
		 delay(50);
	}
	for(i=8;i--;i>0)
	{
		 P2=P2<<1;
		 delay(50);
	}
	for(i=8;i--;i>0)
	{
		 P3=P3>>1;
		 delay(50);
	}
	for(i=8;i--;i>0)
	{
		 P1=P1>>1;
		 delay(50);
	} 


				                              //全部亮，闪三次
	P0=P1=P3=P2=0xff;
	for(i=4;i--;i>0)
	{
		P0=P1=P2=P3=0x00;
		delay(100);
		P0=P1=P2=P3=0xff;
		delay(100);
	}
								   		//全部亮，只有一个暗的在流水
	
	temp0=0x01,temp1=0x00;
	P1=P0=temp0,P3=P2=temp1;
	delay(100);
	for(i=7;i--;i>0)
	{
		temp0=_crol_(temp0,1);
		P1=P0=temp0;
		delay(100);
	}
	P1=P0=0x00;
	temp1=0x01;
	P3=P2=temp1;
	delay(100);
	for(i=7;i--;i>0)
	{
		temp1=_crol_(temp1,1);
		P3=P2=temp1;
		delay(100);
	}
	 									//全部亮，逆向一个暗在流水
	temp0=0x00,temp1=0x80;
	P1=P0=temp0,P3=P2=temp1;
	delay(100);
	for(i=7;i--;i>0)
	{	
		temp1=_cror_(temp1,1);
		P3=P2=temp1;
		delay(100);
	}
	P3=P2=0x00;
	temp0=0x80;
	P1=P0=temp0;
	delay(100); 
	for(i=7;i--;i>0)
	{
		temp0=_cror_(temp0,1);
		P1=P0=temp0;
		delay(100);
	}
			                           			  //花样
	temp0=0xaa,temp1=0x55;
	P1=P3=temp0,P2=P0=temp1;
	delay(500);
	for(;a--;a>0)
		{
			for(i=7;i--;i>0)
			{
				temp0=_crol_(temp0,1),temp1=_cror_(temp1,1);
				P1=P3=temp0,P2=P0=temp1;
				delay(500);	
			}

		 }
	for(;b--;b>0)
		{
			temp0=0xee,temp1=0x77;
			P1=P3=temp0,P2=P0=temp1;
			delay(300);
			for(i=7;i--;i>0)
			{
				temp0=_crol_(temp0,1),temp1=_cror_(temp1,1);
				P1=P3=temp0,P2=P0=temp1;
				delay(300);	
			}
		}  	
					  						//环形逐个亮