STC 1T单片机红外解码 超级终端显示 新手 ,大虾请绕过!
http://cache.amobbs.com/bbs_upload782111/files_48/ourdev_701237FSZXZC.jpg(原文件名:红外解码.jpg)
原程序是网上搜的, 改了下STC12C4052测试,用超级终端显示 解码值! 红外头接3.2
见程序吧!
#include <stc12c2052ad.h>
#define uchar unsigned char
uchar data IRcode; //定义一个4字节的数组用来存储代码
uchar CodeTemp; //编码字节缓存变量
uchar i,j,k,aa; //延时用的循环变量
sbit IR=P3^2; //HS0038接收头OUT端直接连P3.2(INT0)
/**************************延时0.9ms子程序**********************/
void Delay0_9ms(void)
{
uchar j,k;
for(j=108;j>0;j--)
for(k=20;k>0;k--) ;
}
/***************************延时1ms子程序**********************/
void Delay1ms(void)
{
uchar i,j;
for(i=12;i>0;i--)
for(j=230;j>0;j--) ;
}
/***************************延时4.5ms子程序**********************/
void Delay4_5ms(void)
{
uchar i,j;
for(i=60;i>0;i--)
for(j=225;j>0;j--) ;
}
/**************************** 延时子程序 ************************/
void Delay(void)
{
uchar i,j,k;
for(i=200;i>0;i--)
for(j=200;j>0;j--)
for(k=3;k>0;k--) ;
}
/************************串口发送***********************************/
void UART_T (uchar UART_data)
{
SBUF = UART_data; //将接收的数据发送回去
while(TI == 0); //检查发送中断标志位
TI = 0; //令发送中断标志位为0(软件清零)
}
void UART_TC (unsigned char *str)
{
while(*str != '\0')
{
UART_T(*str);
*str++;
}
*str = 0;
}
/************************中断0解码服务子程序**********************/
void int0(void) interrupt 0 using 2
{
EA=0;
for(k=0;k<10;k++) //不同型号请改成5/10
{
Delay0_9ms();
if (IR==1) //如果0.9ms后IRsignal=1,说明不是引导码
{
k=10;break;
}
else if(k==9) //如果持续了10×0.9ms=9ms的低电平,说明是引导码
{
while(IR==0);
Delay4_5ms(); //跳过持续4.5ms的高电平
for(i=0;i<4;i++) //分别读取4个字节
{
for(j=1;j<=8;j++) //每个字节8个bit的判断
{
while(IR==0); //等待上升沿
Delay0_9ms(); //从上升沿那一时刻开始延时0.9ms,再判断IRsignal
if(IR==1) //如果IRsignal是"1",则向右移入一位"1"
{
Delay1ms();
CodeTemp=CodeTemp|0x80;
if(j<8) CodeTemp=CodeTemp>>1;
}
else
if(j<8)CodeTemp=CodeTemp>>1;//如果IRsignal是"0",则向右移一位,自动补"0"
}
IRcode=CodeTemp;
CodeTemp=0;
}
Delay();
Delay();
}
aa=1;
}
EA=1;
}
/***********************串口初始化程序*********************/
void initUart(void)
{
TMOD|=0x20;
SCON=0x50;
PCON|=0x80;
TH1=0xf3; //4800bps @ 12MHz
TL1=0xf3;
TR1=1;
}
/**************************主程序*************************/
void main()
{
uchar a;
initUart();
IT0=1; //INT0为负边沿触发, (1:负边沿触发,0:低电平触发)
EX0=1; //外部中断INT0开, (1:开, 0:关 )
EA=1; //开所有中断
CodeTemp=0; //初始化红外编码字节缓存变量
Delay();
UART_T (0x0c);
UART_TC ("-----红外解码测试1.0------");
UART_T (0x0d);
UART_T (0x0a);
UART_TC ("用户码反码操作码反码");
UART_T (0x0d);
UART_T (0x0a);
while(1)
{
if(aa==1)
{
for(a=0;a<4;a++) //通过串口将代码发出
{
UART_TC ("");
if(IRcode/16>9)UART_T(0x41+(IRcode/16-10));
else UART_T(0x30+IRcode/16);
if(IRcode%16>9)UART_T(0x41+(IRcode%16-10));
else UART_T(0x30+IRcode%16);
UART_TC (" ");
}
Delay();
aa=0;
UART_T (0x0d);
UART_T (0x0a);
}
}
} 不用Delay0_9ms();Delay4_5ms(); 的路过 /************* 功能说明 **************
引导码、低8为用户码、高8位用户码、8位数据码、8位数据码的反码
红外接收程序。适用于市场上用量最大的HT6121/6122及其兼容IC的编码。
对于用户码与User_code定义不同的遥控器,程序会将用户码一起从串口输出。
使用模拟串口发送监控显示编码,显示内容为ASCII码和中文。
本接收程序基于状态机的方式,占用CPU的时间非常少。
******************************************/
/************* 用户系统配置 **************/
#define D_TIMER0 125 //选择定时器时间, us, 红外接收要求在60us~250us之间
#define User_code_L 0x00 //定义红外接收用户码
#define User_code_H 0x00 //定义红外接收用户码
/************* 以下宏定义用户请勿修改 **************/
#include "reg51.H"
#define uchar unsigned char
#define uint unsigned int
/************* 本地变量声明 **************/
sbit P_TXD1 = P3^1; //定义模拟串口发送脚,打印信息用
sbit P_IR_RX = P3^2; //定义红外接收输入端口
bit P_IR_RX_temp; //Last sample
bit B_IR_Sync; //已收到同步标志
uchar SampleTime;
uchar IR_SampleCnt; //采样计数
uchar IR_BitCnt; //编码位数
uchar IR_UserH; //用户码(地址)高字节
uchar IR_UserL; //用户码(地址)低字节
uchar IR_data; //数据原码
uchar IR_DataShit; //数据反码
bit B_IrUserErr; //User code error flag
bit B_IR_Press; //Key press flag,include repeat key.
uchar IR_code; //IR code 红外键码
/************* 本地函数声明 **************/
void Tx1Send(uchar dat);
uchar HEX2ASCII(uchar dat);
void InitTimer(void);
void PrintString(unsigned char code *puts);
/*************外部函数和变量声明 *****************/
/********************* 主函数 *************************/
void main(void)
{
InitTimer(); //初始化Timer
PrintString("****** 51单片机红外接收程序 ******\r\n"); //上电后串口发送一条提示信息
while(1)
{
if(B_IR_Press) //有IR键按下
{
PrintString("红外码: 0x"); //提示红外键码
Tx1Send(HEX2ASCII(IR_code >> 4)); //键码高半字节
Tx1Send(HEX2ASCII(IR_code)); //键码低半字节
if(B_IrUserErr) //用户码错误,则发送用户码
{
Tx1Send(' '); //发空格
Tx1Send(' '); //发空格
PrintString("用户码: 0x"); //提示用户码
Tx1Send(HEX2ASCII(IR_UserH >> 4)); //用户码高字节的高半字节
Tx1Send(HEX2ASCII(IR_UserH)); //用户码高字节的低半字节
Tx1Send(HEX2ASCII(IR_UserL >> 4)); //用户码低字节的高半字节
Tx1Send(HEX2ASCII(IR_UserL)); //用户码低字节的低半字节
}
Tx1Send(0x0d); //发回车
Tx1Send(0x0a); //发回车
B_IR_Press = 0; //清除IR键按下标志
}
}
}
/********************* 十六进制转ASCII函数 *************************/
uchar HEX2ASCII(uchar dat)
{
dat &= 0x0f;
if(dat <= 9) return (dat + '0'); //数字0~9
return (dat - 10 + 'A'); //字母A~F
}
/**************** Timer初始化函数 ******************************/
void InitTimer(void)
{
TMOD = 0x22; //8位自动重装
TH0 = 0x8D;
TL0 = 0x8D; //125us
TL1 = 0xFD; //9600波特率的初值,板子使用11.0592M晶振,初值=256-11059200/32/12/2400
TH1 = 0xFD; //
TR1 = 1; //启动波特率发生
SCON = 0x50; //设置串口方式1
EA = 1;
ET0 = 1;
TR0 = 1;
}
//*******************************************************************
//*********************** IR Remote Module **************************
//*********************** IR Remote Module **************************
//this programme is used for Receive IR Remote (HT6121).
//data format: Synchro,AddressH,AddressL,data,/data, (total 32 bit).
//send a frame(85ms), pause 23ms, send synchro of another frame, pause 94ms
//data rate: 108ms/Frame
//Synchro:low=9ms,high=4.5/2.25ms,low=0.5626ms
//Bit0:high=0.5626ms,low=0.5626ms
//Bit1:high=1.6879ms,low=0.5626ms
//frame space = 23 ms or 96 ms
/******************** 红外采样时间宏定义, 用户不要随意修改 *******************/
#if ((D_TIMER0 <= 250) && (D_TIMER0 >= 60))
#define D_IR_sample D_TIMER0 //定义采样时间,在60us~250us之间
#endif
#define D_IR_SYNC_MAX (15000/D_IR_sample) //SYNC max time
#define D_IR_SYNC_MIN (9700 /D_IR_sample) //SYNC min time
#define D_IR_SYNC_DIVIDE (12375/D_IR_sample) //decide data 0 or 1
#define D_IR_DATA_MAX (3000 /D_IR_sample) //data max time
#define D_IR_DATA_MIN (600/D_IR_sample) //data min time
#define D_IR_DATA_DIVIDE (1687 /D_IR_sample) //decide data 0 or 1
#define D_IR_BIT_NUMBER 32 //bit number
//*******************************************************************************************
//**************************** IR RECEIVE MODULE ********************************************
/********************** Timer0中断函数************************/
void timer0 (void) interrupt 1
{
IR_SampleCnt++; //Sample + 1
F0 = P_IR_RX_temp; //Save Last sample status
P_IR_RX_temp = P_IR_RX; //Read current status
if(F0 && !P_IR_RX_temp) //Last sample is high,and current sample is low, so is fall edge
{
SampleTime = IR_SampleCnt; //get the sample time
IR_SampleCnt = 0; //Clear the sample counter
if(SampleTime > D_IR_SYNC_MAX) B_IR_Sync = 0; //large the Maxim SYNC time, then error
else if(SampleTime >= D_IR_SYNC_MIN) //SYNC
{
if(SampleTime >= D_IR_SYNC_DIVIDE)
{
B_IR_Sync = 1; //has received SYNC
IR_BitCnt = D_IR_BIT_NUMBER; //Load bit number
}
}
else if(B_IR_Sync) //has received SYNC
{
if(SampleTime > D_IR_DATA_MAX) B_IR_Sync=0; //data samlpe time to large
else
{
IR_DataShit >>= 1; //data shift right 1 bit
if(SampleTime >= D_IR_DATA_DIVIDE) IR_DataShit |= 0x80; //devide data 0 or 1
if(--IR_BitCnt == 0) //bit number is over?
{
B_IR_Sync = 0; //Clear SYNC
if(~IR_DataShit == IR_data) //判断数据正反码
{
if((IR_UserH == User_code_H) && (IR_UserL == User_code_L))
B_IrUserErr = 0; //User code is righe
else B_IrUserErr = 1; //user code is wrong
IR_code = IR_data;
B_IR_Press = 1; //数据有效
}
}
else if((IR_BitCnt & 7)== 0) //one byte receive
{
IR_UserL = IR_UserH; //Save the User code high byte
IR_UserH = IR_data; //Save the User code low byte
IR_data= IR_DataShit; //Save the IR data byte 状态机,移动
}
}
}
}
}
//串口发送
void Tx1Send(uchar dat) //9600,N,8,1 发送一个字节
{
SBUF = dat; //将接收到的数据发送出去
while(!TI); //等待发送完成 TI——发送中断标志
TI = 0;
}
void PrintString(unsigned char code *puts) //发送一串字符串
{
for (; *puts != 0; puts++)Tx1Send(*puts); //遇到停止符0结束
}
STC家的程序,稍微修改得到的。很好使,没有delay。 没有实物电路图? 我来顶 回复【3楼】yyt1372
-----------------------------------------------------------------------
就p3.2接红外接收头+串口 mark 记号 菜鸟报道,见贴就鼎 及时雨 顶一个吧 谢谢楼主分享^
学习学习红外解码~ 现在红外格式有几种,不知能适应哪几种? mark mark MARK 回复【2楼】erxun erxun
-----------------------------------------------------------------------
此楼的程序写得很好,学习中 是不错 mark 不错 回复【1楼】Hamyou
-----------------------------------------------------------------------
这个确实不错,收藏了! 12M晶振 有误码的 语言BC路过。 mark一记 3楼用delay写很不好是吗? 小白路过 串口中怎么显示14位数据码和数据反码 很不错咯!!!!!!!!!!!我学习了两三天了都还不行 说说是多少M的晶振啊。 本帖最后由 jetli 于 2012-5-21 17:04 编辑
zenith1032 发表于 2012-5-21 14:53 static/image/common/back.gif
说说是多少M的晶振啊。
TH1=0xf3; //4800bps @ 12MHz
程序里面有写。。。。不过不是串口常用的频率。稍微改一下,11.0592-9600bps为宜
另外,第一个程序编译有error,第二个没有。。。。汗 我解过一个用中断触发,用计时器计时,nec格式的,效果挺好。 顶
页:
[1]