51单片机红外收发演示程序.doc

/*copyright 2007,ShangHai HaoTun Electronic Technology co.,Ltd
*
*红外测试程序，用单片机通过发射管发射38K的调制频率码，由一体化接收并解码由发光管显示。
*正常情况下，由于反射和高灵敏度接收，LED4（P1.3)一直闪烁，可以用黑色纸片完全遮挡接收头使
*之不能接收到发射管的信号，这是LED4熄灭。说明功能性正常
*
*write by Shifang 2007-4-26
*
*V1.1
*/
#include<reg52.h>

sbit LED=P3^3;//红外发射
sbit LED1=P1^3;
sbit IR=P3^2;//红外一体化接收

bit Flag;

void Init_Timer0(void)
{
TMOD |= 0x01;
TH0=0xf0; /* Init value */
TL0=0x00;
EA=1; /* interupt enable */
ET0=1; /* enable timer0 interrupt */
TR0=1;
}

void Timer0_isr(void) interrupt 1 using 1
{
TH0=0x0f; /* Init value */
TL0=0x00;
Flag=!Flag;
}

main()
{

unsigned int j;
Init_Timer0();

while(1)
{

LED1=IR;//读取一体化接收头数值
if(Flag)
{
for(j=0;j<27;j++)//大约38KHz
{
LED=!LED;//发射管输出
}
}
}
}