1. 程式人生 > >(轉)網友的經典演算法

(轉)網友的經典演算法

寫在前面的話:
這是我收藏的一個典型的PID處理程式,
包含了最常用的PID演算法的基本架構,沒有包含輸入輸出處理部分。適合新手瞭解PID結構,入門學習用。

注意:

使用不同的MCU的時候,需要進行相應的簡化和改寫。而且由於微控制器的處理速度和ram資源的限制,一般不採用浮點數運算。而將所有引數全部用整數,運算到最後再除以一個2的N次方資料(相當於移位),作類似定點數運算。這樣可大大提高運算速度,根據控制精度的不同要求,當精度要求很高時,注意保留移位引起的“餘數”,做好餘數補償就好了。
廢話不多說,下面上程式
  1. #include<reg51.h>
  2. #include<intrins.h>
  3. #include<math.h>
  4. #include<string.h>
  5. struct PID {
  6.         unsigned int SetPoint; // 設定目標 Desired Value
  7.         unsigned int Proportion; // 比例常數 Proportional Const
  8.         unsigned int Integral; // 積分常數 Integral Const
  9.         unsigned int Derivative; // 微分常數 Derivative Const
  10.         unsigned int LastError; // Error[-1]
  11.         unsigned int PrevError; // Error[-2]
  12.         unsigned int SumError; // Sums of Errors
  13.         };
  14. struct PID spid; // PID Control Structure
  15. unsigned int rout; // PID Response (Output)
  16. unsigned int rin; // PID Feedback (Input)
  17. sbit data1=P1^0;
  18. sbit clk=P1^1;
  19. sbit plus=P2^0;
  20. sbit subs=P2^1;
  21. sbit stop=P2^2;
  22. sbit output=P3^4;
  23. sbit DQ=P3^3;
  24. unsigned char flag,flag_1=0;
  25. unsigned char high_time,low_time,count=0;//佔空比調節引數
  26. unsigned char set_temper=35;
  27. unsigned char temper;
  28. unsigned char i;
  29. unsigned char j=0;
  30. unsigned int s;
  31.         /***********************************************************
  32.         延時子程式,延時時間以12M晶振為準,延時時間為30us×time
  33.         ***********************************************************/
  34. void delay(unsigned char time)
  35.         {
  36.             unsigned char m,n;
  37.             for(n=0;n<time;n++)
  38.             for(m=0;m<2;m++){}
  39.         }
  40.         /***********************************************************
  41.         寫一位資料子程式
  42.         ***********************************************************/
  43. void write_bit(unsigned char bitval)
  44. {
  45.           EA=0;
  46.           DQ=0; /*拉低DQ以開始一個寫時序*/
  47.         if(bitval==1)
  48.         {
  49.           _nop_();
  50.           DQ=1; /*如要寫1,則將匯流排置高*/
  51.         }
  52.          delay(5); /*延時90us供DA18B20取樣*/
  53.          DQ=1; /*釋放DQ匯流排*/
  54.         _nop_();
  55.         _nop_();
  56.         EA=1;
  57. }
  58.         /***********************************************************
  59.         寫一位元組資料子程式
  60.         ***********************************************************/
  61. void write_byte(unsigned char val)
  62. {
  63.             unsigned char i;
  64.             unsigned char temp;
  65.             EA=0;
  66.             TR0=0;
  67.         for(i=0;i<8;i++) /*寫一位元組資料,一次寫一位*/
  68.         {
  69.           temp=val>>i; /*移位操作,將本次要寫的位移到最低位*/
  70.           temp=temp&1;
  71.           write_bit(temp); /*向匯流排寫該位*/
  72.         }
  73.           delay(7); /*延時120us後*/
  74.         // TR0=1;
  75.           EA=1;
  76. }
  77.         /***********************************************************
  78.         讀一位資料子程式
  79.         ***********************************************************/
  80. unsigned char read_bit()
  81. {
  82.         unsigned char i,value_bit;
  83.         EA=0;
  84.         DQ=0; /*拉低DQ,開始讀時序*/
  85.         _nop_();
  86.         _nop_();
  87.         DQ=1; /*釋放匯流排*/
  88.         for(i=0;i<2;i++){}
  89.         value_bit=DQ;
  90.         EA=1;
  91.         return(value_bit);
  92. }
  93.         /***********************************************************
  94.         讀一位元組資料子程式
  95.         ***********************************************************/
  96. unsigned char read_byte()
  97. {
  98.         unsigned char i,value=0;
  99.         EA=0;
  100.         for(i=0;i<8;i++)
  101.         {
  102.         if(read_bit()) /*讀一位元組資料,一個時序中讀一次,並作移位處理*/
  103.         value|=0x01<<i;
  104.         delay(4); /*延時80us以完成此次都時序,之後再讀下一資料*/
  105.         }
  106.         EA=1;
  107.         return(value);
  108. }
  109.         /***********************************************************
  110.         復位子程式
  111.         ***********************************************************/
  112. unsigned char reset()
  113. {
  114.         unsigned char presence;
  115.         EA=0;
  116.         DQ=0; /*拉低DQ匯流排開始復位*/
  117.         delay(30); /*保持低電平480us*/
  118.         DQ=1; /*釋放匯流排*/
  119.         delay(3);
  120.         presence=DQ; /*獲取應答訊號*/
  121.         delay(28); /*延時以完成整個時序*/
  122.         EA=1;
  123.         return(presence); /*返回應答訊號,有晶片應答返回0,無晶片則返回1*/
  124. }
  125.         /***********************************************************
  126.         獲取溫度子程式
  127.         ***********************************************************/
  128. void get_temper()
  129. {
  130.         unsigned char i,j;
  131.         do
  132.         {
  133.            i=reset(); /*復位*/
  134.         }  while(i!=0); /*1為無反饋訊號*/
  135.             i=0xcc; /*傳送裝置定位命令*/
  136.            write_byte(i);
  137.            i=0x44; /*傳送開始轉換命令*/
  138.            write_byte(i);
  139.            delay(180); /*延時*/
  140.         do
  141.         {
  142.            i=reset(); /*復位*/
  143.         }  while(i!=0);
  144.            i=0xcc; /*裝置定位*/
  145.            write_byte(i);
  146.            i=0xbe; /*讀出緩衝區內容*/
  147.            write_byte(i);
  148.            j=read_byte();   
  149.            i=read_byte();
  150.            i=(i<<4)&0x7f;
  151.            s=(unsigned int)(j&0x0f);            //得到小數部分
  152.            s=(s*100)/16;
  153.            j=j>>4;
  154.            temper=i|j; /*獲取的溫度放在temper中*/
  155.         }
  156.         /*====================================================================================================
  157.         Initialize PID Structure
  158.         =====================================================================================================*/
  159. void PIDInit (struct PID *pp)
  160. {
  161.         memset ( pp,0,sizeof(struct PID));           //全部初始化為0
  162. }
  163.         /*====================================================================================================
  164.         PID計算部分
  165.         =====================================================================================================*/
  166. unsigned int PIDCalc( struct PID *pp, unsigned int NextPoint )
  167. {
  168.         unsigned int dError,Error;
  169.         Error = pp->SetPoint - NextPoint;          // 偏差           
  170.         pp->SumError += Error;                     // 積分                                   
  171.         dError = pp->LastError - pp->PrevError;    // 當前微分  
  172.         pp->PrevError = pp->LastError;                           
  173.         pp->LastError = Error;                                        
  174.         return (pp->Proportion * Error             // 比例項           
  175.         + pp->Integral * pp->SumError              // 積分項
  176.         + pp->Derivative * dError);                // 微分項
  177. }
  178.         /***********************************************************
  179.         溫度比較處理子程式
  180.         ***********************************************************/
  181. void compare_temper()
  182. {
  183.         unsigned char i;
  184.         if(set_temper>temper)      //是否設定的溫度大於實際溫度
  185.         {
  186.            if(set_temper-temper>1)         //設定的溫度比實際的溫度是否是大於1度
  187.           {
  188.            high_time=100;                     //如果是,則全速加熱
  189.            low_time=0;
  190.           }
  191.        else                                         //如果是在1度範圍內,則執行PID計算
  192.           {
  193.             for(i=0;i<10;i++)
  194.           {
  195.             get_temper();                          //獲取溫度
  196.             rin = s; // Read Input
  197.             rout = PIDCalc ( &spid,rin ); // Perform PID Interation
  198.           }
  199.             if (high_time<=100)
  200.               high_time=(unsigned char)(rout/800);
  201.             else
  202.           high_time=100;
  203.               low_time= (100-high_time);
  204.           }
  205.         }
  206.         else if(set_temper<=temper)
  207.         {
  208.            if(temper-set_temper>0)
  209.           {
  210.             high_time=0;
  211.             low_time=100;
  212.           }
  213.            else
  214.           {
  215.              for(i=0;i<10;i++)
  216.            {
  217.          get_temper();
  218.          rin = s; // Read Input
  219.              rout = PIDCalc ( &spid,rin ); // Perform PID Interation
  220.            }
  221.              if (high_time<100)
  222.               high_time=(unsigned char)(rout/10000);
  223.              else
  224.               high_time=0;
  225.               low_time= (100-high_time);
  226.           }
  227.         }
  228.         // else
  229.         // {}
  230. }
  231.         /*****************************************************
  232.         T0中斷服務子程式,用於控制電平的翻轉 ,40us*100=4ms週期
  233.         ******************************************************/
  234. void serve_T0() interrupt 1 using 1
  235. {
  236.         if(++count<=(high_time))
  237.         output=1;
  238.         else if(count<=100)
  239.         {
  240.         output=0;
  241.         }
  242.         else
  243.         count=0;
  244.         TH0=0x2f;
  245.         TL0=0xe0;
  246. }
  247.         /*****************************************************
  248.         序列口中斷服務程式,用於上位機通訊
  249.         ******************************************************/
  250. void serve_sio() interrupt 4 using 2
  251. {
  252.         /* EA=0;
  253.         RI=0;
  254.         i=SBUF;
  255.         if(i==2)
  256.         {
  257.         while(RI==0){}
  258.         RI=0;
  259.         set_temper=SBUF;
  260.         SBUF=0x02;
  261.         while(TI==0){}
  262.         TI=0;
  263.         }
  264.         else if(i==3)
  265.         {
  266.         TI=0;
  267.         SBUF=temper;
  268.         while(TI==0){}
  269.         TI=0;
  270.         }
  271.         EA=1; */
  272. }
  273. void disp_1(unsigned char disp_num1[6])
  274. {
  275.         unsigned char n,a,m;
  276.         for(n=0;n<6;n++)
  277.         {
  278.         // k=disp_num1[n];
  279.          for(a=0;a<8;a++)
  280.          {
  281.             clk=0;
  282.           m=(disp_num1[n]&1);
  283.           disp_num1[n]=disp_num1[n]>>1;
  284.           if(m==1)
  285.            data1=1;
  286.           else
  287.            data1=0;
  288.            _nop_();
  289.            clk=1;
  290.            _nop_();
  291.          }
  292.         }
  293. }
  294.         /*****************************************************
  295.         顯示子程式
  296.    &