/*copyright 2007,ShangHai  HaoTun Electronic Technology co.,Ltd
 *
 *This sample is used for control light by infrared .
 *
 *write by Shifang
 *
 *V1.1
 */
 //使用12M晶振 適用于TC9012芯片，其他芯片請自行更改解碼時序
#include<reg52.h>
#include<stdio.h>
#include<intrins.h>

////////////////////////////////////////////////
#define TURE 1
#define FALSE 0

////////////////////////////////////////////////

sbit IR=P3^2;//紅外接口標志


////////////////////////////////////////////

unsigned char  irtime;//紅外用全局變量

bit irpro_ok,irok;
unsigned char IRcord[4];
unsigned char   irdata[33];

//////////////////////////////////////////////

void Delay(unsigned char mS);
void Ir_work(void);
void Ircordpro(void);

//////////////////////////////////////////////////////////////////  

void tim0_isr (void) interrupt 1 using 1//定時器0中斷服務函數
{
  irtime++;
}

///////////////////////////////////////////////////////////////////////
void ex0_isr (void) interrupt 0 using 0//外部中斷0服務函數
{
  static unsigned char  i;
  static bit startflag;

 if(startflag)
 {
   
    if(irtime<42&&irtime>=33)//引導碼 TC9012的頭碼
            i=0;
     
    		irdata[i]=irtime;//一次存儲32位電平寬度
    		irtime=0;
    		i++;
   			 if(i==33)
      			{
	  			 irok=1;
				 i=0;
	  			}
          }
	 
  	 else
		{irtime=0;startflag=1;}

}

////////////////////////////////////////////////////////////////////
void TIM0init(void)//定時器0初始化
{

  TMOD=0x02;//定時器0工作方式2，TH0是重裝值，TL0是初值
  TH0=0x00;//reload value
  TL0=0x00;//initial value
  ET0=1;//開中斷
  TR0=1;
}
///////////////////////////////////////////////////////////////////
void EX0init(void)
{
 IT0 = 1;   // Configure interrupt 0 for falling edge on /INT0 (P3.2)
 EX0 = 1;   // Enable EX0 Interrupt
 EA = 1;  
}
/****************************************************************/

/******************************************************************/

  void Ir_work(void)//紅外鍵值散轉程序
  {
       switch(IRcord[2])//判斷第三個數碼值
	         {
			 case 0:P0=0xf9;break;//1 顯示相應的按鍵值
			 case 1:P0=0xa4;break;//2
			 case 2:P0=0xb0;break;//3
			 case 3:P0=0x99;break;//4
			 case 4:P0=0x92;break;//5
			 case 5:P0=0x82;break;//6
			 case 6:P0=0xf8;break;//7
			 case 7:P0=0x80;break;//8
			 case 8:P0=0x90;break;//9

			 }

   

		  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
		    {
             value=value|0x80;
			}
          else 
		    {
             value=value;
			}
          if(j<8)
		    {
			 value=value>>1;
			}
           k++;
         }
     IRcord[i]=value;
     value=0;     
     } irpro_ok=1;//處理完畢標志位置1
    
}




/////////////////////////////////////////////////////////////////

void main(void)
{
 EX0init(); // Enable Global Interrupt Flag
 TIM0init();//初始化定時器0

 P2=0x00;//8位數碼管全部顯示

 while(1)//主循環
   {
    if(irok)
	  {   
	   Ircordpro();//碼值處理
 	   irok=0;
	  }

    if(irpro_ok)//step press key
	  {
	   Ir_work();//碼值識別散轉
  	  }
   }
}