找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 1539|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

51單片機(jī)紅外通訊程序（顯示紅外鍵盤鍵值）

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:704913 發(fā)表于 2020-3-23 17:22 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
//利用單片機(jī)開發(fā)板上的紅外接收器實(shí)現(xiàn)紅外鍵值顯示。
  1. #include "reg52.h"    //此文件中定義了單片機(jī)的一些特殊功能寄存器

  3. typedef unsigned int u16;   //對(duì)數(shù)據(jù)類型進(jìn)行聲明定義
  4. typedef unsigned char u8;
  5. sbit LSA=P2^2;
  6. sbit LSB=P2^3;
  7. sbit LSC=P2^4;
  8. sbit realy=P1^0;
  9. sbit IRIN=P3^2;
  10. u8 IrValue[6];
  11. u8 Time;
  12. u8 DisplayData[8];
  13. u8 code smgduan[17]={
  14. 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
  15. 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0X76};
  16. //0、1、2、3、4、5、6、7、8、9、A、b、C、d、E、F、H的顯示碼
  17. /*******************************************************************************
  18. * 函 數(shù) 名         : delay
  19. * 函數(shù)功能     : 延時(shí)函數(shù)，i=1時(shí)，大約延時(shí)10us
  20. *******************************************************************************/
  21. void delay(u16 i)
  22. {
  23. while(i--);
  24. }

  26. /*******************************************************************************
  27. * 函數(shù)名         :DigDisplay()
  28. * 函數(shù)功能   :數(shù)碼管顯示函數(shù)
  29. * 輸入           : 無
  30. * 輸出           : 無
  31. *******************************************************************************/
  32. void DigDisplay()
  33. {
  34. u8 i;
  35. for(i=0;i<3;i++)
  36. {
  37.   switch(i)  //位選，選擇點(diǎn)亮的數(shù)碼管，
  38.   {
  39.    case(0):
  40.     LSA=0;LSB=0;LSC=0; break;//顯示第0位
  41.    case(1):
  42.     LSA=1;LSB=0;LSC=0; break;//顯示第1位
  43.    case(2):
  44.     LSA=0;LSB=1;LSC=0; break;//顯示第2位
  45.   }
  46.   P0=DisplayData[i];//發(fā)送數(shù)據(jù)
  47.   delay(100); //間隔一段時(shí)間掃描
  48.   P0=0x00;//消隱
  49. }  
  50. }

  52. /*******************************************************************************
  53. * 函數(shù)名         : IrInit()
  54. * 函數(shù)功能     : 初始化紅外線接收
  55. * 輸入           : 無
  56. * 輸出           : 無
  57. *******************************************************************************/
  58. void IrInit()
  59. {
  60. IT0=1;//下降沿觸發(fā)
  61. EX0=1;//打開中斷0允許
  62. EA=1; //打開總中斷
  63. IRIN=1;//初始化端口
  64. }

  66. /*******************************************************************************
  67. * 函 數(shù) 名       : main
  68. * 函數(shù)功能   : 主函數(shù)
  69. * 輸    入       : 無
  70. * 輸    出      : 無
  71. *******************************************************************************/
  72. void main()
  73. {
  74. IrInit();
  75. while(1)
  76. {
  77.   DisplayData[0] = smgduan[IrValue[2]/16];
  78.   DisplayData[1] = smgduan[IrValue[2]%16];
  79.   DisplayData[2] = smgduan[16];
  80.      DigDisplay();

  82. }  
  83. }
  84. /*******************************************************************************
  85. * 函數(shù)名         : ReadIr()
  86. * 函數(shù)功能     : 讀取紅外數(shù)值的中斷函數(shù)
  87. * 輸入           : 無
  88. * 輸出           : 無
  89. *******************************************************************************/
  90. void ReadIr() interrupt 0
  91. {
  92. u8 j,k;
  93. u16 err;
  94. Time=0;      
  95. delay(700); //7ms
  96. if(IRIN==0)  //確認(rèn)是否真的接收到正確的信號(hào)
  97. {  
  98.   
  99.   err=1000;    //1000*10us=10ms,超過說明接收到錯(cuò)誤的信號(hào)
  100.   /*當(dāng)兩個(gè)條件都為真是循環(huán)，如果有一個(gè)條件為假的時(shí)候跳出循環(huán)，免得程序出錯(cuò)的時(shí)
  101.   侯，程序死在這里*/
  102.   while((IRIN==0)&&(err>0)) //等待前面9ms的低電平過去   
  103.   {   
  104.    delay(1);
  105.    err--;
  106.   }
  107.   if(IRIN==1)   //如果正確等到9ms低電平
  108.   {
  109.    err=500;
  110.    while((IRIN==1)&&(err>0))   //等待4.5ms的起始高電平過去
  111.    {
  112.     delay(1);
  113.     err--;
  114.    }
  115.    for(k=0;k<4;k++)  //共有4組數(shù)據(jù)
  116.    {   
  117.     for(j=0;j<8;j++) //接收一組數(shù)據(jù)
  118.     {
  119.      err=60;  
  120.      while((IRIN==0)&&(err>0))//等待信號(hào)前面的560us低電平過去
  121.      {
  122.       delay(1);
  123.       err--;
  124.      }
  125.      err=500;
  126.      while((IRIN==1)&&(err>0))  //計(jì)算高電平的時(shí)間長(zhǎng)度。
  127.      {
  128.       delay(10);  //0.1ms
  129.       Time++;
  130.       err--;
  131.       if(Time>30)
  132.       {
  133.        return;
  134.       }
  135.      }
  136.      IrValue[k]>>=1;  //k表示第幾組數(shù)據(jù)
  137.      if(Time>=8)   //如果高電平出現(xiàn)大于565us，那么是1
  138.      {
  139.       IrValue[k]|=0x80;
  140.      }
  141.      Time=0;  //用完時(shí)間要重新賦值      
  142.     }
  143.    }
  144.   }
  145.   if(IrValue[2]!=~IrValue[3])
  146.   {
  147.    return;
  148.   }
  149. }
  150.    
  151. }
復(fù)制代碼


實(shí)驗(yàn)26：紅外通信.zip

636.82 KB, 下載次數(shù): 5, 下載積分: 黑幣 -5

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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