gaop.m

MATLAB语言实现的模糊控制

clear all;
close all;
clf reset;
set(gcf,'Position',[0 0 1024 718]);
set(gcf,'menubar','none');
str='遗传算法优化控制参数';
set(gcf,'name',str,'numbertitle','off');  %书写图形窗名
m_1ctrlt=uimenu('label','&T控制类型','position',1);
%优化pid参数界面初始化
i_pid=['set(m_11pid,''enable'',''off''),',...
        'set(m_12ann,''enable'',''on''),',...
        'set(m_13f,''enable'',''on''),',...
        'set(m_14sys,''enable'',''on''),',...
        'set(m_1ctrlt,''enable'',''off''),',...
        'set(b_1pid,''visible'',''off''),',...
        'set(b_2ann,''visible'',''off''),',...
        'set(b_3f,''visible'',''off''),',...
        'set(b_4sys,''visible'',''off''),'...
        'pid',...
    ];
%优化神经网络权值界面初始化
i_ann=['set(m_11pid,''enable'',''on''),',...
     'set(m_12ann,''enable'',''off''),',...
     'set(m_13f,''enable'',''on''),',...
     'set(m_14sys,''enable'',''on''),',...
     'set(m_1ctrlt,''enable'',''off''),',...
     'set(b_1pid,''visible'',''off''),',...
     'set(b_2ann,''visible'',''off''),',...
     'set(b_3f,''visible'',''off''),',...
     'set(b_4sys,''visible'',''off''),'...
     'ann',...
    ];
%优化模糊控制隶属度函数界面初始化
i_f=['set(m_11pid,''enable'',''on''),',...
     'set(m_12ann,''enable'',''on''),',...
     'set(m_13f,''enable'',''off''),',...
     'set(m_14sys,''enable'',''on''),',...
     'set(m_1ctrlt,''enable'',''off''),',...
     'set(b_1pid,''visible'',''off''),',...
     'set(b_2ann,''visible'',''off''),',...
     'set(b_3f,''visible'',''off''),',...
     'set(b_4sys,''visible'',''off''),'...
     'ofuzzy',...
    ];
%系统辨识系统界面初始化
i_sys=['set(m_11pid,''enable'',''on''),',...
     'set(m_12ann,''enable'',''on''),',...
     'set(m_13f,''enable'',''on''),',...
     'set(m_14sys,''enable'',''off''),',...
     'set(m_1ctrlt,''enable'',''off''),',...
     'set(b_1pid,''visible'',''off''),',...
     'set(b_2ann,''visible'',''off''),',...
     'set(b_3f,''visible'',''off''),',...
     'set(b_4sys,''visible'',''off''),'...
     'sysiden',...
    ];
%第一个菜单的内容
m_11pid=uimenu(m_1ctrlt,'label','&PID参数优化','callback',i_pid);
m_12ann=uimenu(m_1ctrlt,'label','&A神经网络权值优化','callback',i_ann);
m_13f=uimenu(m_1ctrlt,'label','&F模糊控制器参数优化','callback',i_f);
m_14sys=uimenu(m_1ctrlt,'label','&S系统辨识','callback',i_sys);
%第二个菜单的内容
m_2=uimenu('label','&Background','position',2,'visible','off');
uimenu(m_2,'label','&Black','callback','set(gcf,''Color'',''black'')');
uimenu(m_2,'label','&White','callback','set(gcf,''Color'',''White'')');
uimenu(m_2,'label','&Red','callback','set(gcf,''Color'',''Red'')');
uimenu(m_2,'label','&Green','callback','set(gcf,''Color'',''Green'')');
uimenu(m_2,'label','b&Lue','callback','set(gcf,''Color'',''Blue'')');
uimenu(m_2,'label','&Yellow','callback','set(gcf,''Color'',''Yellow'')');
uimenu(m_2,'label','&Magenta','callback','set(gcf,''Color'',''Magenta'')');
uimenu(m_2,'label','&Cyan','callback','set(gcf,''Color'',''Cyan'')');
%初始始的界面(3个控钮)
set(gcf,'defaultuicontrolunits','normalized');
set(gcf,'Color','black');
f_1=uicontrol('style','frame',...  
    'position',[0.25,0.2,0.5,0.6],'background',[ 0.3 0.3 0.3 ],'foreground','Yellow');
b_1pid=uicontrol(gcf,'style','push','unit','normalized',...
    'position',[0.3,0.66,0.4,0.1],'string','PID参数优化','callback',i_pid);
b_2ann=uicontrol(gcf,'style','push','unit','normalized',...
    'position',[0.3,0.52,0.4,0.1],'string','神经网络权值优化','callback',i_ann);
b_3f=uicontrol(gcf,'style','push','unit','normalized',...
    'position',[0.3,0.38,0.4,0.1],'string','模糊控制器参数优化','callback',i_f);
b_4sys=uicontrol(gcf,'style','push','unit','normalized',...
    'position',[0.3,0.24,0.4,0.1],'string','系统辨识','callback',i_sys);