|
|
EDA365欢迎您登录！
您需要 登录 才可以下载或查看，没有帐号？注册
x
51单片机16位流水灯程序源码与proteus仿真 分享一个简单的单片机流水灯仿真实验。
: M4 p3 @0 v+ \+ u8 y" ^& O7 J! i16位流水灯仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）
& Y$ p* s( [: @" n! j6 c![]()
I/ i' d9 F9 T9 X& i) U
1 `0 A F. E- L e+ T7 L$ {单片机源程序如下: |
& S( }( ]2 _' u8 K9 R
#include"reg51.h"
6 u7 t( q6 Q1 i. ]- m" I+ ^void delay(void);
( _8 v1 {) G! N% [; s' K) ~void main(void)" G1 T1 H: x% e
{* \& c% c+ m- f) C4 |; @7 O9 d: d/ T
unsigned int i; m0 o/ {3 v! K/ p' N- W! f
unsigned char led;! R7 R6 a0 F" h6 E
while(1); W+ a; \ w5 j* ?
{: o2 `: P8 ], M! x7 A
led=0xfe;
! ~' Z$ b0 j [, G& S" n' b for(i=0;i<8;i++){+ J2 Y' b0 a i) E
P1=led;
0 }. @; |6 \: M( [7 @% C delay();
. G& C5 h2 X, U n5 C7 B P1=0xff;
& D- N$ K$ ^8 a8 n" s \" E2 S delay();
" R; [: w) h# |3 a( i4 e" K4 c led=(led<<1)|0x01;3 z6 j$ |+ h8 v: }2 N
6 L$ A" j- a; P- q
}
2 g, P1 Y4 ] w. K. r led=0xfe;
" Y4 E+ _1 V; d T6 X Z9 K& ^ for(i=0;i<8;i++){0 m7 x5 C1 S6 f9 l
P0=led;% D+ M2 k+ Q# ?' f0 A+ A1 ]
delay();1 m! t/ N5 g5 u4 E
P0=0xff;+ y+ K5 L6 @5 D# E b3 W( v) l
delay();
; |2 {) n' k. y led=(led<<1)|0x01;& u3 l( r, t# C; j+ v8 R
) {! U; {$ B, Z
}. ~6 x- K$ s i j; v7 d c
}) ~9 }0 e# I7 v
}, G3 W$ p8 d! I
void delay(void){5 b/ {1 c8 W, g& R- D# x
int i,j;
& g5 I- N' h% U6 A1 W( c { for(i=200;i>0;i--)
( q2 C' ^# C! k- [! L" z for(j=200;j>0;j--);
' `& ~7 f: k5 U7 ~! v }
9 x8 L# O- `/ [/ V; N" ]: {7 R: q1 e
" I% @# B g2 r* j
& `/ _! L/ j$ {
|
|
/1 
发表于 2018-11-5 09:41
收藏
淘帖
支持！
反对！