IFIG()

function fig = IFIG()
load IFIG
h0 = figure('Units','points', ...
	'Color',[1 1 0], ...
	'Colormap',mat0, ...
   'FileName','A:\IFIG.m', ...
   'MenuBar','none', ...
	'Name','IRADDIATION OUT ATMOSPHERE', ...
	'NumberTitle','off', ...
	'PaperPosition',[18 180 576 432], ...
	'PaperUnits','points', ...
	'Position',[395.25 71.25 150 200.25], ...
	'Tag','ifig1', ...
	'ToolBar','none');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[8 130 40 40], ...
   'Style','text', ...
   'string','START HOURE',...
   'fontsize',12,...
   'BackgroundColor',[1 1 0], ...
   'foregroundcolor',[1 0 0.5020],...
	'Tag','StaticText1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
	'Position',[94 145 42 25.5], ...
   'Style','text', ...
   'string','END HOURE',...
   'fontsize',12,...
   'BackgroundColor',[1 1 0], ...
   'foregroundcolor',[1 0 0.5020],...
	'Tag','StaticText2');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
   'Position',[54.75 115 35.25 26.25], ...
   'string','TO',...
   'fontsize',15,...
   'BackgroundColor',[1 1 0], ...
   'foregroundcolor',[1 0 0.5020],...
	'Style','text', ...
	'Tag','StaticText3');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[5 120 40 20], ...
   'Style','edit', ...
   'callback','ifigcal',...
	'Tag','EditText1w1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[95 120 40 20], ...
   'Style','edit', ...
   'callback','ifigcal',...
   'Tag','EditText2w2');
h1=findobj(0,'tag','now');
m=findobj(h1,'tag','EditText4');
nk=get(m,'string');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
   'Position',[95 61.5 40 20], ...
   'string',nk,...
   'callback','ifigcal',...
   'Style','edit', ...
	'Tag','EditText3day');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[95 20.25 40 20], ...
   'Style','edit', ...
   'string','0',...
   'callback','ifigcal',...
	'Tag','EditText4slop');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
   'Position',[18.75 60 55 35], ...
   'string','day number',...
   'fontsize',15,...
   'BackgroundColor',[1 1 0], ...
   'foregroundcolor',[1 0 0.5020],...
	'Style','text', ...
	'Tag','StaticText4');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'ListboxTop',0, ...
   'Position',[15.75 17 58 35], ...
   'string','plate slop',...
   'fontsize',15,...
   'BackgroundColor',[1 1 0], ...
   'foregroundcolor',[1 0 0.5020],...
	'Style','text', ...
	'Tag','StaticText5');
if nargout > 0, fig = h0; end