/*-----------------------------------------------
名称：遥控器红外解码液晶显示
------------------------------------------------*/
#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
#include<stdio.h>
#include<intrins.h>
#define TURE 1
#define FALSE 0
sbit IR=P3^2 //红外局如接口标志
sbit RS = P2^4//Pin4
sbit RW = P2^5//胡洞Pin5
sbit E = P2^6//Pin6
#define Data P0//数据端口
unsigned int hour,minute,second,count
char code Tab[16]="0123456789ABCDEF"
char data TimeNum[]=""
char data Test1[]=" "
/******************************************************************/
/*变量声明*/
/******************************************************************/
unsigned char irtime//红外用全局变量
bit irpro_ok,irok
unsigned char IRcord[4] //处理后的红外码，分别是 客户码，客户码，数据码，数据码反码
unsigned char irdata[33]//33个高低电平的时间数据
/******************************************************************/
/*函数声明*/
/******************************************************************/
void Ir_work(void)
void Ircordpro(void)
void ShowString (unsigned char line,char *ptr)
/******************************************************************/
/裤腊枯*定时器0中断服务函数 */
/******************************************************************/
void tim0_isr (void) interrupt 1 using 1//定时器0中断服务函数
{
irtime++//用于计数2个下降沿之间的时间
}
/******************************************************************/
/*外部中断0函数 */
/******************************************************************/
void ex0_isr (void) interrupt 0 using 0//外部中断0服务函数
{
static unsigned char i//接收红外信号处理
static bit startflag //是否开始处理标志位
if(startflag)
{
if(irtime<63&&irtime>=33)//引导码 TC9012的头码，9ms+4.5ms
i=0
irdata[i]=irtime//存储每个电平的持续时间，用于以后判断是0还是1
irtime=0
i++
if(i==33)
{
irok=1
i=0
}
}
else
{irtime=0startflag=1}
}
/******************************************************************/
/* 定时器0初始化*/
/******************************************************************/
void TIM0init(void)//定时器0初始化
{
TMOD=0x02//定时器0工作方式2，TH0是重装值，TL0是初值
TH0=0x00//重载值
TL0=0x00//初始化值
ET0=1 //开中断
TR0=1
}
/******************************************************************/
/* 外部中断初始化 */
/******************************************************************/
void EX0init(void)
{
IT0 = 1 //指定外部中断0下降沿触发，INT0 (P3.2)
EX0 = 1 //使能外部中断
EA = 1 //开总中断
}
/******************************************************************/
/*红外键值处理*/
/******************************************************************/
void Ir_work(void)//红外键值散转程序
{
TimeNum[5] = Tab[IRcord[0]/16] //处理客户码并显示
TimeNum[6] = Tab[IRcord[0]%16]
TimeNum[8] = Tab[IRcord[1]/16] //处理客户码并显示
TimeNum[9] = Tab[IRcord[1]%16]
TimeNum[11] = Tab[IRcord[2]/16] //处理数据码并显示
TimeNum[12] = Tab[IRcord[2]%16]
TimeNum[14] = Tab[IRcord[3]/16] //处理数据反码并显示
TimeNum[15] = Tab[IRcord[3]%16]
ShowString(1,TimeNum)//显示处理过后的码值
irpro_ok=0 //处理完成后清楚标志位
}
/******************************************************************/
/*红外解码函数处理*/
/******************************************************************/
void Ircordpro(void)//红外码值处理函数
{
unsigned char i, j, k
unsigned char cord,value
k=1
for(i=0i<4i++) //处理4个字节
{
for(j=1j<=8j++) //处理1个字节8位
{
cord=irdata[k]
if(cord>7)//大于某值为1，这个和晶振有绝对关系，这里使用12M计算，此值可以有一定误差
{
value=value|0x80
}
else
{
value=value
}
if(j<8)
{
value=value>>1
}
k++
}
IRcord[i]=value
value=0
} irpro_ok=1//处理完毕标志位置1
}
/******************************************************************/
/*微秒延时函数*/
/******************************************************************/
void DelayUs(unsigned char us)//delay us
{
unsigned char uscnt
uscnt=us>>1/* Crystal frequency in 12MHz*/
while(--uscnt)
}
/******************************************************************/
/*毫秒函数声明*/
/******************************************************************/
void DelayMs(unsigned char ms)//delay Ms
{
while(--ms)
{
DelayUs(250)
DelayUs(250)
DelayUs(250)
DelayUs(250)
}
}
/******************************************************************/
/* 写入命令函数 */
/******************************************************************/
void WriteCommand(unsigned char c)
{
DelayMs(5)// *** 作前短暂延时，保证信号稳定
E=0
RS=0
RW=0
_nop_()
E=1
Data=c
E=0
}
/******************************************************************/
/* 写入数据函数 */
/******************************************************************/
void WriteData(unsigned char c)
{
DelayMs(5) // *** 作前短暂延时，保证信号稳定
E=0
RS=1
RW=0
_nop_()
E=1
Data=c
E=0
RS=0
}
/******************************************************************/
/* 写入字节函数 */
/******************************************************************/
void ShowChar(unsigned char pos,unsigned char c)
{
unsigned char p
if (pos>=0x10)
p=pos+0xb0//是第二行则命令代码高4位为0xc
else
p=pos+0x80//是第二行则命令代码高4位为0x8
WriteCommand (p)//写命令
WriteData (c) //写数据
}
/******************************************************************/
/* 写入字符串函数 */
/******************************************************************/
void ShowString (unsigned char line,char *ptr)
{
unsigned char l,i
l=line<<4
for (i=0i<16i++)
ShowChar (l++,*(ptr+i))//循环显示16个字符
}
/******************************************************************/
/* 初始化函数 */
/******************************************************************/
void InitLcd()
{
DelayMs(15)
WriteCommand(0x38)//display mode
WriteCommand(0x38)//display mode
WriteCommand(0x38)//display mode
WriteCommand(0x06)//显示光标移动位置
WriteCommand(0x0c)//显示开及光标设置
WriteCommand(0x01)//显示清屏
}
/******************************************************************/
/* 主函数 */
/******************************************************************/
void main(void)
{
EX0init()//初始化外部中断
TIM0init()//初始化定时器
InitLcd()//初始化液晶
DelayMs(15)
sprintf(Test1," haixiang MCU ") //显示第一行固定信息
ShowString(0,Test1)
sprintf(TimeNum,"Code")//显示第二行固定信息
ShowString(1,TimeNum)
while(1)//主循环
{
if(irok)//如果接收好了进行红外处理
{
Ircordpro()
irok=0
}
if(irpro_ok) //如果处理好后进行工作处理，如按对应的按键后显示对应的数字等
{
Ir_work()
}
}
}
这是采用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
***************************************************
这是我用汇编做的，你可以参考一下：-------------红外解码程序---------------------------
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
RET4
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
RET4
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
RET4
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
RET4
TOTAL=11060
***************************************************
DELAY100US:6
PUSH 4 4
MOV R4,#140 2
DJNZ R4,$ 4
MOV R4,#131 2
DJNZ R4,$ 4
POP 4 3
RET4
TOTAL=1105
***************************************************
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）