+

51单片机配套C程序

/********************************************************************************
*  描述:                                                                       *
*         lcd1602显示 遥控键值读取器                                           *
*         lcd1602显示 遥控器接p3.2                                             *
*         喇叭接p1.5  继电器接p1.4                                             *
*         17(40h)键按下，继电器吸合。19(04h)键按下，继电器关闭。               *
*         连接方法：使用红外功能时 J1跳线短接                                                                        *
*******************************************************************************/
#include <reg51.h>

sbit IRIN = P3^2;         //红外接收器数据线
sbit RELAY= P1^4;         //继电器驱动线
sbit BEEP = P1^5;         //蜂鸣器驱动线

void IRdelay(char x);  //x*0.14MS
void beep();

unsigned char  IRCOM[7];
extern unsigned char Y0;
/*******************************************************************/
void IRInit()
{
    IE |= 0x81;                 //允许总中断中断,使能 INT0 外部中断
    TCON |= 0x01;               //触发方式为脉冲负边沿触发
    
    IRIN=1;                    //I/O口初始化
    RELAY=1; 	
} 

/**********************************************************/
void IR_IN(void) interrupt 0 
{
  unsigned char j,k,N=0;
     EX0 = 0;   
	 IRdelay(15);
	 if (IRIN==1) 
     { EX0 =1;
	   return;
	  } 
                           //确认IR信号出现
  while (!IRIN)            //等IR变为高电平，跳过9ms的前导低电平信号。
    {IRdelay(1);}

 for (j=0;j<4;j++)         //收集四组数据
 { 
  for (k=0;k<8;k++)        //每组数据有8位
  {
   while (IRIN)            //等 IR 变为低电平，跳过4.5ms的前导高电平信号。
     {IRdelay(1);}
    while (!IRIN)          //等 IR 变为高电平
     {IRdelay(1);}
     while (IRIN)           //计算IR高电平时长
      {
    IRdelay(1);
    N++;           
    if (N>=30)
	 { EX0=1;
	 return;}                  //0.14ms计数过长自动离开。
      }                        //高电平计数完毕                
     IRCOM[j]=IRCOM[j] >> 1;                  //数据最高位补“0”
     if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80;}  //数据最高位补“1”
     N=0;
  }//end for k
 }//end for j
   
   if (IRCOM[2]!=~IRCOM[3])
   { EX0=1;
     return; }

   IRCOM[5]=IRCOM[2] & 0x0F;     //取键码的低四位
   IRCOM[6]=IRCOM[2] >> 4;       //右移4次，高四位变为低四位

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

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

	 if(IRCOM[2]==0x4c) RELAY=0; //打开继电器
	 else RELAY=1;               //关闭继电器

	  beep();

/*
;================================
;******  红外遥控器键值表  ******

;  4c     0e      4d      0d
;  0f     4f      4e      0c
;  0b     4b      4a      08
;  48     12      16      4C
;  40     48      04      00
;  02     05      54      4D
;  0A     1E      0E      1A
;  1C     14      0F      0C
;================================  */

	 Y0=0;
	 switch(IRCOM[2])
	 {
	   case 0x0C: Y0=1; break;
	   case 0x18: Y0=2; break;
	   case 0x5E: Y0=3; break;
	   case 0x08: Y0=4; break;
	   case 0x1C: Y0=5; break;
	   case 0x5A: Y0=6; break;
	   case 0x42: Y0=7; break; 
	   case 0x52: Y0=8; break;
	   case 0x4A: Y0=9; break;
	   case 0x16: Y0=0; break;		   
   
	 } 

     EX0 = 1; 	
} 


/**********************************************************/
void IRdelay(unsigned char x)    //x*0.14MS
{
 unsigned char i;
  while(x--)
 {
  for (i = 0; i<13; i++) {}
 }
}




void beep()
{
  unsigned char i;
  for (i=0;i<100;i++)
   {
   IRdelay(4);
   BEEP=!BEEP;                 //BEEP取反
   } 
  BEEP=1;                      //关闭蜂鸣器
}