红外发射单片机(原理与设计程序)
用AT89S51单片机制作红外电视遥控器
一般红外电视遥控器的输出都是用编码后串行数据对38～40kHz的方波进行脉冲幅度调制而产生的。
当发射器按键按下后，即有遥控码发出，所按的键不同遥控编码也不同。这种遥控码具有以下特征：
采用脉宽调制的串行码，以脉宽为0.565ms、间隔0.56ms、周期为1.125ms 的组合表示二进制的“0”；以脉宽为0.565ms、间隔1.685ms、周期为2.25ms 的组合表示二进制的“1”。
上述“0”和“1”组成的32位二进制码经38kHz的载频进行二次调制，然后再通过红外发射二极管产生红外线向空间发射。一般电视遥控器的遥控编码是连续的32位二进制码组，其中前16位为用户识别码，能区别不同的红外遥控设备，防止不同机种遥控码互相干扰。后16位为8位的操作码和8位的操作反码，用于核对数据是否接收准确。
根据红外编码的格式，发送数据前需要先发送9ms的起始码和4.5ms的结果码。
遥控串行数据编码波形如下图所示：
接收方一般使用TL0038一体化红外线接收器进行接收解码，当TL0038接收到38kHz红外信号时，输出端输出低电平，否则为高电平。所以红外遥控器
发送红外信号时，参考上面遥控串行数据编码波形图，在低电平处发送38kHz 红外信号，高电平处则不发送红外信号。
单片机红外电视遥控器电路图如下：
C51程序代码：
#include
static bit OP;//红外发射管的亮灭
static unsigned int count;//延时计数器
static unsigned int endcount; //终止延时计数
static unsigned char flag;//红外发送标志
sbit P3_2=P3^2; //红外发送端
char iraddr1;//十六位地址的第一个字节
char iraddr2;//十六位地址的第二个字节
void SendIRdata(char p_irdata);
void delay();
void main(void)
{
count = 0;
flag = 0;
OP = 0;
P3_2 = 0;
EA = 1; //允许CPU中断
TMOD = 0x11; //设定时器0和1为16位模式1
ET0 = 1; //定时器0中断允许
TH0 = 0xFF;
TL0 = 0xE6; //设定时值0为38K 也就是每隔26us中断一次TR0 = 1;//开始计数
iraddr1=3;
iraddr2=252;
do{
delay();
SendIRdata(12);
}while(1);
}
//定时器0中断处理
void timeint(void) interrupt 1
{
TH0=0xFF;
TL0=0xE6; //设定时值为38K 也就是每隔26us中断一次count++;
if (flag==1)
{
OP=~OP;
}
else
{
OP = 0;
}
P3_2 = OP;
}
void SendIRdata(char p_irdata) {
int i;
char irdata=p_irdata;
//发送9ms的起始码endcount=223;
flag=1;
count=0;
do{}while(count flag=0; count=0; do{}while(count for(i=0;i<8;i++) { //先发送0.56ms的38KHZ红外波（即编码中0.56ms的低电平）endcount=10; flag=1; count=0; do{}while(count //停止发送红外信号（即编码中的高电平） if(irdata-(irdata/2)*2)//判断二进制数个位为1还是0 { endcount=41;//1为宽的高电平 } else { endcount=15;//0为窄的高电平 } flag=0; count=0; do{}while(count irdata=irdata>>1; } //发送十六位地址的后八位 irdata=iraddr2; { endcount=10; flag=1; count=0; do{}while(count if(irdata-(irdata/2)*2) { endcount=41; } else { endcount=15; } flag=0; count=0; do{}while(count irdata=irdata>>1; } //发送八位数据 irdata=p_irdata; { endcount=10; flag=1; count=0; do{}while(count if(irdata-(irdata/2)*2) { endcount=41; } else { endcount=15; } flag=0; count=0; do{}while(count irdata=irdata>>1; } //发送八位数据的反码 irdata=~p_irdata;