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

QQ登錄

只需一步,快速開始

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

單片機(jī)紅外遙控器+紅外一體化接收頭部分的Proteus仿真程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
     紅外線編碼是數(shù)據(jù)傳輸和家用電器遙控常用的一種通訊方法,其實(shí)質(zhì)是一種脈寬調(diào)制的串行通訊。家電遙控中常用的紅外線編碼電路有μPD6121G型HT622型和7461型等。
    這里就以這些電路的編碼格式來(lái)仿真怎樣使用單片機(jī)的捕獲中斷功能來(lái)實(shí)現(xiàn)其解碼。    紅外線通訊的發(fā)送部分主要是把待發(fā)送的數(shù)據(jù)轉(zhuǎn)換成一定格式的脈沖,然后驅(qū)動(dòng)紅外發(fā)光管向外發(fā)送數(shù)據(jù)。接收部分則是完成紅外線的接收、放大、解調(diào),還原成同步發(fā)射格式相同(但高、低電位剛好相反的脈沖信號(hào))。這些工作通常由一體化的接收頭來(lái)完成,主要輸出TTL兼容電平。最后通過(guò)解碼把脈沖信號(hào)轉(zhuǎn)換成數(shù)據(jù),從而實(shí)現(xiàn)數(shù)據(jù)的傳輸。
   本單元就是來(lái)完成一體化接收頭接受到的紅外遙控器編碼后的輸出數(shù)據(jù),所以只要單片機(jī)完成本單元的解碼任務(wù),并成功實(shí)現(xiàn)之后,只要將IR引腳接上紅外接收頭之后就可以實(shí)現(xiàn)紅外遙控的功能了。
  這是我積累前人經(jīng)驗(yàn)和自己實(shí)踐的成果,并且已經(jīng)有硬件的成功案例,并非只是理論.


單片機(jī)源程序如下:
  1. #include "At89x51.h"
  2. #include "stdio.h"
  3. #include "stdlib.h"
  4. #include "string.h"

  5. #define JINGZHEN 48
  6. #define TIME0TH ((65536-100*JINGZHEN/12)&0xff00)>>8   //time0,100us,紅外遙控
  7. #define TIME0TL ((65536-100*JINGZHEN/12)&0xff)
  8. #define TIME1TH ((65536-5000*JINGZHEN/12)&0xff00)>>8   
  9. #define TIME1TL ((65536-5000*JINGZHEN/12)&0xff)
  10. #define uchar unsigned char
  11. #define uint  unsigned int

  12. code uchar  BitMsk[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80,};

  13. uint IrCount=0,Show=0,Cont=0;
  14. uchar IRDATBUF[32],s[20];
  15. uchar IrDat[5]={0,0,0,0,0};
  16. uchar IrStart=0,IrDatCount=0;
  17. extern void initLCM( void);                                                                                                       //LCD初始化子程序
  18. extern void DisplayListChar(uchar X,uchar Y, unsigned char *DData);                    //顯示指定坐標(biāo)的一串字符子函數(shù)

  19. void timer1int (void)  interrupt 3  using 3{         //定時(shí)器1
  20. EA=0;
  21. TH1 = TIME1TH;  
  22. TL1 = TIME1TL;
  23. Cont++;
  24. if(Cont>10)Show=1;
  25. EA=1;
  26. }
  27. void timer0int (void)  interrupt 1  using 1{         //定時(shí)器0
  28.         uchar i,a,b,c,d;
  29.         EA=0;
  30.         TH0 = TIME0TH;  
  31.         TL0 = TIME0TL;
  32.         if(IrCount>500)IrCount=0;
  33.         if(IrCount>300&&IrStart>0){IrStart=0;IrDatCount=0;IrDat[0]=IrDat[1]=IrDat[2]=IrDat[3]=0;IrCount=0;}
  34.         if(IrStart==2)
  35.         {
  36.                 IrStart=3;
  37.                 for(i=0;i<IrDatCount;i++)
  38.                 {
  39.                         if(i<32)
  40.                         {
  41.                                 a=i/8;

  42.                                 b=IRDATBUF[i];
  43.                                 c=IrDat[a];
  44.                                 d=BitMsk[i%8];
  45.                                 if(b>5&&b<14)c|=d;
  46.                                 if(b>16&&b<25)c&=~d;
  47.                                 IrDat[a]=c;
  48.                         }
  49.                 }
  50.                 if(IrDat[2]!=~IrDat[3])
  51.                 {
  52.                  IrStart=0;IrDatCount=0;IrDat[0]=IrDat[1]=IrDat[2]=IrDat[3]=0;IrCount=0;
  53.                  
  54.                 }
  55.                 EA=1;
  56.                 return;
  57.         }
  58.         IrCount++;
  59.         EA=1;
  60. }
  61. void int0() interrupt 0  using 0  {
  62.         EA=0;
  63.         if(IrStart==0)
  64.         {
  65.           IrStart=1;IrCount=0;TH0 = TIME0TH;TL0 = TIME0TL;
  66.           IrDatCount=0;EA=1;
  67.           return;
  68.         }
  69.         if(IrStart==1)
  70. ……………………

  71. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

Keil代碼與Proteus7.5 ; 8.13仿真下載:
紅外遙控模擬.7z (71.82 KB, 下載次數(shù): 50)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

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

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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