算法模糊程序为模糊控制基于8位单片机程序实现简单的

1、程序为模糊控制程序，基于 8 位单片机，为模糊控制算法程序，实现简单的模糊控制，经实践总结得出，当调整幅度较大时，会出现振荡，系统难以达到稳定，这就需要更高一级的算法控制调整，当调整幅度较小时，系统可以很快达到稳定。以下为模糊算法源程序：include reg52.h/ 定义差距输入常量#define #define #define #define #defineGAP_ZERO GAP_VSMALL GAP_SMALL GAP_MEDIUM GAP_BIG0 x000 x010 x020 x030 x04/ 定义控制输出常量#define #define #define #define #d

2、efineTURN_ZERO TURN_VSMALL TURN_SMALL TURN_MEDIUM TURN_BIG0 x800 x810 x820 x830 x84/定义常量#define 0XFFMU_MAX/模糊度的最大值为 0XFF 代表面 1 #define RULE_TOT10则数个数 #define MF_TOT 5/成员函数的个数/规#define #define #defineIO_NUM 0 x07 LABEL_NUM 0 x70 DEFAULT_VALUE 0 x00/定义数据库unsigned char code output_memfMF_TOT=0, TURNING

3、 NUMBER:15, 35, 60, 102;/ OUTPUT/ZERO,VSMALL, SMALL, MEDIUM, BIGunsigned char code input_memfMF_TOT4=/ 输入功能函数以点斜式方式. 第一维成员函数标号第二维是点斜式数据/距离功能函数 0 x00, 0 x00, 0 x00, 0 x0d , / VSLOW0 x00,0 x1e, 0 x3C,0 x50,0 x0d, 0 x0d, 0 x0d, 0 x09,0 x14,0 x32,0 x50,0 x6e,0 x0d 0 x0d 0 x0d 0 x00,/SLOW MEDIUM FAST/ VF

4、AST;/定义模糊系统规则unsigned char code rulesRULE_TOT=/ if.then.GAP_ZERO,TURN_ZERO, GAP_VSMALL,TURN_VSMALL, GAP_SMALL,TURN_SMALL, GAP_MEDIUM,TURN_MEDIUM, GAP_BIG,TURN_BIG;/定义各变量unsigned char outputsMF_TOT,fuzzy_out;输出 mu 值/子程序函数头/模糊void fuzzy_engine(uchar);uchar compute_memval(uchar,uchar); void defuzzify(v

5、oid);uchar compute_memval(uchar input,uchar label)daemp;if (input input_memflabel0)/ 如果输入不在曲线下u 值为 0return 0;elseif (input input_memflabel2)temp=input;/ 用点斜式计算 mutemp-=input_memflabel0; if (!input_memflabel1)temp=MU_MAX;elsetemp*=input_memflabel1;if (temp 0 x100)/ 如果结果不超过 1returntemp;/返回计算结果elseretu

6、rnMU_MAX;/确保mu值在范围内else/ 输入落在第二条斜线上temp=input;/ 用点斜式方法计算mutemp-=input_memflabel2; temp*=input_memflabel3;temp=MU_MAX-temp; if (temp 0)/确保结果不小于 0return 0;elsereturntemp;/mu为正 返回结果return 0;voiddefuzzify(void)unsigned long numerator, denominator; unsigned char j;numerator=0;恢复总数值denominator=0;/for (j=0

7、;/ 计算总和值jMF_TOT; j+)numerator+=(outputsj*output_memfj); denominator+=outputsj;outputsj=0; / 清零输出作为参考使用if(denominator)/ 确保分母是 0 的情况不发生fuzzy_out=numerator/denominator; / 确定 COGelsefuzzy_out=DEFAULT_VALUE;/ 没有规则被触发unsigned char bdata clause_val;前的分支进行快速/ 保存当sbit clause_type clause_val7;=/ 表示分支是否是条件分支或者

8、是结果分支void fuzzy_engine(uchar input)bitthen;/ 当正在分析结果时置位unsigned charif_val,当前规则中条件分支中的值/ 保存clause,/ 规则基中当前的分支mu,/ 保存当前分支中的值label=0;/ 被条件使用的成员函数then=0;/ 设第一个分支是条件分支if_val=MU_MAX;/ max out mu for the for (clause=0; clauseRULE_TOT; clause+)/ 遍历每条规则clause_val=rulesclause;/ 读入当前的分支if (!clause_type)/ 当前的分支是不是条件分支if (then)/ 是否正在分析结果.then=0;ruleif_val=MU_MAX;/ 复位 muute_memval(input,label);/得到条件分支的值if_val=mu; label+;else/ 当前分支是结果then=1;/ 置位标志位,如果当前规则的 mu 比参考的值要大,保存这个值作为新的模糊输出if (outputsclause_val&0 x07 if_val)outputscl