單片機紅外發(fā)射與接受程序源碼(io經(jīng)三極管放大后接紅外發(fā)射管)

ID:386391 · 發(fā)表于 2018-8-31 15:52

用51單片機接三接管放大來控制紅外線發(fā)射，接受用紅外接收管，

在光譜中波長自760nm至400um的電磁波稱為紅外線，它是一種不可見光。目前幾乎所有的視頻和音頻設(shè)備都可以通過紅外遙控的方式進行遙控，比如電視機、空調(diào)、影碟機等，都可以見到紅外遙控的影子。這種技術(shù)應(yīng)用廣泛，相應(yīng)的應(yīng)用器件都十分廉價，因此紅外遙控是我們?nèi)粘ＴO(shè)備控制的理想方式。

紅外發(fā)射與接受電路原理圖如下，用了一個三極管來放大電流：

紅外線（發(fā)送）單片機源程序如下:

#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
sbit out=P1^5;//發(fā)送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延遲函數(shù)
{
uint j;
for(j=63;j>0;j--);
}
void delay4500us(void) //4.5ms延遲函數(shù)
{
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) //發(fā)送0
{
khz_2(42) ;
//khz_3(21) ;
out=1;
delay560us();
}
void send1_a(void) //發(fā)送1
{
khz_2(42) ;
//khz_3(21) ;
out=1;
delay560us();
delay560us();
delay560us();
}
void leadcode_a(void) //發(fā)送引導(dǎo)碼
{
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};//數(shù)據(jù)碼碼表1-9&2字節(jié)用戶碼
void Send8Bit(uchar d) //發(fā)送一字節(jié)數(shù)據(jù)
{
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() //發(fā)送用戶碼 00FF
{
Send8Bit(TabHL1[9]);
Send8Bit(TabHL1[10]);
}
void xuexiban_1() //00110000 發(fā)送”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() //按鍵掃描函數(shù)
{
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黑下載附件…………

復(fù)制代碼

紅外線（接收）的單片機源程序：

/**********************BST-V51實驗開發(fā)板例程************************
* 平臺：BST-V51 + Keil U3 + STC89C52
* 名稱：紅外接收模塊實驗
* 公司：深圳市亞博軟件開發(fā)有限公司
* 淘寶：bstmcu.taobao.com
* 日期：2013-11
* 晶振:11.0592MHZ
* 說明：免費開源，不提供源代碼分析.
******************************************************************/
/*-----------------------------------------------
名稱：遙控器紅外解碼數(shù)碼管顯示
內(nèi)容：按配套遙控器上1-9會在數(shù)碼管上對應(yīng)顯示
------------------------------------------------*/
#include<reg52.h> //包含頭文件，一般情況不需要改動，頭文件包含特殊功能寄存器的定義
sbit IR=P3^2; //紅外接口標(biāo)志
#define DataPort P0 //定義數(shù)據(jù)端口程序中遇到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];
/*------------------------------------------------
函數(shù)聲明
------------------------------------------------*/
void Ir_work(void);
void Ircordpro(void);
/*------------------------------------------------
定時器0中斷處理
------------------------------------------------*/
void tim0_isr (void) interrupt 1 using 1
{
irtime++; //用于計數(shù)2個下降沿之間的時間
}
/*------------------------------------------------
外部中斷0中斷處理
------------------------------------------------*/
void EX0_ISR (void) interrupt 0 //外部中斷0服務(wù)函數(shù)
{
static unsigned char i; //接收紅外信號處理
static bit startflag; //是否開始處理標(biāo)志位
if(startflag)
{
if(irtime<63&&irtime>=33)//引導(dǎo)碼 TC9012的頭碼，9ms+4.5ms
i=0;
irdata[i]=irtime;//存儲每個電平的持續(xù)時間，用于以后判斷是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下降沿觸發(fā)，INT0 (P3.2)
EX0 = 1; //使能外部中斷
EA = 1; //開總中斷
}
/*------------------------------------------------
鍵值處理
------------------------------------------------*/
void Ir_work(void)//紅外鍵值散轉(zhuǎn)程序
{
switch(IRcord[2])//判斷第三個數(shù)碼值
{
case 0x0c:DataPort=dofly_DuanMa[1];break;//1 顯示相應(yīng)的按鍵值
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;//處理完成標(biāo)志
}
/*------------------------------------------------
紅外碼值處理
------------------------------------------------*/
void Ircordpro(void)//紅外碼值處理函數(shù)
{
unsigned char i, j, k;
unsigned char cord,value;
k=1;
for(i=0;i<4;i++) //處理4個字節(jié)
{
for(j=1;j<=8;j++) //處理1個字節(jié)8位
{
cord=irdata[k];
if(cord>7)//大于某值為1，這個和晶振有絕對關(guān)系，這里使用12M計算，此值可以有一定誤差
value|=0x80;
if(j<8)
{
value>>=1;
}
k++;
}
IRcord[i]=value;
value=0;
}
irpro_ok=1;//處理完畢標(biāo)志位置1
}
/*------------------------------------------------
主函數(shù)
------------------------------------------------*/
void main(void)
{
EX0init(); //初始化外部中斷
TIM0init();//初始化定時器
DataPort=0xfe; //取位碼第一位數(shù)碼管選通，即二進制1111 1110
LATCH2=1; //位鎖存
LATCH2=0;
while(1)//主循環(huán)
{
if(irok) //如果接收好了進行紅外處理
{
Ircordpro();
irok=0;
}
if(irpro_ok) //如果處理好后進行工作處理，如按對應(yīng)的按鍵后顯示對應(yīng)的數(shù)字等
{
Ir_work();
}
}
}