单片机红外线编程主要涉及红外发射和接收两个部分。以下是一个基于51系列单片机（如STC89C52）的红外发射示例程序：
```c
include
sbit IR_LED = P1 ^ 0； // 红外发射管控制脚， 使用24M晶振
void delay（unsigned int a） {
unsigned char i；
while （--a != 0） {
for （i = 300； i > 0； i--） {
// 若是12M晶振i=125
}
}
}
void keyscan（） {
if （ka == 0） {
keyflag = 1；
irdata = 0x0；
}
}
void红外发射（） {
unsigned char j；
for （j = 0； j < 43； j++） {
s1 = ~s1；
delay13us（）； // 低电平0.565ms载波，模拟38KHZ
for （j = 0； j < 43； j++） {
s1 = 1；
delay13us（）； // 高电平0.565ms无载波
}
}
}
void main（） {
while （1） {
keyscan（）；
if （keyflag == 1） {
红外发射（）；
keyflag = 0；
}
}
}
```
解释
红外发射管控制脚定义：
`sbit IR_LED = P1 ^ 0；` 将P1口的0位作为红外发射管的控制脚。
延时函数：
`void delay（unsigned int a）` 用于产生大约1ms的延时，适用于24MHz晶振。
按键扫描：
`void keyscan（）` 用于检测按键状态，当按下某个键时，`keyflag` 被设置为1，并准备发送红外数据。
红外发射函数：
`void 红外发射（）` 产生一个38kHz的载波，通过翻转P1.0口来发送红外信号。
主函数：
`void main（）` 在无限循环中不断扫描按键并发送红外信号。
其他注意事项
晶振选择：确保晶振频率与程序中使用的延时函数匹配，例如24MHz晶振对应1ms延时。
红外接收：如果需要接收红外信号，可以使用红外接收管和相应的解码电路，并结合中断或轮询方式读取数据。
这个示例程序是一个简单的发射示例，实际应用中可能需要根据具体需求进行调整和扩展。