程序已经通过编译了。
遥控器读码程序(晶振为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
红外遥控器读码软件功能有可以快速准确的编码和读取红外遥控器编码。支持多种红外遥控器芯孙让片，如NEC、RC5、RC6、RCMM等。可以查看红外遥控器历史记录，支持多种类型的定时器，支持多种类型轿凯坦的红外学习。根据查询相关资料显示，红外遥控器读码软件用于红外遥控器调试和编程，可以调试不同型号的红外遥控器，如闭桐红外码库，红外调试器等。以下文件是51单片机实现遥控解码，通过数码管显示键码的程序，P0口驱动衫春数巧斗码管段选，p2.6和p2.7为数码管位选，接收头连到P3.2口。此程序以通过验证，可以直接编译使用，另外还有一个继电器和蜂鸣器的控制，不用可以屏蔽掉。********************************************************************************
* 描述: *
* 遥控键值读取器*
* 数码管显示, P0口为数码管的数据口 *
* *
********************************************************************************
遥控键值解码-数码管显示*
********************************************************************************/
#include <reg51.h>
#include <intrins.h>
void IR_SHOW()
void delay(unsigned char x)//x*0.14MS
void delay1(unsigned char ms)
void beep()
sbit IRIN = P3^2
sbit BEEP = P3^7
sbit RELAY= P1^3
sbit GEWEI= P2^7
sbit SHIWEI= P2^6
unsigned char IRCOM[8]
unsigned char code table[16] =
{0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e}
main()
{
IE = 0x81 //允许总中断中断,使能 INT0 外部中断
TCON = 0x1 //触发方式为脉冲负边沿触发
delay(1)
IRIN=1
BEEP=1
RELAY=1
for()
{
IR_SHOW()
}
} //end main
void IR_IN() interrupt 0 using 0
{
unsigned char i,j,k,N=0
EA = 0
I1:
for (i=0i<4i++)
{
if (IRIN==0) break
if (i==3) {EA =1return}
}
delay(20)
if (IRIN==1) goto I1 //确认IR信号出现
while (!IRIN)//等 IR 变为高电平
{delay(1)}
for (j=0j<4j++)
{
for (k=0k<8k++)
{
while (IRIN)//等 IR 变为低电平
{delay(1)}
while (!IRIN) //等 IR 变或宽耐为高电平
{delay(1)}
while (IRIN) //计算IR高电平时长
{
delay(1)
N++
if (N>=30) {EA=1return}
}
IRCOM[j]=IRCOM[j] >>1
if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80}
N=0
}//end for k
}//end for j
if (IRCOM[2]!=~IRCOM[3]) {EA=1return}
IRCOM[5]=IRCOM[2] &0x0F
IRCOM[6]=IRCOM[2] &0xF0
IRCOM[6]=IRCOM[6] >>4
beep()
EA = 1
}
void IR_SHOW()
{
P0 = table[IRCOM[5]]
GEWEI = 0
SHIWEI = 1
delay1(4)
P0 = table[IRCOM[6]]
SHIWEI = 0
GEWEI = 1
delay1(4)
}
void beep()
{
unsigned char i
for (i=0i<100i++)
{
delay(5)
BEEP=!BEEP
}
BEEP=1
}
void delay(unsigned char x)//x*0.14MS
{
unsigned char i
while(x--)
{
for (i = 0i<13i++) {}
}
}
void delay1(unsigned char ms)
{
unsigned char i
while(ms--)
{
for(i = 0i<120i++)
{
_nop_()
_nop_()
_nop_()
_nop_()
}
}
}
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）