#include <reg52.h>
#define c(x) (x*110592/120000)
sbit Ir_Pin=P3^3
unsigned char code Led_Tab[]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,
0xf8,0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E} //共阳极数码显示码0-F.
unsigned char code Led_Sel[]={0xe,0xd,0xb,0x7}
unsigned char Led_Buf[4]//显示缓冲区
char Led_Index //位选
unsigned char Ir_Buf[4]//用于保存解码结果
//==============================================================
//数码管扫描
timer0() interrupt 1 using 1
{
TL0=65536-1000
TH0=(65536-1000)/256//定时器0设定约1000us中断一次,用于数码管扫描
P0=0xff
P2=Led_Sel[Led_Index] //位选
P0=Led_Tab[Led_Buf[Led_Index]] //段选
if(++Led_Index>3) Led_Index=0 //四个扫描完了,到第一个数码管
}
//==============================================================
unsigned int Ir_Get_Low()
{
TL1=0
TH1=0
TR1=1
while(!Ir_Pin &&(TH1&0x80)==0)
TR1=0
return TH1*256+TL1
}
//=============================================================
unsigned int Ir_Get_High()
{
TL1=0
TH1=0
TR1=1
while(Ir_Pin &&(TH1&0x80)==0)
TR1=0
return TH1*256+TL1
}
//==============================================================
main()
{
unsigned int temp
char i,j
Led_Index=1
TMOD=0x11
TL0=65536-1000
TH0=(65536-1000)/256//定时器0设定约1000us中断一次,用于数码管扫描
EA=1
ET0=1
TR0=1
Led_Buf[0]=0
Led_Buf[1]=0
Led_Buf[2]=0
Led_Buf[3]=0//显示区设成0
do{
restart:
while(Ir_Pin)
temp=Ir_Get_Low()
if(temp<c(8500) || temp>c(9500)) continue//引导脉冲低电平9000
temp=Ir_Get_High()
if(temp<c(4000) || temp>c(5000)) continue//引导脉冲高电平4500
for(i=0i<4i++) //4个字节
for(j=0j<8j++) //每个字节8位
{
temp=Ir_Get_Low()
if(temp<c(200) || temp>c(800)) goto restart
temp=Ir_Get_High()
if(temp<c(200) || temp>c(2000)) goto restart
Ir_Buf[i]>>=1
if(temp>c(1120)) Ir_Buf[i]|=0x80
}
Led_Buf[0]=Ir_Buf[2]&0xf
Led_Buf[1]=(Ir_Buf[2]/16)&0xf
Led_Buf[2]=Ir_Buf[3]&0xf
Led_Buf[3]=(Ir_Buf[3]/16)&0xf//显示结果
}while(1)
}
这是采用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
***************************************************
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)