STC89C52单片机红外遥控器解码

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

#include
#include

#define uchar unsigned char
#define uint  unsigned int

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

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

#define BUSY  0x80                               //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() interrupt 2
{
 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;  //打开中断，解码完成，以进行下次解码
}