標(biāo)題: 紅外線遙控Proteus仿真電路+發(fā)射+接收程序 [打印本頁]
作者: Unhappy    時(shí)間: 2016-6-22 22:59
標(biāo)題: 紅外線遙控Proteus仿真電路+發(fā)射+接收程序
單片機(jī)的紅外線遙控Proteus仿真電路+發(fā)射+接收程序


仿真圖：


紅外發(fā)射程序：
  1. /***************************************************************
  2.         作品：紅外線發(fā)射
  3.   單片機(jī)：STC89C52RC
  4.     晶振：12M
  5. 編譯環(huán)境：Keil uVision4 V9.00
  6. ***************************************************************/
  7. //
  8. //        發(fā)射引腳（接PNP三極管b極）
  9. //        PNP三極管e極接2Ω電阻，c極接紅外發(fā)射管
  10.      
  11. #include <REG51.h>
  12. #include <intrins.h>
  13. #define uchar unsigned char
  14. #define uint  unsigned int

  16. #define SBM   0x80                //識(shí)別碼

  18. #define m9    (65536-9000)               //約9mS
  19. #define m4_5  (65536-4500)               //約4.5mS
  20. #define m1_6  (65536-1630)               //約1.65mS
  21. #define m_65  (65536-580)               //約0.65mS
  22. #define m_56  (65536-560)               //約0.56mS
  23. #define m40   (65536-40000)       //約40mS
  24. #define m56   (65536-56000)       //56mS
  25. #define m2_25 (65536-2250)        //約2.25mS

  27. sbit IR  = P3^6;                                  //定義發(fā)射引腳（接PNP三極管基極）
  28. sbit LED = P3^7;                                  //發(fā)射指示燈

  30. uchar KEY(void);
  31. void  SanZhuan(void);
  32. void  ZZ(uchar x);
  33. void  Z0(uchar temp);
  34. void  TT0(bit BT,uint x);
  35. void  YS(uchar time);

  37. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  38. 函數(shù)功能：主函數(shù)
  39. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  40. void main(void)
  41. {

  43.   TMOD = 0x01;         //T0 16位工作方式
  44.   IR=1;                                   //發(fā)射端口常態(tài)為高電平

  46.   while(1)
  47.   {
  48.    SanZhuan();
  49.   }
  50. }
  51. /***************************************************************
  52. 函數(shù)功能：             4×4矩陣鍵盤
  53.                            鍵值                    
  54. P1.0 P1.1 P1.2 P1.3 P1.4 P1.5 P1.6 P1.7
  55. │     │    │    │    │    │    │    │    ┃
  56. │     │    │    └────13   14   15   16   ┃   
  57. │     │    └─────────9    10   11   12   ┃   
  58. │     └──────────────5    6    7    8    ┃   
  59. └────────────────────1    2    3    4    ┃  
  60. ***************************************************************/
  61. uchar KEY(void)
  62. {
  63. uchar H,L;            //行值，列值
  64. H=0;
  65. L=0;
  66. P1 = 0xf0;            //將鍵盤端口行值設(shè)為1，列值設(shè)為0
  67. if(P1!= 0xf0)         //檢測(cè)是否有按鍵按下，如果有則hangval必不為0x0f
  68.    {
  69.     YS(10);            //按鍵去抖動(dòng)，延時(shí)10毫秒
  70.     if(P1!=0xf0)       //確實(shí)有按鍵按下
  71.       {
  72.        H  = P1&0xf0;   //按鍵后得到按鍵的行標(biāo)志位，將行標(biāo)志位賦值給hangval
  73.        P1 = 0x0f;      //翻轉(zhuǎn)鍵盤接口輸出
  74.        L  = P1&0x0f;   //得到列標(biāo)志位
  75.       }
  76.         return (H+L);
  77.    }
  78.   return 0;
  79. }
  80. /***************************************************************
  81. 函數(shù)功能：散轉(zhuǎn)程序
  82. 入口參數(shù)：v
  83. //
  84. //  13 14 15 16
  85. //  9  10 11 12
  86. //  5  6  7  8
  87. //  1  2  3  4
  88. ***************************************************************/
  89. void SanZhuan(void)
  90. {
  91. uchar v;
  92. v = KEY();

  94. switch(v)
  95. {
  96.   case 0x77:ZZ(0x01);v=0;break;                //"  "
  97.   case 0xb7:ZZ(0x02);v=0;break;                //"  "
  98.   case 0xd7:ZZ(0x03);v=0;break;                //"  "
  99.   case 0xe7:ZZ(0x04);v=0;break;                //"  "
  100.   case 0x7b:ZZ(0x05);v=0;break;                //"  "
  101.   case 0xbb:ZZ(0x06);v=0;break;                //"  "
  102.   case 0xdb:ZZ(0x07);v=0;break;                //"  "
  103.   case 0xeb:ZZ(0x08);v=0;break;                //"  "
  104.   case 0x7d:ZZ(0x09);v=0;break;                //"  "
  105.   case 0xbd:ZZ(0x10);v=0;break;                //"  "
  106.   case 0xdd:ZZ(0x11);v=0;break;                //"  "
  107.   case 0xed:ZZ(0x12);v=0;break;                //"  "
  108.   case 0x7e:ZZ(0x13);v=0;break;                //"  "
  109.   case 0xbe:ZZ(0x14);v=0;break;                //"  "
  110.   case 0xde:ZZ(0x15);v=0;break;                //"  "
  111.   case 0xee:ZZ(0x16);v=0;break;                //"  "
  112.   default:v=0;
  113. }
  114. }
  115. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  116. 函數(shù)功能：發(fā)送主程序
  117. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  118. void ZZ(uchar x)
  119. {
  120.   TT0(1,m9);                   //高電平9mS
  121.   TT0(0,m4_5);               //低電平4.5mS

  123.   /*┈ 發(fā)送4幀數(shù)據(jù) ┈*/
  124.   Z0(SBM);                                                                                                                                       
  125.   Z0(~SBM);
  126.   Z0(x);
  127.   Z0(~x);

  129.   /*┈┈ 結(jié)束碼 ┈┈*/
  130.   TT0(1,m_65);
  131.   TT0(0,m40);

  133.   /*┈┈ 重復(fù)碼 ┈┈*/
  134.   while(KEY())
  135.    {
  136.         TT0(1,m9);
  137.         TT0(0,m2_25);

  139.         TT0(1,m_56);
  140.         TT0(0,m40);
  141.                 TT0(0,m56);
  142.                
  143.                 LED = !LED;                  //指示燈                                          
  144.     }

  146.    LED = 1;                    

  148. }
  149. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  150. 函數(shù)功能：?jiǎn)螏l(fā)送程序
  151. 入口參數(shù)：1幀數(shù)據(jù)
  152. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  153. void Z0(uchar temp)
  154. {
  155.   uchar v;
  156.   for (v=0;v<8;v++)                     //循環(huán)8次移位
  157.        {     
  158.                  TT0(1,m_65);                        //高電平0.65mS         
  159.                          if(temp&0x01) TT0(0,m1_6); //發(fā)送最低位
  160.                          else          TT0(0,m_56);     
  161.                          temp >>= 1;                //右移一位
  162.         }   
  163. }

  165. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  166. 函數(shù)功能：38KHz脈沖發(fā)射 + 延時(shí)程序
  167. 入口參數(shù)：（是否發(fā)射脈沖,延時(shí)約 x (uS)）
  168. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  169. void TT0(bit BT,uint x)
  170. {
  171.   TH0 = x>>8;                    //輸入T0初始值
  172.   TL0 = x;
  173.   TF0=0;                                //清0
  174.   TR0=1;                                //啟動(dòng)定時(shí)器0
  175.   if(BT == 0) while(!TF0);        //BT=0時(shí)不發(fā)射38KHz脈沖只延時(shí)；BT=1發(fā)射38KHz脈沖且延時(shí)；
  176.   else while(1)                            //38KHz脈沖，占空比5:26
  177.          {
  178.                   IR = 0;
  179.                   if(TF0)break;
  180.               if(TF0)break;
  181.                   IR = 1;
  182.                 if(TF0)break;
  183.                  if(TF0)break;
  184.                  if(TF0)break;
  185.                   if(TF0)break;
  186.                  if(TF0)break;
  187.                  if(TF0)break;
  188.                  if(TF0)break;
  189.                  if(TF0)break;
  190.                  if(TF0)break;
  191.                   if(TF0)break;
  192.                  }
  193.   TR0=0;                                //關(guān)閉定時(shí)器0
  194.   TF0=0;                                //標(biāo)志位溢出則清0

  196.   IR =1;                                //脈沖停止后，發(fā)射端口常態(tài)為高電平
  197. }
  198. /***************************************************************
  199. 函數(shù)功能：按鍵消抖    延時(shí)程序
  200. 入口參數(shù)：1ms×time       （晶振=12MHz）
  201. ***************************************************************/
  202. void YS(uchar time)
  203. {
  204.      uchar i,j;
  205.          for(i=0; i<time; i++)
  206.      for(j=0; j<247; j++)_nop_();
  207. }
復(fù)制代碼

紅外接收程序：
  1. // STC 12T系列單片機(jī)紅外接收NEC解碼程序。適用于市場(chǎng)上用量最大的HT6121/6122及其兼容的IC編碼。
  2. // 使用外部中斷0接收P3.2
  3. //
  4. #include <REGX52.H>
  5. #include <intrins.h>
  6. #define uchar unsigned char   
  7. #define uint  unsigned int  

  9. uchar code tab[] = {0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0X88,0X83,0XC6,0XA1,0X86,0X8E,0xFF};

  11. sbit        IR    = P3^2;                 

  13. uchar        N[4];                                 //識(shí)別碼，操作碼存放
  14. uchar   X1,X2,X3,X4;

  16. void XSQ(void);
  17. void YS(uchar time);

  19. /****************** 主函數(shù) *******************/
  20. void main(void)
  21. {        
  22.   X1=X2=X3=X4 = 0;
  23.   
  24.   IT0 = 1;
  25.   EX0 = 1;
  26.   EA  = 1;

  28.   while(1)
  29.   {
  30.    XSQ();
  31.   }
  32. }

  34. /**********************數(shù)碼管顯示函數(shù)************************/
  35. void XSQ(void)
  36. {
  37.          P2_7=1;P0=tab[X1];P2_0=0;YS(1);        //識(shí)別碼
  38.      P2_0=1;P0=tab[X2];P2_1=0;YS(1);
  39.      P2_1=1;P0=tab[16];P2_2=0;YS(1);
  40.      P2_2=1;P0=tab[16];P2_3=0;YS(1);
  41.      P2_3=1;P0=tab[16];P2_4=0;YS(1);
  42.      P2_4=1;P0=tab[16];P2_5=0;YS(1);
  43.      P2_5=1;P0=tab[X3];P2_6=0;YS(1);        //操作碼
  44.      P2_6=1;P0=tab[X4];P2_7=0;YS(1);
  45. }

  47. /********************** 外部中斷函數(shù)************************/
  48. void exint0() interrupt 0
  49. {          
  50.    uint cnt;
  51.    uchar i;

  53.    EX0 = 0;
  54.    cnt = 0;       
  55.        
  56.    while(!IR) cnt++;                               //記錄引導(dǎo)碼時(shí)間
  57.    if(cnt < 1000){EX0=1;return;}                   //9ms的計(jì)數(shù)值（12MHz：1000< cnt <1500）
  58.           
  59.    cnt = 0;                         
  60.    while(IR) if(cnt++ > 400){EX0=1;return;}        //防卡死，超時(shí)保護(hù)（12MHz： > 300）   
  61.    if(cnt < 200){EX0=1;return;}                    //（12MHz不分頻： <260）            

  63.    for(i=0; i<32; i++)                             //讀取32位位碼
  64.        {
  65.          cnt = 0;                                                                                                                                               
  66.          while(!IR);                       
  67.          while(IR) if(cnt++ > 200){EX0=1;return;}  //超時(shí)保護(hù)（12MHz：>=200）
  68.          N[i/8] >>= 1;
  69.          if(cnt>60) N[i/8] |= 0x80;                //0和1的計(jì)數(shù)界線（12MHz：< 109）   
  70.        }

  72.          if(N[0] == ~N[1] && N[2] == ~N[3])            //校驗(yàn)識(shí)別碼，操作碼       
  73.            {
  74.                    X1 = N[0]/16;
  75.                 X2 = N[0]%16;
  76.                 X3 = N[2]/16;
  77.                 X4 = N[2]%16;
  78.            }

  80.         EX0 = 1;                 
  81. }

  83. /***************************************************************
  84. 函數(shù)功能：按鍵消抖    延時(shí)程序
  85. 入口參數(shù)：1ms×time       （晶振=12MHz）
  86. ***************************************************************/
  87. void YS(uchar time)
  88. {
  89.      uchar i,j;
  90.          for(i=0; i<time; i++)
  91.      for(j=0; j<247; j++)_nop_();
  92. }
復(fù)制代碼

全部資料下載：
紅外線遙控Proteus仿真電路 發(fā)射 接收程序.zip (969.31 KB, 下載次數(shù): 676)

作者: k42122    時(shí)間: 2017-7-17 17:53
mark一下，搞了半天,把Proteus換成7.5版本 終于打開了,如圖

51hei.png (15.1 KB, 下載次數(shù): 127)

51hei.png
作者: ntlclxyc    時(shí)間: 2017-7-22 09:47
好東西啊，謝謝啦 好資料，51黑有你更精彩!!!
作者: lizanai     時(shí)間: 2017-11-27 08:51
好東西謝謝啦�。�
作者: ddwe    時(shí)間: 2017-11-27 18:25
謝謝分享�。�
作者: zhanghuiting    時(shí)間: 2017-11-29 23:06
為什么我下載的只能顯示一個(gè)端口，另外一個(gè)沒有現(xiàn)象
作者: TFS00133144    時(shí)間: 2017-11-30 16:52
你好，請(qǐng)問這么下載啊
作者: TFS00133144    時(shí)間: 2017-11-30 16:54
lizanai         發(fā)表于 2017-11-27 08:51
好東西謝謝啦��！

請(qǐng)問這個(gè)下下來的話，有沒有仿真圖
作者: TFS00133144    時(shí)間: 2017-11-30 21:41
我還仿真圖片都看不清楚呢
作者: lionlike    時(shí)間: 2017-12-12 23:33
謝謝分享
作者: 都市郎    時(shí)間: 2018-1-9 00:07
好資料,非常感謝樓主！
作者: jjwangxu2008    時(shí)間: 2018-1-9 07:24
好東西啊，謝謝啦
作者: Alexander123    時(shí)間: 2018-4-3 17:00
老鐵能給發(fā)一份嗎
作者: 黃昭    時(shí)間: 2018-4-4 10:19
好東西啊，謝謝啦
作者: 雙選愛    時(shí)間: 2018-4-27 13:18
老鐵能給發(fā)一份嗎?
作者: DIStingUISH    時(shí)間: 2018-5-27 18:18
TT0的函數(shù)里面占空比怎么控制的？
作者: 單片機(jī)小渣渣1    時(shí)間: 2018-5-30 12:00
有兩個(gè)源代碼  怎么一起使用呢
作者: ptlantu    時(shí)間: 2018-7-6 14:49
有用，非常感謝
作者: dsf232    時(shí)間: 2018-7-7 01:11
TFS00133144 發(fā)表于 2017-11-30 16:54
請(qǐng)問這個(gè)下下來的話，有沒有仿真圖

有仿真圖的，跟上面圖片發(fā)的差不多
作者: 面面面    時(shí)間: 2018-10-7 14:42
好東西啊，謝謝啦
作者: 見未相望    時(shí)間: 2018-11-12 22:56
好東西，謝謝啦
作者: 見未相望    時(shí)間: 2018-11-12 22:57
如果protues里沒有IRLINK怎么辦？
作者: tzbd2018    時(shí)間: 2018-11-13 11:01

好東西啊，謝謝啦
作者: 艱苦打水晶復(fù)活    時(shí)間: 2018-11-18 22:55
很給力！
作者: 763900682    時(shí)間: 2018-12-8 17:00
好東西啊，謝謝啦
作者: zwz0    時(shí)間: 2018-12-9 08:32
好東西,下來學(xué)習(xí)下,謝謝分享
作者: 最閑的閑魚    時(shí)間: 2019-1-15 15:07
頂一個(gè)，下載過來試試看
作者: 刀刀見紅    時(shí)間: 2019-1-17 22:54
沒有一點(diǎn)實(shí)際意思，很明顯的38KHZ載波沒有，發(fā)射與接收如同接通的導(dǎo)線
作者: shuisheng    時(shí)間: 2019-1-28 16:10
刀刀見紅 發(fā)表于 2019-1-17 22:54
沒有一點(diǎn)實(shí)際意思，很明顯的38KHZ載波沒有，發(fā)射與接收如同接通的導(dǎo)線

嗯！真的是那么個(gè)事，還是用實(shí)物做實(shí)驗(yàn)才有效果!
作者: 51yzl    時(shí)間: 2019-5-13 14:33
給力，謝謝大佬
作者: caixangwen523    時(shí)間: 2019-5-25 00:03
樓主神人��！
作者: 1463031124    時(shí)間: 2019-6-14 21:37
。。。。這個(gè)程序有問題吧
作者: kc樂樂    時(shí)間: 2019-9-19 15:39
非常好的東西，學(xué)習(xí)啦
作者: iGhibli    時(shí)間: 2020-1-16 22:46
Mark一下，有幣了再來！
作者: 526637566@qq.co    時(shí)間: 2020-5-4 19:31
謝謝大神的程序
作者: 123922584    時(shí)間: 2020-5-10 21:08
難說哎 感覺不可以
作者: zyjywll    時(shí)間: 2020-8-6 18:03
為什么我下載的只能顯示一個(gè)端口，另外一個(gè)沒有現(xiàn)象
作者: 阿萊斯塔    時(shí)間: 2020-12-16 22:56
zyjywll 發(fā)表于 2020-8-6 18:03
為什么我下載的只能顯示一個(gè)端口，另外一個(gè)沒有現(xiàn)象

我也是
作者: bbhello    時(shí)間: 2021-6-4 12:27
proteus 全圖及元件名稱可以發(fā)一下嗎
作者: bbhello    時(shí)間: 2021-6-4 15:02
Proteus7.5才能打開仿真 右邊的單片機(jī)是發(fā)送,程序沒有讓屏幕顯示 左側(cè)單片機(jī)是接受
作者: 557l    時(shí)間: 2023-12-20 16:49
請(qǐng)教一下這個(gè)80是什么意思
作者: heicad    時(shí)間: 2023-12-20 17:06
557l 發(fā)表于 2023-12-20 16:49
請(qǐng)教一下這個(gè)80是什么意思

看程序第16行
#define SBM   0x80                //識(shí)別碼
這個(gè)80應(yīng)該就是這個(gè)識(shí)別碼,為了區(qū)分各個(gè)設(shè)備的,比如說電風(fēng)扇和電視不能用相同的識(shí)別碼
http://www.torrancerestoration.com/bbs/dpj-31558-1.html
作者: liang3221159    時(shí)間: 2023-12-25 21:51
好東西啊，謝謝啦 好資料，51黑有你更精彩!!!



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