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

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

[复制链接]

该用户从未签到

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

EDA365欢迎您登录!

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

x

) q  Q  ^) k- E/ H. b9 C#include<reg51.h>7 g, I2 Q2 A7 e* V# d+ `
#define uchar unsigned char% `1 p2 ~. B8 v' j2 Q  z, R
uchar code play_rom[6]={0x55,0xaa,0x0f,0xf0,0x99,0x66};
/ s/ v: P( O2 T" Y. N. r5 J
+ |  E+ ?% f1 t, ^. rvoid delay(void)
) @- Q$ Y, f/ d8 j{2 w- t& k) `; I' B
        uchar i,j,k;* z! x; I* r. y* i4 y+ V& h
        for(i=10; i>0; i--) //外循环5次每次约0.1s,共延时1s$ Q. s6 Q- B9 S
        {( J( o% V; v2 B5 X! u7 n; D) a3 ]
                for(j=200; j>0; j--) //循环200次,每次约0.5ms共延时0.1
) l3 E0 k9 G$ i4 j                {
+ s* Q6 R7 P; V( \2 H8 @                        for(k=250; k>0; k--) //内部循环250次,延时约250*2us=0.5ms/ c5 N  B) B  k6 l
                        {
# p7 E' _! _3 t2 v3 E5 C" D                                {;}
9 E0 c$ N+ [3 s4 j9 r                        }7 u: [  y2 q4 M! v& G
                }# V9 S6 O/ g$ m/ O
        }: t4 ^  ?$ x. z# F6 a$ O3 Z1 L
}, Y3 E3 `# r: }: B+ \
  N* z: m* V5 o9 v4 M
void main(void)4 r9 s  a9 a. h1 D1 R
{
7 V0 N  y% Q& c* L  d! [$ J* s        uchar i=0;3 }1 u- L5 H8 [" i
        while(1)
6 N8 o" P1 g# K( k- R6 A        {8 g3 a% s7 T$ ^9 E, @  g, l
                for(i=0; i<6; i++)
" @2 {* h6 z+ D& j% q2 J4 w                {) H. A- e: M! q9 ?' r0 C# @
                        P1=play_rom; //P1输出数组第i号元素
) k1 ?/ r; f& J$ o; G  ?                           delay();
4 B- i. v* V4 U4 s# R' O                }
; n# [9 O- n( ?$ @+ A        }' L& w& a9 `( X! h) b/ q. N- R0 _
}, \3 }8 u  l  b6 |( ]

该用户从未签到

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

该用户从未签到

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

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-6-13 23:48 , Processed in 0.093750 second(s), 26 queries , Gzip On.

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

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

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