|
|
EDA365欢迎您登录！
您需要 登录 才可以下载或查看，没有帐号？注册
x
51单片机16位流水灯程序源码与proteus仿真 分享一个简单的单片机流水灯仿真实验。. `' Y8 ?! ~" m# x. }& j3 G
16位流水灯仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）
+ N( z; e( }+ h![]()
# y: u2 h! e8 I& B: {- F- j/ G0 S3 P! q9 T
单片机源程序如下: |
; T" n# Z0 ?" e( v* e
#include"reg51.h"
7 U* e. t" D5 \$ v* yvoid delay(void);/ p' ?' M b4 V4 U9 a9 w9 p5 s
void main(void)8 K4 ~ p: L, X$ G+ Z8 a) R G2 u! B* }
{- n" N& R3 r2 h q
unsigned int i;
5 k" M5 S6 q/ I1 G' B. E unsigned char led;
8 O+ a2 |$ |* g7 a/ J4 S while(1)
! I/ Q& n2 g$ r; q g {
; ~! t) s& M5 [ led=0xfe;- l5 w: L4 K& _( x0 a
for(i=0;i<8;i++){) n* v3 B7 Q( j; A
P1=led;4 C( @: J Y* w1 K* p' N5 ~7 b" i
delay();
* f8 d! _& q" V4 D P1=0xff;
1 W5 _6 _" p7 F7 E9 [' o0 z+ _ delay();7 C3 e( a8 H0 U2 Y) H% R& U# M
led=(led<<1)|0x01;
! o$ M; i: K' Y5 N. S7 ~0 o0 R) P l1 O: x8 _% u
}1 S/ D0 s* E+ L5 l& u9 Z/ |
led=0xfe;% l$ X) ?+ l( Z; M* t8 ^
for(i=0;i<8;i++){- r" \ L8 b: V" }% z
P0=led;
; c% V$ z5 G) l2 M4 v$ M# P delay();
* D/ f4 l2 G2 g# c% [ P0=0xff;
7 t6 S& b7 C$ {% K delay();
# n! {+ q8 x h* R led=(led<<1)|0x01;
9 H) N3 H/ P; [- X) L" f) C& J. A. u0 p5 B/ o8 u: t+ ~4 \
}- f$ P$ ^; ]+ i6 c& `4 `
}
" E0 E) M# u- [: P9 Z9 d9 k}. j; i# s3 F' V5 y' L
void delay(void){" P- Z- k9 a0 [- J1 _
int i,j;
" J% \, L) y% ?+ ~ for(i=200;i>0;i--)
" c4 U: {' w% { ` for(j=200;j>0;j--);
, L* t2 K% R0 {4 V1 S& G }
8 ]& E4 `/ r$ a
: @* [$ j; G9 ~) r+ h1 f. C8 ~5 }& X7 \6 x, ?
0 {. I+ L7 w `/ ^ |
|
/1 
发表于 2018-11-5 09:41
收藏
淘帖
支持！
反对！