EEPW论坛

/**************************************
   程序名称：流水灯
   编译环境：keil-uvsion4
   操作系统：windows-xp
   程序功能：
   设计者：  shunzhidui
   时间：  2011年10月12日
**************************************/  
#include <reg52.h>
#include <intrins.h>
#define uchar unsigned char
unsigned char LED;
 void delay(uchar del)
{
  int i,j;
  for(i=0;i<del;i++)
   for(j=0;j<119;j++)
  ;
}
void main()
{
uchar i;
 while(1)
 {
 LED=0X7F;
 for(i=0;i<7;i++)
 {
 P0=LED;
 delay(200);
 LED=_crol_(LED,1);
 P0=0xff;
 delay(200);
 }
}
}