/****************************************************************
程序:NEC格式脉宽测量方式红外解码程序
CPU :At89c52
时钟:12MHz
端口:P3.3
编译:keil c51 8.08A
描述: 适用uPC1621/uPC1622及兼容的红外遥控器芯片,占用外部中断0和定时器1,
          以中断方式解码,节省系统资源,以查询方式检测遥控信号是否有效.

解码思路: 红外线经一体化接受头解码放到后送到单片机的外部中断1,单片机
          设置外部中断下降沿触发,T0和T1为16位定时器,T0在系统启动后定
          时5ms.T0 在外部中断1启动后开始定时,初值为0,每次在INT1中断后
          先读T0计数值,并重设初值为0,而且判断T0的计数值,
版本：v0.01
作者:jason.lee
Mail:boyljx@126.com
Blog:Http://hi.baidu.com/mcu_zone
建立时间:2008.02.23
******************************************************************/

//************inculde file*************
#include "At89x52.h"
//*************************************
#define uchar unsigned char 
#define uint unsigned int
#define ulong unsigned long
//*************************************
#define IR_SYSCODE1 0x00     
#define IR_SYSCODE2 0x01
#define HEAD_WIDTH_MAX 13662   //12592   //11.0592 中间为12442(9+4.5=13.5MS)
#define HEAD_WIDTH_MIN 13336   //12292   //12292
#define REPEAT_WIDTH_MAX 11411 //10517 //11.0592 中间为10367(9+2.25=11.25MS)
#define REPEAT_WIDTH_MIN 11085 //10217 //10217
#define LOW_WIDTH_MAX 1395     //1286    //11.0592   1036(1.125MS)
#define LOW_WIDTH_MIN 852      //786
#define HIGHT_WIDTH_MAX 2576   //2374 //2224 //11.0592   2074(2.25MS)
#define HIGHT_WIDTH_MIN 1924   //1774//1924

//**********************数码管变量******************************
#define Dot_EA (P0_5=0)
uchar DATA_7SEG[18]={0x28,0xeb,0x32,0xa2,0xe1,
                     0xa4,0x24,0xea,0x20,0xa0,0x60,0x25,0x3c,0x23,0x34,0x74,0xf7,0xff}; /*0~9的数码管段码*/
      //0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,-, ,
uchar act[4]={0x7f,0xbf,0xdf,0xef}; /*四位数码管的位选码*p2.7-p2.6-p2.5-p2.4*/
uchar x[4];
//*****************************************************************

uchar count;
volatile bit sFlag;

//*******全局变量******************************************
volatile bit IR_Flag;               //接收成功标志,易变！！
volatile bit IR_Repeat;             //重码标志
unsigned char IR_Data;                //解出来的遥控码
//*********************函数声明****************************

void Cpu_init(void);             //中断设置
void Seg4_Led_Disp(uint Num);
void Ir_Dbg(uchar ir_get);
void wait_timer(unsigned char i);
void delay_Nms(unsigned char u);
//********联合定义*****************************************
union IR_code
{
unsigned long int IR_32data;
unsigned char IR_data[4];
}IR;

/****************************************************************
功能:精确延时
描述: 精确延时时间=2*i*T+5*T **
参数:比如晶振采用12M，那么delay(50);延时时间=2*50*1uS+5*1uS=105uS
返回:无
******************************************************************/
void wait_timer(unsigned char i)     
{                                  
     while(--i);
}

void delay_Nms(unsigned char u)
{
     unsigned char i;
   
     for(i=0; i     wait_timer(50);
       
}
/****************************************************************
功能:数字显示+点小数点
描述:0.0.0.0. P0.5=0,P2.7=0|P0.5=0,P2.6=0|P0.5=0,P2.5=0|P0.5=0,P2.4=0 
参数:uint Num 为4位十进制数，uchar W_dot为四位小数点选择
返回:无
******************************************************************/
void Seg4_Led_Disp(uint Num,uchar W_dot)
{ 
uchar i;
x[0]=Num/1000;   //取千位
x[1]=Num/100%10; //取百位
x[2]=Num/10%10; //取十位
x[3]=Num%10;   //取个位
   for(i=0;i<4;i++)
   {
           P0=DATA_7SEG[x[i]]; 
       P2=act[i];delay_Nms(1);P2=0xff;
       if(i==2)
       {
           switch(W_dot)
           {
               case 0: break;
               case 1:   Dot_EA;P2_4=0;delay_Nms(1);P2_4=1; break;
               case 2:   Dot_EA;P2_5=0;delay_Nms(1);P2_5=1; break;
               case 3:   Dot_EA;P2_6=0;delay_Nms(1);P2_6=1; break;
               case 4:   Dot_EA;P2_7=0;delay_Nms(1);P2_7=1; break;
               default:break;
           
           }
       }
   }

}
/****************************************************************
功能:遥控解码显示
描述:for debug to display ir data code
参数:无
返回:无
******************************************************************/
void Ir_Dbg(uchar ir_get)    
{
       P0=DATA_7SEG[ir_get/0x10];
       P2_7=0;delay_Nms(1);P2_7=1;
       P0=DATA_7SEG[ir_get%0x10];
       P2_6=0;delay_Nms(1);P2_6=1;
}

/****************************************************************
功能:中断函数
描述:定时器0的中断服务程序
参数:无
返回:无
******************************************************************/
void Time0_Serv() interrupt 1 using 3
{
   count++;
    TL0=0x78;
   TH0=0xec;//5ms
   if (count==100){count=0;sFlag=1;}
}

/****************************************************************
功能:中断函数遥控获取
描述:定时器1的中断服务程序,用做红外遥控解码
参数:无
返回:无
******************************************************************/
void IR_Int1_Serv()interrupt 2 using 3//一定要注意使用using ,如果堆栈不一致会死掉。
{
    static unsigned char IR_INT0_counter;//中断次数
    static unsigned int IR_width; //时间长度

    if (IR_INT0_counter>34)//中断总次数为34次
        IR_INT0_counter=0; 
   IR_width=TL0|(TH0<<8); //IR_width=TL1+TH1*256;
    IR_INT0_counter++; 
    TL0=0; //将T1置0
   TH0=0;
   if(IR_INT0_counter==1) //如果是第一次进中断，退出。
   return; 
   if(IR_INT0_counter==2)
       { 
           if((IR_width>HEAD_WIDTH_MAX)||(IR_width            { 
               IR_INT0_counter=0;   
                return;
           }
            else if ((IR_widthREPEAT_WIDTH_MIN))//如果是11.25说明是重码
                    {
                       IR_INT0_counter=0;
                        IR_Repeat=1; 
                        //IR_Flag=1;//实际应用中注意此处标志！！！！！！！！！！！！
                        return;            
                   }
       }

    else
       {    
             IR.IR_32data<<=1;
             if ((IR_widthLOW_WIDTH_MIN)) ; //说明为0
             else if((IR_width>HIGHT_WIDTH_MIN)&&(IR_width                 IR.IR_32data|=0x01; 
              else 
              {      
                       IR_INT0_counter=0;
                        return;   
               }
           
              if (IR_INT0_counter==34)
               {   
                      if(IR.IR_data[3]==~IR.IR_data[2])//((IR.IR_data[0]==IR_SYSCODE1)&&(IR.IR_data[1]==IR_SYSCODE2)&&(IR.IR_data[3]==~IR.IR_data[2]))
                          {       
                           IR_Flag=1;
                           IR_INT0_counter=0; 
                           IR_Data=IR.IR_data[2];
                           return; 
                       }            
               }
           

        }

}
/****************************************************************
功能:CPU初始化设置
描述:
参数:无
返回:无
******************************************************************/
void Cpu_init(void)
{
TMOD=TMOD|0x11;//定时器工作在方式1
IT1 = 1;//下降沿触发
EX1 = 1;//打开外中断
TR1 = 1; //打开定时器1，但不允许其中断
//PX1 = 1;//外部中断1优先顺序,高
TL0=0x78;
TH0=0xec;//5ms
TR0=1;
ET0=1;
EA=1;   //中断总开关
}

/****************************************************************
功能:主函数
描述:
参数:无
返回:无
******************************************************************/
void Main(void)
{
   Cpu_init();
   P3=0xff;   //准双向口做为输入
   while(1)
   {
            
            //Seg4_Led_Disp(IR_Data);
           Ir_Dbg(IR_Data);
           if(IR_Flag)//遥控
               {   
                   switch(IR_Data)
                       { 
                              case 0x80:P1_0=~P1_0;break;
                           case 0x40:P1_1=~P1_1;break;
                           case 0xc0:P1_2=~P1_2;break;
                           case 0x20:P1_3=~P1_3;break;
                           case 0xa0:P1_4=~P1_4;break;
                           case 0x60:P1_5=~P1_5;break;
                           default:break;
                          }
                   IR_Flag=0;
                  
                   }
       //-----------------------------------------------------------------------------------
           if(IR_Repeat)
              {
                   IR_Repeat=0;
                   if(sFlag)       //长按键处理，每1秒动作一次
                   {   sFlag=0;
                       switch(IR_Data)
                       {
                           case 0xe0:P1_6=~P1_6;break;
                           case 0x10:P1_7=~P1_7;break;                                               
                       }
                   }               
               }

   }
}