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()
}
}
}
这是一段把红外遥控接收后用数码管显示出来的塌历程序，你参考一下吧。程序已经通过编译了。
遥控器读码程序(晶振为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
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）