程序案例：

//晶振11.0592MHz（因為要做串口通信）
//紅外發光管輸出1導通，輸出0截止（加三極管的情況下），這時0為不發送數據的電平
//不推薦將I/O口直接接到發射管負極，如果真的這樣接，那麼引導碼就變成了9ms低電平和4.5ms高電平了，這時1為不發送數據的電平
#include <reg52.h>
#define BIT(n) 1<<n //這是AVR單片機裏面的宏
sbit SENDER=P1^0;
sbit LED=P2^0;
//延遲0.5ms(460個時鐘單位）
void delay_500us()
{
 TH0=0xfe; //FE33H
 TL0=0x33;
 TF0=0; //溢出標誌位
 TR0=1; //定時器的開關
 while (TF0==0); //等待定時器溢出
 TR0=0; //關掉定時器
}
//延遲560us(516個時鐘單位)
void delay_560us()
{
 TH0=0xfd; //FDFBH
 TL0=0xfb;
 TF0=0; //溢出標誌位
 TR0=1; //定時器的開關
 while (TF0==0); //等待定時器溢出
 TR0=0; //關掉定時器
}
//延遲1ms（精確）(921個時鐘單位)
void delay_1ms()
{
 TH0=0xfc; //FC66
 TL0=0x66;
 TR0=1; //定時器的開關
 TF0=0; //溢出標誌位
 while (TF0==0); //等待定時器溢出
 TR0=0; //關掉定時器
}
//延遲n毫秒
void delay_ms(unsigned int n)
{
 while (n--)
  delay_1ms();
}
//引導碼
void send_first()
{
 //對於I/O口接在三極管基極上的電路，輸出高電平時紅外二極管亮
 //9ms高電平（亮）和4.5ms低電平（不亮）
 SENDER=1;
 delay_ms(9);
 SENDER=0;
 delay_ms(4);
 delay_500us();
 //完畢後保持低電平，使發射管不亮
}
void send_0()
{
 SENDER=1;
 delay_560us(); //高電平標準值516
 SENDER=0;
 delay_560us(); //低電平標準值516
 //操作完畢後發射管應該置為低電平，熄滅發射管
}
void send_1()
{
 SENDER=1;
 delay_560us(); //高電平標準值516(0.56ms)
 SENDER=0;
 delay_560us(); //低電平標準值1548(1.68ms)
 delay_560us();
 delay_560us();
}
void send_byte(unsigned char value)
{
 unsigned char i;
 for (i=0;i<8;i++)
 {
  if ((value&BIT(i))!=0)
   send_1();
  else
   send_0();
 }
}
//此函數發射的代碼為亂碼，無意義
//主要防止出錯
void send_end()
{
 delay_ms(100);
 SENDER=1;
 delay_ms(2);
 delay_500us();
 SENDER=0;
 delay_ms(10);
}
void main()
{
 unsigned char code1=0x80;
 unsigned char code2=0x80;
 TMOD=0x01; //定時器模式1
 TR0=0; //關定時器T0
 SENDER=0; //熄滅發射管
 LED=1;
 P2=0xff;
 P1=0xff;
 LED=0;
 delay_ms(500);
 LED=1;
 delay_ms(500);
 while (1)
 {
  send_first();
  send_byte(code1);
  send_byte(~code1);
  send_byte(code2);
  send_byte(~code2);
  send_end(); //等100ms後再發射一次亂碼，避免第二次發射無法接收而第三次可以接收的錯誤
  LED=0;
  delay_ms(1000);
  LED=1;
  delay_ms(1000);
  code1--;
  code2++;
 }
}

以下是紅外遙控解碼：

//本解碼程序適用於NEC的upd6121及其兼容晶片的解碼，支持大多數遙控器 實驗板採用11.0592MHZ晶振
#include<reg52.h>       //包含單片機寄存器的頭文件
#include<intrins.h>  //包含_nop_()函數定義的頭文件
sbit IR=P3^2;           //將IR位定義為P3.2引腳
sbit RS=P2^0;    //寄存器選擇位，將RS位定義為P2.0引腳
sbit RW=P2^1;    //讀寫選擇位，將RW位定義為P2.1引腳
sbit E=P2^2;     //使能信號位，將E位定義為P2.2引腳
sbit BF=P0^7;    //忙碌標誌位，，將BF位定義為P0.7引腳
sbit BEEP = P3^6; //蜂鳴器控制端口P36
unsigned char flag;
unsigned char code string[ ]= {"1602IR-CODE TEST"};
unsigned char a[4];    //儲存用戶碼、用戶反碼與鍵數據碼、鍵數據反碼
unsigned int LowTime,HighTime; //儲存高、低電平的寬度
/*****************************************************
函數功能：延時1ms
***************************************************/
void delay1ms()
{
   unsigned char i,j; 
  for(i=0;i<10;i++)
   for(j=0;j<33;j++)
    ;  
 }
 /*****************************************************
函數功能：延時若干毫秒
入口參數：n
***************************************************/
 void delay(unsigned char n)
 {
   unsigned char i;
 for(i=0;i<n;i++)
    delay1ms();
 }
 
/*********************************************************/
void beep()  //蜂鳴器響一聲函數
{
  unsigned char i;
  for (i=0;i<100;i++)
   {
   delay1ms();
   BEEP=!BEEP;       //BEEP取反
   }
   BEEP=1;           //關閉蜂鳴器
   delay(250);       //延時    
}
 

/*****************************************************
函數功能：判斷液晶模塊的忙碌狀態
返回值：result。result=1，忙碌;result=0，不忙
***************************************************/
 unsigned char BusyTest(void)
  {
    bit result;
 RS=0;       //根據規定，RS為低電平，RW為高電平時，可以讀狀態
    RW=1;
    E=1;        //E=1，才允許讀寫
    _nop_();   //空操作
    _nop_();
    _nop_();
    _nop_();   //空操作四個機器周期，給硬件反應時間 
    result=BF;  //將忙碌標誌電平賦給result
 E=0;
    return result;
  }
/*****************************************************
函數功能：將模式設置指令或顯示地址寫入液晶模塊
入口參數：dictate
***************************************************/
void WriteInstruction (unsigned char dictate)
{  
    while(BusyTest()==1); //如果忙就等待
  RS=0;                  //根據規定，RS和R/W同時為低電平時，可以寫入指令
  RW=0;  
  E=0;                   //E置低電平(根據表8-6，寫指令時，E為高脈衝，
                             // 就是讓E從0到1發生正跳變，所以應先置"0"
  _nop_();
  _nop_();             //空操作兩個機器周期，給硬件反應時間
  P0=dictate;            //將數據送入P0口，即寫入指令或地址
  _nop_();
  _nop_();
  _nop_();
  _nop_();               //空操作四個機器周期，給硬件反應時間
  E=1;                   //E置高電平
  _nop_();
  _nop_();
  _nop_();
  _nop_();               //空操作四個機器周期，給硬件反應時間
   E=0;                  //當E由高電平跳變成低電平時，液晶模塊開始執行命令
 }
/*****************************************************
函數功能：指定字符顯示的實際地址
入口參數：x
***************************************************/
 void WriteAddress(unsigned char x)
 {
     WriteInstruction(x|0x80); //顯示位置的確定方法規定為"80H+地址碼x"
 }
/*****************************************************
函數功能：將數據(字符的標準ASCII碼)寫入液晶模塊
入口參數：y(為字符常量)
***************************************************/
 void WriteData(unsigned char y)
 {
    while(BusyTest()==1); 
   RS=1;           //RS為高電平，RW為低電平時，可以寫入數據
   RW=0;
   E=0;            //E置低電平(根據表8-6，寫指令時，E為高脈衝，
                       // 就是讓E從0到1發生正跳變，所以應先置"0"
   P0=y;           //將數據送入P0口，即將數據寫入液晶模塊
   _nop_();
   _nop_();
    _nop_();
     _nop_();       //空操作四個機器周期，給硬件反應時間
   E=1;          //E置高電平
   _nop_();
   _nop_();
   _nop_();
  _nop_();        //空操作四個機器周期，給硬件反應時間
  E=0;            //當E由高電平跳變成低電平時，液晶模塊開始執行命令
 }
/*****************************************************
函數功能：對LCD的顯示模式進行初始化設置
***************************************************/
void LcdInitiate(void)
{
   delay(15);             //延時15ms，首次寫指令時應給LCD一段較長的反應時間
   WriteInstruction(0x38);  //顯示模式設置：16×2顯示，5×7點陣，8位數據接口
 delay(5);   //延時5ms　
 WriteInstruction(0x38);
 delay(5);
 WriteInstruction(0x38);
 delay(5);
 WriteInstruction(0x0C);  //顯示模式設置：顯示開，有光標，光標閃爍
 delay(5);
 WriteInstruction(0x06);  //顯示模式設置：光標右移，字符不移
 delay(5);
 WriteInstruction(0x01);  //清屏幕指令，將以前的顯示內容清除
 delay(5);
 }
/************************************************************
函數功能：對4個字節的用戶碼和鍵數據碼進行解碼
說明：解碼正確，返回1，否則返回0
出口參數：dat
*************************************************************/
bit DeCode(void)       
{
   
   unsigned char  i,j;
 unsigned char temp;    //儲存解碼出的數據
 for(i=0;i<4;i++)      //連續讀取4個用戶碼和鍵數據碼
   {
   for(j=0;j<8;j++)  //每個碼有8位數字
    {
          temp=temp>>1;  //temp中的各數據位右移一位，因為先讀出的是高位數據         
      TH0=0;         //定時器清0
      TL0=0;         //定時器清0
      TR0=1;         //開啟定時器T0
        while(IR==0)   //如果是低電平就等待
                ;       //低電平計時
        TR0=0;         //關閉定時器T0
      LowTime=TH0*256+TL0;    //保存低電平寬度
      TH0=0;         //定時器清0
      TL0=0;         //定時器清0
      TR0=1;         //開啟定時器T0
      while(IR==1)   //如果是高電平就等待
          ;     
      TR0=0;        //關閉定時器T0
      HighTime=TH0*256+TL0;   //保存高電平寬度
      if((LowTime<300)||(LowTime>640))
           return 0;        //如果低電平長度不在合理範圍，則認為出錯，停止解碼   
      if((HighTime>420)&&(HighTime<700))   //如果高電平時間在560微秒左右，即計數560／1.085＝516次
              temp=temp&0x7f;       //(520-100=420, 520+100=620)，則該位是0
      //if((HighTime>1300)&&(HighTime<1800)) //如果高電平時間在1680微秒左右，即計數1680／1.085＝1548次
      else
              temp=temp|0x80;       //(1550-250=1300,1550+250=1800),則該位是1
       }                
    a[i]=temp; //將解碼出的字節值儲存在a[i]                     
    }         
  /*if(a[2]=~a[3])  //驗證鍵數據碼和其反碼是否相等,一般情況下不必驗證用戶碼
  return 1;     //解碼正確，返回1*/
 return 1;
}
/*------------------二進制碼轉換為壓縮型BCD碼,並顯示---------------*/
void two_2_bcd(unsigned char date)
{
   unsigned char temp;
   temp=date;
   date&=0xf0;
   date>>=4;                    //右移四位得到高四位碼
   date&=0x0f;                  //與0x0f想與確保高四位為0
   if(date<=0x09)
   {                
     WriteData(0x30+date);            //lcd顯示鍵值高四位
   }
   else
   {
     date=date-0x09;
  WriteData(0x40+date);
   }
   date=temp;
   date&=0x0f;
   if(date<=0x09)
   {
     WriteData(0x30+date);            //lcd顯示低四位值
   }
   else
   {
     date=date-0x09;
  WriteData(0x40+date);
   }
   WriteData(0x48);                 //顯示字符'H'
}
/************************************************************
函數功能：1602LCD顯示
*************************************************************/
void Disp(void)
{ 
    WriteAddress(0x40);  // 設置顯示位置為第一行的第1個字
      two_2_bcd(a[0]);
   WriteData(0x20);
   two_2_bcd(a[1]);
    WriteData(0x20);
   two_2_bcd(a[2]);
     WriteData(0x20);
   two_2_bcd(a[3]);
 
}
/************************************************************
函數功能：主函數
*************************************************************/
void main()
{
    unsigned char i; 
 LcdInitiate();         //調用LCD初始化函數 
    delay(10);
     WriteInstruction(0x01);//清顯示：清屏幕指令
  WriteAddress(0x00);  // 設置顯示位置為第一行的第1個字
    i = 0;
  while(string[i] != '\0')    //'\0'是數組結束標誌
   {      // 顯示字符 WWW.RICHMCU.COM
    WriteData(string[i]);
    i++; 
   }
 EA=1;        //開啟總中斷
   EX0=1;       //開外中斷0
   ET0=1;       //定時器T0中斷允許
   IT0=1;       //外中斷的下降沿觸發 
    TMOD=0x01;   //使用定時器T0的模式1 
 TR0=0;       //定時器T0關閉
   while(1);   //等待紅外信號產生的中斷
  
}
/************************************************************
函數功能：紅外線觸發的外中斷處理函數
*************************************************************/
void Int0(void) interrupt 0
  {
     EX0=0;      //關閉外中斷0，不再接收二次紅外信號的中斷，只解碼當前紅外信號
   TH0=0;      //定時器T0的高8位清0
   TL0=0;      //定時器T0的低8位清0
   TR0=1;     //開啟定時器T0 
   while(IR==0);          //如果是低電平就等待，給引導碼低電平計時
   TR0=0;                //關閉定時器T0    
   LowTime=TH0*256+TL0;  //保存低電平時間
   TH0=0;      //定時器T0的高8位清0
   TL0=0;      //定時器T0的低8位清0
   TR0=1;     //開啟定時器T0
   while(IR==1);  //如果是高電平就等待，給引導碼高電平計時
   TR0=0;        //關閉定時器T0
   HighTime=TH0*256+TL0; //保存引導碼的高電平長度
     if((LowTime>7800)&&(LowTime<8800)&&(HighTime>3600)&&(HighTime<4700))
   {
      //如果是引導碼,就開始解碼,否則放棄,引導碼的低電平計時
        //次數＝9000us/1.085=8294, 判斷區間:8300－500＝7800，8300＋500＝8800.
       if(DeCode()==1) // 執行遙控解碼功能
   {
  
    Disp();//調用1602LCD顯示函數
    beep();//蜂鳴器響一聲 提示解碼成功
   }
   }
   EX0=1;   //開啟外中斷EX0
  }
 
 

三樓的程序有一個缺點，就是按下遙控器的按鍵後主程序就會停止運行，程序卡死在中斷服務程序裏面。

可以試試下面的程序解決這個問題：

const unsigned char IRBREAK=0xff;
unsigned char IRcode[4]; //儲存用戶碼、用戶反碼與鍵數據碼、鍵數據反碼

void StopDecode()
{
 EX0=1;
 TH1=0;
 TL1=0;
 TR1=0;
}
bit decode(void)      
{
 unsigned int LowTime,HighTime;
 unsigned char i,j;
 unsigned char temp; //儲存解碼出的數據
 for (i=0;i<4;i++) //連續讀取4個用戶碼和鍵數據碼
 {
  for (j=0;j<8;j++) //每個碼有8位數字
  {
   temp=temp>>1; //temp中的各數據位右移一位，因為先讀出的是高位數據
   TH1=0;
   TL1=0;
   TR1=1;
   while (IR==0)
   {
    if (TH1>=IRBREAK)
    {
     StopDecode();
     return 0;
    }
   }
   TR1=0;
   LowTime=TH1*256+TL1; //保存低電平寬度
   TH1=0;
   TL1=0;
   TR1=1;
   while (IR==1)
   {
    if (TH1>=IRBREAK)
    {
     StopDecode();
     return 0;
    }
   }
   TR1=0;
   HighTime=TH1*256+TL1; //保存高電平寬度
   if ((LowTime<370)||(LowTime>640))
    return 0; //如果低電平長度不在合理範圍，則認為出錯，停止解碼
   if ((HighTime>420)&&(HighTime<620)) //如果高電平時間在560微秒左右，即計數560／1.085＝516次
    temp=temp&0x7f; //(520-100=420, 520+100=620)，則該位是0
   if ((HighTime>1300)&&(HighTime<1800)) //如果高電平時間在1680微秒左右，即計數1680／1.085＝1548次
    temp=temp|0x80; //(1550-250=1300,1550+250=1800),則該位是1
  }
  IRcode[i]=temp; //將解碼出的字節值儲存在a[i]                    
 }
 if (IRcode[2]==~IRcode[3]) //驗證鍵數據碼和其反碼是否相等,一般情況下不必驗證用戶碼
  return 1; //解碼正確，返回1
}
void Int0() interrupt 0
{
 unsigned int LowTime,HighTime;
 EX0=0; //關外中斷0
 TH1=0;
 TL1=0;
 TR1=1; //開啟定時器
 while (IR==0) //如果是低電平就等待，給引導碼低電平計時
 {
  if (TH1>=IRBREAK)
  {
   StopDecode();
   return;
  }
 }
 TR1=0; //關閉定時器
 LowTime=TH1*256+TL1; //保存低電平時間
 TH1=0;      //定時器T0的高8位清0
 TL1=0;      //定時器T0的低8位清0
 TR1=1;     //開啟定時器T0
 while(IR==1)  //如果是高電平就等待，給引導碼高電平計時
    {
  if (TH1>=IRBREAK)
  {
   StopDecode();
   return;
  }
 }
 TR1=0;        //關閉定時器T0
 HighTime=TH1*256+TL1; //保存引導碼的高電平長度
 if ((LowTime>7800)&&(LowTime<8800)&&(HighTime>3600)&&(HighTime<4700))
 {
  //如果是引導碼,就開始解碼,否則放棄,引導碼的低電平計時
  //次數＝9000us/1.085=8294, 判斷區間:8300－500＝7800，8300＋500＝8800.
  if (decode()==1) // 執行遙控解碼功能
   execute(); //這是相應按鍵的處理
 }
 EX0=1;   //開啟外中斷EX0
}