红外收发.c

基于51单片机的红外收发源程序

/*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;//发射管输出
		    }
	    }
   }
}