程序已经通过编译了。
遥控器读码程序(晶振为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> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义
#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()
}
}
}
#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()
}
}
}
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）