trn()

function fig = trn()
load trn
h0 = figure('Units','points', ...
	'Color',[1 1 0], ...
	'Colormap',mat0, ...
   'FileName','A:\trn.m', ...
   'MenuBar','none', ...
	'Name','solar transmittance(due to reflection)', ...
	'NumberTitle','off', ...
	'PaperPosition',[18 180 576 432], ...
	'PaperUnits','points', ...
	'Position',[281.25 144 214.5 215.25], ...
	'Tag','trn', ...
	'ToolBar','none');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
   'Position',[13.5 156.75 114.75 38.25], ...
   'BackgroundColor',[1 1 0], ...
	'FontSize',13, ...
	'FontWeight','bold', ...
	'ForegroundColor',[1 0 1], ...
   'Style','text', ...
   'string','number of glass cover',...
	'Tag','StaticText1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
   'Position',[15.75 81 114.75 45], ...
   'BackgroundColor',[1 1 0], ...
	'FontSize',13, ...
	'FontWeight','bold', ...
	'ForegroundColor',[1 0 1], ...
   'Style','text', ...
   'string','parallel reflection factor',...
	'Tag','StaticText2');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[20.25 8 111 46.5], ...
   'Style','text', ...
   'BackgroundColor',[1 1 0], ...
	'FontSize',15, ...
	'FontWeight','bold', ...
	'ForegroundColor',[1 0 1], ...
   'string','normal reflection factor',...
	'Tag','StaticText3');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[141 162 65 30], ...
   'Style','edit', ...
   'callback','trncal',...
	'Tag','EditText1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[141 90 65 30], ...
   'Style','edit', ...
   'callback','trncal',...
	'Tag','EditText2');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[141 16.5 65 30], ...
   'Style','edit', ...
   'callback','trncal',...
	'Tag','EditText3');
if nargout > 0, fig = h0; end