redcode.c

主要是f040的分解列子。包括不少其中数字器件……

//红外编码解码主程序v1.0
//能处理大部分红外遥控器
//对红外指令连续发送两次以上的遥控器有效，红外指令代码须小于54位
//redcode.c
#include "string.h"
#include "iic.h"
#include "math.h"
#define CODELEN 256 /*定义一个代码的存储长度*/
typedef unsigned long ulong;
enum {re_len=6};
data uchar aa[7]={0x45,0x46,0x47,0x48,0x49,0x50,0x51};
uint k=0;
uint j;
idata uint tempkey;
idata uint codelen,codelen0,codelen1;
idata uchar lenth0,lenth1;
sbit sigin=P3^4;//0038红外接收器输入管脚
sbit sigout=P3^0;//控制红外发射管
sbit mode=P3^3;//模式选择管脚，选择为学习代码还是发射代码
sbit ledg=P3^2;//指示led1控制管脚
sbit ledl=P3^1;//指示led2控制管脚
bit keydown;
bit isodd;
bit sig;
sbit kv0=P3^5;//键盘数据口
sbit kv1=P1^1;
sbit kv2=P1^2;
sbit kv3=P1^3;
sbit kv4=P1^4;
sbit kv5=P1^5;
bit iskeyboard;
bit iserror;
bit ramerror;
bit detectend;
bit ismode;
bit isnew0,isnew1,isnew2;
idata uchar v_val;
uint keysave;
xdata uint sigdata[400];//接收发送代码缓冲区，占用800字节外部内存空间
idata uint head0;
union intchar{
	uint tempval;
	struct {uchar hi;uchar low;}bytek;
}tcf;//巧用联合体，使之字节操作和uint型操作转化方便，便于数据存取
union intchar flashd,flashd2;
uchar store;
uchar senddata;
void testcon();
uchar scankey();
void getkey();
void paramini(void);
void pca0ini();
void encode(void);
uchar keyv();
void error();
void decode();
void readdata(void);
void sendcode();
void copyflash();
void xramcheck();
uchar keyv2();
void resett0(void){//将T0计数器值从设为0
	TH0=0;
	TL0=0;
	TR0=1;
}
uint  readt0(void){//读取T0计数器值
	uint tmp;
	TR0=0;
	tmp=(uint)TH0*256;//可用union intchar型数据，则可避免运算
	tmp+=TL0;
	resett0();//读完后将计数器值清零，并启动定时器
	return tmp;
}
void t0ini(){//设置T0为16bit定时器模式
	TMOD=0x11;
	TCON=0x01;
}
void main(){
	uchar t=0;
	config();
	sigout=0;
	t0ini();
	EA=0;
	P2|=0xfc;
	P1|=0x3e;
	for(k=0,j=0;k<50;k++){//自动检查是键盘输入还是其他MCU并口输入
	//若另一个MCU直接与该机相连，则可与其kv5-kv0相连，kv5-kv0的值即为代码索引
	//与MCU相连，则MCU不发送代码，所以代码索引值为0
	//与键盘相连，则键盘没有按键按下，则返回时kv5-kv0均为1，由此可判断
	//输入接口是MCU还是键盘
		if(keyv()<8)
			j++;
		}
	if(j>30)
		iskeyboard=0;//判断出为MCU输入
	else
		iskeyboard=1;//判断出为键盘输入
	for(k=0;k<20;k++){//若为键盘输入，则ledg和ledl指示灯均同时闪烁
	//若为MCU输入，则只有ledl指示灯闪烁
			ledl=1;
			ledg=1;
			delay1ms(100);
			if(!iskeyboard){
				ledg=0;
				}
			ledl=0;
			delay1ms(100);
	}
	xramcheck();//检查外部内存是否正常工作
	if(ramerror)
		for(k=0;k<50;k++){//若外部内存不正常，则ledg和ledl交叉闪烁
			ledl=1;
			ledg=0;
			delay1ms(100);
			ledl=0;
			ledg=1;
			delay1ms(100);
	}
	ledl=0;
	ledg=0;
	pca0ini();
	TR0=0;
	mode=1;
	ismode=mode;
	while(1){
		ismode=mode;
		if(ismode){//接收代码模式
			if(scankey()==0)
				goto again0;
			else
				decode();
			}
		else{//发送代码模式
			if(scankey()==0)
				goto again0;
			else
				sendcode();
			}
		again0:;
	}
	
}
void getkey(){//将键盘值转化为EEPROM首入地址
	ledl=0;
	keysave*=CODELEN;//将键盘值与代码存储长度相乘即为存储首地址
	//键盘上一个按键代表一个代码
	//采用全局变量可减少参数传递和赋值，可提高代码执行效率，
	//但移植性变弱
}
void testcon(){//对红外接收的处理程序，将正确接收的值存入sigdata数组
	tcf.tempval=keysave;//keysave为当前红外代码的存储首地址
	//tempkey=keysave;//
testagain:
	j=0;
	sigin=1;//将0038红外信号输入口置1，才能保证对端口电平的正确读取
	//否则若sigin端口值为0，而实际0038输入值为1，则会被端口值下拉至0，不能正确
	//读取其实际端口电平
	ledg=1;
	ledl=0;
	codelen=0;
	iserror=0;
	ledl=0;
	EA=0;
	k=0;
	while(1){
		sig=sigin;//对硬件端口的判断操作指令读取的是端口值，而不是实际电平值，建议
		//将端口电平值先读取到bit 布尔变量中，再进行判断
		//比如由上操作知sigin端口值恒为1，而端口实际电平值可为0，也可为1
		//若直接if(sigin)则读取的是恒为1
		if(!sig)//一直检测0038红外输入信号，若有红外输入信号，则该值为0
			break;
	}
	resett0();//将T0计数器清零
	TF0=0;//将T0溢出标志清零
	detectend=0;
	sig=sigin;
	while(!sig){//等待高电平出现
		if(TF0){
			TF0=0;//若定时器溢出，说明低电平时间过长，不是有效编码信号，重新检测
			iserror=1;
			goto testagain;
		}
		sig=sigin;	
	}
	head0=readt0();//此时sigin低电平结束，读取T0计数器值为低电平的持续时间
	tcf.tempval=head0;//此为帧首特征，将帧首低电平值存入head0变量中
	sigdata[j]=tcf.tempval;//同时将数据存入外部内存缓冲区中
	j++;
	while(1){
		sig=sigin;
		while(sig){//等待低电平出现
			if(TF0){//若定时器溢出，则高电平值为非正常编码
				TF0=0;
				if(j<15){//若接收的代码长度小于15/2=7个，则认为接收到的为干扰信号
				//重新开始检测
					iserror=1;
					goto testagain;
					}
				else{
					sigdata[j]=0xfff4;//若接收代码大于7个，则认为接收到帧间隔，结束帧
					//同时给高电平的持续时间赋为0xfff4，并结束检测
					j+=3;
					goto testconend;
					}
					
					
			}
			sig=sigin;
		}
		tcf.tempval=readt0();
		sigdata[j]=tcf.tempval;//存储高电平持续时间值
		j++;
		if(j>200){//若代码长度大于200/2=100个，则认为出错，结束检测
			error();
			goto testend;
		}
		if(detectend)//若检测到帧结束，则结束检测
		//帧结束的判断依靠检测到两个帧起始来判断
			goto testconend;
		sig=sigin;
		while(!sig){//当前为低电平，等待高电平
			if(TF0){
				TF0=0;//若定时器溢出，则认为当前检测无效
				error();//调用错误处理函数
				goto testend;//结束检测，若重新检测可能在无法排除某种错误时，陷入
				//死循环检测，使得程序鲁棒性下降
				}
			sig=sigin;	
		}
		tcf.tempval=readt0();
		sigdata[j]=tcf.tempval;
		j++;
		if(abs(tcf.tempval-head0)<100){//判断当前低电平持续时间值与帧起始head0的差距
		//若差值小于100，则认为第二次检测到帧起始，100为经验值，读者可根据
		//实际情况适当调整
			if(j>10){//若代码长度大于10/2=5，则认为正确检测到重复帧的帧起始
			detectend=1;
			goto segnext1;//此时还没有结束检测，测量完高电平宽度才结束当前帧检测
				}
			else{//若代码长度小于5，则认为受干扰
				error();//调用错误处理函数，退出检测
				goto testend;
			}
		}
		if(j>200){//若代码长度大于100则认为出错，退出检测
			error();
			goto testend;
		}
		segnext1:;
	}
	testconend:
	codelen=j-2;//由于是检测到重复帧的帧起始(低电平+高电平)才认为检测到帧结束，
	//所以数据长度为j－2
	codelen0=200+codelen;
	detectend=0;//重新开始检测
	sigdata[201]=sigdata[j-1];//将重复帧的帧头高电平数据存入外部内存
	sigdata[200]=sigdata[j-2];//将重复帧的帧头低电平数据存入外部内存
	j=202;
	//对重复帧采用类似的检测方法，且将数据存入外部内存
	while(1){
		sig=sigin;
		while(!sig){
			if(TF0){
				TF0=0;
				error();
				goto testend;
				}
			sig=sigin;	
		}
		tcf.tempval=readt0();
		sigdata[j]=tcf.tempval;
		j++;
		if(j>400){//数据过长，认为是错误
			error();
			goto testend;
		}
		segnext2:
		sig=sigin;
		while(sig){
			if(TF0){
				TF0=0;
				error();
				goto testend;
			}
			sig=sigin;
		}
		tcf.tempval=readt0();
		sigdata[j]=tcf.tempval;
		j++;
		if(j>400){
			error();
			goto testend;
			}
		if(j>codelen0)//依据第一次检测的帧长度决定重复帧的帧结尾
			goto testconend2;
	}