关于51单片机红外解码程序，哪位大侠帮我看下

我以前做的一个项目，红外遥控开关，解码部分的code，供参考

6121码，外部中断0，at89s52

void int0() interrupt 0 //外部中断1服务函数，红外解码程序

{

static uchar wei //定义静态变量

static uchar pp //定义静态变量

if(tt<56&&tt>50) {d2=0tt=0pp=0wei=0}//起始信号符合，将d2标记为0，各变量清零

if(tt>11)tt=0

if(d2==0&&tt>=4)

{

buf[pp]>>=1

if(tt>5) buf[pp]|=0x80 //如果时间大于780us ，则视为收到数据1

wei++

if(wei==8)

{

pp++

wei=0

if(pp==4) { pp=0d2=1} //接收满4个字节，标志位清除

} //在 d2为0期间进入中断8次，说明已经收到一个字节数据，字节号加1

}

tt=0//每次进入中断都清零

}

void timer1() interrupt 3//红外解码计时

{

tt++

}

这是采用STC12C5A60S2单片机的红外解码程序及其说明。

采用脉宽调制的串行码，以脉宽为0.565ms、间隔0.56ms、周期为1.125ms的组合表示二进制的"0"；

以脉宽为0.565ms、间隔1.685ms、周期为2.25ms的组合表示二进制的"1

上述"0"和"1"组成的32位二进制码经38kHz的载频进行二次调制以提高发射效率，

达到降低电源功耗的目的。然后再通过红外发射二极管产生红外线向空间发射

遥控编码是连续的32位二进制码组，其中前16位为用户识别码，能区别不同的电器设备，

防止不同机种遥控码互相干扰。该芯片的用户识别码固定为十六进制01H

后16位为8位 *** 作码（功能码）及其反码。

当一个键按下超过36ms，振荡器使芯片激活，将发射一组108ms的编码脉冲,这108ms发射代码由一个起始码（9ms）,

一个结果码（4.5ms）,低8位地址码（9ms~18ms）,高8位地址码（9ms~18ms）,8位数据码（9ms~18ms）

和这8位数据的反码（9ms~18ms）组成。如果键按下超过108ms仍未松开，

接下来发射的代码（连发代码）将仅由起始码（9ms）和结束码（2.5ms）组成。

解码的关键是如何识别"0"和"1"，接收端而言，"0"是0.56ms的高+0.56ms的低。"1"是1.68ms的高+0.56ms的低。

所以可以根据高电平的宽度区别"0"和"1"。当高电平出现时开始延时，0.56ms以后，若读到的电平为低，

说明该位为"0"，反之则为"1"，为了可靠起见，延时必须比0.56ms长些，但又不能超过1.12ms,否则如果该位为"0"，

读到的已是下一位的高电平，因此取（1.12ms+0.56ms）/2=0.84ms最为可靠，一般取0.84ms左右均可。

为了共用引导部分延时程序，这里用0.9ms延时。

-------------红外解码程序---------------------------

EXINT0:

PUSH ACC

PUSH PSW

PUSH 1

PUSH 2

PUSH 6

CLR EA 暂时关闭中断请求

MOV R6,#10

EXINT10:

LCALL DELAY09MS 调用900us延时子程序

JB IRIN,INTOUT1 判断P3.2是否有高电平，如果有就退出解码程序

DJNZ R6,EXINT10 循环10次，检测在900微妙中是否存在高电平。以上完成对遥控信号的9000微秒的初始低电平信号的识别。

JNB IRIN,$ 等待高电平避开9毫秒低电平引导脉冲

LCALL DELAY45MS 延时4.5毫秒

-------------接受32位代码--------------------------

MOVR1,#IRUSERL

MOVR2,#04H

EXINT101:

MOVR6,#08H 每组数据位8位

EXINT102:

JNB IRIN,$ 等待地址码第一组数据的高电平信号

LCALL DELAY09MS 高电平开始后延时判断信号此时的高/低状态

MOVC,IRIN 将P3.2引脚此时的电平状态0或1存入C中

JNCINT1OUT 如果为0跳出

LCALL DELAY1MS

INT1OUT:

MOVA,@R1

RRCA 将C中的数据0/1移入A中最低位

MOV@R1,A 将A中的数据暂存在R1

DJNZ R6,EXINT102 接受完8位代码

INCR1

DJNZ R2,EXINT101 接受完4组32位代码

--------------数据码比较-------------------------------

MOVA,IRDATAL

LCALL SENDRXDAT

MOVA,IRDATAL

CPLA

CJNE A,IRDATAH,INTOUT1 判断数码正误，不等退出

MOVIR_DAT,IRDATAL 相等则保存正确数据

MOV A,IR_DAT

LCALL SENDRXDAT

SETB IRBIT

INTOUT1:

LCALL DELAY45MS

SETB EA 允许中断

POP 6

POP 2

POP 1

POPPSW

POPACC

RETI

*****************11.0592*900=9953******************

DELAY09MS: 6

PUSH 4 4

PUSH 3 4

MOV R4,#20 2

DLY900:

MOV R3,#122 2

DJNZ R3,$ 4

DJNZ R4,DLY900 4

MOV R4,#11 2

DJNZ R4,$ 4

POP 3 3

POP 4 3

RET 4

TOTAL=9952

*****************11.0592*560=6193******************

DELAY056: 6

PUSH 4 4

PUSH 3 4

MOV R4,#12 2

DLY5600:

MOV R3,#122 2

DJNZ R3,$ 4

DJNZ R4,DLY5600 4

MOV R4,#71 2

DJNZ R4,$ 4

POP 3 3

POP 4 3

RET 4

TOTAL=6194

*****************11.0592*4500=49766****************

DELAY45MS: 6

PUSH 4 4

PUSH 3 4

MOV R4,#52 2

DLY45:

MOV R3,#236 2

DJNZ R3,$ 4

DJNZ R4,DLY45 4

MOV R4,#85 2

DJNZ R4,$ 4

POP 3 3

POP 4 3

RET 4

TOTAL=49768

*****************11.0592*1000=11059****************

DELAY1MS: 6

PUSH 4 4

PUSH 3 4

MOV R4,#20 2

DLY1MS:

MOV R3,#136 2

DJNZ R3,$ 4

DJNZ R4,DLY1MS 4

MOV R4,#8 2

DJNZ R4,$ 4

POP 3 3

POP 4 3

RET 4

TOTAL=11060

***************************************************

DELAY100US: 6

PUSH 4 4

MOV R4,#140 2

DJNZ R4,$ 4

MOV R4,#131 2

DJNZ R4,$ 4

POP 4 3

RET 4

TOTAL=1105

***************************************************

---