单片机红外遥控发射+接收电路源程序及Proteus仿真设计 有波形图显示

设计一个基于单片机的嵌入式系统，要求具备以下功能:
红外数据的接收及解码,红外发色电路
数码管的显示驱动控制
将接收到的红外数据进行实时显示(限于动态扫描方法)
请根据以上功能要求，进行硬件系统设计,编写软件程序并画出流程图。
利用单片机进行遥控系统的应用设计，相较于市面上遥控集成电路受功能键数及应用范围限制，具有编程灵活多样、操作码个数可随意设定的优点。本设计利用AT89C52制作红外遥控系统，使用Keil软件编写程序，在Proteus软件中采用IRLINK模块用于接收并解调红外信号，进行程序的仿真。设计中，矩阵键盘充当遥控器，当我们按下某一个键时，经单片机识别，CPU向接有红外发射管的端口发射一定频率的脉冲，该脉冲与38KHz左右的载波脉冲进行调制，然后将已调制的脉冲进行缓冲放大，激励红外发光二极管将电能转化为光能，使得红外发光二极管发射出一定频率的红外线，当接收控制系统接收到该红外光后，由单片机内定时/计数器得到该红外光的频率，然后将该频率送往CPU，由CPU对该信号进行反编码，识别出控制信号，控制LED灯亮，蜂鸣器发声，并从数码管显示出按键值，同时示波器显示红外发射及接受端的脉冲波形，实现红外数据的接收解码与动态显示。
以下为发射程序，接收见附件。信号波形解码显示都没问题，LED灯和蜂鸣器设计是有点问题的，可以删掉不用不影响。
自动的是压缩包里第二个文件的程序，其他包里有额外的参考资料，可借鉴。

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


红外波形图:


单片机源程序如下:

1. #include <REG51.h>
   
2. #include <intrins.h>
   
3. #define uchar unsigned char
   
4. #define uint  unsigned int
   
5. 
   
6. #define SBM   0xFF                //用户识别码
   
7. 
   
8. #define m9    (65536-9000)               //约9mS
   
9. #define m4_5  (65536-4500)               //约4.5mS
   
10. #define m1_6  (65536-1630)               //约1.65mS
    
11. #define m_65  (65536-580)               //约0.65mS
    
12. #define m_56  (65536-560)               //约0.56mS
    
13. #define m40   (65536-40000)       //约40mS
    
14. #define m56   (65536-56000)       //56mS
    
15. #define m2_25 (65536-2250)        //约2.25mS
    
16. 
    
17. sbit IR  = P3^6;                                  //定义发射引脚（接PNP三极管基极）
    
18. sbit LED = P3^7;                                  //发射指示灯
    
19. 
    
20. uchar KEY(void);
    
21. void  SanZhuan(void);
    
22. void  ZZ(uchar x);
    
23. void  Z0(uchar temp);
    
24. void  TT0(bit BT,uint x);
    
25. void  YS(uchar time);
    
26. 
    
27. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
    
28. 函数功能：主函数
    
29. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
    
30. void main(void)
    
31. {
    
32. 
    
33.   TMOD = 0x01;         //T0 16位工作方式
    
34.   IR=1;                                   //发射端口常态为高电平
    
35. 
    
36.   while(1)
    
37.   {
    
38.    SanZhuan();
    
39.   }
    
40. }
    
41. /***************************************************************
    
42. 函数功能：             4×4矩阵键盘
    
43.                            键值                    
    
44. P1.0 P1.1 P1.2 P1.3 P1.4 P1.5 P1.6 P1.7
    
45. │     │    │    │    │    │    │    │    ┃
    
46. │     │    │    └────13   14   15   16   ┃   
    
47. │     │    └─────────9    10   11   12   ┃   
    
48. │     └──────────────5    6    7    8    ┃   
    
49. └────────────────────1    2    3    4    ┃  
    
50. ***************************************************************/
    
51. uchar KEY(void)
    
52. {
    
53. uchar H,L;            //行值，列值
    
54. H=0;
    
55. L=0;
    
56. P1 = 0xf0;            //将键盘端口行值设为1，列值设为0
    
57. if(P1!= 0xf0)         //检测是否有按键按下，如果有则hangval必不为0x0f
    
58.    {
    
59.     YS(10);            //按键去抖动，延时10毫秒
    
60.     if(P1!=0xf0)       //确实有按键按下
    
61.       {
    
62.        H  = P1&0xf0;   //按键后得到按键的行标志位，将行标志位赋值给hangval
    
63.        P1 = 0x0f;      //翻转键盘接口输出
    
64.        L  = P1&0x0f;   //得到列标志位
    
65.       }
    
66.         return (H+L);
    
67.    }
    
68.   return 0;
    
69. }
    
70. /***************************************************************
    
71. 函数功能：散转程序
    
72. ***************************************************************/
    
73. void SanZhuan(void)
    
74. {
    
75. uchar v;
    
76. v = KEY();
    
77. 
    
78. switch(v)
    
79. {
    
80.   case 0x77:ZZ(0x01);v=0;break;                //"  "
    
81.   case 0xb7:ZZ(0x02);v=0;break;                //"  "
    
82.   case 0xd7:ZZ(0x03);v=0;break;                //"  "
    
83.   case 0xe7:ZZ(0x04);v=0;break;                //"  "
    
84.   case 0x7b:ZZ(0x05);v=0;break;                //"  "
    
85.   case 0xbb:ZZ(0x06);v=0;break;                //"  "
    
86.   case 0xdb:ZZ(0x07);v=0;break;                //"  "
    
87.   case 0xeb:ZZ(0x08);v=0;break;                //"  "
    
88.   case 0x7d:ZZ(0x09);v=0;break;                //"  "
    
89.   case 0xbd:ZZ(0x10);v=0;break;                //"  "
    
90.   case 0xdd:ZZ(0x11);v=0;break;                //"  "
    
91.   case 0xed:ZZ(0x12);v=0;break;                //"  "
    
92.   case 0x7e:ZZ(0x13);v=0;break;                //"  "
    
93.   case 0xbe:ZZ(0x14);v=0;break;                //"  "
    
94.   case 0xde:ZZ(0x15);v=0;break;                //"  "
    
95.   case 0xee:ZZ(0x16);v=0;break;                //"  "
    
96.   default:v=0;
    
97. }
    
98. }
    
99. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
    
100. 函数功能：发送主程序
     
101. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
     
102. void ZZ(uchar x)
     
103. {
     
104.   TT0(1,m9);                   //高电平9mS
     
105.   TT0(0,m4_5);               //低电平4.5mS
     
106. 
     
107.   /*┈ 发送4帧数据 ┈*/
     
108.   Z0(SBM);                                                                                                                                       
     
109.   Z0(~SBM);
     
110.   Z0(x);
     
111.   Z0(~x);
     
112. 
     
113.   /*┈┈ 结束码 ┈┈*/
     
114.   TT0(1,m_65);
     
115.   TT0(0,m40);
     
116. 
     
117.   /*┈┈ 重复码 ┈┈*/
     
118.   while(KEY())
     
119.    {
     
120.         TT0(1,m9);
     
121.         TT0(0,m2_25);
     
122. 
     
123.         TT0(1,m_56);
     
124.         TT0(0,m40);
     
125.                 TT0(0,m56);
     
126.                                                          
     
127.     }                  
     
128. }
     
129. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
     
130. 函数功能：单帧发送程序
     
131. 入口参数：1帧数据
     
132. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
     
133. void Z0(uchar temp)
     
134. {
     
135.   uchar v;
     
136.   for (v=0;v<8;v++)                     //循环8次移位
     
137.        {     
     
138.                  TT0(1,m_65);                        //高电平0.65mS         
     
139.                          if(temp&0x01) TT0(0,m1_6); //发送最低位
     
140.                          else          TT0(0,m_56);     
     
141.                          temp >>= 1;                //右移一位
     
142.         }   
     
143. }
     
144. 
     
145. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
     
146. 函数功能：38KHz脉冲发射 + 延时程序
     
147. 入口参数：（是否发射脉冲,延时约 x (uS)）
     
148. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
     
149. void TT0(bit BT,uint x)
     
150. {
     
151.   TH0 = x>>8;                    //输入T0初始值
     
152.   TL0 = x;
     
153.   TF0=0;                                //清0
     
154.   TR0=1;                                //启动定时器0
     
155.   if(BT == 0) while(!TF0);        //BT=0时不发射38KHz脉冲只延时；BT=1发射38KHz脉冲且延时；
     
156.   else while(1)                            //38KHz脉冲，占空比5:26
     
157.          {
     
158.                   IR = 0;
     
159.                   if(TF0)break;
     
160.                if(TF0)break;
     
161.                   IR = 1;
     
162.                 if(TF0)break;
     
163.                  if(TF0)break;
     
164.                  if(TF0)break;
     
165.                   if(TF0)break;
     
166.                  if(TF0)break;
     
167.                  if(TF0)break;
     
168.                  if(TF0)break;
     
169.                  if(TF0)break;
     
170.                  if(TF0)break;
     
171.                   if(TF0)break;
     
172.                  }
     
173.   TR0=0;                                //关闭定时器0
     
174.   TF0=0;                                //标志位溢出则清0
     
175.   IR =1;                                //脉冲停止后，发射端口常态为高电平
     
176. }
     
177. /***************************************************************
     
178. 函数功能：按键消抖    延时程序
     
179. 入口参数：1ms×time       （晶振=12MHz）
     
180. ***************************************************************/
     
181. void YS(uchar time)
     
182. {
     
183.      uchar i,j;
     
184.          for(i=0; i<time; i++)
     
185.      for(j=0; j<247; j++)_nop_();
     
186. }
     

复制代码

全部资料51hei下载地址：
红外遥控带原理图.rar (2.78 MB, 下载次数: 193)

2020-7-7 11:40 上传

点击文件名下载附件
红外遥控
下载积分: 黑币 -5

这个不错,要是38K的载波用了轮循方式,如果单片机时序不一样就要重新调.

用中断方式应该更加精准.

模拟时无论按那个按钮波形都没有变化

楼主proteus用的哪个版本啊

我用Proteus7.5打开的,模拟效果如下:

还是看的不是很明白。还得加强学习啊