红外解码程序（用1602显示码值）

void int0init()//外部中断O初始化,按P3。2
{
IT0=1;//设为下降沿触发方式。IT0=0为低电平触发。因为红外输入高时，接收为低，要从低开始计时
EX0=1;//外部中断打开
EA=1;//总中断打开
}

void irpros()//红外提取处理程序
{
uchar i,k,j,irvalue;
k=1;//第一k=0是引导码，不须要。所以从K=1开始提取编码，把K=0的引导码去掉
for(j=0;j<4;j++)//共有四个码，所以循环四次
{
for(i=0;i<8;i++)//每个码八位，循环八次
{
irvalue=irvalue>>1;//irvalue低位在前，高位在后，所以右移，判断8次，右移7次
if(irdata[k]>6)//如果两个中断的时间为1.125MS，说明传的是0，1.125/0.255=4.4个irtime,
//如果两个中断的时间为1.125MS，说明传的是1，2.25/0.255=8.8个irtime,
//我取中断值6；如果irdata大于6，说明是1，小于6说明是0；
{
irvalue=irvalue|0x80;
}
k++;//每提一次，K自增一次，一共要33次
}
ircode[j]=irvalue;
}
irprosok=1;
beep=0;
delay(3);
beep=1;
}
void irwork()
{
disp[0]=ircode[0]/16;//取高四位
disp[1]=ircode[0]%16;//取低四位
disp[2]=ircode[1]/16;//取高四位
disp[3]=ircode[1]%16;//取低四位
disp[4]=ircode[2]/16;//取高四位
disp[5]=ircode[2]%16;//取低四位
disp[6]=ircode[3]/16;//取高四位
disp[7]=ircode[3]%16;//取低四位
}
void display()
{
write_com(0x80);
write_dat(Tab[disp[0]]);
write_dat(Tab[disp[1]]);
write_dat(Tab[disp[2]]);
write_dat(Tab[disp[3]]);
write_dat(Tab[disp[4]]);
write_dat(Tab[disp[5]]);
write_dat(Tab[disp[6]]);
write_dat(Tab[disp[7]]);
}
void main()
{
init_1602();
timer0init();
int0init();
while(1)
{
if(irreceok)//判断接收是否OK
{
irpros();//接收OK就要处理.把数据从irdata中提出来
irreceok=0;//要把irreceok清0，为下一次接收做准备
}
if(irprosok)
{
irwork();//如果处理OK，把数据分离，可以去显示
irprosok=0;//要把irprosok清0，为下一次处理做准备
}
display();//显示函数还没写，有待完善

}

}

void timer0() interrupt 1//定时器0中断函数
{
irtime++;/*irtime为字符型，最大为255，输入开始时读一次irtime
然后清0，结束再读一次，irtime乘以255就是一次扫描定时的时间*/
}
void int0() interrupt 0//外部中断0函数，这是关键
{
if(startflag)//如果startflag=1就开始接数据
{
if(irtime>30) //接收引导码,引导码有9MS，9/0.256=33.15，在这就取32即可
//说明这时检测到了引导码
{
bitnum=0;//收到引导码后，bitnum清O准备装数据
}
irdata[bitnum]=irtime;//第1个bitnum=0的数据被装入数组。
irtime=0;//清0就不会对下次有影响
bitnum++; //不停地给数组加入新数据

if(bitnum==33)//如果bitmun=33，说明一帧数据传完
{
bitnum=0;//bitnum清0为接收下一帧做准备
irreceok=1;//主函数只要判断irreceok是否为1做出后面的决定
}

}
else //
{
startflag=1;
irtime=0;
}
}