20LED眼形流水 51单片机花样流水 proteus仿真加源码

wu68aq

20LED眼形流水 51单片机花样流水 proteus仿真加源码
$ t0 z# @+ C+ A
7 p- [  T3 A) v' Q6 x
  k1 w9 W3 u# h; u' O( n
# F3 H- ~2 g- L+ V
# |& W( f# a$ m1 H; V. [8 u试做的花样流水小玩意

: a4 d! g8 @! P0 g. A. G+ t5 ]( b. rproteus仿真原理图：


20LED眼形流水单片机源程序如下：
3 J. n$ {0 i8 w# \3 t                #include<reg51.h>
                #include<intrins.h>
            void down_off();
        
                #define uchar unsigned char
, t. m- O- w3 }  Q4 E7 e                int i,j,a,c,d,m,num=0,e,f,j,k,l,q;
                void p1_p3_on();
) ~# \  L0 D5 l% e        uchar mm,nn,kk;
0 d4 t; h- M9 J( E$ a; K" x        void both_top_fill();
                void time(int m);
                void both_down_fill();
        
5 E3 P& N4 F3 [7 |7 D                void fill();
                void love();
: k# B6 }: `1 e        
) |6 \1 m: Q: P- V) o; Z                void odd_even();
- Y  M. A: M& V1 x                void on();
+ f# O2 G. {8 x, a8 s7 p6 q                void off();
- v( X1 j8 ?# v2 p' U0 W                void both_down();
                void sc();
                void replace();
; s' `4 U. u- R3 A1 |+ {4 p/ K                void turn_top();
            void deplay();
                void loved();
                void main()
$ k7 d" g' X0 R                {
               
: s- L; G3 m0 M% Z( C8 Q. x                while(1)
& y+ L- @# d0 p' a                {
9 f; m0 ^# H3 i8 p% o/ `1 j) L        
" c9 f0 d9 E% ]: d& k. w  u                fill();
                on();
* Q' H5 P, P/ _6 u                time(100);
' C& B8 Q4 {# T0 y6 z5 p! Z/ S5 n                off();
7 o/ F( N1 Y/ o4 M4 D! k- g                time(500);
                down_off();
/ X& M6 \$ z* E$ h3 q2 t2 ~                time(500);
                both_top_fill();
               
                time(500);
# ~. ?$ S* b+ p                turn_top();
0 @3 G: z- N/ ~                time(500);
2 H8 T- K, j, H, n* ^                both_down_fill();
1 p0 g3 A) N1 Y                time(500);
( M' A% t& C  M4 X                for(f=0;f<5;f++)
+ _! D3 O& \$ l  ]                replace();
. v8 c3 c3 b% x& p                time(80);
. y( }% v3 i; E. w/ f- T$ K                for(f=0;f<20;f++)
                {
                odd_even();
, z% C5 J- \. `' |                time(100);
4 B/ p9 J- e1 U6 x  o* I                }
                for(d=0;d<2;d++)
                {
# a& e) u7 o! r8 }& d! A9 D                love();
/ r5 [. }8 X( C5 e                time(200);
9 g7 j0 q3 \; t" Z7 f                }
0 S; h5 M, w$ N+ H6 m* }                for(q=0;q<1000;q++)
9 e- g$ `4 U( V2 [4 p                {
% w9 l7 [( K$ ^  G1 Z. j                loved();
) P: G4 P! u9 _  V, h& f, ]' g                }
                }
3 U4 q0 r/ w2 e9 D2 {1 L! w2 z! a                }
                void time(int m)
- e2 ~$ v3 F, p+ Q                {
) Z# J& F' A, P5 k                for(i=m;i>0;i--)
                for(j=200;j>0;j--);
# \9 n* L) V- J  e) _0 @7 ?/ ]                }
        
                //全亮
                void on()
                {
                P0=0x00;
                P1=0x00;
- Z$ J1 }" Q8 ^9 V! ~) Q                P3=0x00;
& K) q4 l7 p% E7 b                }
" {( T) e, A9 p' h7 x                //全灭
' T0 [$ I& x0 Z2 M$ c; F$ x                void off()
                {
: ~' J5 e: C* N( B  P* {                P0=0xff;
                P1=0xff;
                P3=0xff;
6 p/ w- i+ p+ ~                }
  M+ T0 `6 x  A# d                //双向点亮(从下到上)
                void both_down()
                {
                P0=0xfb;
, y, _9 `# P) \  N9 P1 t* H                time(50);
                P0=0xf5;
/ H! w4 @$ m- e% W! T. F                time(50);
               
                P0=0xee;
+ H$ v) d0 B% a) p                time(50);
9 G( J2 x. [9 h1 f1 r; b7 B               
' l+ ]+ }) Z: p7 r( S0 z$ s. O                P1=0x7f;
; f$ ~$ N' r5 q7 g2 u                P0=0xdf;
3 j' M: {" `( I# e                time(50);
               
                P1=0xbf;
                P0=0xbf;
0 L! Z7 {( n2 ~! g                time(50);
                P1=0xdf;
                P0=0x7f;
; m! E) ^3 M- V; x8 }9 V( W                time(50)0=0xff;
                P1=0xef;
7 V( ~( c' c# x                P3=0xfe;
* A, t# R1 D2 v9 _. R7 s7 A# b                time(50);
% T5 F* p; _2 y& D8 \                P1=0xf7;
                P3=0xfd;
" B& T/ F/ T: Z/ y6 x2 f9 n- q                time(50);
                P1=0xfb;
                P3=0xfb;
0 n, e; L# t  G2 ~$ o. c                time(50);
                P1=0xfd;
; l, Z2 Y* H; |7 }* h& b2 _                P3=0xf7;
                time(50);
                P1=0xfe;
5 f' U% l  O1 |' M2 J% S                time(50);
                off();
                }
4 ~: r  c* O  o7 r               
0 y" {9 ^2 A( w- J. M' R# a                //双向点亮(从上到下)
          void turn_top()
$ C# G0 Q/ W9 V                {
               
                P1=0xfe;
) _1 K) ?! j# R7 N- M8 D               
                time(50);
                P1=0xfd;
                P3=0xf7;
1 [! K! c+ o, \! l* B; u                time(50);
8 ]( H; i. X' C  O- X                P1=0xfb;
& g. N1 r& w4 f                P3=0xfb;
# z7 Y$ g) c! D8 \                time(50);
                P1=0xf7;
                P3=0xfd;
                time(50);
                P1=0xef;
( W, t% Y; f, U! s0 x                P3=0xfe;
                time(50)3=0xff;
' I5 a# i1 ]( a, H                P0=0x7f;
                P1=0xdf;
                time(50)3=0xff;
                P1=0xbf;
/ n8 j. o# g( @                P0=0xbf;
: ]4 f8 G2 U; U: `) z                time(50);
# v* {/ i# D  T+ g                P1=0x7f;
                P0=0xdf;
                time(50);P1=0xff;
( v1 Q$ k# W0 K                P0=0xee;
                time(50);
                P0=0xf5;
- ?. Q# y0 K1 y* P4 j7 B! l                time(50);
                P0=0xfb;
                off();
                }
                //交替闪烁
: g$ {% G" ~' l2 w" ^: l4 w                void replace()
                {
                on();
% A# w* Q1 [: K! g0 O1 }                time(180);
  t9 u& ?5 n5 Z& M$ U                off();
. [$ N: G8 X8 L% b$ v                time(180);
+ S9 ~5 e6 _, \/ ?                }
               
                //奇数和偶数交替闪烁
                void odd_even()
8 s0 ]& c0 ?6 B0 A4 a# I                {
                P3=0x55;
# k7 ]* I' W; W- E1 F9 x- ?( w                P1=0x55;
. }: ]* ?. |# N                P0=0x55;
, r1 ^$ _* D/ p0 o                time(80);
                P3=0xaa;
) N( k, [; N8 o6 L                P1=0xaa;
. u* L  J5 G6 v, S8 M9 Z                P0=0xaa;
8 w% E8 ]: h0 ?0 ~: ]* n. s- T                }
               
' F; J: N# {3 p                //显示LOVE
                void love()
                {
4 e2 K9 g6 W* r; K( y, y% q                uchar array1[]={0x1f,0x2f,0x4f,0x8f};
               
$ ^0 N1 R6 Q8 P                uchar array2[]={0xc7,0xc0,0xc1,0x86};
9 R) ^" }( L: L4 [7 Y' e0 }                P1=0xff;
2 q7 b9 V- {( A' y; s7 x; ~, y3 q                P0=0xff;
                time(200);
                for(c=0;c<4;c++)
                {
                P3=array1[c];//共阴
                P2=array2[c];//共阳
                time(200);
4 a. g: p6 V& b9 O# u                }
6 _- q. E" n/ Y" Q4 L                P2=0xff;
$ d) N% X/ b  n3 @8 T                P3=0xff;
! [2 Y! O! g: @9 u6 s+ d! J, m                }
               
           void deplay()
      {
  S* j: D/ d6 e( f- l        int e=0;
        for(e=0;e<100;e++);
$ k, n& k% d$ C' f$ i; g          }
        //一直显示LOVE
           void loved()
$ v$ c5 H. [, a3 Y+ O0 g& w                {
                uchar array1[]={0x1f,0x2f,0x4f,0x8f};
               
                uchar array2[]={0xc7,0xc0,0xc1,0x86};
! f! y0 l& ^' w5 T9 ]8 u9 r                int k=0;
                for(k=0;k<4;k++)
& n  N6 v" o& W+ g) Y                {
                P3=array1[k];//共阴
                P2=array2[k];//共阳
3 K% @1 Y3 k; F2 r7 }" N/ b         deplay();
4 ~2 h% w. A# I                }


0 [; z1 t( P, _2 B, i$ m% S, h}
0 [' b: M8 [/ R+ ]8 t6 z                void fill()//从上到下依次填充
                {
: \+ a  e4 }/ N" J                uchar array3[]={0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00};
8 Q7 ^8 Z1 g# }) d& [9 b               
                for(d=0;d<8;d++)
, K& a" L. ?- E9 ?                {
                P1=array3[d];
                time(150);
                }
+ ^( m! b: X7 A9 x$ w: W. S+ K  P                for(num=0;num<8;num++)
                {
                P1=0x00;
  F! n: R% r2 q+ M+ Z, S0 H                P0=array3[num];
" y$ f, ?8 |7 s% C                time(150);
                }
                for(e=0;e<4;e++)
                {
3 M9 l1 h  ~& ]7 b5 y8 l% s6 l7 M                P1=0x00;
. g) S% O# X0 a9 }+ Z                P0=0x00;
                P3=array3[e];
                time(150);
% ]4 X6 y: j. j+ n" f                }
                off();
                }
( d0 d3 g  V3 ?               
                void both_down_fill()
0 i0 F) w/ e: W3 l( u2 \6 g7 U8 i0 O                {
                time(200);
                P0=0xfb;
                time(200);
$ Q( _6 S; y$ c6 `0 @/ b: ]9 K& k0 J                P0=0xf1;
: K- M$ ^! d: s7 y" L, J6 g/ `                time(200);
0 Y3 A$ A, t; d& Z( W! }                P0=0xe0;
                time(200);
2 D7 ?4 ~  O5 b" G, n; `                P1=0x7f;
                P0=0xc0;
$ `  h( i5 E3 S- Z                time(200);
                P0=0x80;
                P1=0x3f;
                time(200);
* W# l# N) p* \3 g2 Z9 `                P0=0x00;
6 z: i0 I) a: D) M# O$ Z- ^                P1=0x1f;
                time(200);
% V: `6 N' h. V0 `: T                P1=0x0f;
& G9 f6 Y1 o% S3 O, C9 d                P0=0x00;
                P3=0xfe;
' _, L8 C3 P6 C! v% j                time(200);
                P0=0x00;
) L( s2 ]4 \& i1 E: D) W                P1=0x07;
2 T% K' N0 T5 T/ F) i. u4 S                P3=0xfc;
                time(200);
/ @' m" Q% e% P                P0=0x00;
+ b8 A  t' v5 W9 l                P1=0x03;
, b% }0 l* c9 l3 E                P3=0xf8;
7 Z+ r1 V7 f: h5 |6 t0 W                time(200);
) K- u8 \9 W4 n% C                P0=0x00;
                P1=0x01;
3 i: s7 N8 L2 x3 m, @6 O0 B                P3=0xf0;
- v9 I7 r; C4 J                time(200);
) ~4 g7 `) g8 s                on();
                time(200);
* K, X* H+ i4 ?' K- p! c, B0 p                off();
                time(200);
- t2 E+ X9 D& O9 F) B                }
7 m: G& @  z9 c               
                void both_top_fill()//两边从上到下依次填充
9 M% k$ |& r: v3 z' A& x! i8 L                {
1 @6 h( s4 c1 t$ I- |7 m                time(200);
: i* E2 C! Y6 g) ]8 @, P) `                P1=0xfe;
5 {% R2 p* ]! U9 h% _, n& s                time(200);
                P1=0xfc;
                P3=0xf7;
                time(200);
                P1=0xf8;
) _$ i% u6 |/ z! f: S6 c                P3=0xf3;
                time(200);
                P1=0xf0;
                P3=0xf1;
& K' |. k! a  @  X6 S/ Y9 J- j6 V; c8 K                time(200);
                P1=0xe0;
: D  i( |' W( V( {                P3=0xf0;
% ^" {3 T# \) U) [9 ^9 u                time(200);
                P1=0xc0;
                P3=0xf0;
                P0=0x7f;
. g' {$ y  J# B1 ^" H' }$ k! J                time(200);
7 L& _' ^: X" k$ [6 X                P1=0x80;
5 R! }) p  Q+ Q% e' {+ S                P3=0xf0;
                P0=0x3f;
                time(200);
( [8 A% w) _. u2 _                P1=0x00;
                P3=0xf0;
0 Z2 j- p! @4 R. j                P0=0x1f;
. A! b" I* h6 d  `" d2 ~                time(200);
                P1=0x00;
$ `( M( F& u8 _5 F8 i+ {% r                P3=0xf0;
1 I1 ?% ]* |3 F+ v% y) M                P0=0x0e;
                time(200);
& l" `% E' a# @6 Y& D                P1=0x00;
+ y0 w" `' \" N: ^6 j6 Q3 b6 o& j                P3=0xf0;
( I6 {/ N' ~: N" {5 q/ Y) ?' j2 N! J                P0=0x04;
                time(200);
                on();
: }/ T) Y. ^# I' v- R                time(200);
                off();
& }; L8 b, ]( Y& h. h                time(200);
               
0 q1 w  s% H  \. O* f                }
        
        void down_off()//从下到上两边熄灭
        {
        
…………限于本文篇幅 余下代码请从论坛下载附件…………

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

Mhza

学习一下