1、#include#includemath.h #define PMAX 100#define PMIN -100#define DMAX 100#define DMIN -100#define FMAX 100 /*語言值的完整大小*/Int PFF4=0，12，24，48 ；/*輸入卷d語言值特征點(diǎn)*/Int DFF4=0，16，32，64 ；/*輸出量u語言值特征點(diǎn)*/Intuff 7=0，15，30，45，60，75，90 ；/*采用曹征系數(shù)的規(guī)則表，大誤差偏向誤差，小誤差偏向誤差變化*/* A0=0.3，a1=0.55，a2=0.74，a3=0.89 */Int rule77=/誤差變

2、化率-3、-2、-1、0、1、2、3 /誤差-6，-6，-6，-6，-5，-5，-5，-4，/-3-5，-4，-4，-3，-2，-2，-1，/-2-4，-3，-2，-1，0，1，2，/-1-4，-3，-1，0，1，3，4，/0-2，-1，0，1，2，3，4，/11，2，2，3，4，4，5，/24，5，5，5，5，6，6 ；/3/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *Int Fuzzy(int P，int D) /*模糊計(jì)算引擎*/int U；/*偏差、偏差

3、微分和輸出值的精確量*/Unsigned int PF2、DF2、UF4；/*偏差、偏差微分和輸出值的成員資格*/Int Pn、Dn、Un4；長temp1、temp2/*確定成員資格*/*根據(jù)PD中的指定語言值獲取有效成員資格*/If(P-PFF3 P=PFF3)pn=3；PF0=0；PF1=FMAX-PF0；If(D-DFF3 D=DFF3)dn=3；DF0=0；DF1=FMAX-DF0；/*使用錯(cuò)誤范圍最優(yōu)化規(guī)則表rule77*/*輸出值使用13個(gè)從屬函數(shù)，中心值由UFF7表示為*/*通常，四個(gè)茄子規(guī)則有效*/un0=rulePn-1 3Dn-1 3；un1=rulePn 3Dn-1 3；

4、un2=rulePn-1 3Dn 3；un3=rulePn 3Dn 3；If(PF0=DF0)UF0=PF0；ElseUF0=DF0；If(PF1=DF0)UF1=PF1；ElseUF1=DF0；If(PF0=DF1)UF2=PF0；ElseUF2=DF1；If(PF1=DF1)UF3=PF1；ElseUF3=DF1；/*查找會(huì)員函數(shù)輸出語言值*/If(Un0=Un1)If(UF0UF1)UF1=0；ElseUF0=0；If(Un0=Un2)If(UF0UF2)UF2=0；ElseUF0=0；If(Un0=Un3)If(UF0UF3)UF3=0；ElseUF0=0；If(Un1=Un2)If(

5、UF1UF2)UF2=0；ElseUF1=0；If(Un1=Un3)If(UF1UF3)UF3=0；ElseUF1=0；If(Un2=Un3)If(UF2UF3)UF3=0；ElseUF2=0；/*重心法反模糊*/*Un原始值是輸出所屬函數(shù)標(biāo)簽，所屬函數(shù)值*/If(Un0=0)un0=uffun0；Elseun0=-uff-un0；If(Un1=0)Un1=UFFUn1；ElseUn1=-UFF-Un1；If(Un2=0)Un2=UFFUn2；Elseun2=-uff-un2；If(Un3=0)Un3=UFFUn3；ElseUn3=-UFF-Un3；temp 1=uf0* un0uf1* un

6、1uf2* un2uf3* un3temp 2=UF0UF1UF2UF3；u=temp 1/temp 2；return U；Void main()Int a=0，e，EC；/*int nowpoint，p1，p2=1；FILE *in，* outIn=fopen(in.txt ， r )；Out=fopen(out.txt ， w )；*/while(！Feof(in)While(1)/fscanf(in，“%d”，now point)；/P1=now point；/e=0-now point；/EC=P1-p2；Printf(輸入“e :”)；scanf(“% d”，e)；Printf(輸入“EC :”)；scanf(“% d”，EC)；A=模糊(e，EC)；/fprintf(out，“%d”，a)；/printf