單片機流水燈c語言

//編者：gududesiling
//目的：採用P1口作爲輸出口
//程序名字：流水燈實驗
//說明：此程序實現先簡單的流水等實驗，
#include <reg52.h>
#include<intrins.h>

#define uchar unsigned char
#define uint unsigned int

//延時函數（此延時函數是對與12M晶振延時xms）
void delay(uint xms)
{
    uint x,y;
    for(x=xms;x>0;x--)
    for(y=111;y>0;y--);
}

void main()
{
     uchar index;
     uchar LED;
      while(1)
     {
            LED=0xfe;
            for(index=0;index<=8;index++)
            { 
                   P1=LED;
                    LED=_crol_(LED,1); //爲循環移位函數
                    delay(100); //延時100ms
              }
      }
}