标题: 基于51单片机的红外遥控灯 原理图及程序 [打印本页]
作者: 强国    时间: 2017-5-8 17:23
标题: 基于51单片机的红外遥控灯 原理图及程序
红外遥控灯单片机原理图：




单片机源程序：
  1. //头函数
  2. #include <reg52.h>
  3. //宏定义
  4. #define uint unsigned int
  5. #define uchar unsigned char

  7. //时间计算
  8. #define Imax 14000    //此处为晶振为11.0592时的取值,
  9. #define Imin 8000    //如用其它频率的晶振时,
  10. #define Inum1 1450    //要改变相应的取值。
  11. #define Inum2 700
  12. #define Inum3 3000
  13. sbit led1=P2^3;
  14. sbit led2=P2^0;
  15. //解码变量
  16. unsigned char Im[4]={0x00,0x00,0x00,0x00};

  18. //全局变量
  19. uchar f;
  20. unsigned long m,Tc;
  21. unsigned char IrOK;


  24. //主函数
  25. void main()
  26. {
  27.         P2=0xff;
  28.        
  29.         EA=1;//开启总中断
  30.          
  31.         IT1=1;//下降沿有效
  32.         EX1=1;//外部中断1开
  33.          
  34.         TMOD=0x01;//定时器初始化  
  35.         TH0=0;//T0赋初值
  36.         TL0=0;
  37.         TR0=0;//t0开始计时
  38.         while(1)
  39.         {
  40.                 if(IrOK==1)
  41.                 {
  42.                         //1键
  43.                         if(Im[2]==0x0c)
  44.                         {
  45.                            P2=0x00;
  46.                  led1=0;
  47.                         }
  48.                         //2键
  49.                         else if(Im[2]==0x18)
  50.                         {
  51.                            //P2=0xa2;
  52.                                     led1=1;
  53.                         }
  54.                         //3键
  55.                         else if(Im[2]==0x5e)
  56.                         {
  57.                            P2=0xb0;
  58.                         }
  59.                         //4
  60.                         else if(Im[2]==0x08)
  61.                         {
  62.                           // P2=0x08;
  63.                                    led2=0;
  64.                         }
  65.                         //5
  66.                         else if(Im[2]==0x1c)
  67.                         {
  68.                           // P2=0x91;
  69.                                    led2=1;
  70.                         }
  71.                         //6
  72.                         else if(Im[2]==0x5a)
  73.                         {
  74.                            P2=0x8c;
  75.                         }
  76.                         //7键
  77.                         else if(Im[2]==0x42)
  78.                         {
  79.                            P2=0xf8;
  80.                         }
  81.                         //8
  82.                         else if(Im[2]==0x52)
  83.                         {
  84.                            P2=0x80;
  85.                         }
  86.                         //9
  87.                         else if(Im[2]==0x4a)
  88.                         {
  89.                            P2=0x90;
  90.                         }
  91.                         //0
  92.                         else if(Im[2]==0x16)
  93.                         {
  94.                            P2=0xc0;
  95.                         }
  96.                         //关机
  97.                         else if(Im[2]==0x45)
  98.                         {
  99.                            P2=0xff;
  100.                         }
  101.                    IrOK=0;          
  102.                 }
  103.         }
  104. }

  106. //外部中断解码程序_外部中断1
  107. void intersvr1(void) interrupt 2 using 1
  108. {
  109. TR0=1;
  110. Tc=TH0*256+TL0;//提取中断时间间隔时长
  111. TH0=0;
  112. TL0=0;         //定时中断重新置零
  113. if((Tc>Imin)&&(Tc<Imax))
  114. {
  115.         m=0;
  116.         f=1;
  117.         return;
  118. }       //找到启始码
  119. if(f==1)
  120. {
  121.     if(Tc>Inum1&&Tc<Inum3)
  122.     {
  123.            Im[m/8]=Im[m/8]>>1|0x80; m++;
  124.     }
  125.     if(Tc>Inum2&&Tc<Inum1)
  126.     {
  127.       Im[m/8]=Im[m/8]>>1; m++; //取码
  128.            }
  129.            if(m==32)
  130.     {
  131.       m=0;  
  132.       f=0;
  133.       if(Im[2]==~Im[3])
  134.       {
  135.            IrOK=1;
  136.                           TR0=0;
  137.            }
  138.       else IrOK=0;   //取码完成后判断读码是否正确


  141. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码
完整源码下载：
1-程序.rar (19.54 KB, 下载次数: 334)


作者: jianhua    时间: 2018-4-12 09:33
请问红外遥控接收头发送头怎么找的呢，谢谢了
作者: gbb    时间: 2018-4-17 20:03
程序都是全的吗？
作者: 罗程峰8200    时间: 2018-6-18 01:15
谢谢楼主，这个刚刚好需要，简直就是及时雨的存在，谢谢
作者: denuai    时间: 2018-6-23 16:32
不错，如果把if语句改为swich，程序看起来就舒服点了
作者: 铃恋仙    时间: 2018-10-25 18:17
是发射和接收两个程序么？
作者: yzh166    时间: 2018-10-25 21:52
内容不错，学习了
作者: 小小弹壳    时间: 2018-12-5 20:53
正好是我现在需要的，谢谢了
作者: lll666666    时间: 2019-1-11 15:28
可以，很完整
作者: sjxbm    时间: 2019-1-15 17:50
红外是用什么元器件啊？
作者: llm268    时间: 2019-6-27 12:51
程序都是全的吗？
作者: bengbai4    时间: 2019-12-25 09:31
根本没用
作者: 弹道痕    时间: 2020-5-13 22:59
谢谢分享。
作者: 风流少年叶公子    时间: 2021-10-6 20:44
P1在哪里，软件上找不到
作者: mxdkey    时间: 2021-10-9 16:59
有原理图有代码，赞一下楼主！



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1