38k.c

51 红外发送程序 带仿真 数据格式可以修改程序来实现

/*******************************************************
38K载波发送程序 T1产生38K载波 T0用于精确定时           *
数据格式  起始位(9ms 高 4.5ms 低)+8位数据（0.560ms 高  *
0.565 低:0    1.685ms 高 0.565ms 低  :1)               *
TR1控制载波发送        *
write by wisdom           2008-8                       *
*******************************************************/
#include <AT89X51.h> 

#define IR_OUT P3_4
#define _MHz_ 12


//T1 13us产生一次中断 用于产生38K载波
//T0 方式1 16位  用于定时
void Init_Timer(void)
{
	TMOD=0x21;		//T0 mode 1      T1 mode 2 

	TH1=256-(1000*_MHz_/38.0/12)/2+0.5;
	TL1=TH1;

	ET1=1;
	EA=1;
}

//发送引导码  发送方:9ms高电平 4.5ms低电平
void Send_Start_Bit(void)    //TR1的值=发送的电平
{
//9ms 0
		TH0=(65536-9000/12*_MHz_)/256; 
		TL0=(65536-9000/12*_MHz_)%256;
		TR0=1;
		TR1=0;

		while(!TF0);

		TR1=0;
		TF0=0;

		IR_OUT=0;
//4.5ms 1
		TH0=(65536-4500/12*_MHz_)/256; 
		TL0=(65536-4500/12*_MHz_)%256;
		TR0=1;
		TR1=1;

		while(!TF0);

		TR1=0;
		TF0=0;

		IR_OUT=0;
}

//发送0 
void Send_Bit_0(void)
{
//0.565ms 0
		TH0=(65536-565/12*_MHz_)/256; 
		TL0=(65536-565/12*_MHz_)%256;
		TR0=1;
		TR1=0;

		while(!TF0);

		TR1=0;
		TF0=0;

		IR_OUT=0;
//0.565ms 1
		TH0=(65536-565/12*_MHz_)/256; 
		TL0=(65536-565/12*_MHz_)%256;
		TR0=1;
		TR1=1;

		while(!TF0);

		TR1=0;
		TF0=0;

		IR_OUT=0;
}

//发送1
void Send_Bit_1(void)
{
//1.685ms 0
		TH0=(65536-1685/12*_MHz_)/256; 
		TL0=(65536-1685/12*_MHz_)%256;
		TR0=1;
		TR1=0;

		while(!TF0);

		TR1=0;
		TF0=0;

		IR_OUT=0;
		
//0.565ms 1
		TH0=(65536-565/12*_MHz_)/256; 
		TL0=(65536-565/12*_MHz_)%256;
		TR0=1;
		TR1=1;

		while(!TF0);

		TR1=0;
		TF0=0;

		IR_OUT=0;
}

//发送一字节 8位
void Send_Char(unsigned char ir_data)
{
unsigned char i,j;
	j=ir_data;
	Send_Start_Bit();
	for(i=0;i<8;i++)
	{
		if(j&0x80)
			Send_Bit_1();
		else
			Send_Bit_0();
		j<<=1;
	}


}

void Delay10ms(void)
{
		TH0=(65536-10000/12*_MHz_)/256; 
		TL0=(65536-10000/12*_MHz_)%256;
		TR0=1;
		while(!TF0);
		TF0=0;
}

void main(void)
{
	Init_Timer();
	while(1)
	{
		Send_Char(0x55);
		Delay10ms();
	}
}


//-----------------------------------------------------------------------
//T1 ISR
void T1_ISR(void) interrupt TF1_VECTOR using 1
{
	IR_OUT=!IR_OUT;
}