function fig = collector()
load collector
h0 = figure('Units','points', ...
'Color',[1 1 0], ...
'Colormap',mat0, ...
'FileName','A:\collector.m', ...
'MenuBar','none', ...
'Name','collector', ...
'NumberTitle','off', ...
'PaperPosition',[18 180 576 432], ...
'PaperUnits','points', ...
'Position',[169.5 42.75 420 339.75], ...
'Tag','collectorf', ...
'ToolBar','none');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','efig', ...
'ListboxTop',0, ...
'Position',[31.5 253.5 72.75 31.5], ...
'String','ground reflected', ...
'Tag','Pushbutton1');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','efids', ...
'ListboxTop',0, ...
'Position',[128.25 253.5 62.25 32.25], ...
'String','Diffuse from sky', ...
'Tag','difus');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 0], ...
'FontSize',15, ...
'FontWeight','bold', ...
'ForegroundColor',[1 0 1], ...
'ListboxTop',0, ...
'Position',[27.75 284.25 160.5 39.75], ...
'String','Effective incidence angle of', ...
'Style','text', ...
'Tag','StaticText1');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 0], ...
'FontSize',15, ...
'FontWeight','bold', ...
'ForegroundColor',[1 0 1], ...
'ListboxTop',0, ...
'Position',[20.25 187.5 185.25 52.5], ...
'String','now you can callculate the loss coefficient', ...
'Style','text', ...
'Tag','StaticText2');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','ut', ...
'ListboxTop',0, ...
'Position',[39 164.25 75 30], ...
'String','top loss coefficient', ...
'Tag','Pushbutton3');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','ub', ...
'ListboxTop',0, ...
'Position',[129 163.5 75 30], ...
'String','Back loss coefficient', ...
'Tag','Pushbutton4');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','ue', ...
'ListboxTop',0, ...
'Position',[40.5 125.25 75 30], ...
'String','edge loss coefficient', ...
'Tag','Pushbutton5');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 1], ...
'ListboxTop',0, ...
'Position',[325.5 302.25 65.25 24.75], ...
'Style','edit', ...
'Tag','EditText1');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 0], ...
'FontSize',15, ...
'FontWeight','bold', ...
'ForegroundColor',[1 0 1], ...
'ListboxTop',0, ...
'Position',[225.75 294 97.5 35.25], ...
'String','collector slope', ...
'Style','text', ...
'Tag','StaticText3');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','ul', ...
'ListboxTop',0, ...
'Position',[128.25 124.5 75 30], ...
'String','total loss coefficient', ...
'Tag','Pushbutton6');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','collectoreficncyfactor', ...
'ListboxTop',0, ...
'Position',[272.25 172.5 90 30], ...
'String','collector efficiency factor', ...
'Tag','Pushbutton7');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','stfinefficiency', ...
'ListboxTop',0, ...
'Position',[40.5 81 77.25 30], ...
'String','standard fin efficiency', ...
'Tag','Pushbutton8');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 0], ...
'FontSize',7, ...
'FontWeight','bold', ...
'ForegroundColor',[1 0 1], ...
'ListboxTop',0, ...
'Position',[241.5 252 84 27.75], ...
'String','distance between the tube(m)', ...
'Style','text', ...
'Tag','StaticText4');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 1], ...
'ListboxTop',0, ...
'Position',[326.25 257.25 65.25 24.75], ...
'Style','edit', ...
'Tag','EditText2');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 1], ...
'ListboxTop',0, ...
'Position',[327 218.25 65.25 24.75], ...
'Style','edit', ...
'Tag','EditText3');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 1 0], ...
'FontSize',10, ...
'FontWeight','bold', ...
'ForegroundColor',[1 0 1], ...
'ListboxTop',0, ...
'Position',[234 216 86.25 28.5], ...
'String','tube diameter(m)', ...
'Style','text', ...
'Tag','StaticText5');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','boundconductance', ...
'ListboxTop',0, ...
'Position',[130.5 82.5 75 30], ...
'String','bound conductance', ...
'Tag','Pushbutton8');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'ListboxTop',0, ...
'BackgroundColor',[1 0 1], ...
'Callback','qu', ...
'string','usefule energy gain',...
'Position',[264 119.25 105.75 33.75], ...
'Tag','Pushbutton2');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','reflectionfactor', ...
'ListboxTop',0, ...
'Position',[73.5 42 90 32.25], ...
'String','reflection factor', ...
'Tag','Pushbutton9');
h1 = uicontrol('Parent',h0, ...
'Units','points', ...
'BackgroundColor',[1 0 1], ...
'Callback','solartransmitance', ...
'ListboxTop',0, ...
'Position',[64.5 4.5 114 28.5], ...
'String','solar transmittance', ...
'BackgroundColor',[1 0 1], ...
'Tag','Pushbutton10');
if nargout > 0, fig = h0; end