找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

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

單片機(jī)紅外解碼1602顯示鍵碼16進(jìn)制值源碼分享

[復(fù)制鏈接]
ID:122843 發(fā)表于 2018-4-7 22:11 | 顯示全部樓層 |閱讀模式
很好的紅外解碼  可以解碼按鍵的16進(jìn)制

單片機(jī)源程序如下:
  1. /********************************************************************
  2. * 文件名  :  紅外解碼LCD.c
  3. * 描述    :  實現(xiàn)了紅外解碼遙控器上的按鍵的值并在1602上顯示出來。
  4.                          1602上顯示的是按鍵的十六進(jìn)制值。                         
  5. * 版本號  ： 1.0
  6. ***********************************************************************/

  8. #include <reg51.h>
  9. #include <intrins.h>

  11. #define uchar unsigned char
  12. #define uint  unsigned int

  14. uchar LCD_ID_1[16] = {"Red Control"};
  15. uchar LCD_ID_2[16] = {"IR CODE:--H"};

  17. void delay(uchar x);  //x*0.14MS
  18. void delay1(int ms);
  19. void beep();

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

  23. uchar IRCOM[7];

  25. sbit E=P2^7;                //1602使能引腳
  26. sbit RW=P2^6;                //1602讀寫引腳       
  27. sbit RS=P2^5;                //1602數(shù)據(jù)/命令選擇引腳


  30. /********************************************************************
  31. * 名稱 : delay()
  32. * 功能 : 延時,延時時間大概為140US。
  33. * 輸入 : 無
  34. * 輸出 : 無
  35. ***********************************************************************/

  37. void Delay2()
  38. {
  39.         int i,j;
  40.         for(i=0; i<=10; i++)
  41.         for(j=0; j<=2; j++)
  42. ;
  43. }


  46. /********************************************************************
  47. * 名稱 : enable(uchar del)
  48. * 功能 : 1602命令函數(shù)
  49. * 輸入 : 輸入的命令值
  50. * 輸出 : 無
  51. ***********************************************************************/

  53. void enable(uchar del)
  54. {
  55.         P0 = del;
  56.         RS = 0;
  57.         RW = 0;
  58.         E = 0;
  59.         Delay2();
  60.         E = 1;
  61.         Delay2();
  62. }

  64. /********************************************************************
  65. * 名稱 : write(uchar del)
  66. * 功能 : 1602寫數(shù)據(jù)函數(shù)
  67. * 輸入 : 需要寫入1602的數(shù)據(jù)
  68. * 輸出 : 無
  69. ***********************************************************************/

  71. void write(uchar del)
  72. {
  73.         P0 = del;
  74.         RS = 1;
  75.         RW = 0;
  76.         E = 0;
  77.         Delay2();
  78.         E = 1;
  79.         Delay2();
  80. }

  82. /********************************************************************
  83. * 名稱 : L1602_init()
  84. * 功能 : 1602初始化，請參考1602的資料
  85. * 輸入 : 無
  86. * 輸出 : 無
  87. ***********************************************************************/
  88. void L1602_init(void)
  89. {
  90.         enable(0x01);
  91.         enable(0x38);
  92.         enable(0x0c);
  93.         enable(0x06);
  94.         enable(0xd0);
  95. }

  97. /********************************************************************
  98. * 名稱 : L1602_char(uchar hang,uchar lie,char sign)
  99. * 功能 : 改變液晶中某位的值，如果要讓第一行，第五個字符顯示"b" ，調(diào)用該函數(shù)如下
  100.                  L1602_char(1,5,'b')
  101. * 輸入 : 行，列，需要輸入1602的數(shù)據(jù)
  102. * 輸出 : 無
  103. ***********************************************************************/
  104. void L1602_char(uchar hang,uchar lie,char sign)
  105. {
  106.         uchar a;
  107.         if(hang == 1) a = 0x80;
  108.         if(hang == 2) a = 0xc0;
  109.         a = a + lie - 1;
  110.         enable(a);
  111.         write(sign);
  112. }

  114. /********************************************************************
  115. * 名稱 : L1602_string(uchar hang,uchar lie,uchar *p)
  116. * 功能 : 改變液晶中某位的值，如果要讓第一行，第五個字符開始顯示"ab cd ef" ，調(diào)用該函數(shù)如下
  117.                   L1602_string(1,5,"ab cd ef;")
  118. * 輸入 : 行，列，需要輸入1602的數(shù)據(jù)
  119. * 輸出 : 無
  120. ***********************************************************************/
  121. void L1602_string(uchar hang,uchar lie,uchar *p)
  122. {
  123.         uchar a;
  124.         if(hang == 1) a = 0x80;
  125.         if(hang == 2) a = 0xc0;
  126.         a = a + lie - 1;
  127.         enable(a);
  128.         while(1)
  129.         {
  130.                 if(*p == '\0') break;
  131.                 write(*p);
  132.                 p++;
  133.         }
  134. }

  136. /*******************************************************************/
  137. main()
  138. {

  140.     IE = 0x84;                 //允許總中斷中斷,使能 INT1 外部中斷
  141.     TCON = 0x10;               //觸發(fā)方式為脈沖負(fù)邊沿觸發(fā)
  142.    
  143.     IRIN=1;                    //I/O口初始化
  144.        
  145.     delay1(10);                 //延時
  146.     L1602_init();               //初始化LCD            
  147.         L1602_string(1, 1, LCD_ID_1);
  148.         L1602_string(2, 1, LCD_ID_2);
  149.    while(1)        ;

  151. } //end main
  152. /**********************************************************/
  153. void IR_IN() interrupt 2 using 0
  154. {
  155.   unsigned char j,k,N=0;
  156.      EX1 = 0;   
  157.          delay(15);
  158.          if (IRIN==1)
  159.      { EX1 =1;
  160.            return;
  161.           }
  162.                            //確認(rèn)IR信號出現(xiàn)
  163.   while (!IRIN)            //等IR變?yōu)楦唠娖剑^9ms的前導(dǎo)低電平信號。
  164.     {delay(1);}

  166. for (j=0;j<4;j++)         //收集四組數(shù)據(jù)
  167. {
  168.   for (k=0;k<8;k++)        //每組數(shù)據(jù)有8位
  169.   {
  170.    while (IRIN)            //等 IR 變?yōu)榈碗娖剑^4.5ms的前導(dǎo)高電平信號。
  171.      {delay(1);}
  172.     while (!IRIN)          //等 IR 變?yōu)楦唠娖?br />
  173.      {delay(1);}
  174.      while (IRIN)           //計算IR高電平時長
  175.       {
  176.     delay(1);
  177.     N++;           
  178.     if (N>=30)
  179.          { EX1=1;
  180.          return;}                  //0.14ms計數(shù)過長自動離開。
  181.       }                        //高電平計數(shù)完畢               
  182.      IRCOM[j]=IRCOM[j] >> 1;                  //數(shù)據(jù)最高位補“0”
  183.      if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80;}  //數(shù)據(jù)最高位補“1”
  184.      N=0;
  185.   }//end for k
  186. }//end for j
  187.    
  188.    if (IRCOM[2]!=~IRCOM[3])
  189.    { EX1=1;
  190.      return; }

  192.    IRCOM[5]=IRCOM[2] & 0x0F;     //取鍵碼的低四位
  193.    IRCOM[6]=IRCOM[2] >> 4;       //右移4次，高四位變?yōu)榈退奈?br />

  195.    if(IRCOM[5]>9)
  196.     { IRCOM[5]=IRCOM[5]+0x37;}
  197.    else
  198.           IRCOM[5]=IRCOM[5]+0x30;

  200.    if(IRCOM[6]>9)
  201.     { IRCOM[6]=IRCOM[6]+0x37;}
  202.    else
  203.           IRCOM[6]=IRCOM[6]+0x30;
  204. //////////////////////////
  205. L1602_char(2,10,IRCOM[5]);
  206. L1602_char(2,9,IRCOM[6]);
  207.      EX1 = 1;
  208. }


  211. /**********************************************************/
  212. void delay(unsigned char x)    //x*0.14MS
  213. {
  214. unsigned char i;
  215.   while(x--)
  216. {
  217.   for (i = 0; i<13; i++) {}
  218. }
  219. }

  221. /**********************************************************/
  222. void delay1(int ms)
  223. {
  224. unsigned char y;
  225.   while(ms--)
  226. {
  227.   for(y = 0; y<250; y++)
  228.   {
  229.    _nop_();
  230.    _nop_();
  231.    _nop_();
  232.    _nop_();
  233.   }
  234. }
  235. }
復(fù)制代碼

所有資料51hei提供下載:
【實驗87】紅外解碼1602顯示鍵碼16進(jìn)制值.zip (26.24 KB, 下載次數(shù): 33)


回復(fù)

使用道具 舉報

ID:303454 發(fā)表于 2018-4-8 09:32 | 顯示全部樓層
好好學(xué)習(xí)，認(rèn)真學(xué)習(xí)一下
回復(fù)

使用道具 舉報

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

本版積分規(guī)則

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

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

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