单片机C语言实例：24、红外通讯
一、红外接收原理
程序实例1：
#include //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
sbit LED = P1^0;// 用sbit 关键字 定义 LED到P1.0端口，LED是自己任意定义且容易记忆的符号
sbit IR_IN = P3^2;
/*------------------------------------------------
主函数
------------------------------------------------*/
void main (void)
{
while (1) //主循环
{
LED=IR_IN;
}
} 二、红外解码数码管显示
程序实例2：
#include //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
sbit IR=P3^2; //红外接口标志
#define DataPort P0 //定义数据端口 程序中遇到DataPort 则用P0 替换
sbit LATCH1=P2^2;//定义锁存使能端口 段锁存
sbit LATCH2=P2^3;// 位锁存
/*------------------------------------------------
全局变量声明
------------------------------------------------*/
unsigned char code 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 0:DataPort=DuanMa[1];break;//1 显示相应的按键值
case 1:DataPort=DuanMa[2];break;//2
case 2:DataPort=DuanMa[3];break;//3
case 3:DataPort=DuanMa[4];break;//4
case 4:DataPort=DuanMa[5];break;//5
case 5:DataPort=DuanMa[6];break;//6
case 6:DataPort=DuanMa[7];break;//7
case 7:DataPort=DuanMa[8];break;//8
case 8:DataPort=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();
}
}
} 三、红外发射原理
程序实例3：
#include //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
sbit IRSend=P1^2; //定义红外发射
sbit IRRev =P3^2; //接收接口
sbit LED = P1^6; //演示LED
void Init_Timer0(void);//定时器初始化
/*------------------------------------------------
主函数
------------------------------------------------*/
void main (void)
{
Init_Timer0();
while (1) //主循环
{
LED = IRRev; //接收值反应到LED
}
}
/*------------------------------------------------
定时器初始化子程序
------------------------------------------------*/
void Init_Timer0(void)
{
TMOD |= 0x01; //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响
//TH0=0x00; //给定初值
//TL0=0x00;
EA=1; //总中断打开
ET0=1; //定时器中断打开
TR0=1; //定时器开关打开
}
/*------------------------------------------------
定时器中断子程序
------------------------------------------------*/
void Timer0_isr(void) interrupt 1
{
TH0=0; //重新赋值 65.536ms
TL0=0;
IRSend=!IRSend;//发射管电平取反，表明以周期 65.536x2 ms时间闪烁
} 四、红外收发测试
程序实例4：
#include //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
sbit IRSend_A=P1^2; //定义红外发射 A
sbit IRSend_B=P1^3; //定义红外发射 B
sbit IRRev =P3^2; //接收接口
sbit LED_A = P1^6; //演示LED A
sbit LED_B = P1^7; //演示LED B
bit Flag;
void Init_Timer0(void);//定时器初始化
void DelayUs2x(unsigned char t);
/*------------------------------------------------
主函数
------------------------------------------------*/
void main (void)
{
unsigned char i,pulse_num;
Init_Timer0();
IRSend_A=0; //关闭2个发射管
IRSend_B=0;
while (1) //主循环
{
if(Flag)
{
pulse_num=0; //脉冲计数
for(i=0;i<10;i++)
{
IRSend_A=1;//打开A发射
DelayUs2x(150);
if(! IRRev)
pulse_num++;
IRSend_A=0;//关闭A发射
DelayUs2x(150);
}
if(pulse_num>6)
LED_A=0;//如果判断有障碍，点亮LED_A指示，否则熄灭
else
LED_A=1;
pulse_num=0;//清零脉冲计数
for(i=0;i<10;i++)
{
IRSend_B=1;//打开B发射
DelayUs2x(150);
if(! IRRev)
pulse_num++;
IRSend_B=0;//关闭B发射
DelayUs2x(150);
}
if(pulse_num>6)
LED_B=0;//如果判断有障碍，点亮LED_B指示，否则熄灭
else
LED_B=1;
}
}
}
/*------------------------------------------------
定时器初始化子程序
------------------------------------------------*/
void Init_Timer0(void)
{
TMOD |= 0x01; //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响
//TH0=0x00; //给定初值
//TL0=0x00;
EA=1; //总中断打开
ET0=1; //定时器中断打开
TR0=1; //定时器开关打开
}
/*------------------------------------------------
定时器中断子程序
------------------------------------------------*/
void Timer0_isr(void) interrupt 1
{
TH0=(65536-60000)/256; //重新赋值 60ms
TL0=(65536-60000)%256;
Flag=!Flag;
}
/*------------------------------------------------
uS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编,大致延时
长度如下 T=tx2+5 uS
------------------------------------------------*/
void DelayUs2x(unsigned char t)
{
while(--t);
}