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

51单片机输出彩灯,随机变化

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2022-9-1 09:36 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

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

x

+ V0 m5 B7 O1 O0 V#include<reg51.h>5 L  X6 K  E3 A6 H
#define uchar unsigned char& M+ A- `8 w% Y" h  |' f! n
uchar code play_rom[6]={0x55,0xaa,0x0f,0xf0,0x99,0x66};
* x6 X$ c, N9 ]# z2 t5 K1 y# \- X
- ?' h1 X" l$ u, \& L0 }: \void delay(void)
7 Q( G8 M6 H( s8 r7 l, {{4 C& h, o2 V& _" `0 C: x
        uchar i,j,k;( X0 @, f3 Q1 K. F' Z5 N
        for(i=10; i>0; i--) //外循环5次每次约0.1s,共延时1s* Q( `; O3 E1 t* m5 R) f8 Q
        {
& t9 }: V. h- t9 X* m                for(j=200; j>0; j--) //循环200次,每次约0.5ms共延时0.1
3 {4 p9 [& X3 N% o: Y3 W                {
/ o6 {- }' w0 N6 G6 j                        for(k=250; k>0; k--) //内部循环250次,延时约250*2us=0.5ms
, w) O+ g; H& C  ^% ]8 N+ H  F                        {
8 t( g7 B+ L  b8 R- X$ ?2 `                                {;}/ r1 _. ]  {* B/ ~, L
                        }
+ r( E4 ^: n+ o% u                }
) G/ ^! t7 T3 w+ Z  s4 ?. e3 }  \        }
4 N) J# U0 P, d/ y}
4 e, ~( x8 ^( |8 M, C$ v' _" o, @& a' I" r4 d  A  X9 S2 L
void main(void)
* ?% ^9 e. \* e! G{5 h" U+ w; ~5 V/ h% g
        uchar i=0;
, y) {8 {) `: E! J        while(1)
% W& ^! Y- _% t8 [0 |        {) B3 Q4 R  p: e) [3 B2 i& b, o% ^
                for(i=0; i<6; i++)# F# M& h; ^4 O9 Q6 W
                {
' Z. Y" u, K6 _2 t' R/ |/ @                        P1=play_rom; //P1输出数组第i号元素
1 R/ B8 C+ K$ U5 t                           delay();
3 B! G4 a7 M" }6 p; z                }% O( D/ p0 t# R! l1 @
        }' F- Y1 r5 B) g- M8 s$ I
}
  u1 b( T! q/ I" D

该用户从未签到

2#
发表于 2022-9-1 10:06 | 只看该作者
好东西,谢谢分享!

该用户从未签到

3#
发表于 2022-9-1 11:19 | 只看该作者
感谢分享,正在学习中。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-7-28 05:01 , Processed in 0.125000 second(s), 26 queries , Gzip On.

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

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

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