%初始化根窗体   
clf reset;   
set(gcf,'Units','pixels','position' ,[185 50 860 655],'name', '设计计算',...   
    'numbertitle', 'off', 'Tag', 'dsp');   
set(gcf, 'defaultuicontrolfontsize' ,12);   
set(gcf, 'defaultuicontrolfontname' , ' 隶书 ' );  

%添加组件   
%设计参数输入区域
labelhead1 = uicontrol(gcf,'Style', 'text', 'String', '','Position', [29 80 125 525],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);  
labelhead11 = uicontrol(gcf,'Style', 'text', 'String', '设计参数输入','Position', [30 610 120 20],...   
    'BackgroundColor', [.8 .8 .8], 'FontSize', 14);   

%设计结果输出区域   
labelout = uicontrol(gcf,'Style', 'text', 'String', '设计结果输出','Position', [530 610 120 20],...   
    'BackgroundColor', [.8 .8 .8], 'FontSize', 14);   
data_out = uicontrol(gcf,'Style', 'edit', 'String', '等待设计计算','Position', [328 80 505 525],...
    'BackgroundColor', [.6 .7 .9],'FontSize', 10);  
%设计参数输入
% 制冷量Qo
label_Qo = uicontrol(gcf,'Style', 'text', 'String', '制冷量','Position', [30 570 60 20],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);   
data_Qo = uicontrol(gcf,'Style', 'edit', 'String', '10','Position', [30 555 60 20], 'FontSize', 12);  
label_Qo = uicontrol(gcf,'Style', 'text', 'String', 'kW','Position', [90 555 25 18],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);   

% 热源温度th
label_th = uicontrol(gcf,'Style', 'text', 'String', '热源温度','Position', [30 530 70 20],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);   
data_th = uicontrol(gcf,'Style', 'edit', 'String', '85','Position', [30 515 60 20], 'FontSize', 12);
label_th = uicontrol(gcf,'Style', 'text', 'String', '℃','Position', [90 515 18 17],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);  

% 冷冻水进口温度tw
label_tw = uicontrol('Style', 'text', 'String', '冷却水进口温度','Position', [30 490 120 20],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);   
data_tw = uicontrol(gcf,'Style', 'edit', 'String', '32','Position', [30 475 60 20], 'FontSize', 12);
label_tw = uicontrol(gcf,'Style', 'text', 'String', '℃','Position', [90 475 18 17],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);  

% 冷冻水出口温度tc1
label_tc1 = uicontrol(gcf,'Style', 'text', 'String', '冷冻水进口温度','Position', [30 450 120 20],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);   
data_tc1 = uicontrol(gcf,'Style', 'edit', 'String', '11','Position', [30 435 60 20], 'FontSize', 12);  
label_tc1 = uicontrol(gcf,'Style', 'text', 'String', '℃','Position', [90 435 18 17],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);  

% 冷却水进口温度tc2
label_tc2 = uicontrol(gcf,'Style', 'text', 'String', '冷冻水出口温度','Position', [30 410 100 20],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);   
data_tc2 = uicontrol(gcf,'Style', 'edit', 'String', '8','Position', [30 395 60 20], 'FontSize', 12);  
label_tc2 = uicontrol(gcf,'Style', 'text', 'String', '℃','Position', [90 395 18 17],...   
    'BackgroundColor', [.5 .6 .6], 'FontSize', 12);  

%用于计算的按钮   
CalculateH = uicontrol(gcf,'Style', 'pushbutton', 'String', 'Calculate',...   
    'Position', [125 30 70 30], 'FontSize', 10);

%设置回叫函数   
set(CalculateH,'Callback', 'Design(data_Qo,data_th,data_tw,data_tc1,data_tc2)');
Design(data_Qo,data_th,data_tw,data_tc1,data_tc2);  

function Result=Design(data_Qo,data_th,data_tw,data_tc1,data_tc2)

Qo=str2num(get(data_Qo,'string'));
th=str2num(get(data_th,'string'));
tw=str2num(get(data_tw,'string'));
tc1=str2num(get(data_tc1,'string'));
tc2=str2num(get(data_tc2,'string'));  

Result=Qo+th+tw+tc1+tc2;