fm_uwfig.m

这是一个很适合研究和学习用的电力系统仿真软件

            'Tag','eopt', ...
            'Checked',onoff(UWPFLOW.opt.E.status));

h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwfig l', ...
            'Label','[-l] Write standard error output', ...
            'Tag','lopt', ...
            'Checked',onoff(UWPFLOW.opt.l.status));

h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwfig w', ...
            'Label','[-w] Write solution in IEEE CARD format', ...
            'Tag','wopt', ...
            'Checked',onoff(UWPFLOW.opt.w.status));

h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwfig W', ...
            'Label','[-W] Write solution in IEEE TAPE format', ...
            'Tag','wopt', ...
            'Checked',onoff(UWPFLOW.opt.W.status));

h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwfig y', ...
            'Label','[-y] Print left e-vector of smallest |e-value|', ...
            'Tag','yopt', ...
            'Checked',onoff(UWPFLOW.opt.y.status));

h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwfig Y', ...
            'Label','[-Y] Print right e-vector of smallest |e-value|', ...
            'Tag','Yopt', ...
            'Checked',onoff(UWPFLOW.opt.Y.status));

h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwfig Z', ...
            'Label','[-Z] Print normalized tangent vector', ...
            'Tag','Zopt', ...
            'Checked',onoff(UWPFLOW.opt.Z.status));

% Menu Preferences
h1 = uimenu('Parent',h0, ...
            'Label','Preferences', ...
            'Tag','MenuPref');
h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwpflow filename', ...
            'Label','Modify input/output file name', ...
            'Tag','OTV', ...
            'Accelerator','e');
h2 = uimenu('Parent',h1, ...
            'Callback','fm_tviewer', ...
            'Label','Select Text Viewer', ...
            'Tag','tvopt', ...
            'Separator', 'on', ...
            'Accelerator','t');

% Menu Help
h1 = uimenu('Parent',h0, ...
            'Label','Help', ...
            'Tag','MenuHelp');
h2 = uimenu('Parent',h1, ...
            'Callback','fm_uwpflow help', ...
            'Label','UWPFLOW help', ...
            'Accelerator','h', ...
            'Tag','UWHelp');
h2 = uimenu('Parent',h1, ...
            'Callback','web(''http://thunderbox.uwaterloo.ca/~claudio/software/pflow.html'');', ...
            'Label','UWPFLOW website', ...
            'Accelerator','w', ...
            'Tag','UWLink');

% Frame
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'ForegroundColor',Theme.color03, ...
               'Position',[0.0329 0.1399 0.9394 0.8405], ...
               'Style','frame', ...
               'Tag','Frame1');

% List Boxes
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback', 'fm_uwfig B', ...
               'HorizontalAlignment','left',  ...
               'Position',[x3 0.9199 dx 0.0339], ...
               'String','[-B] Bus for fixed voltage:', ...
               'Style','checkbox', ...
               'Tag','Check_B', ...
               'Value', UWPFLOW.opt.B.status);
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback', 'UWPFLOW.opt.B.num = get(gcbo,''Value''); UWPFLOW.opt.B.num = UWPFLOW.opt.B.num(end); set(gcbo,''Value'',UWPFLOW.opt.B.num)', ...
               'Enable', onoff(UWPFLOW.opt.B.status), ...
               'FontName', Theme.font01, ...
               'ForegroundColor',Theme.color05,  ...
               'ListboxTop',UWPFLOW.opt.B.num, ...
               'Max', 100, ...
               'Position',[x3 0.7439 dx 0.1595], ...
               'String',PQbuses, ...
               'Style','listbox', ...
               'Tag','Edit_B', ...
               'Value',UWPFLOW.opt.B.num);

dyy = 0.015;

h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback', 'fm_uwfig f', ...
               'HorizontalAlignment','left',  ...
               'Position',[x3 0.6835+dyy dx 0.0339], ...
               'String','[-f] Bus for SF, VSF and TG:', ...
               'Style','checkbox', ...
               'Tag','Check_f', ...
               'Value', UWPFLOW.opt.f.status);
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback', 'UWPFLOW.opt.f.num = get(gcbo,''Value''); UWPFLOW.opt.f.num = UWPFLOW.opt.f.num(end); set(gcbo,''Value'',UWPFLOW.opt.f.num)', ...
               'Enable', onoff(UWPFLOW.opt.f.status), ...
               'FontName', Theme.font01, ...
               'ForegroundColor',Theme.color05,  ...
               'ListboxTop',UWPFLOW.opt.f.num, ...
               'Max', 100, ...
               'Position',[x3 0.5076+dyy dx 0.1595], ...
               'String',PQbuses, ...
               'Style','listbox', ...
               'Tag','Edit_f', ...
               'Value',UWPFLOW.opt.f.num);

h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback', 'fm_uwfig one', ...
               'HorizontalAlignment','left',  ...
               'Position',[x3 0.4471+2*dyy dx 0.0339], ...
               'String','[-1] Bus for test functions:', ...
               'Style','checkbox', ...
               'Tag','Check_one', ...
               'Value', UWPFLOW.opt.one.status);
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback', 'UWPFLOW.opt.one.num = get(gcbo,''Value''); UWPFLOW.opt.one.num = UWPFLOW.opt.one.num(end); set(gcbo,''Value'',UWPFLOW.opt.one.num)', ...
               'Enable', onoff(UWPFLOW.opt.one.status), ...
               'FontName', Theme.font01, ...
               'ForegroundColor',Theme.color05,  ...
               'ListboxTop',UWPFLOW.opt.one.num, ...
               'Max', 100, ...
               'Position',[x3 0.2712+2*dyy dx 0.1595], ...
               'String',PQbuses, ...
               'Style','listbox', ...
               'Tag','Edit_one', ...
               'Value',UWPFLOW.opt.one.num);

% Popup Menus
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback', 'fm_uwpflow methods', ...
               'FontName', Theme.font01, ...
               'ForegroundColor',Theme.color05,  ...
               'HorizontalAlignment','left',  ...
               'Position',[x2 0.2712+2*dyy dx 0.0308], ...
               'String',methods, ...
               'Style','popupmenu', ...
               'Tag','PopupMenuMethod', ...
               'Value',UWPFLOW.method);
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'HorizontalAlignment','left',  ...
               'Position',[x2 0.305+2*dyy dx 0.0308], ...
               'String','Solver method:', ...
               'Style','text', ...
               'Tag','StaticText12');

h1 = uicontrol('Parent', h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback', '', ...
               'FontName', Theme.font01, ...
               'HorizontalAlignment','left',  ...
               'Position',[x1 0.2712+2*dyy dx 0.0308], ...
               'String',output, ...
               'Style','popupmenu', ...
               'Tag','PopupUWFile', ...
               'Value',1);
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'HorizontalAlignment','left', ...
               'Position',[x1 0.305+2*dyy dx 0.0308], ...
               'String','UWPFLOW input/output file:', ...
               'Style','text', ...
               'Tag','StaticText11');

% Pushbuttons
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color03, ...
               'Callback','fm_uwpflow uwrun', ...
               'FontWeight','bold', ...
               'ForegroundColor',Theme.color09, ...
               'Position',[x1 0.1576 dx 0.045], ...
               'String','Run UWPFLOW', ...
               'Tag','Pushbutton1');
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback','close(gcf)', ...
               'Position',[x3 0.1576 dx 0.045], ...
               'String','Close', ...
               'Tag','Pushbutton2');
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback','fm_uwpflow view', ...
               'Position',[x2 0.1576 dx 0.045], ...
               'String','View Input/Output File', ...
               'Tag','Pushbutton3');

% UWPFLOW Command Line
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback','UWPFLOW.command = get(gcbo,''String'');', ...
               'FontName',Theme.font01, ...
               'ForegroundColor',Theme.color05, ...
               'HorizontalAlignment','left', ...
               'Position',[x1 0.225 x3+dx-x1 0.0308], ...
               'Style','edit', ...
               'String', UWPFLOW.command, ...
               'Tag','EditCom');
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'HorizontalAlignment','left',  ...
               'Position',[x1 0.225+0.0308 dx 0.0308], ...
               'String','Command Line:', ...
               'Style','text', ...
               'Tag','TextCom');

% Parameters (left column)
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback', 'UWPFLOW.opt.F.num = fval(gcbo,UWPFLOW.opt.F.num);', ...
               'FontName',Theme.font01, ...
               'ForegroundColor',Theme.color05, ...
               'Enable', onoff(UWPFLOW.opt.F.status), ...
               'HorizontalAlignment','left', ...
               'Position',[x1 0.8731 dx 0.0308], ...
               'Style','edit', ...
               'String', num2str(UWPFLOW.opt.F.num), ...
               'Tag','Edit_F');
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color02, ...
               'Callback', 'fm_uwfig F', ...
               'HorizontalAlignment','left', ...
               'Position',[x1 0.9199 dx 0.0339], ...
               'String','[-F] Stability/sparsity [0,1]', ...
               'Style','checkbox', ...
               'Tag','Check_F', ...
               'Value', UWPFLOW.opt.F.status);

h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback', 'UWPFLOW.opt.t.num = fval(gcbo,UWPFLOW.opt.t.num)', ...
               'Enable', onoff(UWPFLOW.opt.t.status), ...
               'FontName',Theme.font01, ...
               'ForegroundColor',Theme.color05, ...
               'HorizontalAlignment','left',  ...
               'Position',[x1 0.7764 dx 0.0308], ...
               'Style','edit', ...
               'String', num2str(UWPFLOW.opt.t.num), ...
               'Tag','Edit_t');
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'Callback', 'fm_uwfig t', ...
               'BackgroundColor',Theme.color02, ...
               'HorizontalAlignment','left', ...
               'Position',[x1 0.8232 dx 0.0339], ...
               'String','[-t] Iteration mismatch tol.', ...
               'Style','checkbox', ...
               'Tag','Check_t', ...
               'Value', UWPFLOW.opt.t.status);

h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...
               'BackgroundColor',Theme.color04, ...
               'Callback','UWPFLOW.opt.o.num = fval(gcbo,UWPFLOW.opt.o.num);', ...
               'Enable', onoff(UWPFLOW.opt.o.status), ...
               'FontName',Theme.font01, ...
               'ForegroundColor',Theme.color05, ...
               'HorizontalAlignment','left', ...
               'Position',[x1 0.6798 dx 0.0308], ...
               'Style','edit', ...
               'String', num2str(UWPFLOW.opt.o.num), ...
               'Tag','Edit_o');
h1 = uicontrol('Parent',h0, ...
               'Units', 'normalized', ...