51单片机的流水灯 自中间至两边 自两边至中间

kinidrily

51单片机的流水灯 自中间至两边 自两边至中间
/ t! A4 J4 U- t" [! Z

做的流水灯，分享一下
/ C; l3 \, S( f" z5 u#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
5 g8 A$ E& ]5 S) w! `' ychar tab1[]={0xFF,0xE7,0xDB,0xBD,0x7E};//自中间至两边
char tab2[]={0x7E,0xBD,0xDB,0xE7,0xFF};//自两边至中间
uchar i;
0 d, R- O7 E  z) Lsbit S1 = P1^0;
sbit S2 = P1^1;
void DelayMS(uint x)
{
  r6 c" L, q# P! I. q. U1 ~; Z2 ^         uchar i;
, B( Q% |4 X' l4 Z7 ~        while(x--)
        {
8 H1 c- y- @& m* M( _. {& H                 for(i=120;i>0;i--);
! N( u( D1 d( k* z. [% j% G; a; e        }
}
void main()
( \$ W% n5 U/ \, U2 J# k" c' ^9 R{
- d9 A/ T2 P% P0 x4 o        uchar a;
; ^/ A" _( n; C        while(1)
        {
# o. g' L! ^) ]) ^- L& g! H& A                if(S1==0&&S2==0)
                {
3 F1 H2 l- v% q3 P) P$ n* h9 ^% F& X                        P0=0xfe;a=P0;DelayMS(400);
9 A; `6 |, `+ B4 t9 x6 b* F8 L                        for(i=8;i>0;i--){a=a<<1;a|=0x010=a;DelayMS(400);}
1 ^1 K1 X* o! ~0 c- u3 s; \                }
8 k" f2 d7 e  s+ x                else if(S1==1&&S2==1)
# F( [0 F) t) u$ B1 E7 l' ^6 P                {
                        P0=0x7f;a=P0;DelayMS(400);
                        for(i=8;i>0;i--){a=a>>1;a|=0x800=a;DelayMS(400);}
                }
+ P( A3 Z' y4 @6 ?1 w                else if(S1==0&&S2==1)
                {        
0 h0 ~: g+ g* h3 T& @8 h                        for(i=0;i<5;i++){P0=tab1;DelayMS(400);}
# v1 a- Y) i2 K4 y% O& f                }        
6 ?: B* \% H. N5 T+ ?$ G                else if(S1==1&&S2==0)
. p' O2 L) {" u1 _) a. Y5 G                {        
                        for(i=0;i<5;i++){P0=tab2;DelayMS(400);}
. ^9 ]: y7 ]2 A5 D                }        
+ F( I/ O% x  j5 H  X        }
}

7 D7 v  R5 f" s* T) i5 a5 g! K- i下载：
' D7 F" r/ ?0 _2 g( j

游客，如果您要查看本帖隐藏内容请回复

( o: |- e! G* p8 i! l8 ?) L

cat12620

看看