C语言编写程序，使TX-1C实验板上电后，发光二极管实现从第8位到第1位循环流水点亮，每个二极管亮灭时间间隔是500ms。

STC89C52，keil
程序如下：

#include<reg52.h>
#include<intrins.h>
#define unit unsigned int
#define uchar unsigned char
void delayms(unit);
uchar aa;
void main(){
aa=0x7f;
while(1)
{
P1=aa;
delayms(500);
aa=_cror_(aa,1);
}
}
void delayms(unit xms)
{
unit i,j;
for(i=xms;i>0;i--)
for(j=110;j>0;j--);
}