/* 晶振:11.0569MHz */
#include <REGX52.h>
#define uchar unsigned char
uchar data IRcode[4]; //定義一個4字節的數組用來存儲代碼
uchar CodeTemp; //編碼字節緩存變量
uchar i,j,k; //延時用的循環變量
sbit IRsignal=P3^2; //HS0038接收頭OUT端直接連P3.2(INT0)
/**************************延時0.9ms子程序**********************/
void Delay0_9ms(void)
{uchar j,k;
for(j=18;j>0;j--)
for(k=20;k>0;k--) ;
}
/***************************延時1ms子程序**********************/
void Delay1ms(void)
{uchar i,j;
for(i=2;i>0;i--)
for(j=230;j>0;j--) ;
}
/***************************延時4.5ms子程序**********************/
void Delay4_5ms(void)
{uchar i,j;
for(i=10;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--) ;
}
/************************中斷0解碼服務子程序**********************/
void int0(void) interrupt 0 using 2
{
EA=0;
for(k=0;k<10;k++)
{Delay0_9ms();
if (IRsignal==1) //如果0.9ms后IRsignal=1,說明不是引導碼
{k=10;break;}
else if(k==9) //如果持續了10×0.9ms=9ms的低電平,說明是引導碼
{while(IRsignal==0);
Delay4_5ms(); //跳過持續4.5ms的高電平
for(i=0;i<4;i++) //分別讀取4個字節
{for(j=1;j<=8;j++) //每個字節8個bit的判斷
{ while(IRsignal==0); //等待上升沿
Delay0_9ms(); //從上升沿那一時刻開始延時0.9ms,再判斷IRsignal
if(IRsignal==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[i]=CodeTemp;
CodeTemp=0;
}
for(i=0;i<4;i++) //通過串口將代碼發出
{
SBUF=IRcode[i];
while(!TI); //等待一個字節發送完畢
TI=0;
}
Delay();
}
}
EA=1;
}
/***********************串口初始化程序*********************/
void initUart(void)
{
TMOD|=0x20;
SCON=0x50;
PCON|=0x80;
TH1=0xff; //57600bps @ 11.0592MHz
TL1=0xff;
TR1=1;
}
/**************************主程序*************************/
void main()
{ initUart();
IT0=1; //INT0為負邊沿觸發, (1:負邊沿觸發,0:低電平觸發)
EX0=1; //外部中斷INT0開, (1:開, 0:關 )
EA=1; //開所有中斷
CodeTemp=0; //初始化紅外編碼字節緩存變量
Delay();
while(1);
}
|