STC89C52单片机红外遥控器解码

实现功能：按实验板所佩带的红外遥控器上面的数字键，把红外遥控器的代码显
示在1602液晶上面，通过此实验也可测试你手上所用红外遥控器的代
码编号，一定注意要跟红外探测头的距离不要太远，而且
程序里只编写了遥控器上的数字键的部分
实验板型号：KBL-XYD-C52
实验名称：红外控制1602液晶的显示
编写人：谢应东
编写日期：2012-5-3
//////////////////////////////////////////////////////////////////////////

#include
#include

#define uchar unsigned char
#define uintunsigned int

sbit IR = P3^3;//红外接收器数据线

uchar code string0[] = {"IR REMOTE CONTROL"}; //定义要显示在1602上的字符串
uchar code string1[] = {"IR-CODE: 0X--H"};//定义要显示在1602上的字符串

#define BUSY0x80//lcd忙检测标志
#define LCD_DATAPORT P0//定义P0口为LCD通讯端口

sbit Duan=P2^6;//定义数码管的段选使能端
sbit Wei =P2^7;//定义数码管的位选使能端

#define Digital_tube_Wei_Enable Wei=1;//开启控制数码管的位选使能端
#define Digital_tube_Wei_Disable Wei=0;//关闭控制数码管的位选使能端

#define Digital_tube_Duan_Enable Duan=1;//开启控制数码管的段选使能端
#define Digital_tube_Duan_Disable Duan=0;//关闭控制数码管的段选使能端

sbit LCD_RS=P3^4;//数据/命令端
sbit LCD_RW=P3^5;//读/写选择端
sbit LCD_EN=P3^6;

uchar cIRReceiveData[7];
//////////////////////////////////////////////////////////////////////////

函数名称：毫秒延时函数
函数功能：实现毫秒级的延时
参数介绍：Delay_MS: 定义需要延时的毫秒的数值
iNumber: 记录Delay_MS的数值，以for语句实现所要求的延时
iValue: 要延时毫秒所要进行的循环数值，本数值为实际测得
返回值：无
注意事项：本实验是在所用晶振为12M的前提下实现的毫秒延时，本函数是通过循环的形
式完成，所以如果改变了晶振的频率，请做相应的改变
//////////////////////////////////////////////////////////////////////////

void DelayMs(uint Delay_MS)
{
uint iNumber,iValue;
for(iNumber=0;iNumber //用for语句实现单片机的延时
{
iValue=107;//107这个数值是通过测定而得
while(iValue--);
}
}
//////////////////////////////////////////////////////////////////////////

函数名称：Delay
函数功能：延时0.14毫秒，主要是用于红外解码
参数介绍：cDelay：延时0.14ms的次数
返回值：无
注意事项：无
//////////////////////////////////////////////////////////////////////////

void Delay(unsigned char cDelay)//x*0.14MS
{
unsigned char cNumber;
while(cDelay--)
{
for (cNumber=0;cNumber<13;cNumber++) {}
}
}
///////////////////////////////////////////////////////////////////////////
函数名称：ReadStatusLCD
函数功能：检测液晶是否忙碌
参数介绍：无
返回值：LCD_DATAPORT
注意事项：无
//////////////////////////////////////////////////////////////////////////

unsigned char ReadStatusLCD()
{
LCD_DATAPORT=0xff;
LCD_RS=0;
LCD_RW=1;
LCD_EN=0;
LCD_EN=0;
LCD_EN=1;
while(LCD_DATAPORT&BUSY);
return(LCD_DATAPORT);
}
//////////////////////////////////////////////////////////////////////////

函数名称：WriteCommandLCD
函数功能：根据1602液晶的时序，通过单片机给1602液晶写一些相关的命令
参数介绍：cCommand：要写入的1602液晶命令
cBusy：1602液晶是否空闲的标志
返回值：无
注意事项：无
//////////////////////////////////////////////////////////////////////////

void WriteCommandLCD(uchar cCommand,uchar cBusy)
{
if(cBusy)ReadStatusLCD();//检测忙信号
LCD_DATAPORT=cCommand;//要写入的指令
LCD_RS=0;// 选中指令寄存器
LCD_RW=0;// 写模式
LCD_EN=1;// 开启1602液晶使能端
_nop_();// 等待写入指令
_nop_();
_nop_();
LCD_EN=0;// 关闭1602液晶使能端
}
//////////////////////////////////////////////////////////////////////////
函数名称：WriteDataLCD
函数功能：根据1602液晶的时序，通过单片机给1602写入想要写入的数据
参数介绍：cData：要写入1602的数据
返回值：无
注意事项：无
//////////////////////////////////////////////////////////////////////////

void WriteDataLCD(uchar cData)
{
ReadStatusLCD();
LCD_DATAPORT=cData;
LCD_RS=1;// 选中数据寄存器
LCD_RW=0;// 写模式
LCD_EN=1;// 打开1602液晶使能端
_nop_();// 等待写入数据
_nop_();
_nop_();
LCD_EN=0;// 关闭1602液晶使能端
}
//////////////////////////////////////////////////////////////////////////

函数名称：Initial_LCD
函数功能：设置单片机的外部中断0和中断1，具体的设置状态都为外部低电平触发，并
且开总中断
参数介绍：无
返回值：无
注意事项：无
//////////////////////////////////////////////////////////////////////////
void Initial_LCD()
{

Digital_tube_Wei_Enable;
LCD_DATAPORT=0xff;
Digital_tube_Wei_Disable;

Digital_tube_Duan_Enable;
LCD_DATAPORT=0X00;
DelayMs(2);
Digital_tube_Duan_Disable;


LCD_DATAPORT=0;
DelayMs(15);
WriteCommandLCD(0x38,0);//三次显示模式设置，不检测忙信号
DelayMs(5);
WriteCommandLCD(0x38,0);
DelayMs(5);
WriteCommandLCD(0x38,0);
DelayMs(5);

WriteCommandLCD(0x38,1);//8bit数据传送，2行显示，5*7字型，检测忙信号
WriteCommandLCD(0x08,1);//关闭显示，检测忙信号
WriteCommandLCD(0x01,1);//清屏，检测忙信号
WriteCommandLCD(0x06,1);//显示光标右移设置，检测忙信号
WriteCommandLCD(0x0c,1);//显示屏打开，光标不显示，不闪烁，检测忙信号
}
//////////////////////////////////////////////////////////////////////////

函数名称：DisplayOneCharLCD
函数功能：按指定位置显示一个字符,比如说数字，英文字母等
参数介绍：cXCoord：要显示字符在某一行当中的位置
cYCoord：要显示字符在液晶中的行数，比如说第一行或第二行
cData：要显示的字符，比如说1、a等
返回值：无
注意事项：限制cXCoord不能大于15，cYCoord不能大于1
//////////////////////////////////////////////////////////////////////////

void DisplayOneCharLCD(uchar cXCoord,uchar cYCoord,uchar cData)
{
cYCoord&=1;//取cYCoord的第一位，其他的全部设置成0
if(cYCoord)cXCoord|=0x40;//若y为1,显示第一行，地址码+0X40
cXCoord|=0x80;//若不为1，则显示第二行，地址码+0X80
WriteCommandLCD(cXCoord,0);//把写入的地址送到1602液晶
WriteDataLCD(cData);//写入要写入的数据
}
//////////////////////////////////////////////////////////////////////////
函数名称：DisplayListCharLCD
函数功能：按指定位置显示一串字符，比如说显示 abcdefg，123456等
参数介绍：cXCoord：要显示字符在某一行当中的位置
cYCoord：要显示字符在液晶中的行数，比如说第一行或第二行
cData：要显示的字符串，比如说123456、adcdgd等
返回值：无
注意事项：制cXCoord不能大于15，cYCoord不能大于1
//////////////////////////////////////////////////////////////////////////

void DisplayListCharLCD(uchar cXCoord,uchar cYCoord,uchar code *Data)
{
uchar ListLength=0;//要显示字符串的长度
cYCoord&=0x01;//取cYCoord的第一位，其他的全部设置成0
cXCoord&=0x0f;
while(cXCoord<16)//循环写入要写入的字符串
{
DisplayOneCharLCD(cXCoord,cYCoord,Data[ListLength]);
ListLength++;
cXCoord++;
}
}
//////////////////////////////////////////////////////////////////////////
函数名称：Init_INT1
函数功能：配置外部中断1，让其为下降沿触发，同时打开全局中断
参数介绍：无
返回值：无
注意事项：无
//////////////////////////////////////////////////////////////////////////

void Init_INT1()
{
IT1=1; //外部中断1，为下降沿触发
EX1=1; //允许外部中断1中断
EA=1;//CPU开放中断
}
//////////////////////////////////////////////////////////////////////////

函数名称：main
函数功能：初始化外部中断1以及1602液晶，同时把预先写好的字符串显示到1602上面，
然后进入while循环里，等待中断的发生
参数介绍：无
返回值：无
注意事项：实验板上所用的数码管为共阴极数码管
//////////////////////////////////////////////////////////////////////////

void main()
{
Init_INT1();//初始化外部中断1

IR=1;//I/O口初始化
Initial_LCD(); //初始化1602液晶
DisplayListCharLCD(0,0,string0); //显示字符预写好的字符串
DisplayListCharLCD(0,1,string1); //显示字符预写好的字符串
while(1);
}
//////////////////////////////////////////////////////////////////////////
函数名称：IR_Routine
函数功能：对红外接收头接收到的红外信号进行解码，解码后，把遥控器上的数字显示
在数码管上
参数介绍：无
返回值：无
注意事项：具体的协议，请看光盘里所带的名为“红外控制”的数据手册
//////////////////////////////////////////////////////////////////////////

void IR_Routine()interrupt2
{
unsigned char cNumber1,cNumber2,cCount=0;
EX1 = 0;//关闭中断
Delay(15);
if (IR==1)//然后再检测红线接收脚是有数据招收，有继续，没有则退出
{
EX1 =1;//打开中断
return;//跳出去
}

while (!IR)//确认IR信号出现
{//等IR变为高电平，跳过9ms的前导低电平信号。
Delay(1);
}

for (cNumber1=0;cNumber1<4;cNumber1++) //收集四组数据，前两组为地址码，仅
{//仅接着是两个命令码，这是NEC公司所定义的协议里规定的
for (cNumber2=0;cNumber2<8;cNumber2++)//每组数据有8位
{
while (IR)//等 IR 变为低电平，跳过4.5ms的前导高电平信号。
{
Delay(1);
}
while (!IR)//等 IR 变为高电平
{
Delay(1);
}
while (IR)//计算IR高电平时长
{
Delay(1);
cCount++;
if (cCount>=30)
{
EX1=1;
return;
}//太长了就自动推出中断服务程序
}//高电平计数完毕
cIRReceiveData[cNumber1]=cIRReceiveData[cNumber1] >> 1;//数据最高位补“0”
if(cCount>=8)//协议里定义‘1’的电平为2.25ms，因为Delay(1)延时为0.14ms
{//加上其他指令执行时的延时，所以大于等于8时，为高电平
cIRReceiveData[cNumber1] = cIRReceiveData[cNumber1] | 0x80;
}//数据最高位补“1”
cCount=0;
}//end for k
}//end for j
if(cIRReceiveData[2]!=~cIRReceiveData[3])//判断接收到指令是不是正确，协议里规定
{//第一次发指令和第二次发的正好的按位取反的，以此保证接收数据的可靠性
EX1=1;
return;
}
cIRReceiveData[5]=cIRReceiveData[2] & 0x0F;//取键码的低四位
cIRReceiveData[6]=cIRReceiveData[2] >> 4;//右移4次，高四位变为低四位

if(cIRReceiveData[5]>9)//把接收到的数据转换成1602上面能显示的ASCII码
{//具体请看ASCII码表，看转换的关系
cIRReceiveData[5]=cIRReceiveData[5]+0x37;
}
else
cIRReceiveData[5]=cIRReceiveData[5]+0x30;

if(cIRReceiveData[6]>9)
{
cIRReceiveData[6]=cIRReceiveData[6]+0x37;
}
else
cIRReceiveData[6]=cIRReceiveData[6]+0x30;

DisplayOneCharLCD(13,1,cIRReceiveData[6]); //显示接收到数据的第一位
DisplayOneCharLCD(14,1,cIRReceiveData[5]); //显示接收到数据的第二位
EX1 = 1;//打开中断，解码完成，以进行下次解码
}