欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 單片機紅外中繼 轉譯 轉發器制作 附源程序 [打印本頁]
作者: 1091212269    時間: 2020-2-22 00:02
標題: 單片機紅外中繼 轉譯 轉發器制作 附源程序
接收到一個紅外碼后，發送1個相同或不同的紅外碼來實現中繼或轉譯，
作用：智能語音音箱可以控制部分紅外家電，但有一部分不能控制。通過轉譯可以控制更多，本程序不能控制空調。
有掉電模式，很節能。管腳電路自己看吧。本人不會畫圖。

制作出來的實物圖如下：


單片機源程序如下:
  1. ////////////////////////////   main.c  ////////////////////////////////////////
  2. // 紅外接收數據，中斷方式，并通過串口發送接收到的4字節，晶振：22.118400 MHz
  3. // 接收頭信號引腳P3.3，串口波特率9600
  4. ///////////////////////////////////////////////////////////////////////////
  5. #include "STC15W4K.H"
  6. #include "IR.H"  
  7. #include "IRSEND.H"
  8. #include "intrins.h"
  9.   void keysm();  //掃描函數
  10.   void delay500ms();

  12. void main()
  13. {
  14.         led=0;
  15.         port();          //普通IO
  16.         Timer1Init();   // 定時器2初始化
  17.         int1_init();    //T0初始化
  18.         while (1)
  19.         {

  21.     keysm();
  22.                 led=1;
  23.                 PCON=0x02;_nop_();_nop_();_nop_();_nop_();led=0;
  24.                
  25.         }
  26.                
  27.         
  28. }

  30. void keysm()//按鍵掃描函數
  31. {
  32.         if(IRflag)
  33.         {
  34.                 delay500ms();
  35.                   EX0=0;          // 關閉外中斷0
  36.                 if(Ir_Buf[0]==0xB3&&Ir_Buf[1]==0x4C)
  37.                         {
  38.                                 if(Ir_Buf[2]==0xDC) ir_Send(0x00,0xFF,0x1C)  ;
  39.                                 if(Ir_Buf[2]==0x80) ir_Send(0x00,0xFF,0x42)  ;
  40.                                 //if(Ir_Buf[2]==0x5D) ir_Send(0x00,0xFF,0x1C)  ;
  41.                                 //if(Ir_Buf[2]==0x5D) ir_Send(0x00,0xFF,0x1C)  ;
  42.        }

  44.    if(Ir_Buf[0]==0x00&&Ir_Buf[1]==0xFF&&Ir_Buf[2]==0x88)
  45.          {   ir_Send(0x00,0xFF,0x88)  ;  }

  47. }
  48.         EX0=1;          // 開啟外中斷1
  49. }

  51. void delay500ms(void)   //誤差 -0.000000000063us
  52. {
  53.     unsigned char a,b,c;
  54.     for(c=212;c>0;c--)
  55.         for(b=160;b>0;b--)
  56.             for(a=80;a>0;a--);

  58. }
復制代碼
全部資料51hei下載地址：
紅外轉譯.zip (63.98 KB, 下載次數: 23)

作者: lyseg    時間: 2020-4-4 17:39
謝謝分享！！！



歡迎光臨 (http://www.raoushi.com/bbs/) Powered by Discuz! X3.1