#include

//***********************************************************
// TC9012 红外遥控接收数码管显示+串口接收-----成功！ *
//***********************************************************
#define uchar unsigned char //定义一下方便使用
#define uint unsigned int
//unsigned char code dgw[] = {0xfe,0xfd,0xfb,0xf7};//数码管控制
unsigned char scan[4]={0xf7,0xfb,0xfd,0xfe};//p1位选择
unsigned char code tab[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
unsigned char code led_tab[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
unsigned char disbuf[4];//数码管显示缓冲
uchar irdate[33];
char DAT[4]={0};

uchar temp,keynum,ledstop=8,irtime;
uchar startfleg,bitnum,irallok;
uchar irok;
uchar ircode[4];
uchar jia,flog;

void delay(unsigned char x) ;//x*0.14MS
//sbit sm = P1^0;
sbit BEEP = P3^7 ; //声音输出接口

/*
红外接收，并识别遥控上的数字 P3.7声音输出接口
P0数码管段选 P1数码管位选 P3.2红外输入端

*/

void delay1ms(int n) //误差 0us
{
unsigned char a,b;
int m;
for(m=0;m {
for(b=9;b>0;b--)
for(a=1;a>0;a--);
}

}

void DELAY_MS (unsigned int a)//延时程序
{
unsigned int i;
while( --a != 0)
{
for(i = 0; i < 125; i++);
}
}

////////////////////////
//简化显示函数
void disp(int x)
{
int i,temp = 0x01;
DAT[0]=x/1000;
DAT[1]=x/100%10;
DAT[2]=x/10%10;
DAT[3]=x%10;
for(i=0;i<4;i++)
{
P1 = ~temp;
P0 = tab[DAT[i]];
DELAY_MS(4);
temp = temp<<1; //左移位
}

}

void irwork() // disbuf[0]=(((KeyValue&0xf0)>>4)&0x0f);//机器码，取高4位
{
// 16进制显示(键值)
disbuf[0] = (((ircode[1]&0xf0)>>4)&0x0f);
disbuf[1] = ircode[1]&0x0f;

disbuf[2] = (((ircode[2]&0xf0)>>4)&0x0f);
disbuf[3] = ircode[2]&0x0f;

//以下是十进制显示(键码)
//disbuf[0] = ircode[2]; //通过缓冲得到数值
//disbuf[1] = ircode[3];

}

void LedDisp()//键值显示
{
unsigned char i;
for(i=0;i<4;i++)
{
P0=tab[disbuf[i]];
P1 = scan[i];
DELAY_MS(5);
P1=0xff;
}
}

void irtimeA() //中断初始化
{
TMOD = 0X22;//设定时器0并用工作方式2
TH0 = 0;//高位赋初值
TL0 = 0;//低位赋初值 //使定时器256us中断一次
EA = 1;//开启总中断开关
ET0 = 1;//启动定时中断
TR0 = 1;//开启定时器
EX0 = 1;//打开外部中断
IT0 = 1;//选择外部中断方式1

TH1 = 0XF3;//定时器初值高8位设置
TL1 = 0XF3;//定时器初值低8位设置
TR1 = 1;//启动定时器
SM0 = 0;
SM1 = 1;//设置串口工作方式
REN = 1;//使串口接收使能
//EA = 1;//打开总中断开关
ES = 1;//打开串口中断
PCON = 0x80;//波特率倍频（屏蔽本句波特率为2400）
//IP = 0x10;
}

void beep()
{
unsigned char i ;
for (i=0 ;i<100 ;i++)
{
delay1ms(10);
BEEP=!BEEP;
}
BEEP=1 ;
}

void irpros(void) //对接收到的数据处理
{
uchar k,value, i,j;
k=1;
for(j=0;j<4;j++)
{
for(i=0;i<8;i++) //循环8次得到一段8位的码
{
value = value>>1;
if(irdate[k]>6) //判断有几个irtime=255us 大于6个是1
{
value = value | 0x80;

}
k++;
}
ircode[j] = value; //将一段8位的码存入数组中
}

irallok = 1;

}

main()
{
//uchar wx=0x01,js;
irtimeA();

while(1)
{
if(irok==1)
{
irpros();
irok = 0;
}
if(irallok==1)
{
irwork();
//ircal();
irallok = 0;
beep();

ES = 0;//关闭串口中断

///////////////////解码完毕串口接收显示///
flog = 0;
SBUF = ircode[0]; //单片机向pc发送数据////
while(!TI);//等待数据发送完毕 ////
TI = 0; //发送标志位置0 ////
ES = 1;//打开串口中断 ////
//DELAY_MS(5);
//////////////////////////////////////////
flog = 0;
SBUF = ircode[1]; //单片机向pc发送数据////
while(!TI);//等待数据发送完毕 ////
TI = 0; //发送标志位置0 ////
ES = 1;//打开串口中断 ////
//DELAY_MS(5);
//////////////////////////////////////////
flog = 0;
SBUF = ircode[2]; //单片机向pc发送数据////
while(!TI);//等待数据发送完毕 ////
TI = 0; //发送标志位置0 ////
ES = 1;//打开串口中断 ////
//DELAY_MS(5);
//////////////////////////////////////////
flog = 0;
SBUF = ircode[3]; //单片机向pc发送数据////
while(!TI);//等待数据发送完毕 ////
TI = 0; //发送标志位置0 ////
ES = 1;//打开串口中断 ////
//////////////////////////////////////////发送完毕标志位
flog = 0;
SBUF =0x64; //单片机向pc发送数据////
while(!TI);//等待数据发送完毕 ////
TI = 0; //发送标志位置0 ////
ES = 1;//打开串口中断 ////
//////////////////////////////////////////

}
LedDisp();
//disp(shiyan);
//disp(disbuf[1]);
//ledshine();
//ledshines();
}
}

void timer0() interrupt 1 //定时器0中断
{
irtime++;
}
void inter0() interrupt 0 //外部中断
{

if(startfleg)
{
if(irtime>32) //判断引导码是否发送完毕
{
bitnum = 0;

}
irdate[bitnum] = irtime; //接收数据并把数据存入数组
irtime = 0;
bitnum++;
if(bitnum==33)
{
bitnum = 0;
irok = 1;

}
}
else
{
startfleg = 1; //是否接收到数据标志位
irtime = 0;

}

//serial() interrupt 4;
}

void serial() interrupt 4 //串口中断函数
{
//a = SBUF;

RI = 0; //中断接收标志位置0
flog = 1;

}