单片机红外通信发射程序

1. #include "reg52.h"
   
2. sbit ir=P1^0;//红外发射管控制脚，使用24M晶振
   
3. sbit ka=P2^0;
   
4. sbit kb=P2^1;
   
5. unsigned int count, set_count; //中断计数，设定中断次数
   
6. bit irflag,keyflag; //红外发送标志位,按键标志位
   
7. unsigned char irsys[]={0x00,0xff};//16位用户码
   
8. unsigned char irdata,ircode; //发送的红外数据
   
9. //---------------------------------------------------------------------------
   
10. void delay(unsigned int a)//延时约1ms，晶振24M ,此处延时不需很精确
    
11. {
    
12. unsigned char i;
    
13. while(--a!=0)
    
14. for(i=300;i>0;i--); //若是12M晶振i=125
    
15. }
    
16. //---------------------------------------------------------------------------
    
17. void keyscan() // 按键扫描
    
18. {
    
19. if(ka==0){keyflag=1;irdata=0x0a;} //a键按下，则发射数据0x0a
    
20. if(kb==0){keyflag=1;irdata=0x0b;} //b键按下，则发射数据0x0b
    
21. }
    
22. //---------------------------------------------------------------------------
    
23. void ir_sendbyte() //红外发送一个字节数据
    
24. {
    
25. unsigned char i;
    
26. for(i=0;i<8;i++) //发送8位数据
    
27. {
    
28. set_count=43;//35; //发送编码中的0.56ms高电平 (//后为12M晶振下的数值)
    
29. irflag=1; //启动红外发射二极管发射
    
30. count=0; //中断计数先清0
    
31. TR0=1; //开启定时器0
    
32. while(count<set_count); //等待发送完
    
33. TR0=0; //关闭定时器0
    
34. if(ircode&0x01) set_count=130;//130; //判断红外编码最低位,若为1则1.69ms的低电平 (//后为12M晶振下的数值)
    
35. else set_count=43;//35; //为0则0.565ms的低电平 (//后为12M晶振下的数值)
    
36. irflag=0; //低电平则不发射
    
37. count=0; //中断计数清0
    
38. TR0=1; //开启定时器0
    
39. while(count<set_count); //等待发送完
    
40. TR0=0; //关闭定时器0
    
41. ircode=ircode>>1; //将数据右移，即从低位到高位发送
    
42. }
    
43. }
    
44. //---------------------------------------------------------------------------
    
45. void ir_send() //发送红外数据
    
46. {
    
47. set_count=692;//672; //发送编码中的引导码(9ms高电平+4.5ms低电平) (//后为12M晶振下的数值)
    
48. irflag=1; //启动红外发射二极管发射
    
49. count=0; //中断计数清0
    
50. TR0=1;
    
51. while(count<set_count);
    
52. TR0=0;
    
53. set_count=346;//336; //发送编码中的4.5ms低电平(//后为12M晶振下的数值)
    
54. irflag=0; //低电平则不发射
    
55. count=0;
    
56. TR0=1;
    
57. while(count<set_count); //等待发送完
    
58. TR0=0;
    
59. ircode=irsys[0]; //发送16位用户码的前1-8位
    
60. ir_sendbyte();
    
61. ircode=irsys[1]; //发送16位用户码的前9-16位
    
62. ir_sendbyte();
    
63. ircode=irdata; //发送8位数据码
    
64. ir_sendbyte();
    
65. ircode=~irdata; //发送8位数据反码
    
66. ir_sendbyte();
    
67. set_count=43;//35; //发送编码中的0.56ms高电平 (//后为12M晶振下的数值)
    
68. irflag=1;
    
69. count=0;
    
70. TR0=1;
    
71. while(count<set_count);
    
72. TR0=0;
    
73. ir=1;
    
74. delay(23);
    
75. 
    
76. 
    
77. //延时23ms（编码中的23ms低电平）
    
78. set_count=692;//670; //发送编码中的引导码(9ms高电平+4.5ms低电平) (//后为12M晶振下的数值)
    
79. irflag=1;
    
80. count=0;
    
81. TR0=1;
    
82. while(count<set_count);
    
83. TR0=0;
    
84. set_count=346;//336; //发送编码中的4.5ms低电平(//后为12M晶振下的数值)
    
85. irflag=0;
    
86. count=0;
    
87. TR0=1;
    
88. while(count<set_count);
    
89. TR0=0;
    
90. set_count=43;//35; //发送编码中的0.56ms高电平 (//后为12M晶振下的数值)
    
91. irflag=1;
    
92. count=0;
    
93. TR0=1;
    
94. while(count<set_count);
    
95. TR0=0;
    
96. ir=1; //发射完了关闭红外发射二极管
    
97. }
    
98. //---------------------------------------------------------------------------
    
99. void timer0_init() //定时器初始化
    
100. {
     
101. EA=1;
     
102. TMOD=0x02; //定时0 8位自动重装模式
     
103. ET0=1;
     
104. TH0=0xe6;//0xf3; //定时13us,38K红外矩形波,晶振24M (//后为12M晶振下的数值)
     
105. TL0=0xe6;
     
106. }
     
107. //---------------------------------------------------------------------------
     
108. void main()
     
109. {
     
110. timer0_init(); //定时0初始化
     
111. count=0; //中断计数先清0
     
112. irflag=0; //红外发射标志先置0
     
113. while(1)
     
114. {
     
115. keyscan(); //键值扫描
     
116. if(keyflag) //若有按键按下
     
117. {
     
118. delay(10);
     
119. ir_send(); //发送红外编码
     
120. delay(500);
     
121. keyflag=0; //按键标志清零
     
122. delay(100);
     
123. }
     
124. }
     
125. }
     
126. //---------------------------------------------------------------------------
     
127. void timer0() interrupt 1 //定时器0中断
     
128. {
     
129. count++;
     
130. if(irflag==1) ir=~ir; //有发射标志，则发射38khz的矩形波
     
131. else ir=1; //否则不发射，即相当于发射编码中的低电平
     
132. }
     
133. /*说明：本人经多次调试发现若在24M晶振下使用，发射很正常，而在12M晶振下发射的数据则稳定性要差很多，正在完善中*/

复制代码

有没有原理图

感謝無私分享好物

谢谢分享的资料