lsd.c

流水灯 1.P1口所有LED间隔1000ms闪烁 2.P1口所有LED呈交替流水状 3.P1口流水灯-左移

/******************************************************************************************************************/
/*罗列快乐*/
/*网站地址：http://2099.5d6d.com*/
/*模块名：流水灯模块	流水灯型号：红光LED*/
/*创建人：张东	日期：2009-3-23*/
/*修改人：张东	日期：2009-4-1*/
/*功能描述：1.P1口所有LED间隔1000ms闪烁
			2.P1口所有LED呈交替流水状
			3.P1口流水灯-左移，循环3次
			4.P1口流水灯-右移，循环3次
			5.P1口由两边向中间流水，循环3次
			6.P1口由中间向两边流水，循环3次*/
/*其他说明：*/
/*版本：*/
#include"reg51.h"									//包含头文件
#include <intrins.h> 								//包含有左右循环移位子函数的库
#define uchar unsigned char
#define uint unsigned int
void delay(uint);
void main()
{
	while(1)
	{
		uchar i,j,k;
		for(i=3;i>0;i--)								
		{
			P1=0x00;   								//点亮P1口所有LED，延时1000ms
			delay(1000);
			P1=0xff;			   					//熄灭P1口所有LED，延时1000ms
			delay(1000);
		}
		for(i=3;i>0;i--)							//奇偶交替成流水灯状态
		{
			P1=0x55;       
			delay(1000); 
			P1=0xaa;
			delay(1000);
		}	
		P1=0xff;
		delay(300);
		for(i=3;i>0;i--)							//P1口单灯左移流水，循环3次
		{
			k=0xfe;
			for(j=0;j<8;j++)
			{
				P1=k;       
				delay(200); 
				k=_crol_(k,1);
			}
		}
		P1=0xff;
		delay(300);
		for(i=3;i>0;i--)							//P1口单灯右移流水，循环3次
		{
			k=0xfe;
			for(j=0;j<8;j++)
			{
				P1=k;       
				delay(300); 
				k=_cror_(k,1);
			}
		}
		P1=0xff;
		delay(300);
		for(j=0;j<3;j++)     						//P1口由两边向中间流水，循环3次
		{
			P1=0x7e;       
			delay(300); 
			P1=0xbd;
			delay(300); 
			P1=0xdb;       
			delay(300); 
			P1=0xe7;
			delay(300); 
		}
		P1=0xff;
		delay(300);
		for(j=0;j<3;j++)    						//P1口由中间向两边流水，循环3次
		{
			P1=0xe7;       
			delay(300); 
			P1=0xdb;
			delay(300); 
			P1=0xbd;       
			delay(300); 
			P1=0x7e;
			delay(300); 
		}
		P1=0xff;
		delay(300);
		k=0xfe;     								//赋初值
		for(j=0;j<8;j++)
		{
			for(i=0;i<8-j;i++)   					//左移
			{
				P1=k;       						//点亮小灯
				delay(200); 						//延时200毫秒
				k=_crol_(k,1); 						//将a变量循环左移一位
			}
			k=_crol_(k,j);   						//补齐，方便下面的左移一位
			P1=0xff; 								//全部关闭
			k=k<<1;									//左移一位让多一个灯点亮
		}
	}
}

void delay(uint xms)								//延时函数
{
	uint i,j;
	for(i=xms;i>0;i--)								//外层for中变量为多少，就延时约多少ms
		for(j=110;j>0;j--);							//当内层for语句中变量恒定值为110时
}