跑马灯.c

来自「单片机开发板配套52个程序(c语言源代码)」· C语言 代码 · 共 55 行

/*-----------------------------------------------
  名称：流水灯
  日期：2009.5
  修改：无
  内容：循环点亮P1口对应的8个LED灯，造成循环流水点亮的效果
------------------------------------------------*/
#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint  unsigned int

/********************************************************************
* 名称 : Delay()
* 功能 : 延时,延时时间为 10ms * del
* 输入 : del
* 输出 : 无
***********************************************************************/
void Delay(uint del)
{
	uint i,j;
	for(i=0; i<del; i++)
	for(j=0; j<1827; j++)   
	;
}

/********************************************************************
* 名称 : Main()
* 功能 : 实现灯的闪烁
* 输入 : 无
* 输出 : 无
* 说明 ：也可以使用例1的的方法来关闭数码管
***********************************************************************/
void Main(void)
{
	uchar i;
//	P2 = 0x00;
	while(1)
	{
	/*	P1 = 0x7f;					//P0.7亮亮
		for(i=0; i<7; i++)			//移位7次
		{
			P1 = _cror_(P1, 1);		//_crol_()这个函数在intrins.h中定义了，用于循环右移
			Delay(15);
		}*/
		P1 = 0xfe;
		Delay(50);
		for(i=0; i<7; i++)
		{
			P1 = _crol_(P1, 1);	    //用于循环左移
			Delay(50);
		}

	}
}