找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2877|回復: 0
打印 上一主題 下一主題
收起左側

陀螺儀模糊控制2維三角形算法程序源碼

[復制鏈接]
跳轉到指定樓層
樓主
ID:302522 發(fā)表于 2018-4-5 20:31 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
互相交流

模糊控制2維三角形算法如下:
  1. #include "Fuzzy.h"
  2. //二維模糊控制系統(tǒng)
  3. //輸入方向偏差與陀螺儀Y軸數(shù)據(jù),控制輸出方向P

  4. float  Angle_E[3]  = {5,10,15};   //角度偏差
  5. float  Gyro_E[3] = {10,15,30};           //角速度數(shù)據(jù)
  6. float  Shell_P[3]  = {10,15,40};  //外層比例控制系數(shù)

  7. //由于所測數(shù)據(jù)均為單向數(shù)據(jù),故規(guī)則表擬定為單向
  8. int rule[3][3]=
  9.         {
  10.           {2,1,0},
  11.           {1,1,0},
  12.           {0,0,0},
  13.         };

  14. float Fuzzy_Shell_P(float E_angle,float E_gyro);                        

  15. float Fuzzy_Shell_P(float E_angle,float E_gyro)
  16. {
  17.   float  angle_err=0,gyro_err=0;
  18.   int angle_N=0,gyro_N=0; //隸屬語言值
  19.   int  num=0;
  20.   float fuzzy_P=0;
  21.    //記錄隸屬函數(shù)的輸出值
  22.   float  Angle_Fzy[2] ={0.0,0.0};
  23.   float  Gyro_Fzy[2] ={0.0,0.0};

  24.   float  Shell_P_Fzy[3] ={0.0,0.0,0.0};
  25.   // /*----- 數(shù)據(jù)更新-----*/
  26.   // Shell_P[1]  = P_Direction_low;
  27.   // Shell_P[2]  = P_Direction_high;


  28.   //將數(shù)據(jù)取絕對值,數(shù)據(jù)的正負僅代表左右        
  29.         ABS_val(E_angle,angle_err);
  30.         ABS_val(E_gyro,gyro_err);

  31.   /*-----   Angle 隸屬函數(shù)描述-----*/
  32.         if(angle_err<Angle_E[0]) //1
  33.         {
  34.                 Angle_Fzy[0] =1.0;
  35.                 angle_N = 0;
  36.         }
  37.         else if(angle_err<Angle_E[1])  //2
  38.         {
  39.                 Angle_Fzy[0] = (Angle_E[1]-angle_err)/(Angle_E[1]-Angle_E[0]);
  40.                 angle_N = 0;
  41.         }
  42.         else if(angle_err<Angle_E[2])  //3
  43.         {
  44.                 Angle_Fzy[0] = (Angle_E[2]-angle_err)/(Angle_E[2]-Angle_E[1]);
  45.                 angle_N = 1;
  46.         }
  47.         else
  48.         {
  49.                 Angle_Fzy[0] =0;//4
  50.                 angle_N =1;
  51.         }
  52.         Angle_Fzy[1] = 1.0 - Angle_Fzy[0];//隸屬函數(shù)輸出值

  53.   /*----- Pre_dirr 變化隸屬函數(shù)描述-----*/
  54.    if(gyro_err<Gyro_E[0])//當陀螺儀Y軸數(shù)據(jù)小于40時,對應三角隸屬函數(shù)的隸屬度為1,方向量度模糊等級為0級
  55.         {
  56.                 Gyro_Fzy[0] =1;
  57.                 gyro_N = 0;
  58.         }
  59.         else if(gyro_err<Gyro_E[1])//當陀螺儀Y軸數(shù)據(jù)小于70時,對應三角隸屬函數(shù)的隸屬度根據(jù)公式得出,方向量度模糊等級為0級,此時為40三角形的右邊一半
  60.         {
  61.                 Gyro_Fzy[0] = (Gyro_E[1] - gyro_err)/(Gyro_E[1]-Gyro_E[0]);
  62.                 gyro_N = 0 ;
  63.         }
  64.         else if(gyro_err<Gyro_E[2])//當陀螺儀Y軸數(shù)據(jù)小于160時,對應三角隸屬函數(shù)的隸屬度根據(jù)公式得出,方向量度模糊等級為1級,此時為70三角形的左邊一半
  65.         {
  66.                 Gyro_Fzy[0] = (Gyro_E[2] - gyro_err)/(Gyro_E[2]-Gyro_E[1]);
  67.                 gyro_N = 1;
  68.         }
  69.         else                     //當陀螺儀Y軸數(shù)據(jù)大于160時,對應三角隸屬函數(shù)的隸屬度根據(jù)公式得出,方向量度模糊等級為1級,此時為70三角形的右邊一半
  70.         {
  71.                 Gyro_Fzy[0] =0.0;
  72.                 gyro_N = 1;
  73.         }
  74.         //一個數(shù)據(jù)在三角形隸屬度函數(shù)中對應著兩個相鄰三角形中的隸屬度,兩個隸屬度和為1
  75.         Gyro_Fzy[1] = 1.0 - Gyro_Fzy[0];

  76.         /*查詢模糊規(guī)則表*/
  77.         //查表的時候不單單查詢一個規(guī)則,而是向右向下拓展成一個規(guī)則正方形查詢
  78.         num =rule[gyro_N][angle_N];
  79.         Shell_P_Fzy[num] += Gyro_Fzy[0]*Angle_Fzy[0];

  80.         num =rule[gyro_N+1][angle_N];
  81.         Shell_P_Fzy[num] += Gyro_Fzy[1]*Angle_Fzy[0];

  82.         num =rule[gyro_N][angle_N+1];
  83.         Shell_P_Fzy[num] += Gyro_Fzy[0]*Angle_Fzy[1];

  84.         num =rule[gyro_N+1][angle_N+1];
  85.         Shell_P_Fzy[num] += Gyro_Fzy[1]*Angle_Fzy[1];

  86.         /*面積中心法解模糊*/
  87.         fuzzy_P=Shell_P_Fzy[0]*Shell_P[0]+Shell_P_Fzy[1]*Shell_P[1]+Shell_P_Fzy[2]*Shell_P[2];
  88.   return(fuzzy_P);
  89. }
復制代碼

所有資料51hei提供下載:
Fuzzy.zip (1.27 KB, 下載次數(shù): 19)


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂 踩
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復 返回頂部 返回列表