matlab gui 火力发电3

 h0=figure('toolbar','none',...
    'menu','none',...
    'color',[0.95,0.95,0.95],...
    'Visible','on', 'Resize', 'off',...
    'NumberTitle','off', 'HandleVisibility', 'on', ...
    'position',[198 20 1000 700],...
    'name','输入计算数据');
f1=uicontrol('parent',h0,...
    'style','frame',...
    'position',[50 20 900 245]);
f2=uicontrol('parent',h0,...
    'style','frame',...
    'position',[50 270 900 410]);
f3=uicontrol('parent',h0,...
    'style','text',...
    'position',[60,644,100,30],...
    'string','已知参数:',... 
    'fontsize',15);
f4=uicontrol('parent',h0,...
    'style','text',...
    'position',[60,233,100,30],...
    'string','计算结果:',... 
    'fontsize',15);
f5=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[855 35 80 30],...
    'string','关闭',...
    'callback','close');
p1=uicontrol('parent',h0,...
    'style','text',...
    'position',[115,620,105,20],...
    'string','主蒸汽焓(kJ/kg):i0=',...
    'callback','');
i0=uicontrol('parent',h0,...
    'style','edit',...
    'string','3479.65',...
    'position',[220 622 60 20],...
    'horizontalalignment','right');
p2=uicontrol('parent',h0,...
    'style','text',...
    'position',[100,590,120,20],...
    'string','锅炉进水焓(kJ/kg):t1=',...
    'callback','');
t1=uicontrol('parent',h0,...
    'style','edit',...
    'string','974.85',...
    'position',[220 592 60 20],...
    'horizontalalignment','right');
p3=uicontrol('parent',h0,...
    'style','text',...
    'position',[130,560,90,20],...
    'string','排汽(kJ/kg):ik=',...
    'callback','');
ik=uicontrol('parent',h0,...
    'style','edit',...
    'string','2269.81',...
    'position',[220 562 60 20],...
    'horizontalalignment','right');
p4=uicontrol('parent',h0,...
    'style','text',...
    'position',[100,530,120,20],...
    'string','凝结水焓(kJ/kg):tk=',...
    'callback','');
tk=uicontrol('parent',h0,...
    'style','edit',...
    'string','136.36',...
    'position',[220 532 60 20],...
    'horizontalalignment','right');
p5=uicontrol('parent',h0,...
    'style','text',...
    'position',[100,500,120,20],...
    'string','给水泵焓升(kJ/kg):tF=',...
    'callback','');
tF=uicontrol('parent',h0,...
    'style','edit',...
    'string','0',...
    'position',[220 502 60 20],...
    'horizontalalignment','right');
p6=uicontrol('parent',h0,...
    'style','text',...
    'position',[90,470,130,20],...
    'string','汽轮机的功率(KW):P=',...
    'callback','');
P=uicontrol('parent',h0,...
    'style','edit',...
    'string','100000',...
    'position',[220 472 60 20],...
    'horizontalalignment','right');
p7=uicontrol('parent',h0,...
    'style','text',...
    'position',[385,630,115,20],...
    'string','回热抽汽利用系数Z=',...
    'callback','');
Z=uicontrol('parent',h0,...
    'style','edit',...
    'string','1',...
    'position',[500 632 60 20],...
    'horizontalalignment','right');
p8=uicontrol('parent',h0,...
    'style','text',...
    'position',[420,600,80,20],...
    'string','机械效率Zm=',...
    'callback','');
Zm=uicontrol('parent',h0,...
    'style','edit',...
    'string','0.99',...
    'position',[500 602 60 20],...
    'horizontalalignment','right');
p9=uicontrol('parent',h0,...
    'style','text',...
    'position',[420,570,80,20],...
    'string','发电机效率Zg=',...
    'callback','');
Zg=uicontrol('parent',h0,...
    'style','edit',...
    'string','0.98',...
    'position',[500 572 60 20],...
    'horizontalalignment','right');
p10=uicontrol('parent',h0,...
    'style','text',...
    'position',[390,540,110,20],...
    'string','辅助用汽效率Za=',...
    'callback','');
Za=uicontrol('parent',h0,...
    'style','edit',...
    'string','0.98',...
    'position',[500 542 60 20],...
    'horizontalalignment','right');
p11=uicontrol('parent',h0,...
    'style','text',...
    'position',[420,510,80,20],...
    'string','管道效率Zp=',...
    'callback','');
Zp=uicontrol('parent',h0,...
    'style','edit',...
    'string','0.98',...
    'position',[500 512 60 20],...
    'horizontalalignment','right');
p12=uicontrol('parent',h0,...
    'style','text',...
    'position',[420,480,80,20],...
    'string','锅炉效率Zb=',...
    'callback','');
Zb=uicontrol('parent',h0,...
    'style','edit',...
    'string','0.98',...
    'position',[500 482 60 20],...
    'horizontalalignment','right');

k1=uicontrol('parent',h0,...
    'style','text',...
    'position',[695 610 100 20],...
    'string','是否再热(n/y):',...
    'callback','');
d=uicontrol('parent',h0,...
    'style','edit',...
    'string','n',...
    'position',[815 610 60 20],...
    'horizontalalignment','right');
k2=uicontrol('parent',h0,...
    'style','text',...
    'position',[695 580 120 20],...
    'string','再热后的焓(kJ/kg):rh=',...
    'callback','');
rh=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[815 582 60 20],...
    'horizontalalignment','right');
k3=uicontrol('parent',h0,...
    'style','text',...
    'position',[695 550 120 20],...
    'string','再热前的焓(kJ/kg):lh=',...
    'callback','');
lh=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[815 552 60 20],...
    'horizontalalignment','right');
k4=uicontrol('parent',h0,...
    'style','text',...
    'position',[695 520 120 20],...
    'string','再热在第几级之后zr=',...
    'callback','');
zr=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[815 522 60 20],...
    'horizontalalignment','right');

ra=uicontrol('parent',h0,...
    'style','text',...
    'position',[70,430,40,20],...
    'string','r=',...
    'fontsize',11,...
    'callback','');
r11=uicontrol('parent',h0,...
    'style','edit',...
    'string','144.02',...
    'position',[110 432 60 20],...
    'horizontalalignment','right');
r22=uicontrol('parent',h0,...
    'style','edit',...
    'string','163.87',...
    'position',[180 432 60 20],...
    'horizontalalignment','right');
r33=uicontrol('parent',h0,...
    'style','edit',...
    'string','60.8',...
    'position',[250 432 60 20],...
    'horizontalalignment','right');
r44=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[320 432 60 20],...
    'horizontalalignment','right');
r55=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[390 432 60 20],...
    'horizontalalignment','right');
r66=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[460 432 60 20],...
    'horizontalalignment','right');
r77=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[530 432 60 20],...
    'horizontalalignment','right');
r88=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[600 432 60 20],...
    'horizontalalignment','right');
qa=uicontrol('parent',h0,...
    'style','text',...
    'position',[70,400,40,20],...
    'string','q=',...
    'fontsize',11,...
    'callback','');
q11=uicontrol('parent',h0,...
    'style','edit',...
    'string','2341.38',...
    'position',[110 402 60 20],...
    'horizontalalignment','right');
q22=uicontrol('parent',h0,...
    'style','edit',...
    'string','2357.33',...
    'position',[180 402 60 20],...
    'horizontalalignment','right');
q33=uicontrol('parent',h0,...
    'style','edit',...
    'string','2290.26',...
    'position',[250 402 60 20],...
    'horizontalalignment','right');
q44=uicontrol('parent',h0,...
    'style','edit',...
    'string','2206.02',...
    'position',[320 402 60 20],...
    'horizontalalignment','right');
q55=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[390 402 60 20],...
    'horizontalalignment','right');
q66=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[460 402 60 20],...
    'horizontalalignment','right');
q77=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[530 402 60 20],...
    'horizontalalignment','right');
q88=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[600 402 60 20],...
    'horizontalalignment','right');
rFa=uicontrol('parent',h0,...
    'style','text',...
    'position',[70,370,40,20],...
    'string','rF=',...
    'fontsize',11,...
    'callback','');
rF11=uicontrol('parent',h0,...
    'style','edit',...
    'string','0',...
    'position',[110 372 60 20],...
    'horizontalalignment','right');
rF22=uicontrol('parent',h0,...
    'style','edit',...
    'string','41.87',...
    'position',[180 372 60 20],...
    'horizontalalignment','right');
rF33=uicontrol('parent',h0,...
    'style','edit',...
    'string','41.87',...
    'position',[250 372 60 20],...
    'horizontalalignment','right');
rF44=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[320 372 60 20],...
    'horizontalalignment','right');
rF55=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[390 372 60 20],...
    'horizontalalignment','right');
rF66=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[460 372 60 20],...
    'horizontalalignment','right');
rF77=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[530 372 60 20],...
    'horizontalalignment','right');
rF88=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[600 372 60 20],...
    'horizontalalignment','right');
rra=uicontrol('parent',h0,...
    'style','text',...
    'position',[70,340,40,20],...
    'string','rr=',...
    'fontsize',11,...
    'callback','');
rr11=uicontrol('parent',h0,...
    'style','edit',...
    'string','139.00',...
    'position',[110 342 60 20],...
    'horizontalalignment','right');
rr22=uicontrol('parent',h0,...
    'style','edit',...
    'string','0',...
    'position',[180 342 60 20],...
    'horizontalalignment','right');
rr33=uicontrol('parent',h0,...
    'style','edit',...
    'string','200.59',...
    'position',[250 342 60 20],...
    'horizontalalignment','right');
rr44=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[320 342 60 20],...
    'horizontalalignment','right');
qb=uicontrol('parent',h0,...
    'style','text',...
    'position',[70,310,40,20],...
    'string','qq=',...
    'fontsize',11,...
    'callback','');
qq11=uicontrol('parent',h0,...
    'style','edit',...
    'string','2205.92',...
    'position',[110 312 60 20],...
    'horizontalalignment','right');
qq22=uicontrol('parent',h0,...
    'style','edit',...
    'string','2187.19',...
    'position',[180 312 60 20],...
    'horizontalalignment','right');
qq33=uicontrol('parent',h0,...
    'style','edit',...
    'string','2170.39',...
    'position',[250 312 60 20],...
    'horizontalalignment','right');
qq44=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[320 312 60 20],...
    'horizontalalignment','right');
rFb=uicontrol('parent',h0,...
    'style','text',...
    'position',[70,280,40,20],...
    'string','rrF=',...
    'fontsize',11,...
    'callback','');
rrF11=uicontrol('parent',h0,...
    'style','edit',...
    'string','0',...
    'position',[110 282 60 20],...
    'horizontalalignment','right');
rrF22=uicontrol('parent',h0,...
    'style','edit',...
    'string','151.57',...
    'position',[180 282 60 20],...
    'horizontalalignment','right');
rrF33=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[250 282 60 20],...
    'horizontalalignment','right');
rrF44=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[320 282 60 20],...
    'horizontalalignment','right');

sm1=uicontrol('parent',h0,...
    'style','text',...
    'position',[440 310 90 20],...
    'string','疏水泵端差sm=',...
    'callback','');
sm=uicontrol('parent',h0,...
    'style','edit',...
    'string','20.93',...
    'position',[530 312 60 20],...
    'horizontalalignment','right');
a1=uicontrol('parent',h0,...
    'style','text',...
    'position',[630 310 40 20],...
    'string','ttm=',...
    'callback','');
ttm=uicontrol('parent',h0,...
    'style','edit',...
    'string','467.16',...
    'position',[670 312 60 20],...
    'horizontalalignment','right');
a2=uicontrol('parent',h0,...
    'style','text',...
    'position',[770 310 40 20],...
    'string','ts=',...
    'callback','');
ts=uicontrol('parent',h0,...
    'style','edit',...
    'string','606.16',...
    'position',[810 312 60 20],...
    'horizontalalignment','right');
sm2=uicontrol('parent',h0,...
    'style','text',...
    'position',[440 280 90 20],...
    'string','疏水泵端差sv=',...
    'callback','');
sv=uicontrol('parent',h0,...
    'style','edit',...
    'string','20.94',...
    'position',[530 282 60 20],...
    'horizontalalignment','right');
a3=uicontrol('parent',h0,...
    'style','text',...
    'position',[630 280 40 20],...
    'string','ttv=',...
    'callback','');
ttv=uicontrol('parent',h0,...
    'style','edit',...
    'string','357.89',...
    'position',[670 282 60 20],...
    'horizontalalignment','right');
a4=uicontrol('parent',h0,...
    'style','text',...
    'position',[770 280 40 20],...
    'string','tttm=',...
    'callback','');
tttm=uicontrol('parent',h0,...
    'style','edit',...
    'string','446.23',...
    'position',[810 282 60 20],...
    'horizontalalignment','right');

nn=uicontrol('parent',h0,...
    'style','text',...
    'position',[700 400 40 20],...
    'string','n=',...
    'callback','');
n=uicontrol('parent',h0,...
    'style','edit',...
    'string','3',...
    'position',[740 402 60 20],...
    'horizontalalignment','right');
mm=uicontrol('parent',h0,...
    'style','text',...
    'position',[700 370 40 20],...
    'string','m=',...
    'callback','');
m=uicontrol('parent',h0,...
    'style','edit',...
    'string','2',...
    'position',[740 372 60 20],...
    'horizontalalignment','right');

 

m1=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[90,215,170,20],...
    'string','第一单元进水系数dGn=',...
    'callback',[...
        'r1=str2num(get(r11,''string''));',...
        'r2=str2num(get(r22,''string''));',...
        'r3=str2num(get(r33,''string''));',...
        'q1=str2num(get(q11,''string''));',...
        'q2=str2num(get(q22,''string''));',...
        'q3=str2num(get(q33,''string''));',...
        'rF2=str2num(get(rF22,''string''));',...
        'rF3=str2num(get(rF33,''string''));',...
        'dF3=r2/q2+(1-rF2/q2)*r1/q1;',...
        'dGn1=(q3-dF3*(q3-rF3))/(q3+r3);',...
        'dGn2=num2str(dGn1);',...
        'set(dGn,''string'',dGn2);']);   
dGn=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[262 215 80 20],...
    'horizontalalignment','right');
m2=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[380,215,170,20],...
    'string','第三单元进水系数dGv=',...
    'callback',[...
        'qq3=str2num(get(qq33,''string''));',...
        'rr3=str2num(get(rr33,''string''));',...
        'dGv1=qq3/(qq3+rr3);',...
        'dGv2=num2str(dGv1);',...
        'set(dGv,''string'',dGv2);']);      
dGv=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[552 215 60 20],...
    'horizontalalignment','right');
m3=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[650,215,170,20],...
    'string','第二单元进水系数dGm=',...
    'callback',[...
        'q4=str2num(get(q44,''string''));',...
        'qq2=str2num(get(qq22,''string''));',...
        'rr1=str2num(get(rr11,''string''));',...
        'rr2=str2num(get(rr22,''string''));',...
        'rrF2=str2num(get(rrF22,''string''));',...
        'ttvv=str2num(get(ttv,''string''));',...
        'dGvv=str2num(get(dGv,''string''));',...
        'smm=str2num(get(sm,''string''));',...
        'svv=str2num(get(sv,''string''));',...
        'tttmm=str2num(get(tttm,''string''));',...
        'rrmm=tttmm-(ttvv-dGvv*svv);',...
        'dGm1=(qq2-(rr1/q4)*(qq2-rrF2))/((qq2+rrmm)+(smm/q4)*(qq2-rrF2));',...
        'dGm2=num2str(dGm1);',...
        'set(dGm,''string'',dGm2);']);   
dGm=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[822 215 70 20],...
    'horizontalalignment','right');

m4=uicontrol('parent',h0,...
    'style','text',...
    'position',[90 178 150 20],...
    'string','第一单元各级抽汽系数:',...
    'callback','');
m41=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[260,180,50,20],...
    'string','an1=',...
    'callback',[...
        'r1=str2num(get(r11,''string''));',...
        'q1=str2num(get(q11,''string''));',...
        'an11=r1/q1;',...
        'an12=num2str(an11);',...
        'set(an1,''string'',an12);']);
an1=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[310 180 70 20],...
    'horizontalalignment','right');
m42=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[430,180,50,20],...
    'string','an2=',...
    'callback',[...
        'r1=str2num(get(r11,''string''));',...
        'q1=str2num(get(q11,''string''));',...
        'r2=str2num(get(r22,''string''));',...
        'q2=str2num(get(q22,''string''));',...
        'rF2=str2num(get(rF22,''string''));',...
        'an21=r2/q2-(rF2/q2)*(r1/q1);',...
        'an22=num2str(an21);',...
        'set(an2,''string'',an22);']);
an2=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[480 180 70 20],...
    'horizontalalignment','right');
m43=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[600,180,50,20],...
    'string','an3=',...
    'callback',[...
        'an11=str2num(get(an1,''string''));',...
        'an22=str2num(get(an2,''string''));',...
        'dGn1=str2num(get(dGn,''string''));',...
        'an31=1-an11-an22-dGn1;',...
        'an32=num2str(an31);',...
        'set(an3,''string'',an32);']);
an3=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[650 180 70 20],...
    'horizontalalignment','right');
m5=uicontrol('parent',h0,...
    'style','text',...
    'position',[90 145 150 20],...
    'string','第二单元各级抽汽系数:',...
    'callback','');
m51=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[260,145,50,20],...
    'string','am1=',...
    'callback',[...
        'q4=str2num(get(q44,''string''));',...
        'dGn1=str2num(get(dGn,''string''));',...
        'dGm1=str2num(get(dGm,''string''));',...
        'ts1=str2num(get(ts,''string''));',...
        'ttm1=str2num(get(ttm,''string''));',...
        'smm=str2num(get(sm,''string''));',...
        'am11=dGn1*((ts1-(ttm1-dGm1*smm))/q4);',...
        'am12=num2str(am11);',...
        'set(am1,''string'',am12);']);
am1=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[310 145 70 20],...
    'horizontalalignment','right');
m52=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[430,145,50,20],...
    'string','am2=',...
    'callback',[...
        'ts1=str2num(get(ts,''string''));',...
        'ttm1=str2num(get(ttm,''string''));',...
        'smm=str2num(get(sm,''string''));',...
        'q4=str2num(get(q44,''string''));',...
        'dGn1=str2num(get(dGn,''string''));',...
        'dGm1=str2num(get(dGm,''string''));',...
        'am21=dGn1*(1-(ts1-(ttm1-dGm1*smm))/q4-dGm1);',...
        'am22=num2str(am21);',...
        'set(am2,''string'',am22);']);
am2=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[480 145 70 20],...
    'horizontalalignment','right');
m6=uicontrol('parent',h0,...
    'style','text',...
    'position',[590 145 150 20],...
    'string','第三单元各级抽汽系数:',...
    'callback','');
m51=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[730,145,50,20],...
    'string','av=',...
    'callback',[...
        'dGn1=str2num(get(dGn,''string''));',...
        'dGm1=str2num(get(dGm,''string''));',...
        'dGv1=str2num(get(dGv,''string''));',...
        'av1=dGn1*dGm1*(1-dGv1);',...
        'av2=num2str(av1);',...
        'set(av,''string'',av2);']);
av=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[780 145 70 20],...
    'horizontalalignment','right');

h1=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[140,110,90,20],...
    'string','排汽系数ak=',...
    'callback',[...
        'dGn1=str2num(get(dGn,''string''));',...
        'dGm1=str2num(get(dGm,''string''));',...
        'dGv1=str2num(get(dGv,''string''));',...
        'ak1=dGn1*dGm1*dGv1;',...
        'ak2=num2str(ak1);',...
        'set(ak,''string'',ak2);']); 
ak=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[230 110 70 20],...
    'horizontalalignment','right');
h2=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[380,110,120,20],...
    'string','循环功(kJ/kg):W0=',...
    'callback',[...
        'i01=str2num(get(i0,''string''));',...
        't11=str2num(get(t1,''string''));',...
        'ik1=str2num(get(ik,''string''));',...
        'tk1=str2num(get(tk,''string''));',...
        'tF1=str2num(get(tF,''string''));',...
        'Z1=str2num(get(Z,''string''));',...
        'W01=(i01-t11/Z1+tF/Z1)-ak1*(ik1-tk1/Z1);',...
        'W02=num2str(W01);',...
        'set(W0,''string'',W02);']);  
W0=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[500 110 70 20],...
    'horizontalalignment','right');
h3=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[660,110,90,20],...
    'string','内热效率Zt=',...
    'callback',[...
        'W01=str2num(get(W0,''string''));',...
        'i01=str2num(get(i0,''string''));',...
        't11=str2num(get(t1,''string''));',...
        'Zt1=W01/(i01-t11);',...
        'Zt2=num2str(Zt1);',...
        'set(Zt,''string'',Zt2);']);  
Zt=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[750 110 70 20],...
    'horizontalalignment','right');
h4=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[100,75,130,20],...
    'string','汽耗率kg/(kW.h):dk=',...
    'callback',[...
        'W01=str2num(get(W0,''string''));',...
        'Zm1=str2num(get(Zm,''string''));',...
        'Zg1=str2num(get(Zg,''string''));',...
        'Za1=str2num(get(Za,''string''));',...
        'dk1=3600/(W01*Zm1*Zg1*Za1);',...
        'dk2=num2str(dk1);',...
        'set(dk,''string'',dk2);']);  
dk=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[230 75 70 20],...
    'horizontalalignment','right');
h5=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[345,75,155,20],...
    'string','汽轮机进汽量(kg/h):D0=',...
    'callback',[...
        'P1=str2num(get(P,''string''));',...
        'dk1=str2num(get(dk,''string''));',...
        'D01=P1*dk1;',...
        'D02=num2str(D01);',...
        'set(D0,''string'',D02);']);
D0=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[500 75 70 20],...
    'horizontalalignment','right');
h6=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[620,75,130,20],...
    'string','热耗率kJ/(kW.h):HR=',...
    'callback',[...
        'dk1=str2num(get(dk,''string''));',...
        'i01=str2num(get(i0,''string''));',...
        't11=str2num(get(t1,''string''));',...
        'HR1=dk1*(i01-t11);',...
        'HR2=num2str(HR1);',...
        'set(HR,''string'',HR2);']);
HR=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[750 75 70 20],...
    'horizontalalignment','right');
h7=uicontrol('parent',h0,...
    'style','pushbutton',...
    'position',[75,40,155,20],...
    'string','标准煤耗率kg/(kW.h);b=',...
    'callback',[...
        'HR1=str2num(get(HR,''string''));',...
        'Zp1=str2num(get(Zp,''string''));',...
        'Zb1=str2num(get(Zb,''string''));',...
        'b1=HR1/(Zp1*Zb1*7400*4.18);',...
        'b2=num2str(b1);',...
        'set(b,''string'',b2);']);
b=uicontrol('parent',h0,...
    'style','edit',...
    'string','',...
    'position',[230 40 70 20],...
    'horizontalalignment','right');