标题: 数控稳压电源 PID闭环控制 带仿真 源码 51单片机制作 [打印本页]
作者: lessen_li    时间: 2017-5-16 15:30
标题: 数控稳压电源 PID闭环控制 带仿真 源码 51单片机制作
带有PID闭环控制，存在问题是调整率低，51单片机制作


单片机源程序如下:

  2. void    PWMProcess(void)
  3. {
  4.     uint16 idata temp;
  5.     uint16 idata UKTemp;
  6.           temp = 0;
  7.     UKTemp = 0;
  8.    
  9.     if( Pwm.ChangeFlag_Uint8 != 0 )   //???????????
  10.                 {                  //????????????????????
  11.                         Pwm.ChangeFlag_Uint8 = 0;
  12.         
  13.                         UKTemp = PID.Uk_Uint16 + SwIn.AddValue_Uint16;//??UK???
  14.                         //????????????????,????????????????????????????
  15.                         if(UKTemp>999)
  16.                         {
  17.                                 UKTemp = 999;
  18.                         } //??????999?????1024???????PWM??????12V???
  19.                         while(1)//????????????? Delta,????????,???????
  20.                         {
  21.                                 ADChPro(UPWMADCH);          //??????
  22.                                 if( ADPool.Value_Uint16[UPWMADCH] == UKTemp)
  23.                                 {
  24.                                         return;
  25.                                 }
  26.                                 if( ADPool.Value_Uint16[UPWMADCH] > UKTemp)   //????????????,?????
  27.                                 {
  28.                                         if( ( ADPool.Value_Uint16[UPWMADCH] - UKTemp ) > UDELTA )
  29.                                         {
  30.                                                 temp = ADPool.Value_Uint16[UPWMADCH] - UKTemp;  //
  31.                                                 temp = temp / 2;       //????????,????????  -----/*PWM????UK/4*/
  32.                                                 if( Pwm.DutyCycle_Uint8 > temp )
  33.                                                 {
  34.                      Pwm.DutyCycle_Uint8 = Pwm.DutyCycle_Uint8 - temp;
  35.                                                 }
  36.                                                 else
  37.                                                 {
  38.                     Pwm.DutyCycle_Uint8 = 0;
  39.                                                 }
  40.                                         }
  41.                                         else
  42.                                         {
  43.                   return;
  44.                                         }
  45.                                 }
  46.                                 else           //????????????
  47.                                 {
  48.                                         if( ( UKTemp - ADPool.Value_Uint16[UPWMADCH] ) > UDELTA )
  49.                                         {
  50.                                                 temp = UKTemp - ADPool.Value_Uint16[UPWMADCH];
  51.                                                 temp = temp / 4;  //????????,?????+??
  52.                                                 if( (255-Pwm.DutyCycle_Uint8) > temp )
  53.                                                 {
  54.                     Pwm.DutyCycle_Uint8 += (temp/2);
  55.                                                 }
  56.                                                 else
  57.                                                 {
  58.                     Pwm.DutyCycle_Uint8 = 255;
  59.                                                 }
  60.                                         }
  61.                                         else
  62. ……………………

  64. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
BUCK_adj.zip (156.28 KB, 下载次数: 168)


作者: uaeng    时间: 2017-5-16 21:23
千呼万唤始出来，谢谢楼主!
作者: 鹏博士PBs    时间: 2019-7-12 08:57
厉害了 感谢分享



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