设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机38k红外解码程序与制作
返回列表 发新帖
查看: 3931|回复: 3
收起左侧

51单片机38k红外解码程序与制作

[复制链接]
ID:499469 发表于 2019-6-8 20:49 | 显示全部楼层 |阅读模式
上次大神指点后做了一些改进显示16位16进制的数据，二进制就是64位。频率是38k的。空调，电视，风扇，只要是家电的红外95%以上都可以解码，如果解码空调，建议每次使用前复位一次，清空数组的程序一直写失败，大神可以来改一下。另外发现部分手机（测试荣耀9）打开相机的时候会触发中断，让数据变得不正常。

制作出来的实物图如下：
微信图片_20190608204008.jpg

单片机源程序如下:
  1. /*********************************************************************************************
  2. 程序名： 　　 DHT11-1602
  3. 编写人： 　　 fby
  4. 硬件支持：　　STC89C52RC  DHT11  LCD1602
  5. 接口说明：　　DHT11：VCC DATA NC GND
  6. *********************************************************************************************
  7. 说明：1、单片机是STC89C52RC，晶振频率11.0592MHz，实验成功。
  8.           2、好东西要共享，大家随意折腾~~
  9. *********************************************************************************************/
  10. #include<reg51.h>
  11. #include<intrins.h>
  12. #include<stdio.h>


  15. #define uchar unsigned char        //无符号字符型类型数据
  16. #define uint unsigned int //无符号整型数据
  17.         #define ulong unsigned long //无符号整型数据
  18.         #define xiao float //xiaoshu
  19. #define IODATA  P0
  20. unsigned char IrValue[24]; //接收收据
  21. unsigned char Time;

  23. sbit RS=P2^6; //定义rs端口
  24. sbit RW=P2^5; //定义rw端口
  25. sbit E=P2^7;
  26.        
  27. sbit IRIN=P3^2;//红外数据io

  29.              
  30. /*******************************************************************************
  31. * 函数名         : DelayMs()
  32. * 函数功能                   : 延时
  33. * 输入           : x
  34. * 输出                  : 无
  35. *******************************************************************************/

  37. void DelayMs(unsigned int x)   //0.14ms误差 0us
  38. {
  39. unsigned char i;
  40.   while(x--)
  41. {
  42.   for (i = 0; i<13; i++)
  43. {}
  44. }
  45. }
  46. /*******************************************************************************
  47. * 函数名         : IrInit()
  48. * 函数功能                   : 初始化红外线接收
  49. * 输入           : 无
  50. * 输出                  : 无
  51. *******************************************************************************/

  53. void IrInit()
  54. {
  55.         IT0=1;//下降沿触发
  56.         EX0=1;//打开中断0允许
  57.         EA=1;        //打开总中断

  59.         IRIN=1;//初始化端口
  60.        
  61. }
  62. /*******************************************************************************
  63. * 函数名         : ReadIr()
  64. * 函数功能                   : 读取红外数值的中断函数
  65. * 输入           : 无
  66. * 输出                  : 无
  67. *******************************************************************************/
  68.    //数据处理

  70. void sjcl()
  71. {
  72.                 IrValue[8]=IrValue[0]>>4;                          //高位  用户码
  73.                 IrValue[9]=IrValue[0]&0x0f;                //低位       

  75.     IrValue[10]=IrValue[1]>>4;                          //高位   用户反码
  76.                 IrValue[11]=IrValue[1]&0x0f;                //低位       

  78.     IrValue[12]=IrValue[2]>>4;                          //高位   数据码
  79.                 IrValue[13]=IrValue[2]&0x0f;                //低位

  81.     IrValue[14]=IrValue[3]>>4;                          //高位  数据反码
  82.                 IrValue[15]=IrValue[3]&0x0f;                //低位       
  83.        
  84.           IrValue[16]=IrValue[4]>>4;                          //高位  数据反码
  85.                 IrValue[17]=IrValue[4]&0x0f;                //低位       

  87.           IrValue[18]=IrValue[5]>>4;                          //高位  数据反码
  88.                 IrValue[19]=IrValue[5]&0x0f;                //低位       

  90.           IrValue[20]=IrValue[6]>>4;                          //高位  数据反码
  91.                 IrValue[21]=IrValue[6]&0x0f;                //低位       

  93.           IrValue[22]=IrValue[7]>>4;                          //高位  数据反码
  94.                 IrValue[23]=IrValue[7]&0x0f;                //低位       


  97. }

  99. void ReadIr() interrupt 0
  100. {
  101.        
  102.         unsigned char j,k;
  103.         unsigned int err;
  104.        
  105.        
  106.         Time=0;                                         
  107.         DelayMs(70);

  109.         if(IRIN==0)                //确认是否真的接收到正确的信号
  110.         {         
  111.                
  112.           
  113.                 err=1000;                                //1000*10us=10ms,超过说明接收到错误的信号
  114.                 /*当两个条件都为真是循环，如果有一个条件为假的时候跳出循环，免得程序出错的时
  115.                 侯，程序死在这里*/       
  116.                 while((IRIN==0)&&(err>0))        //等待前面9ms的低电平过去                 
  117.                 {       
  118.                  
  119.                         DelayMs(1);
  120.                         err--;
  121.                 }
  122.                 if(IRIN==1)                        //如果正确等到9ms低电平
  123.                 {
  124.                        
  125.                         err=500;
  126.                         while((IRIN==1)&&(err>0))                 //等待4.5ms的起始高电平过去
  127.                         {
  128.                                
  129.                                 DelayMs(1);
  130.                                 err--;
  131.                         }
  132.                         for(k=0;k<8;k++)                //共有8组数据
  133.                         {                               
  134.                                 for(j=0;j<8;j++)        //接收一组数据
  135.                                 {

  137.                                         err=60;               
  138.                                         while((IRIN==0)&&(err>0))//等待信号前面的560us低电平过去
  139. //                                        while (!IRIN)
  140.                                         {
  141.                                                 DelayMs(1);
  142.                                                 err--;
  143.                                         }
  144.                                         err=500;
  145.                                         while((IRIN==1)&&(err>0))         //计算高电平的时间长度。
  146.                                         {
  147.                                                 DelayMs(1);//0.14ms
  148.                                                 Time++;
  149.                                                 err--;
  150.                                                 if(Time>30)
  151.                                                 {
  152.                                                         EX0=1;
  153.                                                         return;
  154.                                                 }
  155.                                         }
  156.                                         IrValue[k]>>=1;         //k表示第几组数据
  157.                                         if(Time>=8)                        //如果高电平出现大于565us，那么是1
  158.                                         {
  159.                                                 IrValue[k]|=0x80;
  160.                                         }
  161.                                         Time=0;                //用完时间要重新赋值                                                       
  162.                                 }
  163.                         }
  164.                 }
  165.                
  166.                         return;
  167.                
  168.         }       
  169.        sjcl();  //数据处理       
  170. }



  174.        

  176. /*********************************************************************************************
  177. 函数名：延时函数
  178. 调  用：Delay30us();/Delay20ms();/Delay1s();
  179. 参  数：无
  180. 返回值：无
  181. 结  果：延时相应时间
  182. 备  注：振荡晶体为11.0592MHz(所有延时函数Copy自STC-ISP(v6.85).exe)
  183. **********************************************************************************************/
  184. void Delay30us()                //@11.0592MHz-40
  185. {
  186.         unsigned char i;

  188.         i = 11;
  189.         while (--i);
  190. }


  193. void Delay20ms()                //@11.0592MHz
  194. {
  195.         unsigned char i, j;

  197.         i = 36;
  198.         j = 217;
  199.         do
  200.         {
  201.                 while (--j);
  202.         } while (--i);
  203. }


  206. void Delay1s()                //@11.0592MHz
  207. {
  208.         unsigned char i, j, k;

  210.         _nop_();
  211.         i = 8;
  212.         j = 1;
  213.         k = 243;
  214.         do
  215.         {
  216.                 do
  217.                 {
  218.                         while (--k);
  219.                 } while (--j);
  220.         } while (--i);
  221. }





  227. /********************************************************************
  228. * 名称 : bit Busy(void)
  229. * 功能 : 这个是一个读状态函数，读出函数是否处在忙状态
  230. * 输入 : 输入的命令值
  231. * 输出 : 无
  232. ***********************************************************************/
  233. void Busy(void)
  234. {
  235. bit busy_flag = 1;
  236. IODATA  = 0xff;
  237. RS = 0;          //指令关
  238. Delay30us();
  239. RW = 1;          //读状态
  240. Delay30us();
  241. E = 1;        //使能高电平
  242. while(1)
  243. {
  244. busy_flag = (bit)(IODATA  & 0x80); //强制取最高位
  245. if(busy_flag == 0)
  246. {
  247. break;
  248. }
  249. }
  250. E = 0;           //E 1->0，rs=0，rw=1，
  251.            //将数据寄存器内的数据读到DB0~DB7,分别将状态标志BF和地址计数器（AC）内容读到DB7和DB6~DB0。

  253. }

  255. /********************************************************************
  256. * 名称 : lcd1602_write_cmd(uchar del)
  257. * 功能 : 1602命令函数
  258. * 输入 : 输入的命令值
  259. * 输出 : 无
  260. ***********************************************************************/
  261. void lcd1602_write_cmd(uchar del)
  262. {
  263. RS = 0;
  264. Delay30us();
  265. RW = 0;
  266. Delay30us();
  267. E = 0;
  268. Delay30us();
  269. IODATA  = del;
  270. Delay30us();
  271. E = 1;
  272. Delay30us();
  273. E = 0;                        //E 1->0，rs=0，rw=0, 将指令代码写入指令寄存器中
  274. }

  276. /********************************************************************
  277. * 名称 : lcd1602_write_data(uchar del)
  278. * 功能 : 1602写数据函数
  279. * 输入 : 需要写入1602的数据
  280. * 输出 : 无
  281. ***********************************************************************/

  283. void lcd1602_write_data(uchar del)
  284. {
  285. Busy();      
  286. Delay30us();
  287. RS = 1;
  288. Delay30us();
  289. RW = 0;
  290. Delay30us();
  291. E = 0;
  292. Delay30us();
  293. IODATA  = del;
  294. Delay30us();
  295. E = 1;
  296. Delay30us();
  297. E = 0;                          //E 1->0，rs=1，rw=0, 数据写入数据寄存器中
  298. }

  300. /********************************************************************
  301. * 名称 : lcd1602_init()
  302. * 功能 : 1602初始化，请参考1602的资料
  303. * 输入 : 无
  304. * 输出 : 无
  305. ***********************************************************************/
  306. void lcd1602_init(void)
  307. {
  308. Delay20ms();
  309. lcd1602_write_cmd(0x38);         //8位数据，双列，5*7字形
  310. Delay20ms();
  311. lcd1602_write_cmd(0x38);
  312. Delay20ms();
  313. lcd1602_write_cmd(0x38);
  314. Busy();
  315. lcd1602_write_cmd(0x08);// 只开显示
  316. Busy();   
  317. lcd1602_write_cmd(0x01);        //清屏
  318. Busy();
  319. lcd1602_write_cmd(0x06);//显示地址递增，即写一个数据后，显示位置右移一位
  320. Busy();
  321. lcd1602_write_cmd(0x0c);        //开启显示屏，关光标，光标不闪烁
  322. }

  324. /********************************************************************
  325. * 名称 : lcd1602_char(uchar hang,uchar lie,char sign)
  326. * 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符显示"b" ，调用该函数如下
  327. L1602_char(1,5,'b')
  328. * 输入 : 行，列，需要输入1602的数据
  329. * 输出 : 无
  330. ***********************************************************************/
  331. void lcd1602_char(uchar hang,uchar lie,char sign)
  332. {
  333. uchar a;
  334. if(hang == 1)
  335. {
  336. a = 0x80;
  337. }
  338. if(hang == 2)
  339. {
  340. a = 0xc0;
  341. }
  342. a = a + lie - 1;
  343. Busy();
  344. lcd1602_write_cmd(a);  //置数据存贮器地址
  345. Busy();
  346. lcd1602_write_data(sign);
  347. }




  352. /********************************************************************
  353. * 名称 : lcd1602_string(uchar hang,uchar lie,uchar *p)
  354. * 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符开始显示"ab cd ef" ，调用该函数如下
  355. L1602_string(1,5,"ab cd ef;")
  356. * 输入 : 行，列，需要输入1602的数据
  357. * 输出 : 无
  358. ***********************************************************************/

  360. void lcd1602_string(uchar hang,uchar lie,uchar *p)
  361. {
  362. uchar a;
  363. if(hang == 1)
  364. {
  365. a = 0x80;
  366. }
  367. if(hang == 2)
  368. {
  369. a = 0xc0;
  370. }
  371. a = a + lie - 1;
  372. while(1)
  373. {
  374. Busy();
  375. lcd1602_write_cmd(a);
  376. Busy();
  377. lcd1602_write_data(*p);
  378. a++;
  379. p++;   
  380. if((*p == '\0')||(a==0x90)||(a==0xd0)) //字符结束或每行最后一个字符
  381. {
  382. break;
  383. }
  384. }
  385. }




  390. /*********************************************************************************************
  391. 函数名：主函数
  392. 调  用：无
  393. 参  数：无
  394. 返回值：无
  395. 结  果：读DHT11数据并送到1602显示
  396. 备  注：
  397. **********************************************************************************************/
  398. void main (void)
  399. {
  400.     unsigned char k;
  401.        Delay20ms();
  402.         lcd1602_init();         //LCD初始化
  403.               IrInit();             //红外初始化
  404.                
  405.         while(1)
  406.         {
  407.                                        
  408.       
  409.                         //LcdWriteData(0x37+IrValue[4]);        //将数值转换为该显示的ASCII码
  410.                         //LcdWriteData(IrValue[4]+0x30);        //将数值转换为该显示的ASCII码
  411.      
  412.       lcd1602_string(1,1,"HWJM:");
  413.         for(k=0;k<16;k++)
  414.                         {
  415.                 if(IrValue[k+8]>9)
  416.                                                                 {
  417.                 lcd1602_char(2,k+1,IrValue[k+8]+0x37);
  418.                 }
  419.                                  else
  420.                            {
  421.                                  lcd1602_char(2,k+1,IrValue[k+8]+0x30);
  422.                                   }

  424.       

  426. }
  427. }
  428. }
  429.                                
  430.                                
复制代码

所有资料51hei提供下载:
红外解码.zip (57.38 KB, 下载次数: 50)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

ID:499469 发表于 2019-6-8 20:50 | 显示全部楼层
后面为0的是没有数据，可以不用看
回复

使用道具 举报

ID:558095 发表于 2019-6-9 17:02 | 显示全部楼层
虽然看不懂，还是默默点个赞
回复

使用道具 举报

ID:796012 发表于 2023-3-2 15:16 | 显示全部楼层
我试了我只风扇遥控器，按同样的键，每次显示的码都不一样
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

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