久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 6160|回復: 1
打印 上一主題 下一主題
收起左側

單片機紅外線發射接收電路+源程序與Proteus仿真圖

  [復制鏈接]
跳轉到指定樓層
樓主
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)


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

  15. #define SBM   0x80                //識別碼

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

  24. sbit IR  = P3^6;                                  //定義發射引腳(接PNP三極管基極)
  25. sbit LED = P3^7;                                  //發射指示燈

  26. uchar KEY(void);
  27. void  SanZhuan(void);
  28. void  ZZ(uchar x);
  29. void  Z0(uchar temp);
  30. void  TT0(bit BT,uint x);
  31. void  YS(uchar time);

  32. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  33. 函數功能:主函數
  34. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  35. void main(void)
  36. {

  37.   TMOD = 0x01;         //T0 16位工作方式
  38.   IR=1;                                   //發射端口常態為高電平

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

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

  114.   /*┈ 發送4幀數據 ┈*/
  115.   Z0(SBM);                                                                                                                                       
  116.   Z0(~SBM);
  117.   Z0(x);
  118.   Z0(~x);

  119.   /*┈┈ 結束碼 ┈┈*/
  120.   TT0(1,m_65);
  121.   TT0(0,m40);

  122.   /*┈┈ 重復碼 ┈┈*/
  123.   while(KEY())
  124.    {
  125.         TT0(1,m9);
  126.         TT0(0,m2_25);

  127.         TT0(1,m_56);
  128.         TT0(0,m40);
  129.                 TT0(0,m56);
  130.                
  131.                 LED = !LED;                  //指示燈                                          
  132.     }

  133.    LED = 1;                    

  134. }
  135. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  136. 函數功能:單幀發送程序
  137. 入口參數:1幀數據
  138. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  139. void Z0(uchar temp)
  140. {
  141.   uchar v;
  142.   for (v=0;v<8;v++)                     //循環8次移位
  143.        {     
  144.                  TT0(1,m_65);                        //高電平0.65mS         
  145.                          if(temp&0x01) TT0(0,m1_6); //發送最低位
  146.                          else          TT0(0,m_56);     
  147.                          temp >>= 1;                //右移一位
  148.         }   
  149. }

  150. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  151. 函數功能:38KHz脈沖發射 + 延時程序
  152. 入口參數:(是否發射脈沖,延時約 x (uS))
  153. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  154. void TT0(bit BT,uint x)
  155. {
  156.   TH0 = x>>8;                    //輸入T0初始值
  157.   TL0 = x;
  158.   TF0=0;                                //清0
  159.   TR0=1;                                //啟動定時器0
  160.   if(BT == 0) while(!TF0);        //BT=0時不發射38KHz脈沖只延時;BT=1發射38KHz脈沖且延時;
  161.   else while(1)                            //38KHz脈沖,占空比5:26
  162.          {
  163.                   IR = 0;
  164.                   if(TF0)break;
  165.                if(TF0)break;
  166.                   IR = 1;
  167.                 if(TF0)break;
  168.                  if(TF0)break;
  169. ……………………

  170. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
紅外線遙控Proteus仿真電路+發射+接收程序.7z (1.19 MB, 下載次數: 122)

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

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

使用道具 舉報

沙發
ID:724172 發表于 2020-8-20 15:26 | 只看該作者
這對于我這初學者還蠻難理解的。不過也要贊一下
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 六月成人网| 国产在线资源 | 国产精品视频网址 | 高清亚洲 | 免费人成激情视频在线观看冫 | 欧美极品少妇xxxxⅹ免费视频 | av高清| 男人天堂网址 | 国产有码 | 国产日产欧产精品精品推荐蛮挑 | 欧美日韩国产精品一区 | 亚洲第一av网站 | 81精品国产乱码久久久久久 | 神马福利 | 久久久精品 | 丁香婷婷综合激情五月色 | 超碰3| 一二三四av | 1000部精品久久久久久久久 | 欧美一级精品片在线看 | 日韩精品视频在线 | 日日综合 | 中文字幕一区二区三区四区不卡 | 成人在线播放网站 | 成年人在线电影 | 成人a在线| 一区二区三区四区在线播放 | 偷拍自拍网站 | 久久精品视频在线观看 | 日韩一区中文字幕 | 亚洲国产精品成人无久久精品 | 亚洲视频在线一区 | 亚洲色图综合 | 久久亚洲天堂 | 91在线免费视频 | 久久久成人一区二区免费影院 | 日韩成人在线视频 | 亚洲欧美精品在线 | 天堂av在线影院 | 成人久久久久久久久 | 日韩一区二区免费视频 |