找回密码
 注册
关于网站域名变更的通知
查看: 626|回复: 1
打印 上一主题 下一主题

 51单片机4个io控制十六个led 

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2018-11-19 13:11 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
51单片机4个io控制十六个led * }, \: Y9 O0 f# v

, F$ R6 q9 s9 ?  g6 h2 Z" @! r: p#include "reg51.h"; \! r5 g+ k" G. S1 U/ o
  T" @$ M1 j  F1 @
typedef unsigned char u8;
6 h* ?7 K: H; l" ?/ xtypedef unsigned int u16;3 ]  j6 a$ R0 W1 w! D
6 b% y3 g* k) K$ k3 e6 Z
u8 a;: T: m/ m' @( @4 G3 }8 a) Q
u8 HC[]={0x00,0x10,0x20,0x30,0x40,0x50,0x60,0x70,0x80,0x90,0xA0,0xB0,0xC0,0xD0,0xE0,0xF0};
( q# U* N( V1 R5 F, g/ ~
! S9 ~* K. H7 fvoid delay(u16 i)2 t0 ?+ Q3 s) S1 A
{$ q, x3 f% ]! R: A( v  j
     while(i--);
% Y( n* k" I/ k( U4 Z6 l}, T1 _9 A% W8 Y$ V/ d, R; T
void ss()
/ j2 ?( Q1 y. @% L# ~1 m" L8 k{
9 o% j: m% {! }& ^* f7 W) x     for(a=0;a<15;a++)! W4 d8 k' s0 m7 U" c& \8 h1 t
        {
0 p9 E: Y4 p+ \1 D% m                   P2=HC[a];
' j6 m) L: j& a7 Y# b                   delay(50000);
) C( K! [" G8 G6 H# m9 |0 V8 F! K                }
, R- t" v9 y  }, H}3 I; u' b3 d) b5 W
void ds()
8 ^; l. y! _) Q: q{( D5 T1 A: H5 v
     for(a=16;a>0;a--)
) |; d8 o. J) k; ]. P6 p* u        {
2 Q. c: G" ]' d4 K6 M. n* K4 y/ o# d                   P2=HC[a];% k/ U) }# W* V& D& j6 k
                   delay(50000);4 @: w) D% O% m5 _6 T# X% n
                }
! K. G4 {# g  I5 q9 t}3 q! F, y, o: G: a% S/ @+ p
void main()4 b1 M9 V6 H% ^3 B7 J
{   
5 Z+ G! T- i3 D$ x. V4 y( [7 n         while(1)
' }% F0 I' m, O$ ^, g$ s         {+ {! H. L8 j+ t8 r- a1 @
                ss();5 }. V6 G" }* K$ Z  u, e
                delay(50000);
4 K) z; \8 N% N9 t" s4 U                ds();4 {! @( k, O* n2 z. \
     }
" w6 D' m- s. `# B$ [" k}( {7 G2 \# W9 V# y. r7 R8 c

# |) C" u, t. V3 w( I! H9 F$ I
* R3 |3 J) x4 D  A  ]* B2 s
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-6-12 04:41 , Processed in 0.062500 second(s), 23 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表