找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

帖子
查看: 1777|回復(fù): 0
收起左側(cè)

單片機流水燈c語言程序源碼

[復(fù)制鏈接]
ID:155794 發(fā)表于 2016-12-19 10:45 | 顯示全部樓層 |閱讀模式
#include<reg52.h>
#include<intrins.h>
sbit LED0=P1^0;
sbit LED1=P1^1;
sbit LED2=P1^2;
sbit LED3=P1^3;
sbit LED4=P1^4;
sbit LED5=P1^5;
sbit LED6=P1^6;
sbit LED7=P1^7;
int x,y,u;
void Delay(unsigned char a)
{
unsigned char i;
while(--a)
{
for(i=0;i<125;i++);
}
}
void main(void)
{
unsigned char b,i,m,n,q;


while(1)
{ P1=0xfe;
for(i=0;i<8;i++)
  {        Delay(400);
    P1<<=1;
  }
  P1=0x7f;
for(i=8;i>0;i--)
  {        Delay(400);
    P1<<=1;
  }
m=8;
u=0xff;
         
for(n=0;n<8;n++)
{
                x=0xfe;
for(i=0;i<m;i++)
{ b=u;
b &=x;
P1 =b;
Delay(400);

x=_crol_(x,1);
} u=P1;
m-=1;
}
  b=0xff;
  m=8;
  for(n=0;n<8;n++)
{        x=0x80;                                            
for(i=0;i<m;i++)
{        P1=b;
P1=b-x;
Delay(400);

x>>=1;
} b=P1;
m-=1;
}
P1=0xff;
b=P1;
x=0x08;
q=0x10;
for(i=0;i<4;i++)
{ Delay(400);
P1=b-x-q;
x>>=1;
q<<=1;

}
b=0xff;
x=0x80;
q=0x01;
for(i=0;i<4;i++)
{
P1=b-x-q;
x>>=1;
q<<=1;
Delay(400);

}
}
}

回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表