h=figure('toolbar','none',...
'position',[200 150 800 800],...
'name','实例41');
%设置6个参量输入框
h1=uicontrol(gcf,'style','edit',...
'position',[200 575 80 40],...
'HorizontalAlignment','right',...
'callback',['d1=get(h1,''string'');,',...
'Na=str2num(d1);']);
h2=uicontrol(gcf,'style','edit',...
'HorizontalAlignment','right',...
'position',[200 525 80 40],...
'callback',['d2=get(h2,''string'');,',...
'Nb=str2num(d2);']);
h3=uicontrol(gcf,'style','edit',...
'HorizontalAlignment','right',...
'position',[200 475 80 40],...
'callback',['d3=get(h3,''string'');,',...
'Va=str2num(d3);']);
h4=uicontrol(gcf,'style','edit',...
'HorizontalAlignment','right',...
'position',[200 425 80 40],...
'callback',['d4=get(h4,''string'');,',...
'Vb=str2num(d4);']);
h5=uicontrol(gcf,'style','edit',...
'HorizontalAlignment','right',...
'position',[200 375 80 40],...
'callback',['d5=get(h5,''string'');,',...
'Xp=str2num(d5);']);
h6=uicontrol(gcf,'style','edit',...
'HorizontalAlignment','right',...
'position',[200 325 80 40],...
'callback',['d6=get(h6,''string'');,',...
'X=str2num(d6);']);
%设置输入框上面的参数名称
h7=uicontrol(gcf,'style','text',...
'string','Na',...
'position',[80 575 80 40]);
h8=uicontrol(gcf,'style','text',...
'string','Nb',...
'position',[80 525 80 40]);
h9=uicontrol(gcf,'style','text',...
'string','Va',...
'position',[80 475 80 40]);
h10=uicontrol(gcf,'style','text',...
'string','Vb',...
'position',[80 425 80 40]);
h11=uicontrol(gcf,'style','text',...
'string','Xp',...
'position',[80 375 80 40]);
h12=uicontrol(gcf,'style','text',...
'string','X',...
'position',[80 325 80 40]);
h34=uicontrol(gcf,'style','text',...
'string','输入量',...
'fontsize',20,...
'position',[60 700 250 50]);
h35=uicontrol(gcf,'style','text',...
'string','输出量',...
'fontsize',20,...
'position',[480 700 250 50]);
%设置10个参量输出框
h13=uicontrol(gcf,'style','edit',...
'position',[620 625 80 40]);
h14=uicontrol(gcf,'style','edit',...
'position',[620 575 80 40]);
h15=uicontrol(gcf,'style','edit',...
'position',[620 525 80 40]);
h16=uicontrol(gcf,'style','edit',...
'position',[620 475 80 40]);
h17=uicontrol(gcf,'style','edit',...
'position',[620 425 80 40]);
h18=uicontrol(gcf,'style','edit',...
'position',[620 375 80 40]);
h19=uicontrol(gcf,'style','edit',...
'position',[620 325 80 40]);
h20=uicontrol(gcf,'style','edit',...
'position',[620 275 80 40]);
h21=uicontrol(gcf,'style','edit',...
'position',[620 225 80 40]);
h22=uicontrol(gcf,'style','edit',...
'position',[620 175 80 40]);
%设置输出框上面的参数名称
h23=uicontrol(gcf,'style','text',...
'string','a',...
'position',[500 625 80 40]);
h24=uicontrol(gcf,'style','text',...
'string','b',...
'position',[500 575 80 40]);
h25=uicontrol(gcf,'style','text',...
'string','c',...
'position',[500 525 80 40]);
h26=uicontrol(gcf,'style','text',...
'string','Xa',...
'position',[500 475 80 40]);
h27=uicontrol(gcf,'style','text',...
'string','Xb',...
'position',[500 425 80 40]);
h28=uicontrol(gcf,'style','text',...
'string','t',...
'position',[500 375 80 40]);
h29=uicontrol(gcf,'style','text',...
'string','Fa',...
'position',[500 325 80 40]);
h30=uicontrol(gcf,'style','text',...
'string','Fb',...
'position',[500 275 80 40]);
h31=uicontrol(gcf,'style','text',...
'string','Ra',...
'position',[500 225 80 40]);
h32=uicontrol(gcf,'style','text',...
'string','Rb',...
'position',[500 175 80 40]);
%设置求解按钮
h33=uicontrol(gcf,'style','pushbutton',...
'position',[350 400 100 30],...
'string','求解',...
'callback',[...
'if Na==0,',...
'h7=errordlg(''ERROR'',''error'',''on'');,',...
'else,',...
'a1=Va-Nb*Vb/Na;,',...
'a=num2str(a1);,',...
'b1=Xp*Nb*Vb-2*X*Va;,',...
'b=num2str(b1);,',...
'c1=Va*X*X;,',...
'c=num2str(c1);,',...
'xa=(-b1+sqrt(b1*b1-4*a1*c1))/(2*a1);,',...
'Xa=num2str(xa);,',...
'xb=(Xp-xa/Na)*Nb;,',...
'Xb=num2str(xb);,',...
't1=(xa+xb-X)/(xa*xb);,',...
't=num2str(t1);,',...
'fa=1/xa;,',...
'Fa=num2str(fa);,',...
'fb=1/xb;,',...
'Fb=num2str(fb);,',...
'ra=2*(Na-1)/xa;,',...
'Ra=num2str(ra);,',...
'rb=2*(Nb-1)/xb;,',...
'Rb=num2str(rb);,',...
'set(h13,''string'',a),',...
'set(h14,''string'',b),',...
'set(h15,''string'',c),',...
'set(h16,''string'',Xa),',...
'set(h17,''string'',Xb),',...
'set(h18,''string'',t),',...
'set(h19,''string'',Fa),',...
'set(h20,''string'',Fb),',...
'set(h21,''string'',Ra),',...
'set(h22,''string'',Rb),',...
'end']);