标题: 单片机红外控制灯光亮度的程序 [打印本页]
作者: wongj    时间: 2019-6-16 21:10
标题: 单片机红外控制灯光亮度的程序
电路原理图如下：

  1. #include <reg51.h>
  2. #include <intrins.h>
  3. #define uchar unsigned char
  4. #define uint  unsigned int
  5. #define out P0
  6. #define out_led P1
  7. uchar temp=0;
  8. uint time=0;
  9. uint time_control=20;
  10. //红外控制
  11. sbit        IR    = P3^2;
  12. unsigned char        N[4];//识别码，操作码存放
  13. unsigned char   X1,X2,X3,X4;

  15. sbit led1=P2^0;
  16. sbit led2=P2^1;
  17. sbit led3=P2^2;
  18. sbit led4=P2^3;
  19. sbit led5=P2^4;

  21. sbit DAC_cs=P2^6;
  22. sbit DAC_wr=P2^7;

  24. /********************** 外部中断函数************************/
  25. void exint0() interrupt 0
  26. {         
  27.    unsigned int cnt;
  28.    unsigned char i;
  29.    EX0 = 0;
  30.    cnt = 0;        
  31.         
  32.    while(!IR) cnt++;                               //记录引导码时间
  33.    if(cnt < 1000){EX0=1;return;}                   //9ms的计数值（12MHz：1000< cnt <1500）
  34.            
  35.    cnt = 0;                        
  36.    while(IR) if(cnt++ > 400){EX0=1;return;}        //防卡死，超时保护（12MHz： > 300）   
  37.    if(cnt < 200){EX0=1;return;}                    //（12MHz不分频： <260）            

  39.    for(i=0; i<32; i++)                             //读取32位位码
  40.        {
  41.          cnt = 0;                                                                                                                                                
  42.          while(!IR);                       
  43.          while(IR) if(cnt++ > 200){EX0=1;return;}  //超时保护（12MHz：>=200）
  44.          N[i/8] >>= 1;
  45.          if(cnt>60) N[i/8] |= 0x80;                //0和1的计数界线（12MHz：< 109）   
  46.        }

  48.         if(N[0] == ~N[1] && N[2] == ~N[3])            //校验识别码，操作码        
  49.         {
  50.                    X1 = N[0]/16;
  51.                 X2 = N[0]%16;
  52.                 X3 = N[2]/16;
  53.                 X4 = N[2]%16;
  54.                 switch(X4){
  55.                         case 0x01:
  56.                                    led1=~led1;
  57.                                 break;
  58.                         case 0x02:
  59.                                 led2=~led2;
  60.                                 break;
  61.                         case 0x03:
  62.                                 led3=~led3;
  63.                                 break;
  64.                         case 0x04:
  65.                                 led4=~led4;
  66.                                 break;
  67.                         case 0x05:
  68.                                 if(temp<0xff){
  69.                                         temp=temp+0x11;
  70.                                         if(time_control>50)
  71.                                         {time_control=time_control+5;}
  72.                                 }
  73.                                 break;
  74.                         case 0x06:
  75.                                 if(temp>0x44){
  76.                                         temp=temp-0x11;
  77.                                         if(time_control>5)
  78.                                         {time_control=time_control-5;}
  79.                                 }
  80.                                 break;
  81.                 }
  82.                
  83.         }
  84.         EX0 = 1;                 
  85. }

  87. void delay(uchar n){
  88.         do{
  89.                 _nop_();
  90.                 _nop_();
  91.                 _nop_();
  92.                 n--;
  93.         }while(n);
  94. }

  96. void timer0() interrupt 3
  97. {
  98.         time++;
  99.         if(time>time_control){
  100.            led5=~led5;
  101.            time=0;
  102.         }
  103.         
  104.         TH1=(65536-50000)/256;
  105.         TL1=(65536-50000)%256;
  106. }

  108. void main(){
  109.         
  110.         TMOD=0x10;
  111.         TH1=(65536-5000)/256;
  112.         TL1=(65536-5000)%256;
  113.         ET1=1;
  114.         TR1=1;
  115.         IT0 = 1;
  116.         EX0 = 1;
  117.         EA  = 1;
  118.         X1=X2=X3=X4 = 0;
  119.         temp=0x44;
  120.         out_led=0xff;
  121.         while(1){
  122.                 DAC_cs=0;
  123.                 DAC_wr=0;
  124.                 DAC_cs=1;
  125.                 DAC_wr=1;

  127.                
  128.                 out        =temp;

  130.                 delay(1000);
  131.         }
  132. }
复制代码
  1. #include <reg51.h>
  2. #include <intrins.h>
  3. #define uchar unsigned char
  4. #define uint  unsigned int

  6. uint times=0;
  7. sbit led1=P1^0;
  8. sbit led2=P1^1;
  9. sbit led3=P1^2;
  10. sbit led4=P1^3;
  11. sbit ledup=P1^4;
  12. sbit leddown=P1^5;

  14. #define SBM   0x80                //识别码

  16. #define m9    (65536-9000)               //约9mS
  17. #define m4_5  (65536-4500)               //约4.5mS
  18. #define m1_6  (65536-1630)               //约1.65mS
  19. #define m_65  (65536-580)               //约0.65mS
  20. #define m_56  (65536-560)               //约0.56mS
  21. #define m40   (65536-40000)       //约40mS
  22. #define m56   (65536-56000)       //56mS
  23. #define m2_25 (65536-2250)        //约2.25mS

  25. sbit IR  = P3^6;                                  //定义发射引脚（接PNP三极管基极）

  27. uchar KEY(void);
  28. void  SanZhuan(void);
  29. void  ZZ(uchar x);
  30. void  Z0(uchar temp);
  31. void  TT0(bit BT,uint x);
  32. void  YS(uchar time);
  33. void delay(unsigned char n){
  34.         do{
  35.                 _nop_();
  36.                 _nop_();
  37.                 _nop_();
  38.                 n--;
  39.         }while(n);
  40. }
  41. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  42. 函数功能：主函数
  43. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  44. void main(void)
  45. {

  47.   TMOD = 0x01;         //T0 16位工作方式
  48.   IR=1;                                   //发射端口常态为高电平

  50.   while(1)
  51.   {
  52.    SanZhuan();
  53.   }
  54. }


  57. uchar KEY(void)
  58. {
  59.         P1 = 0xff;            //将键盘端口行值设为1，列值设为0
  60.          if(led1==0){
  61.                   return 1;
  62.          }else if(led2==0){
  63.                    return 2;
  64.          }else if(led3==0){
  65.                    return 3;
  66.          }else if(led4==0){
  67.                    return 4;
  68.          }else if(ledup==0){
  69.                    return 5;
  70.          }else if(leddown==0){
  71.                    return 6;
  72.          }

  74.   return 0;
  75. }
  76. /***************************************************************
  77. 函数功能：散转程序
  78. 入口参数：v
  79. //
  80. //  13 14 15 16
  81. //  9  10 11 12
  82. //  5  6  7  8
  83. //  1  2  3  4
  84. ***************************************************************/
  85. void SanZhuan(void)
  86. {
  87. uchar v;
  88. v = KEY();
  89. switch(v)
  90. {
  91.   case 1:ZZ(0x01);v=0;break;                //"  "
  92.   case 2:ZZ(0x02);v=0;break;                //"  "
  93.   case 3:ZZ(0x03);v=0;break;                //"  "
  94.   case 4:ZZ(0x04);v=0;break;                //"  "
  95.   case 5:ZZ(0x05);v=0;break;                //"  "
  96.   case 6:ZZ(0x06);v=0;break;                //"  "
  97.   default:v=0;
  98. }
  99. }
  100. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  101. 函数功能：发送主程序
  102. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  103. void ZZ(uchar x)
  104. {
  105.   TT0(1,m9);                   //高电平9mS
  106.   TT0(0,m4_5);               //低电平4.5mS

  108.   /*┈ 发送4帧数据 ┈*/
  109.         Z0(SBM);                                                                                                                                       
  110.         Z0(~SBM);

  112.   
  113.   Z0(x);
  114.   Z0(~x);

  116.   /*┈┈ 结束码 ┈┈*/
  117.   TT0(1,m_65);
  118.   TT0(0,m40);

  120.   /*┈┈ 重复码 ┈┈*/
  121.   while(KEY())
  122.    {
  123.         TT0(1,m9);
  124.         TT0(0,m2_25);

  126.         TT0(1,m_56);
  127.         TT0(0,m40);
  128.                 TT0(0,m56);
  129.                                                          
  130.     }
  131.                   

  133. }
  134. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  135. 函数功能：单帧发送程序
  136. 入口参数：1帧数据
  137. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  138. void Z0(uchar temp)
  139. {
  140.   uchar v;
  141.   for (v=0;v<8;v++)                     //循环8次移位
  142.        {     
  143.                  TT0(1,m_65);                        //高电平0.65mS         
  144.                          if(temp&0x01) TT0(0,m1_6); //发送最低位
  145.                          else          TT0(0,m_56);     
  146.                          temp >>= 1;                //右移一位
  147.         }   
  148. }

  150. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  151. 函数功能：38KHz脉冲发射 + 延时程序
  152. 入口参数：（是否发射脉冲,延时约 x (uS)）
  153. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  154. void TT0(bit BT,uint x)
  155. {
  156.   TH0 = x>>8;                    //输入T0初始值
  157.   TL0 = x;
  158.   TF0=0;                                //清0
  159.   TR0=1;                                //启动定时器0
  160.   if(BT == 0) while(!TF0);        //BT=0时不发射38KHz脉冲只延时；BT=1发射38KHz脉冲且延时；
  161.   else while(1)                            //38KHz脉冲，占空比5:26
  162.          {
  163.                   IR = 0;
  164.                   if(TF0)break;
  165.                if(TF0)break;
  166.                   IR = 1;
  167.                 if(TF0)break;
  168.                  if(TF0)break;
  169.                  if(TF0)break;
  170.                   if(TF0)break;
  171.                  if(TF0)break;
  172.                  if(TF0)break;
  173.                  if(TF0)break;
  174.                  if(TF0)break;
  175.                  if(TF0)break;
  176.                   if(TF0)break;
  177.                  }
  178.   TR0=0;                                //关闭定时器0
  179.   TF0=0;                                //标志位溢出则清0

  181.   IR =1;                                //脉冲停止后，发射端口常态为高电平
  182. }
  183. /***************************************************************
  184. 函数功能：按键消抖    延时程序
  185. 入口参数：1ms×time       （晶振=12MHz）
  186. ***************************************************************/
  187. void YS(uchar time)
  188. {
  189.      uchar i,j;
  190.          for(i=0; i<time; i++)
  191.      for(j=0; j<247; j++)_nop_();
  192. }
复制代码


作者: 51hei团团    时间: 2019-6-17 00:38
好资料，求仿真工程啊
作者: wongj    时间: 2019-6-17 09:37
忘了放程序了。。。。
作者: irz123    时间: 2019-6-18 23:48
wongj 发表于 2019-6-17 09:37
忘了放程序了。。。。

放啊............
作者: xjlfh    时间: 2021-5-14 11:42
这个发射程序为何在STC15F100系列无法正常工作啊，谁能说一下咋样改才可以用？测试了stc89c52rc可以正常使用，红外发射管也可以指定另外端口。



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1