51单片机红外发射程序

#include
#define uchar unsigned char
#define uint unsigned int
sbit IR_OUT=P1^0 ;
void delay_ms(uint ms)
{
 uint i,j;
 for(i=0;i<120;i++)
 {
   for(j=0;j  }
}
//T1 13us产生一次中断 用于产生38K载波
//T0 方式1 16位  用于定时
void Init_Timer(void)
{
TMOD=0x21;  //T0 mode 1      T1 mode 2  
TH1=256-(1000*11.0592/38.0/12)/2+0.5;      
//特殊
TL1=TH1;
ET1=1;
EA=1;
}
 
//发送引导码  发送方:4.5ms高电平 4.5ms低电平
void Send_Start_Bit(void)    //TR1的值=发送的电平
{
//4.5ms 1
TH0=(65536-8295)/256;  
TL0=(65536-8295)%256;
TR0=1;
TR1=1;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;
//4.5ms 0
TH0=(65536-4146)/256;  
TL0=(65536-4146)%256;
TR0=1;
TR1=0;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;
}
 
//发送0  
void Send_Bit_0(void)
{
//0.565ms 1
TH0=(65536-521)/256;  
TL0=(65536-521)%256;
TR0=1;
TR1=1;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;
//0.565ms 0
TH0=(65536-521)/256;  
TL0=(65536-521)%256;
TR0=1;
TR1=0;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;
}
 
//发送1
void Send_Bit_1(void)
{
//0.565ms 1
TH0=(65536-521)/256;  
TL0=(65536-521)%256;
TR0=1;
TR1=1;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;
//1.685ms 0
TH0=(65536-1563)/256;  
TL0=(65536-1563)%256;
TR0=1;
TR1=0;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;  
}
 
void Send_over(void)     //发送一个结束码，因为最后一个位只有遇到下降沿才能读取（发射端的上升沿）
{
//0.500ms 1       //小于0.5ms 接收端很难识别到
TH0=(65536-500)/256;  
TL0=(65536-500)%256;
TR0=1;
TR1=1;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;
//0.500ms 0
TH0=(65536-500)/256;  
TL0=(65536-500)%256;
TR0=1;
TR1=0;
while(!TF0);
TR1=0;
TF0=0;
TR0=0;
IR_OUT=1;  
}
 
//发送一字节 8位
void Send_Char()
{
unsigned char i,j1,j2,j3,j4;
j1=0xBE;
j2=0x41;
j3=0xDE;
j4=0x20;
Send_Start_Bit();        
Send_Bit_0();
 //发射引导吗
for(i=0;i<8;i++)
{
 if(j1&0x80)
  Send_Bit_0();
 else
  Send_Bit_1();
 j1=j1<<1;        
 //先发射低位
}
for(i=0;i<8;i++)
{
 if(j2&0x80)
  Send_Bit_0();
 else
  Send_Bit_1();
 j2=j2<<1;        
 //先发射低位
}
for(i=0;i<8;i++)
{
 if(j3&0x80)
  Send_Bit_0();
 else
  Send_Bit_1();
 j3=j3<<1;        
 //先发射低位
}
 
for(i=0;i<8;i++)
{
 if(j4&0x80)
  Send_Bit_0();
 else
  Send_Bit_1();
 j4=j4<<1;        
 //先发射低位
}
Send_over();        
//结束符
}
 
void T1_ISR(void) interrupt 3
{
IR_OUT=!IR_OUT;
}
void main(void)
{
Init_Timer();
while(1)
{
Send_Char();
delay_ms(1000);
}
}