红外遥控解码程序

这是一段把红外遥控接收后用数码管显示出来的塌历程序，你参考一下吧。

程序已经通过编译了。

遥控器读码程序(晶振为11.0592),该程序能读出遥控器的控制码,并通过LED显示出来

OMEN 2005/1/16于TCL

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

A_BIT EQU 20H 数码管个位数存放内存位置

B_BIT EQU 21H 数码管十位数存放内存位置

NO_OUT EQU 24H 最终控制号码存放单元

A_NO EQU 25H 数码管个位数对应代码存放内存位置

B_NO EQU 26H 数码管十位数对应代码存放内存位拆派置

22H,23H为控制码及其反码的存放单元

*******************<<主程序>>***********************************

ORG 0000H

AJMP 0030H

ORG 0003H 外部中断P3.2脚INT0入口地址

AJMP INT 转入外部中断服务子程序（解码程序）

ORG 0030H

AJMP MAIN 转入主程序

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

MAIN: MOV NO_OUT,#0H

SETB EA 打开CPU总中断请求

SETB IT0 设定INT0的触发方式为脉冲负边沿触发

SETB EX0 打开INT0中断请求

LOOP: MOV A,NO_OUT将按键的键值通过P1口的8个LED显示出来!

CPL A由于P1发光二极管显示的是电平的反状态,所以取反

MOV P1,A 发光二极管显示输出

LCALL DISPLAYLED数码管显示输出

AJMP LOOP循环

********************<<中断接受遥控程序>>************************

以下为进入P3.2脚外部中断子程序，也就是解码程序

INT:

PUSH ACC

PUSH PSW 将PSW和ACC推入堆栈保护

CLR EA 暂时关闭CPU的所有中断请求

MOV R6,#10

SB: LCALL DL865调用865微秒延时子程序

JB P3.2,EXIT延时865微秒后判断P3.2脚是否出现高电平如果有就退出解码程序

DJNZ R6, SB重复10次，目的是检测在8650微秒内如果出现高电平就退出解码程序

以团御搜上完成对遥控信号的9000微秒的初始低电平信号的识别。

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

LCALL DL4737 延时4.74毫秒避开4.5毫秒的结果码

MOV R7,#16忽略前26位系统识别码

JJJJA:JNB P3.2,$等待地址码第一位的高电平信号

LCALL DL865高电平开始后用865微秒的时间尺去判断信号此时的高低电平状态

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

JNC UUUA如果为0就跳转到UUUA

LCALL DL1000检测到高电平1的话延时1毫秒等待脉冲高电平结束

UUUA: DJNZ R7,JJJJA

MOV R1,#22H 设定22H为起始RAM区

MOV R2,#2接收从22H到23H的2个内存,用于存放 *** 作码和 *** 作反码

PP: MOV R3,#8每组数据为8位

JJJJ: JNB P3.2,$等待地址码第一位的高电平信号

LCALL DL865高电平开始后用865微秒的时间尺去判断信号此时的高低电平状态

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

JNC UUU如果为0就跳转到UUU

LCALL DL1000检测到高电平1的话延时1毫秒等待脉冲高电平结束

UUU: MOV A,@R1将R1中地址的给A

RRC A将C中的值0或1移入A中的最低位

MOV @R1,A将A中的数暂时存放在R1数值的内存中

DJNZ R3,JJJJ接收满8位换一个内存

INC R1对R1中的值加1，换下一个RAM

DJNZ R2,PP 接收完8位数据码和8位数据反码，存放在22H/23H中

MOV A,22H

CPL A对22H取反后和23H比较

CJNE A,23H,EXIT如果不等表示接收数据发生错误,放弃

MOV A,22H

MOV NO_OUT,A

LCALL EEPROM_C 清除以前的保存的码

LCALL DL4737

LCALL EEPROM_W 把码存在单片机内部的EEPROM里

LCALL DL4737

CLR P3.6蜂鸣器鸣响－嘀嘀嘀－的声音，表示解码成功

LCALL DL4737

LCALL DL4737

LCALL DL4737

SETB P3.6蜂鸣器停止

lcall DL4737

EXIT: SETB EA 允许中断

POP PSW

POP ACC 将PSW和ACC推入堆栈保护

RETI 退出解码子程序

*******************<<LED数码管显示子程序>>**********************

DISPLAY:

MOV A,NO_OUT 将NO_OUT分成个位和16位

ANL A,#0FH 取低四位放在a_bit

MOV A_BIT,A 个位

MOV A,NO_OUT

RR A

RR A

RR A

RR A 四次移动,把高四位移到低四位

ANL A,#0FH取高四位放在B_bit

MOV B_BIT,A 个位在b

MOV DPTR,#NUMTAB 指定查表启始地址

MOV A,A_BIT 取个位数

MOVC A,@A+DPTR 查个位数的7段代码

MOV A_NO,A

MOV A,B_BIT 取十位数

MOVC A,@A+DPTR 查十位数的7段代码

MOV B_NO,A

DPLOP:MOV A,A_NO

MOV P0,A 送出个位的7段代码

SETB P2.1关闭十位显示,防止鬼影

CLR P2.0 开个位显示

LCALL DL40 显示4737微秒

SETB P2.0关闭个位显示,防止鬼影

MOV A,B_NO

MOV P0,A 送出十位的7段代码

CLR P2.1 开十位显示

LCALL DL40 显示4737微秒

SETB P2.1关闭十位显示,防止鬼影

RET

**********************<<延时程序>>******************************

DL865: MOV R4,#12 1.09*(2R5+4)*R4+2延时子程序1，精确延时865微秒

D1: MOV R5,#31

DJNZ R5,$

DJNZ R4,D1

RET

DL4737: MOV R4,#12 延时子程序2，精确延时4737微秒

D2: MOV R5,#179

DJNZ R5,$

DJNZ R4,D2

RET

DL1000: MOV R4,#17延时程序3，精确延时1000微秒

D3: MOV R5,#25

DJNZ R5,$

DJNZ R4,D3

RET

DL40: MOV R4,#1延时程序4，精确延时40/17微秒

D4: MOV R5,#1

DJNZ R5,$

DJNZ R4,D4

RET

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

如果是共阳数码管的显示代码 1-F 16个代码

NUMTAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,88H,83H,0C6H,0A1H,86H,8EH STC新板的

END

#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义

sbit IR=P3^2 //红外接口标志

#define DataPort P0 //定义数据端口 程序中遇到DataPort 则用P0 替换

sbit LATCH1=P2^6//定义锁存使能端源掘扒口 段锁存

sbit LATCH2=P2^7// 位锁存

/*------------------------------------------------

全局变量声明

------------------------------------------------*/

//unsigned char code dofly_DuanMa[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f}// 显示段码值0~9

unsigned char irtime//红外用全局变量

bit irpro_ok,irok

unsigned char IRcord[4]

unsigned char irdata[33]

/*------------------------------------------------

函数声明

------------------------------------------------*/

void Ir_work(void)

void Ircordpro(void)

/*------------------------------------------------

定时器0中断处理

------------------------------------------------*/

void tim0_isr (void) interrupt 1 using 1

{

irtime++ //用于计数2个下降沿之间的时间

}

/*------------------------------------------------

外部中断0中断处理

------------------------------------------------*/

void EX0_ISR (void) interrupt 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=0

startflag=1

}

}

/*------------------------------------------------

定时雹昌器0初始化

------------------------------------------------*/

void TIM0init(void)//定时器0初始化

{

TMOD=0x02//定时器0工作方式2，TH0是重装值，TL0是初值

TH0=0x00//重载值

TL0=0x00//初始化值

ET0=1 //开中断

TR0=1

}

/*------------------------------------------------

外部中断0初始化

------------------------------------------------*/

void EX0init(void)

{

IT0 = 1 //指定外部中断0下降沿触发，INT0 (P3.2)

EX0 = 1 //使能外部中断

EA = 1 //开总中断

}

/*------------------------------------------------

键值处理

------------------------------------------------*/

void Ir_work(void)//红外键值散转程序

{

/* switch(IRcord[2])//判断第三个数码值

{

case 0x0c:DataPort=dofly_DuanMa[1]break//1 显示相应的按键值

case 0x18:DataPort=dofly_DuanMa[2]break//2

case 0x5e:DataPort=dofly_DuanMa[3]break//3

case 0x08:DataPort=dofly_DuanMa[4]break//4

case 0x1c:DataPort=dofly_DuanMa[5]break//5

case 0x5a:DataPort=dofly_DuanMa[6]break//6

case 0x42:DataPort=dofly_DuanMa[7]break//7

case 0x52:DataPort=dofly_DuanMa[8]break//8

case 0x4a:DataPort=dofly_DuanMa[9]break//9

default:break

} */

P1=IRcord[2]

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|=0x80

if(j<8)

{

value>>=1

}

k++

}

IRcord[i]=value

value=0

}

irpro_ok=1//处理完毕标志位置1

}

/*------------------------------------------------

主函数

------------------------------------------------*/

void main(void)

{

EX0init()//初始化外部中断

TIM0init()//初始化定时器

DataPort=0xfe//取位码 第一位数码管选通，即二进制1111 1110

LATCH2=1 //位锁存

LATCH2=0

while(1)//主循环

{

if(irok)//如果接收好了进行红外处理

{

Ircordpro()

irok=0

}

if(irpro_ok) //如果处理好后进行工作处理，如按对应的按键后显示对应的数字等

{

Ir_work()

}

}

}

---