用51單片機接三接管放大來控制紅外線發射,接受用紅外接收管,
在光譜中波長自760nm至400um的電磁波稱為紅外線,它是一種不可見光。目前幾乎所有的視頻和音頻設備都可以通過紅外遙控的方式進行遙控,比如電視機、空調、影碟機等,都可以見到紅外遙控的影子。這種技術應用廣泛,相應的應用器件都十分廉價,因此紅外遙控是我們日常設備控制的理想方式。
0.png (47.47 KB, 下載次數: 55)
下載附件
2018-8-31 18:41 上傳
紅外發射與接受電路原理圖如下,用了一個三極管來放大電流:
0.png (246.46 KB, 下載次數: 38)
下載附件
2018-8-31 18:41 上傳
0.png (254.05 KB, 下載次數: 41)
下載附件
2018-8-31 18:42 上傳
0.jpg (44.33 KB, 下載次數: 31)
下載附件
2018-8-31 18:42 上傳
0.png (228.5 KB, 下載次數: 47)
下載附件
2018-8-31 18:42 上傳
紅外線(發送)單片機源程序如下:
- #include <reg52.h>
- #define uchar unsigned char
- #define uint unsigned int
- sbit out=P1^5;//發送IO口
- void delay(uint xms)
- {
- uint i,j;
- for(i=xms;i>0;i--) //i=xms即延時約xms毫秒
- for(j=112;j>0;j--);
- }
- void delay560us(void) //560us延遲函數
- {
- uint j;
- for(j=63;j>0;j--);
- }
- void delay4500us(void) //4.5ms延遲函數
- {
- uint j;
- for(j=516;j>0;j--);
- }
- void khz_2(uint num) //38KHZ脈沖 占空比1:2
- {
- for(;num>0;num--)
- {
- // _nop_();
- out=~out;
- }
- }
- void send0_a(void) //發送0
- {
- khz_2(42) ;
- //khz_3(21) ;
- out=1;
- delay560us();
- }
- void send1_a(void) //發送1
- {
- khz_2(42) ;
- //khz_3(21) ;
- out=1;
- delay560us();
- delay560us();
- delay560us();
- }
- void leadcode_a(void) //發送引導碼
- {
- khz_2(690) ;
- //khz_3(345) ;
- out=1;
- delay4500us();
- }
- const uchar TabHL1[12]={0x30,0x18,0x7a,0x10,0x38,0x5a,0x42,0x4a,0x52,0x00,0xff,0xa6};//數據碼碼表1-9&2字節用戶碼
- void Send8Bit(uchar d) //發送一字節數據
- {
- if(d&0x80){ send1_a();}
- else{ send0_a();}
- if(d&0x40){ send1_a();}
- else{ send0_a();}
- if(d&0x20){ send1_a();}
- else{ send0_a();}
- if(d&0x10){ send1_a();}
- else{ send0_a();}
- if(d&0x08){ send1_a();}
- else{ send0_a();}
- if(d&0x04){ send1_a();}
- else{ send0_a();}
- if(d&0x02){ send1_a();}
- else{ send0_a();}
- if(d&0x01){ send1_a();}
- else{ send0_a();}
- }
- void usercode_xuexiban() //發送用戶碼 00FF
- {
- Send8Bit(TabHL1[9]);
- Send8Bit(TabHL1[10]);
- }
- void xuexiban_1() //00110000 發送”1“的全部信號
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[0]);
- Send8Bit(TabHL1[0]);
- }
- void xuexiban_2() //00011000
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[1]);
- Send8Bit(TabHL1[1]);
- }
- void xuexiban_3() //01111010
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[2]);
- Send8Bit(TabHL1[2]);
- }
- void xuexiban_4() //00010000
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[3]);
- Send8Bit(TabHL1[3]);
- }
- void xuexiban_5() //00111000
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[4]);
- Send8Bit(TabHL1[4]);
- }
- void xuexiban_6() //01011010
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[5]);
- Send8Bit(TabHL1[5]);
- }
- void xuexiban_7() //01000010
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[6]);
- Send8Bit(TabHL1[6]);
- }
- void xuexiban_8() //01001010
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[7]);
- Send8Bit(TabHL1[7]);
- }
- void xuexiban_9() //01010010
- {
- leadcode_a();
- usercode_xuexiban();
- Send8Bit(TabHL1[8]);
- Send8Bit(TabHL1[8]);
- }
- void keyscan() //按鍵掃描函數
- {
- uchar temp;
- P3=0xf0;
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0){
- P3=0xfe;
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0)
- {
- delay(10);
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0)
- {
- temp=P3;
- switch(temp)
- {
- case 0xee:
- xuexiban_1();
- break;
- case 0xde:
- xuexiban_2();
- break;
- case 0xbe:
- xuexiban_3();
- break;
- case 0x7e:
- xuexiban_4();
- break;
- }
- while(temp!=0xf0)
- {
- temp=P3;
- temp=temp&0xf0;
- }
-
- }
- }
- P3=0xfd;
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0)
- {
- delay(10);
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0)
- {
- temp=P3;
- switch(temp)
- {
- case 0xed:
- xuexiban_5();
- break;
- case 0xdd:
- xuexiban_6();
- break;
- case 0xbd:
- xuexiban_7();
- break;
- case 0x7d:
- xuexiban_8();
- break;
- }
- while(temp!=0xf0)
- {
- temp=P3;
- temp=temp&0xf0;
-
- }
- }
- }
- P3=0xfb;
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0)
- {
- delay(10);
- temp=P3;
- temp=temp&0xf0;
- if(temp!=0xf0)
- {
- temp=P3;
- switch(temp)
- {
- case 0xeb:
- xuexiban_9();
- break;
- }
- while(temp!=0xf0)
- {
- ……………………
- …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼
紅外線(接收)的單片機源程序:
- /**********************BST-V51實驗開發板例程************************
- * 平臺:BST-V51 + Keil U3 + STC89C52
- * 名稱:紅外接收模塊實驗
- * 公司:深圳市亞博軟件開發有限公司
- * 淘寶:bstmcu.taobao.com
- * 日期:2013-11
- * 晶振:11.0592MHZ
- * 說明:免費開源,不提供源代碼分析.
- ******************************************************************/
- /*-----------------------------------------------
- 名稱:遙控器紅外解碼數碼管顯示
- 內容:按配套遙控器上1-9會在數碼管上對應顯示
- ------------------------------------------------*/
- #include<reg52.h> //包含頭文件,一般情況不需要改動,頭文件包含特殊功能寄存器的定義
- sbit IR=P3^2; //紅外接口標志
- #define DataPort P0 //定義數據端口 程序中遇到DataPort 則用P0 替換
- sbit LATCH1=P2^6;//定義鎖存使能端口 段鎖存
- sbit LATCH2=P2^7;// 位鎖存
- /*------------------------------------------------
- 全局變量聲明
- ------------------------------------------------*/
- unsigned char code dofly_DuanMa[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};// 顯示段碼值0~9
- unsigned char irtime;//紅外用全局變量
- bit irpro_ok,irok;
- unsigned char IRcord[4];
- unsigned char irdata[33];
- /*------------------------------------------------
- 函數聲明
- ------------------------------------------------*/
- void Ir_work(void);
- void Ircordpro(void);
- /*------------------------------------------------
- 定時器0中斷處理
- ------------------------------------------------*/
- void tim0_isr (void) interrupt 1 using 1
- {
- irtime++; //用于計數2個下降沿之間的時間
- }
- /*------------------------------------------------
- 外部中斷0中斷處理
- ------------------------------------------------*/
- void EX0_ISR (void) interrupt 0 //外部中斷0服務函數
- {
- static unsigned char i; //接收紅外信號處理
- static bit startflag; //是否開始處理標志位
- if(startflag)
- {
- if(irtime<63&&irtime>=33)//引導碼 TC9012的頭碼,9ms+4.5ms
- i=0;
- irdata[i]=irtime;//存儲每個電平的持續時間,用于以后判斷是0還是1
- irtime=0;
- i++;
- if(i==33)
- {
- irok=1;
- i=0;
- }
- }
- else
- {
- irtime=0;
- startflag=1;
- }
- }
- /*------------------------------------------------
- 定時器0初始化
- ------------------------------------------------*/
- void TIM0init(void)//定時器0初始化
- {
- TMOD=0x02;//定時器0工作方式2,TH0是重裝值,TL0是初值
- TH0=0x00; //重載值
- TL0=0x00; //初始化值
- ET0=1; //開中斷
- TR0=1;
- }
- /*------------------------------------------------
- 外部中斷0初始化
- ------------------------------------------------*/
- void EX0init(void)
- {
- IT0 = 1; //指定外部中斷0下降沿觸發,INT0 (P3.2)
- EX0 = 1; //使能外部中斷
- EA = 1; //開總中斷
- }
- /*------------------------------------------------
- 鍵值處理
- ------------------------------------------------*/
- void Ir_work(void)//紅外鍵值散轉程序
- {
- switch(IRcord[2])//判斷第三個數碼值
- {
- case 0x0c:DataPort=dofly_DuanMa[1];break;//1 顯示相應的按鍵值
- case 0x18:DataPort=dofly_DuanMa[2];break;//2
- case 0x5e:DataPort=dofly_DuanMa[3];break;//3
- case 0x08:DataPort=dofly_DuanMa[4];break;//4
- case 0x1c:DataPort=dofly_DuanMa[5];break;//5
- case 0x5a:DataPort=dofly_DuanMa[6];break;//6
- case 0x42:DataPort=dofly_DuanMa[7];break;//7
- case 0x52:DataPort=dofly_DuanMa[8];break;//8
- case 0x4a:DataPort=dofly_DuanMa[9];break;//9
- default:break;
- }
- irpro_ok=0;//處理完成標志
- }
- /*------------------------------------------------
- 紅外碼值處理
- ------------------------------------------------*/
- void Ircordpro(void)//紅外碼值處理函數
- {
- unsigned char i, j, k;
- unsigned char cord,value;
- k=1;
- for(i=0;i<4;i++) //處理4個字節
- {
- for(j=1;j<=8;j++) //處理1個字節8位
- {
- cord=irdata[k];
- if(cord>7)//大于某值為1,這個和晶振有絕對關系,這里使用12M計算,此值可以有一定誤差
- value|=0x80;
- if(j<8)
- {
- value>>=1;
- }
- k++;
- }
- IRcord[i]=value;
- value=0;
- }
- irpro_ok=1;//處理完畢標志位置1
- }
- /*------------------------------------------------
- 主函數
- ------------------------------------------------*/
- void main(void)
- {
- EX0init(); //初始化外部中斷
- TIM0init();//初始化定時器
- DataPort=0xfe; //取位碼 第一位數碼管選通,即二進制1111 1110
- LATCH2=1; //位鎖存
- LATCH2=0;
- while(1)//主循環
- {
- if(irok) //如果接收好了進行紅外處理
- {
- Ircordpro();
- irok=0;
- }
- if(irpro_ok) //如果處理好后進行工作處理,如按對應的按鍵后顯示對應的數字等
- {
- Ir_work();
- }
- }
- }
復制代碼
所有資料51hei提供下載:
第17講 紅外線發送與接收.rar
(288.44 KB, 下載次數: 209)
2018-8-31 15:52 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|