功能：按键按下，P2连接的led灯呈现来回闪烁的霹雳灯现象。
下面是Proteus仿真电路
（注：没画最小系统）
下面为C语言程序
#include<reg51.h>
#define LED P2
void delay100ms(void) ;
void delay10ms(void) ;
sbit S1=P1^0;
main()
{
unsigned char i;
LED=0xff;
while(1)
{
if(S1==0)
{
delay10ms();
if(S1==0 )
{
LED=0xfe;
delay100ms();
for(i=0;i<7;i++)
{
delay100ms();
LED=(LED<<1)|0x01;
}
for(i=0;i<7;i++)
{
delay100ms();
LED=(LED>>1)|0x80;
}
LED=0xff;
LED=0xfd;
for(i=0;i<5;i++)
{
delay100ms();
LED=(LED<<1)|0x03;
}
for(i=0;i<5;i++)
{
delay100ms();
LED=(LED>>1)|0xc0;
}
LED=0xff;
LED=0xfb;
for(i=0;i<3;i++)
{
delay100ms();
LED=(LED<<1)|0x07;
}
for(i=0;i<3;i++)
{
delay100ms();
LED=(LED>>1)|0xcf0;
}
LED=0xff;
for(i=0;i<3;i++)
{
LED=0x00;
delay100ms();
LED=0xff;
delay100ms();
}
}
}
}
}
void delay100ms(void) //误差 0us
{
unsigned char a,b,c;
for(c=19;c>0;c--)
for(b=20;b>0;b--)
for(a=130;a>0;a--);
}
void delay10ms(void) //误差 0us
{
unsigned char a,b,c;
for(c=1;c>0;c--)
for(b=38;b>0;b--)
for(a=130;a>0;a--);
}
下面附件有仿真电路和程序代码
霹雳灯.zip
(42.69 KB, 下载次数: 25)
|
