单片机模拟红外遥控器发射的C语言程序

//********************************************单片机红外发射*******************************************

#include "reg52.h"

sbit ir=P1^0;//红外发射管控制脚，使用24M晶振

sbit ka=P2^0;

sbit kb=P2^1;

unsigned int count, set_count; //中断计数，设定中断次数

bit irflag,keyflag;   //红外发送标志位,按键标志位

unsigned char irsys[]={0x00,0xff};//16位用户码

unsigned char irdata,ircode; //发送的红外数据

//---------------------------------------------------------------------------

void delay(unsigned int a)//延时约1ms，晶振24M ,此处延时不需很精确

{

unsigned char i;

while(--a!=0)

for(i=300;i>0;i--); //若是12M晶振i=125

}

//---------------------------------------------------------------------------

void keyscan() // 按键扫描

{

if(ka==0){keyflag=1;irdata=0x0a;} //a键按下，则发射数据0x0a

if(kb==0){keyflag=1;irdata=0x0b;} //b键按下，则发射数据0x0b

}

//---------------------------------------------------------------------------

void ir_sendbyte()    //红外发送一个字节数据

{

unsigned char i;

for(i=0;i<8;i++)    //发送8位数据

{

set_count=43;//35; //发送编码中的0.56ms高电平 (//后为12M晶振下的数值)

irflag=1;      //启动红外发射二极管发射

count=0;     //中断计数先清0

TR0=1;      //开启定时器0

while(count

TR0=0; //关闭定时器0

if(ircode&0x01) set_count=130;//130; //判断红外编码最低位,若为1则1.69ms的低电平 (//后为12M晶振下的数值)

else set_count=43;//35;    //为0则0.565ms的低电平 (//后为12M晶振下的数值)

irflag=0; //低电平则不发射

count=0; //中断计数清0

TR0=1; //开启定时器0

while(count

TR0=0; //关闭定时器0

ircode=ircode>>1; //将数据右移，即从低位到高位发送

}

}

//---------------------------------------------------------------------------

void ir_send() //发送红外数据

{

set_count=692;//672; //发送编码中的引导码(9ms高电平+4.5ms低电平) (//后为12M晶振下的数值)

irflag=1;    //启动红外发射二极管发射

count=0;    //中断计数清0

TR0=1;

while(count

TR0=0;

set_count=346;//336; //发送编码中的4.5ms低电平(//后为12M晶振下的数值)

irflag=0; //低电平则不发射

count=0;

TR0=1;

while(count

TR0=0;

ircode=irsys[0]; //发送16位用户码的前1-8位

ir_sendbyte();

ircode=irsys[1]; //发送16位用户码的前9-16位

ir_sendbyte();

ircode=irdata;   //发送8位数据码

ir_sendbyte();

ircode=~irdata; //发送8位数据反码

ir_sendbyte();

set_count=43;//35; //发送编码中的0.56ms高电平 (//后为12M晶振下的数值)

irflag=1;

count=0;

TR0=1;

while(count

TR0=0;

ir=1;

delay(23);    //延时23ms(编码中的23ms低电平)

set_count=692;//670; //发送编码中的引导码(9ms高电平+4.5ms低电平) (//后为12M晶振下的数值)

irflag=1;

count=0;

TR0=1;

while(count

TR0=0;

set_count=346;//336; //发送编码中的4.5ms低电平(//后为12M晶振下的数值)

irflag=0;

count=0;

TR0=1;

while(count

TR0=0;

set_count=43;//35;   //发送编码中的0.56ms高电平 (//后为12M晶振下的数值)

irflag=1;

count=0;

TR0=1;

while(count

TR0=0;

ir=1;    //发射完了关闭红外发射二极管

}

//---------------------------------------------------------------------------

void timer0_init()    //定时器初始化

{

EA=1;

TMOD=0x02;     //定时0 8位自动重装模式

ET0=1;

TH0=0xe6;//0xf3;   //定时13us,38K红外矩形波,晶振24M (//后为12M晶振下的数值)

TL0=0xe6;

}

//---------------------------------------------------------------------------

void main()

{

timer0_init(); //定时0初始化

count=0;     //中断计数先清0

irflag=0;     //红外发射标志先置0

while(1)

{

keyscan();   //键值扫描

if(keyflag)   //若有按键按下

{

delay(10);

ir_send();   //发送红外编码

delay(500);

keyflag=0;   //按键标志清零

delay(100);

}

}

}

//---------------------------------------------------------------------------

void timer0() interrupt 1 //定时器0中断

{

count++;

if(irflag==1) ir=~ir; //有发射标志，则发射38khz的矩形波

else ir=1;     //否则不发射，即相当于发射编码中的低电平

}

/*说明：本人经多次调试发现若在24M晶振下使用，发射很正常，而在12M晶振下发射的数据则稳定性要差很多，正在完善中*/

/*程序编写：落叶*/