按键控制led闪烁程序

#include
sbit p37=P3^7;
void delay1();
void delay();
void main()
{ unsigned char i=0;
unsigned char s[]={0xfe,0xfd,0xfb,0xf7};

while(1){
if(p37!=0)
{P1=0XFE;if(p37==0) goto l1;
delay1();
P1=0XFF; if(p37==0) goto l1;
delay1();
}
else
{
l1:delay();
if(p37==0)
do{P1=s[i];
delay1();
P1=0XFF;
delay1();

}while(p37!=0);
i++;
if(i==4) i=0;
}

}
}
void delay1()
{unsigned char k,l,p;
for(k=0;k<5;k++)
for(l=0;l<20;l++)
for(p=0;p<248;p++);
}

void delay()
{unsigned char k,l,p;
for(k=0;k<1;k++)

for(p=0;p<248;p++);
}