標題: 基于STC15單片機的SI7021 IDC機房放火控制系統(tǒng)源碼 [打印本頁]
作者: 翟正濤    時間: 2018-4-3 11:53
標題: 基于STC15單片機的SI7021 IDC機房放火控制系統(tǒng)源碼
粘貼一段STC15W4K32S4的PWM程序，希望大家喜歡，里面用了SI7021溫濕度傳感器，提供全部源碼

單片機源程序如下:
  1. #include <STC15F2K60S2.H>
  2. #include <STC15_PWM.H>


  5. #define EAXSFE() P_SW2 |= 0x80;     //CPU訪問外部擴展
  6. #define EAXRAM() P_SW2 &= 0x7F;                //CPU訪問內(nèi)部RAM

  8. unsigned int PWM_Duty = 600;
  9. int PWM_Right_Duty = 100,PWM_Left_Duty = 100;
  10. unsigned int PWM_Freq = 2200;

  12. void PWM_init()
  13. {
  14.         PWMCFG = 0;          //PWM配置寄存器 全部初始低電平
  15.         EAXSFE();        
  16.         PWMCKS = 0x00;//不分頻，分頻數(shù)=低四位加一               
  17.         PWM2CR = 0x08;
  18.         PWM3CR = 0x00;
  19.         P2M0 |= (1<<7);
  20.         P2M0 |= (1<<1);
  21.         PWM2T1H = PWM3T1H = 0;
  22.         PWM2T1L = PWM3T1L = 0;
  23.         PWM_Flash_Freq(PWM_Freq);
  24.         PWM_Flash_Duty(PWM_Duty);
  25.         EAXRAM();
  26. /////////////////////////////////////        
  27.         PWMCR = 0x83;        //PWM選擇控制寄存器
  28. //PWMCR 啟用PWMn對應(yīng)為置“1”        ，
  29. //ENPWM/ECBI/EN7/EN6/EN5/EN4/EN3/EN2/        
  30. //        1                        0                0                0                0                0                1                1
  31. //////////////////////////////////////        
  32. }

  34. void PWM2_Flash_Duty(uint Duty)
  35. {
  36.         PWM_Right_Duty = Judgment_value(Duty);
  37.         EAXSFE();
  38.         PWM2T2H = PWM_Duty / 256;
  39.         PWM2T2L = PWM_Duty % 256;               
  40.         EAXRAM();        
  41. }

  43. void PWM3_Flash_Duty(uint Duty)
  44. {
  45.         PWM_Left_Duty = Judgment_value(Duty);
  46.         EAXSFE();
  47.         PWM3T2H = PWM_Duty / 256;
  48.         PWM3T2L = PWM_Duty % 256;               
  49.         EAXRAM();
  50. }

  52. void PWM_Flash_Duty(uint Duty)
  53. {
  54.         PWM_Duty = Judgment_value(Duty);
  55.         EAXSFE();
  56.         PWM2T2H =        PWM3T2H = PWM_Duty / 256;
  57.         PWM2T2L =        PWM3T2L = PWM_Duty % 256;
  58.         EAXRAM();        
  59. }        

  61. void PWM_Flash_Freq(uint Freq)        
  62. {
  63.         Freq = Judgment_value(Freq);
  64.         EAXSFE();
  65.         PWMCH = Freq / 256;
  66.         PWMCL = Freq % 256;               
  67.         EAXRAM();
  68. }

  70. uint Judgment_value(uint value)
  71. {
  72.         if(value>(PWM_Freq-20))
  73.                 value=PWM_Freq-20;
  74.         if(value<11)
  75.                 value=20;
  76.         return value;
  77. }
復(fù)制代碼

所有資料51hei提供下載:
防火控制.rar (747.29 KB, 下載次數(shù): 31)


作者: omer    時間: 2019-3-25 13:45
感謝開源分享，借鑒一下。
作者: qiang41194    時間: 2019-12-15 13:22
感謝樓主分享
作者: xujg74    時間: 2025-4-30 12:12
弱弱的問一句機房里為啥要放火？
作者: powerdruy    時間: 2025-4-30 14:47
xujg74 發(fā)表于 2025-4-30 12:12
弱弱的問一句機房里為啥要放火？

大概是筆誤，防火吧



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1