首页 | 新闻 | 新品 | 文库 | 方案 | 视频 | 下载 | 商城 | 开发板 | 数据中心 | 座谈新版 | 培训 | 工具 | 博客 | 论坛 | 百科 | GEC | 活动 | 主题月 | 电子展
返回列表 回复 发帖

51单片机驱动LED阵列电路及程序设计-2

51单片机驱动LED阵列电路及程序设计-2

C语言源程序

#Include <AT89X52.H>



Unsigned Char Code Taba[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};

Unsigned Char Code Tabb[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};



Void Delay(Void)

{

Unsigned Char I,J;



For(I=10;I>0;I--)

For(J=248;J>0;J--);

}



Void Delay1(Void)

{

Unsigned Char I,J,K;



For(K=10;K>0;K--)

For(I=20;I>0;I--)

For(J=248;J>0;J--);



}



Void Main(Void)

{

Unsigned Char I,J;



While(1)

{

For(J=0;J<3;J++)  //From Left To Right 3 Time

{

For(I=0;I<8;I++)

{

P3=Taba[I];

P1=0xff;

Delay1();

}

}



For(J=0;J<3;J++)  //From Right To Left 3 Time

{

For(I=0;I<8;I++)

{

P3=Taba[7-I];

P1=0xff;

Delay1();

}

}



For(J=0;J<3;J++)  //From Top To Bottom 3 Time

{

For(I=0;I<8;I++)

{

P3=0x00;

P1=Tabb[7-I];

Delay1();

}

}



For(J=0;J<3;J++)  //From Bottom To Top 3 Time

{

For(I=0;I<8;I++)

{

P3=0x00;

P1=Tabb[I];

Delay1();

}

}



}

}
返回列表