找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 21629|回復(fù): 22
收起左側(cè)

HX1838紅外無線遙控模塊51單片機程序

  [復(fù)制鏈接]
ID:313027 發(fā)表于 2018-12-3 15:05 | 顯示全部樓層 |閱讀模式
紅外無線模塊：
1.硬件：紅外接收器+遙控器
2.連接方式：接收器的+、-分別連接在單片機的VCC、GND上面，S為信號輸出端連接在單片機的IO口上面（例程里面連接在了P3^2引腳）
3.遙控器上面每一個按鍵對應(yīng)的鍵碼值已經(jīng)在程序中給出，程序的內(nèi)容是用遙控器控制單片機上面的流水燈 B~F{)ZV8]FO[O@TTQXW(O`J.png

單片機源程序如下:
  1. #include<reg52.h>    //包含單片機寄存器的頭文件
  2. #include<intrins.h> //包含_nop_()函數(shù)定義的頭文件
  3. #define uchar unsigned char
  4. #define uint  unsigned int


  7. sbit IRIN=P3^2;         //紅外接收器數(shù)據(jù)線


  10. sbit led1=P1^0;
  11. sbit led2=P1^1;
  12. sbit led3=P1^2;
  13. sbit led4=P1^3;
  14. sbit led5=P1^4;
  15. sbit led6=P1^5;
  16. sbit led7=P1^6;
  17. sbit led8=P1^7;

  19. uchar IRCOM[7];

  21. void delay(unsigned char x) ;

  23. /*******************************************************************/
  24. void main()
  25. {
  26.          unsigned int  a;
  27.    
  28.         IRIN=1;                    //I/O口初始化        
  29.         IE=0x81;                 //允許總中斷中斷,使能 INT0 外部中斷
  30.         TCON=TCON|0x01;               //觸發(fā)方式為脈沖負邊沿觸發(fā)
  31.         
  32.          while(1)
  33.          {               
  34.             for(a=100;a>0;a--)
  35.    {
  36.      void IR_IN();
  37.    }        
  38.           }
  39. }
  40. /**********************************************************/
  41. void IR_IN() interrupt 0 using 0
  42. {
  43.         unsigned char j,k,N=0;
  44.         unsigned char q=0;
  45.         EX0 = 0;   
  46.         delay(15);
  47.         if (IRIN==1)
  48.         {
  49.                 EX0 =1;
  50.                 return;
  51.         }
  52.                    //確認IR信號出現(xiàn)
  53.         while (!IRIN)            //等IR變?yōu)楦唠娖�，跳過9ms的前導(dǎo)低電平信號。
  54.                 delay(1);
  55.         
  56.         for (j=0;j<4;j++)         //收集四組數(shù)據(jù)
  57.         {
  58.                 for (k=0;k<8;k++)        //每組數(shù)據(jù)有8位
  59.                 {
  60.                         while (IRIN)            //等 IR 變?yōu)榈碗娖�，跳過4.5ms的前導(dǎo)高電平信號。
  61.                         {delay(1);}
  62.                         while (!IRIN)          //等 IR 變?yōu)楦唠娖?br />
  63.                                 delay(1);
  64.                         while (IRIN)           //計算IR高電平時長
  65.                         {
  66.                                 delay(1);
  67.                                 N++;           
  68.                                 if (N>=30)
  69.                                 {
  70.                                         EX0=1;
  71.                                         return;
  72.                                 }                  //0.14ms計數(shù)過長自動離開。
  73.                         }                        //高電平計數(shù)完畢               
  74.                         IRCOM[j]=IRCOM[j] >> 1;     //數(shù)據(jù)最高位補“0”
  75.                         if(N>=8)
  76.                         {
  77.                                 IRCOM[j] = IRCOM[j] | 0x80;                  //數(shù)據(jù)最高位補“1”
  78.                         }  
  79.                         N=0;
  80.                 }
  81.         }
  82.         
  83.         if(IRCOM[2]!=~IRCOM[3])
  84.         {
  85.                 EX0=1;
  86.                 return;
  87.         }
  88.         
  89.         IRCOM[5]=IRCOM[2] & 0x0F;     //取鍵碼的低四位
  90.         IRCOM[6]=IRCOM[2] >> 4;       //右移4次，高四位變?yōu)榈退奈?br />
  91.         
  92.         if(IRCOM[5]>9)
  93.         {
  94.                 IRCOM[5]=IRCOM[5]+0x37;
  95.         }
  96.         else
  97.         IRCOM[5]=IRCOM[5]+0x30;
  98.         
  99.         if(IRCOM[6]>9)
  100.         {
  101.                 IRCOM[6]=IRCOM[6]+0x37;
  102.         }
  103.         else
  104.         IRCOM[6]=IRCOM[6]+0x30;

  106.         q= (((IRCOM[6]&0x0f)<<4) + (IRCOM[5]&0x0f));
  107.    

  109.         switch(q)    //判斷按鍵鍵碼值
  110.         {
  111.                 case 0x04:led1=1;led2=0;led3=1;led4=0;led5=1;led6=0;led7=1;led8=0;break;  //（#）
  112.                 case 0x19:led1=0;break;  //（0）
  113.                 case 0x40:led5=0;break;  //（5）
  114.                 case 0x43:led6=0;break;  //（6）
  115.                 case 0x44:led4=0;break;  //（4）
  116.                 case 0x45:led1=0;break;  //（1）
  117.                 case 0x46:led2=0;break;  //（2）
  118.                 case 0x47:led3=0;break;  //（3）
  119.                 case 0x07:led7=0;break;  //（7）
  120.                 case 0x18:led1=0;led2=0;led3=1;led4=1;led5=1;led6=1;led7=1;led8=1;break;  //（上）
  121.                 case 0x09:led1=0;led2=0;led3=0;led4=0;led5=0;led6=0;led7=0;led8=0;break;  //（9）
  122.                 case 0x08:led1=1;led2=1;led3=1;led4=1;led5=0;led6=0;led7=1;led8=1;break;  //（左）
  123.                 case 0x13:led1=1;led2=1;led3=1;led4=1;led5=1;led6=1;led7=1;led8=1;break;  //（ok）
  124.                 case 0x51:led1=1;led2=1;led3=1;led4=1;led5=1;led6=1;led7=0;led8=0;break;  //（右）
  125.                 case 0x15:led8=0;break;  //（8）
  126.                 case 0x52:led1=1;led2=1;led3=0;led4=0;led5=1;led6=1;led7=1;led8=1;break;  //（下）
  127.                 case 0x16:led1=0;led2=1;led3=0;led4=1;led5=0;led6=1;led7=0;led8=1;break;  // （*）
  128.         
  129.                 default :break;
  130.         }

  132.          EX0 = 1;
  133. }


  136. /***************延時函數(shù)*****************************/
  137. void delay(unsigned char x)    //x*0.14MS
  138. {
  139.         unsigned char i;
  140.         while(x--)
  141.         {
  142.                 for (i = 0; i<13; i++) {}
  143.         }
  144. }
復(fù)制代碼

所有資料51hei提供下載:
CR2025.zip (28.47 KB, 下載次數(shù): 292)


評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

回復(fù)

使用道具 舉報

ID:365823 發(fā)表于 2019-2-18 16:26 | 顯示全部樓層
感謝分享
回復(fù)

使用道具 舉報

ID:293438 發(fā)表于 2019-3-24 20:37 | 顯示全部樓層
學(xué)習(xí)了
回復(fù)

使用道具 舉報

ID:65956 發(fā)表于 2019-3-25 09:02 | 顯示全部樓層
謝謝分享
回復(fù)

使用道具 舉報

ID:472506 發(fā)表于 2019-3-25 12:08 | 顯示全部樓層
學(xué)習(xí)學(xué)習(xí)。
回復(fù)

使用道具 舉報

ID:500015 發(fā)表于 2019-3-28 16:44 | 顯示全部樓層
謝謝！
回復(fù)

使用道具 舉報

ID:62865 發(fā)表于 2019-10-21 16:37 | 顯示全部樓層
tzr448106883 發(fā)表于 2019-7-31 18:15
你好啊  我把這個代碼寫到STC89C52能用但是 寫到STC15W401AS就用不了 是什么原因？

15系列的比89系列的速度快，估計是延時時間不一致
回復(fù)

使用道具 舉報

ID:428298 發(fā)表于 2019-12-11 10:51 | 顯示全部樓層
太棒啦！
回復(fù)

使用道具 舉報

ID:485431 發(fā)表于 2020-2-9 15:07 | 顯示全部樓層
怎么沒有看到電源鍵的作用？？
回復(fù)

使用道具 舉報

ID:452950 發(fā)表于 2020-3-7 14:29 | 顯示全部樓層
正好用到這款紅外遙控，有了鍵值就不用自己另外解碼了，多謝
回復(fù)

使用道具 舉報

ID:686739 發(fā)表于 2020-3-7 19:59 來自觸屏版 | 顯示全部樓層
學(xué)習(xí)一下
回復(fù)

使用道具 舉報

ID:704402 發(fā)表于 2020-3-8 09:59 來自觸屏版 | 顯示全部樓層
感謝分享
回復(fù)

使用道具 舉報

ID:434551 發(fā)表于 2020-3-8 11:17 | 顯示全部樓層
感謝分享                              
回復(fù)

使用道具 舉報

ID:688189 發(fā)表于 2020-3-8 18:45 | 顯示全部樓層
感謝分享
回復(fù)

使用道具 舉報

ID:703745 發(fā)表于 2020-3-11 13:48 來自觸屏版 | 顯示全部樓層
xxpp2011 發(fā)表于 2020-3-7 14:29
正好用到這款紅外遙控，有了鍵值就不用自己另外解碼了，多謝

請問大佬程序成功了嗎？為什么我下進去不行呢？
回復(fù)

使用道具 舉報

ID:452950 發(fā)表于 2020-3-24 16:23 | 顯示全部樓層
最高權(quán)限 發(fā)表于 2020-3-11 13:48
請問大佬程序成功了嗎？為什么我下進去不行呢？

我買的紅外遙控看起來是同一款，可能廠家不一樣，實際的數(shù)據(jù)碼與樓主發(fā)的不一致，所以后來自己解碼了。
回復(fù)

使用道具 舉報

ID:699194 發(fā)表于 2020-3-30 17:49 | 顯示全部樓層
樓主，為什么我燒錄你的程序，紅外遙控沒有反應(yīng)（和你一樣的紅外模塊），請問是什么原因的呢
回復(fù)

使用道具 舉報

ID:314869 發(fā)表于 2020-4-7 13:26 | 顯示全部樓層
學(xué)習(xí)了
回復(fù)

使用道具 舉報

ID:356226 發(fā)表于 2020-4-7 16:32 | 顯示全部樓層
感謝樓主的分享，對我的課程設(shè)計有一定的啟發(fā)
回復(fù)

使用道具 舉報

ID:618097 發(fā)表于 2020-4-26 10:23 | 顯示全部樓層
你好，這個與晶振有沒有關(guān)系，我用的是12M的，
回復(fù)

使用道具 舉報

ID:497323 發(fā)表于 2021-3-10 16:15 | 顯示全部樓層
樓主主頻晶振設(shè)置為多少M？0.14mS的延時程序用了14個循環(huán)
回復(fù)

使用道具 舉報

ID:923440 發(fā)表于 2021-8-23 21:03 | 顯示全部樓層
xxpp2011 發(fā)表于 2020-3-24 16:23
我買的紅外遙控看起來是同一款，可能廠家不一樣，實際的數(shù)據(jù)碼與樓主發(fā)的不一致，所以后來自己解碼了。

你好，這個紅外模塊的鍵值碼用什么可以測出來呀，
回復(fù)

使用道具 舉報

ID:923440 發(fā)表于 2021-8-24 10:07 | 顯示全部樓層
xxpp2011 發(fā)表于 2020-3-24 16:23
我買的紅外遙控看起來是同一款，可能廠家不一樣，實際的數(shù)據(jù)碼與樓主發(fā)的不一致，所以后來自己解碼了。

大佬，請問這個怎么解碼，我 用的也是這款遙控器，發(fā)現(xiàn)也不能顯示，求解碼的程序謝謝
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表