51单片机红外遥控控制灯的亮暗程序（用PWM控制）

ID:500421 · 发表于 2019-4-26 11:14

红外遥控控制灯的亮暗（用PWM控制），可控制灯的打开和关闭，以及用PWM控制灯的亮暗。
非常好用，方便移植到任何地方，下在板子上即可用了。51单片机红外遥控例程！！！
附带红外遥控键盘码。

红外遥控键盘码

单片机源程序如下:

/*
红外无线遥控LED灯 + 变亮按- 变暗按CH- 关灯按CH- 开灯CH
*/
#include <reg52.h>
/*====================================
自定义类型名
====================================*/
typedef unsigned char INT8U;
typedef unsigned char uchar;
typedef unsigned int INT16U;
typedef unsigned int uint;
/*====================================
硬件接口位声明
====================================*/
sbit IR = P3^2; //定义红外脉冲数据接口外部中断O输入口
sbit beep = P2^3;
uchar IRtime; //检测红外高电平持续时间（脉宽）
uchar IRcord[4]; //此数组用于储存分离出来的4个字节的数据（用户码2个字节+键值码2个字节）
uchar IRdata[33]; //此数组用于储存红外的33位数据（第一位为引导码用户码16+键值码16）
bit IRpro_ok, IRok; //第一个用于红外接收4个字节完毕。IRok用为检测脉宽完毕
unsigned char pwm_left_val = 250;//左电机占空比值取值范围0-170，0最快
unsigned char pwm_t;//周期
//毫秒级延时
void delay(unsigned int z)
{
unsigned int x,y;
for(x = z; x > 0; x--)
for(y = 114; y > 0 ; y--);
}
void time0() interrupt 1 //定义定时器0
{
IRtime++; //检测脉宽，1次为278us
}
//定时器1中断
void timer1() interrupt 3
{
pwm_t++;
if(pwm_t == 250)
pwm_t = P1 = 0;
if(pwm_left_val == pwm_t)
P1 = 0xff;
}
void int0() interrupt 0 //定义外部中断0
{
static uchar i; // 声明静态变量（在跳出函数后在回来执行的时候不会丢失数值）i用于把33次高电平的持续时间存入IRdata
static bit startflag; //开始储存脉宽标志位
if(startflag) //开始接收脉宽检测
{
if( (IRtime < 53) && (IRtime >= 32) ) /*判断是否是引导码，底电平9000us+高4500us
这个自己可以算我以11.0592来算了NEC协议的引导码低8000-10000+高4000-5000
如果已经接收了引导码那么i不会被置0就会开始依次存入脉宽*/
i = 0; //如果是引导码那么执行i=0把他存到IRdata的第一个位
IRdata[i] = IRtime; //以T0的溢出次数来计算脉宽，把这个时间存到数组里面到后面判断
IRtime = 0; //计数清零，下一个下降沿的时候在存入脉宽
i++; //计数脉宽存入的次数
if(i == 33) //如果存入34次数组的下标是从0开始i等于33表示执行了34次
{
IRok = 1; //那么表示脉宽检测完毕
i = 0; //把脉宽计数清零准备下次存入
}
}
else
{
IRtime = 0; //引导码开始进入把脉宽计数清零开始计数
startflag = 1; //开始处理标志位置1
}
}
void IRcordpro() //提取它的33次脉宽进行数据解码
{
uchar i, j, k, cord, value; /*i用于处理4个字节，j用于处理一个字节中每一位，k用于33次脉宽中的哪一位
cord用于取出脉宽的时间判断是否符合1的脉宽时间*/
k = 1; //从第一位脉宽开始取，丢弃引导码脉宽
for(i = 0; i < 4; i++)
{
for(j = 0; j < 8; j++)
{
cord = IRdata[k]; //把脉宽存入cord
if(cord > 5) //如果脉宽大于我11.0592的t0溢出率为约278us*5=1390那么判断为1
value = value | 0x80; /*接收的时候是先接收最低位，
把最低位先放到value的最高位在和0x08按位或一下
这样不会改变valua的其他位的数值只会让他最高位为1*/
if(j < 7)
{
value = value >> 1; //value位左移依次接收8位数据。
}
k++; //每执行一次脉宽位加1
}
IRcord[i] = value; //每处理完一个字节把它放入IRcord数组中。
value = 0; //清零value方便下次在存入数据
}
IRpro_ok = 1; //接收完4个字节后IRpro ok置1表示红外解码完成
}
void main()
{
unsigned char i = 9;
TMOD |= 0x20;//T1 8位自动重装模块
TH1 = 245;
TL1 = 245;//11.0592M晶振下占空比最大比值是256,输出100HZ
TR1 = 1;//启动定时器0
ET1 = 1;//允许定时器0中断
EA = 1;//总中断允许
TMOD |= 0x02; //定时器0工作方式2，8位自动重装
TH0 = 0x00; //高8位装入0那么定时器溢出一次的时间是256个机器周期
TL0 = 0x00;
ET0 = 1; //定时器0中断
TR0 = 1; //启动定时器0
IT0 = 1; //设置外部中断0为跳沿触发方式，来一个下降沿触发一次
EX0 = 1; //启动外部中断0
//delay(2000);
while(1)
{
if(IRok) //判断脉宽是否检测完毕
{
IRcordpro();//根据脉宽解码出4个字节的数据
IRok = 0; //重新等待脉宽检测
if(IRpro_ok) //判断是否解码完毕
{
switch(IRcord[2])
{
case 0x07: //-
if(i > 0)
{
pwm_left_val = pwm_left_val - 25;
i--;
}
beep = 0; delay(5); beep = 1;
break;
case 0x15: //+
if(i < 9)
{
pwm_left_val = pwm_left_val + 25;
i++;
}
beep = 0; delay(5); beep = 1;
break;
case 0x46: ET1 = 1; P1 = 0;beep = 0; delay(5); beep = 1;
break;
case 0x45: ET1 = 0; P1 = 0XFF;beep = 0; delay(5); beep = 1;
break;
}
IRpro_ok = 0;
}
}
/*if(S2 == 0)
{
delay(5);
if(S2 == 0)
{
if(i < 9)
{
pwm_left_val = pwm_left_val + 8;
i++;
P0 = discode[i];
}
while(!S2);
}
}
if(S3 == 0)
{
delay(5);
if(S3 == 0)
{
if(i > 0)
{
pwm_left_val = pwm_left_val - 8;
i--;
P0 = discode[i];
}
while(!S3);
}
}*/
}
}

复制代码

所有资料51hei提供下载:

红外调光.docx (14.83 KB, 下载次数: 188)

ID:500421 · 发表于 2019-4-29 09:59

大家有问题可以问哈，我时不时就会登陆，看到了就会回的哈！！

ID:250717 · 发表于 2019-5-5 21:46

没看懂pwm的那段程序，注释写的少。红外遥控接收的倒是懂了

ID:138119 · 发表于 2019-5-6 02:47

挺好的资料，希望多学习～！

ID:73182 · 发表于 2019-5-6 13:03

感谢分享

ID:500421 · 发表于 2019-5-6 15:33

ptlantu 发表于 2019-5-6 13:03
感谢分享

不用谢啦~

ID:500421 · 发表于 2019-5-6 15:33

yfpc2006 发表于 2019-5-6 02:47
挺好的资料，希望多学习～！

谢谢啦~

ID:500421 · 发表于 2019-5-6 15:43

roachwz 发表于 2019-5-5 21:46
没看懂pwm的那段程序，注释写的少。红外遥控接收的倒是懂了

嘻嘻，没看懂的话我给你讲一遍吧，在这个程序中PWM主要出现在void timer1() interrupt 3里，那我们就讨论这里就行了，pwm_t是定时器溢出一次，他加1，现在假设pwm_left_val现在为25。现在定时器在不断的溢出，
pwm_t也在不断的加1，当pwm_t等于25时，执行P1 = 0xff; 灯全灭了，现在pwm_t还是在不断的加1。然后灯是一直灭的，直到pwm_t == 250，执行pwm_t = P1 = 0;现在灯全亮了。pwm_t现在又从1开始加了。那么可以看出，0-25灯是亮的，25-250是灭的，然后他们亮灭的非常快，你眼睛里看到的灯是一直亮的，但亮度是由
pwm_left_val决定的，这就是占空比。现在应该明白了吧，嘻嘻。

ID:555485 · 发表于 2019-6-5 15:03

谢谢你的分享

ID:556770 · 发表于 2019-8-31 22:20

对初学者太实用了

ID:587835 · 发表于 2019-9-1 11:27

楼主有没有红外信号发送的程序啊

ID:26229 · 发表于 2019-9-19 15:01

用户码与引导码看不明白,请指教一下

ID:652430 · 发表于 2019-11-29 15:24

value = value | 0x80;为什么要或，不加也不会有问题吧，例如接收10100011，value的值怎么接收

ID:243394 · 发表于 2019-11-30 17:58

谢谢楼主分享

ID:500421 · 发表于 2020-1-2 19:55

liudi1990 发表于 2019-9-1 11:27
楼主有没有红外信号发送的程序啊

我的红外信号发送是用那个红外遥控器的。如果你想自己做一个的话可以在百度上搜“红外信号发送的程序”可以看下。我没试过哦。

ID:730559 · 发表于 2020-4-16 14:50

323 发表于 2019-4-29 09:59
大家有问题可以问哈，我时不时就会登陆，看到了就会回的哈！！

您好关于“51单片机红外遥控控制灯的亮暗程序（用PWM控制）”的资料可以分享一下吗谢谢

ID:609524 · 发表于 2020-7-25 17:49

请楼主有433红外解码对码的程序和讲解吗

ID:870936 · 发表于 2020-12-30 14:11

可以发一份原理图吗

ID:870936 · 发表于 2020-12-30 15:10

请问有原理图吗

ID:706724 · 发表于 2022-12-2 11:24

这段代码是做什么用的呢？
/*if(S2 == 0)
            {
                     delay(5);
                     if(S2 == 0)
                     {
                              if(i < 9)
                              {
                                    pwm_left_val = pwm_left_val + 8;
                                    i++;
                                    P0 = discode[i];
                              }
                              while(!S2);
                     }
            }
            if(S3 == 0)
            {
                     delay(5);
                     if(S3 == 0)
                     {
                              if(i > 0)
                              {
                                    pwm_left_val = pwm_left_val - 8;
                                    i--;
                                    P0 = discode[i];
                              }
                              while(!S3);
                     }
            }*/

ID:433219 · 发表于 2022-12-3 08:59

某1个宝上1快多的遥控器？？？

ID:224580 · 发表于 2023-8-25 11:59

看起来很复杂，难度很大

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

51单片机红外遥控控制灯的亮暗程序（用PWM控制）

评分