51单片机WS2812B RGB LED驱动程序可以控制200个RGB

ID:481908 · 发表于 2019-2-28 11:25

51单片机WS2812BRGB

可以控制200个RGB

单片机源程序如下:

#include<reg52.h>
#include<intrins.h>
//单片机为15系列晶振内部27M 分频为0X02
//可以控制1024 个RGB
#define uchar unsigned char
sfr PLC=0X97;
sbit Send_Dat=P3^5;
unsigned char RGB_BUF[24];
void delay();
void RGBA(); //流动效果
void RGBB( unsigned int w);//静态显示全彩
void RGBC (); //全体变色效果
uchar n;
uchar r;
unsigned char *p;
uchar a []={ 0xff,0x00,0x00} ; //绿
uchar b []={ 0x00,0xff,0x00} ; //红
uchar c []={ 0x00,0x00,0xff} ; //蓝
uchar d []={ 0xff,0xff,0x00} ; //黄
uchar e []={ 0xff,0x00,0xff} ; //青
uchar f []={ 0x00,0xff,0xff} ; //紫
uchar g []={ 0xff,0xff,0xff} ; //白
uchar h []={ 0x00,0x00,0x00} ;
uchar shuzud [8] [3]={
{ 0xff,0x00,0x00}, //绿
{ 0x00,0xff,0x00} , //红
{ 0x00,0x00,0xff} , //蓝
{ 0xff,0xff,0x00} , //黄
{ 0xff,0x00,0xff} , //青
{ 0x00,0xff,0xff} , //紫
{ 0xff,0xff,0xff} , //白
{ 0x00,0x00,0x00} ,
};
sfr P3M1 = 0xb1;
sfr P3M0 = 0xb2;
struct shuzu
{
uchar a [3];
uchar b[3] ;
};
struct shuzu;
void delays(uchar t);
void Send_A_bit(uchar v)
{
//
if (v==1)
{
Send_Dat=1;
_nop_();
Send_Dat=0;
}
else
{
Send_Dat=1;
Send_Dat=0;
_nop_();
}
}
void Send_192bits( uchar *p1,uchar z)
{
unsigned int i=0; uchar s; uchar x; unsigned char k;
s=8;
x=0;
// 1
for (i=x;i<s;i++)
{
RGB_BUF[i]=p1[0]>>(i-x)&0x01; //转化R_VAL
}
s=s+8;
x=x+8;
for (i=x;i<s;i++)
{
RGB_BUF[i]=p1[1]>>(i-x)&0x01; //转化G_VAL
}
s=s+8;
x=x+8;
for (i=x;i<s;i++)
{
RGB_BUF[i]=p1[2]>>(i-x)&0x01;
//转化R_VAL
}
s=s+8;
x=x+8;
for (k=0;k<z;k++) //循环RGB数量
{
for (i=0;i<24;i++)
{
Send_A_bit(RGB_BUF[i]);
}
}
}
void main()
{
P3M0 = 0x00;
P3M1 = 0x00;
PLC=0X02;
while(1)
{
RGBB(65000); //全体静态显示全彩效果
delays(10 );
RGBA();//全体流动效果
delays(5);
RGBC();//全体变色效果
delays(5);
}
}
void RGBA() // 流动效果
{
Send_192bits(shuzud[0],9);
delays(1);
for (n=0;n<10;n++)
{
Send_192bits(shuzud[1],n);
delays(1);
}
for (n=0;n<10;n++)
{
Send_192bits(shuzud[2],n);
delays(1);
}
}
void RGBB( unsigned int w ) //全体静态显示全彩效果
{
unsigned int t;
for (t=0;t< w;t++);
Send_192bits(shuzud[2],9);
for (t=0;t< w;w++);
Send_192bits(shuzud[1],8);
for (t=0;t< w;t++);
Send_192bits(shuzud[0],7);
for (t=0;t< w;t++);
Send_192bits(shuzud[5],6);
for (t=0;t< w;t++);
Send_192bits(shuzud[4],5);
for (t=0;t< w;t++);
Send_192bits(shuzud[3],4);
for (t=0;t< w;t++);
Send_192bits(shuzud[2],3);
for (t=0;t< w;t++);
Send_192bits(shuzud[1],2);
for (t=0;t< w;t++);
Send_192bits(shuzud[0],1);
for (t=0;t< w;t++);
}
void RGBC() //全体变色效果
{
Send_192bits(shuzud[0],9);
delays(5);
Send_192bits(shuzud[1],9);
delays(5);
Send_192bits(shuzud[2],9);
delays(5);
Send_192bits(shuzud[3],9);
delays(5);
Send_192bits(shuzud[4],9);
delays(5);
Send_192bits(shuzud[5],9);
delays(5);
}
void delay()
{
unsigned int i,j;
for (i=0;i<250;i++)
{
for (j=0;j<200;j++);
}
}
/*大延时函数*/
/*十几秒*/
void delays(uchar t)
{
uchar p;
for (p=0; p<t;p++)
{
delay();
}
}

复制代码

所有资料51hei提供下载:

优化RGB.rar (25.16 KB, 下载次数: 583)

ID:60656 · 发表于 2019-3-7 22:14

好资料收藏学习，谢谢

ID:473186 · 发表于 2019-3-8 16:49

52单片机应该跟不上，这玩意最少要24M的，宏晶其他型号可以

ID:243748 · 发表于 2019-3-9 21:12

有电路图吗

ID:265485 · 发表于 2019-3-17 20:54

这程序不行试了没有效果

ID:67356 · 发表于 2019-3-18 06:58

好，。谢，回来看看

ID:243748 · 发表于 2019-8-2 20:46

明天试一下

ID:299054 · 发表于 2019-9-5 17:04

谢谢分享！

ID:358797 · 发表于 2019-12-4 13:56

稳定吗

ID:652686 · 发表于 2020-1-1 15:57

正好想用WS2812B做一个灯，好资料收藏学习，谢谢

ID:690219 · 发表于 2020-3-5 17:22

有电路图共参考吗？
51单片机真的可以实现吗？

ID:686314 · 发表于 2020-3-18 17:10

谢谢楼主

ID:791100 · 发表于 2020-11-6 20:21

楼主资料非常好，值得收藏，谢谢！

ID:791100 · 发表于 2020-11-7 20:11

楼主资料非常好，值得收藏，谢谢！

ID:89286 · 发表于 2020-11-8 17:48

thanks for sharing

ID:845476 · 发表于 2022-1-9 18:32

请问楼主，为什么我的第一颗灯是白色的特别亮

ID:1003871 · 发表于 2022-2-12 22:47

200个。。。。出错了是不是就都不好使了

ID:977804 · 发表于 2022-2-21 11:25

xo520 发表于 2022-1-9 18:32
请问楼主，为什么我的第一颗灯是白色的特别亮

白光，说明频率不够。要增大主频

ID:583681 · 发表于 2022-8-25 08:40

我微改了一下程序，11.0592M的单片机都可以适应。

ID:1013588 · 发表于 2022-8-28 10:22

谢谢分享，以后有机会试试

ID:1062369 · 发表于 2023-4-26 00:24

gzpylyf 发表于 2022-8-25 08:40
我微改了一下程序，11.0592M的单片机都可以适应。

请问是怎么做到的

ID:1053359 · 发表于 2023-4-28 09:19

不知道行不行，先下载研究，，感谢楼主分享

ID:1096871 · 发表于 2023-10-22 15:04

试过了，的确可以点亮，谢谢楼主

ID:1096871 · 发表于 2023-10-22 15:05

谢谢楼主，试过了，的确可以点亮，现在在楼主的程序上做动态变化，谢谢楼主

ID:398094 · 发表于 2023-11-22 09:21

好资料收藏学习，谢谢

ID:1068132 · 发表于 2023-12-3 20:38

为什么我移植到STC8G2K32S4灯亮不了

ID:433219 · 发表于 2023-12-4 09:05

具体要说下，哪个型号和IRC频率

ID:31514 · 发表于 2024-1-5 17:25

感谢分享，主要学习渐变色算法

ID:72224 · 发表于 2024-2-2 10:27

STC轻松驱动1000个WS2812

ID:807361 · 发表于 2024-4-28 22:05

感谢分享，主要学习渐变色算法

ID:1069621 · 发表于 2025-5-12 15:29

gzpylyf 发表于 2022-8-25 08:40
我微改了一下程序，11.0592M的单片机都可以适应。

你是咋做的，有源代码提供参考吗？

帐号		自动登录	找回密码
密码			立即注册

51单片机WS2812B RGB LED驱动程序 可以控制200个RGB

评分

51单片机WS2812B RGB LED驱动程序可以控制200个RGB