dispkrig3dfig.m

Kriging插值matlab toolbox

h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'ListboxTop',0, ...
	'Position',[x0x y0x Ltext Ly], ...
	'String',' ', ...
   'Style','text');
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'Position',[x0x+0.01 y0x+0.003 Ltext Ly-0.01], ...
	'String','X', ...
   'Style','text');
if isfield(hdl,'dataprep')
  if get(hdl.dataprep.xdir,'value') == 1
    xdir_reverse=1;
  else
    xdir_reverse=0;
  end
else
  xdir_reverse=0;           
end
hdl.dispkrig3d.xdir_reverse = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','radio_action_visual(7)', ...
	'HorizontalAlignment','left', ...
	'FontWeight','bold', ...
	'Position',[x0x+Ltext y0x Lradio Ly], ...
    'String','Reverse', ...
    'fontsize',12, ...
    'value',xdir_reverse, ...
    'Style','radio');
if data.in.dim == 3
hdl.dispkrig3d.xdir_val = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'FontWeight','bold', ...
	'Position',[x0x y0x-dy Lx Ly ], ...
	'Style','text');
hdl.dispkrig3d.xdir_slider = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','dispkrig3d(1)', ...
	'SliderStep',[xstep-EPS xstep+EPS], ...
	'Position',[x0x+Lx y0x-dy Lslider Ly ], ...
	'Style','slider');
end

%%% ydir
x0y=0.15;y0y=0.25;Lslider=0.12;
dy=0.06;
Lx=0.08;Ly=0.05;;
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'ListboxTop',0, ...
	'Position',[x0y y0y Ltext Ly], ...
	'String',' ', ...
   'Style','text');
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'ListboxTop',0, ...
	'Position',[x0y+0.01 y0y+0.003 Ltext Ly-0.01], ...
	'String','Y', ...
    'Style','text');
if isfield(hdl,'dataprep')
  if get(hdl.dataprep.ydir,'value') == 1
    ydir_reverse=1;
  else
    ydir_reverse=0;
  end
else
  ydir_reverse=0;  
end
hdl.dispkrig3d.ydir_reverse = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','radio_action_visual(8)', ...
	'HorizontalAlignment','left', ...
	'FontWeight','bold', ...
	'Position',[x0y+Ltext y0y Lradio Ly], ...
   'String','Reverse', ...
   'fontsize',12, ...
   'value',ydir_reverse, ...
   'Style','radio');

if data.in.dim == 3
hdl.dispkrig3d.ydir_val = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'FontWeight','bold', ...
	'ListboxTop',0, ...
	'Position',[x0y y0y-dy Lx Ly ], ...
	'Style','text');
hdl.dispkrig3d.ydir_slider = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','dispkrig3d(2)', ...
	'ListboxTop',0, ...
	'SliderStep',[ystep-EPS ystep+EPS], ...
	'Position',[x0y+Lx y0y-dy Lslider Ly ], ...
	'Style','slider');
end

%%% zdir
x0z=0.65;y0z=0.7;Lslider=0.15;
dx=0.06;
Ltext=0.03;
Ly=0.04;Lx=0.1;
Lradio=0.08;
if data.in.dim == 3
hdl.dispkrig3d.ztxt = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'ListboxTop',0, ...
	'Position',[x0z+0.03 y0z+Ly Ltext Ly], ...
	'String','Z', ...
   'Style','text');
if isfield(hdl,'dataprep')
  if get(hdl.dataprep.zdir,'value') == 1
    zdir_reverse=1;
  else
    zdir_reverse=0;
  end
else
  zdir_reverse=1;  
end

hdl.dispkrig3d.zdir_reverse = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','radio_action_visual(9)', ...
	'HorizontalAlignment','left', ...
	'FontWeight','bold', ...
	'Position',[x0z y0z Lx Ly], ...
   'String','Reverse', ...
   'fontsize',8, ...
   'value',1, ...
   'Style','radio');
hdl.dispkrig3d.zdir_val = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'FontWeight','bold', ...
	'ListboxTop',0, ...
	'Position',[x0z y0z-Ly Lx Ly ], ...
	'Style','text');
hdl.dispkrig3d.zdir_slider = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','dispkrig3d(3)', ...
	'SliderStep',[zstep-EPS zstep+EPS], ...
	'Position',[x0z+0.03 y0z-Ly-Lslider Ly Lslider], ...
	'Style','slider');
end

%% color scale adjustment
x0cs=0.82;
y0cs1=0.75;
y0cs2=0.40;
Lycs=0.025;
hdl.dispkrig3d.cbar_slider_top = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','dispkrig3d(4)', ...
	'SliderStep',[0.01-EPS 0.01+EPS], ...
	'Position',[x0cs y0cs1 Lycs Lslider], ...
	'Style','slider','value',0.75);
hdl.dispkrig3d.cbar_slider_bot = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'Callback','dispkrig3d(4)', ...
	'SliderStep',[0.01-EPS 0.01+EPS], ...
	'Position',[x0cs y0cs2 Lycs Lslider], ...
	'Style','slider','value',0.25);

%%	Variable
hdl.dispkrig3d.var_index=1;
Lradio=0.12;
Ly=0.04;
x0=0.67;
y0=0.3;
dy=0.05;
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'Position',[x0 y0 Lradio Ly], ...
	'String','Display', ...
	'Style','text');
hdl.dispkrig3d.disp_var1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','radio_action_visual(1)', ...
	'String','Krig Map', ...
	'Position',[x0 y0-dy Lradio Ly], ...
   'value',1, ...
	'Style','radio');
hdl.dispkrig3d.disp_var2 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','radio_action_visual(2)', ...
	'String','Variance Map', ...
	'Position',[x0 y0-2*dy Lradio Ly], ...
	'Style','radio');
hdl.dispkrig3d.disp_var3 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','radio_action_visual(3)', ...
	'String','Validation', ...
	'Position',[x0 y0-3*dy Lradio Ly], ...
	'Style','radio');

%%	shading
hdl.dispkrig3d.shading_index=3;
Lradio=0.12;
Ly=0.04;
x0=0.83;
y0=0.3;
dy=0.05;
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'BackgroundColor',dark_grey, ...
	'HorizontalAlignment','center', ...
	'FontWeight','bold', ...
	'Position',[x0 y0 Lradio Ly], ...
	'String','Shading', ...
	'Style','text');
hdl.dispkrig3d.shading_radio1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','radio_action_visual(4)', ...
	'String','Faceted', ...
	'Position',[x0 y0-dy Lradio Ly], ...
    'value',0, ...
	'Style','radio');
hdl.dispkrig3d.shading_radio2 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','radio_action_visual(5)', ...
	'String','Flat', ...
	'Position',[x0 y0-2*dy Lradio Ly], ...
   'value',0, ...
	'Style','radio');
hdl.dispkrig3d.shading_radio3 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','radio_action_visual(6)', ...
	'String','Interp', ...
	'Position',[x0 y0-3*dy Lradio Ly], ...
    'value',1, ...
	'Style','radio');

%% Push button
pbtn_w=hdl.object.pushbtn_w;
pbtn_l=hdl.object.pushbtn_l-0.04;
x0=0.5;
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','dispkrig3d_proc', ...
	'FontSize',10, ...
	'FontWeight','bold', ...
	'Position',[x0 0.08  pbtn_l pbtn_w], ...
	'String','Show Plot');
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','file_browser3d(4,1);', ...
	'FontSize',10, ...
	'FontWeight','bold', ...
	'Position',[x0+(0.01+pbtn_l) 0.08  pbtn_l pbtn_w], ...
	'String','Load');
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','figure(hdl.navigator.h0)', ...
	'FontSize',10, ...
	'FontWeight','bold', ...
	'Position',[x0+2*(0.01+pbtn_l) 0.08  pbtn_l pbtn_w], ...
	'String','Navigator');
h1 = uicontrol('Parent',hdl.dispkrig3d.h0, ...
	'Units','normalized', ...
	'Callback','close_window(4)', ...
	'FontSize',10, ...
	'FontWeight','bold', ...
	'Position',[x0+3*(0.01+pbtn_l) 0.08  pbtn_l pbtn_w], ...
	'String','Quit');

if default_setting ==1 
   data.in.dim=[]; 		% default setting
   default_setting=0;
end

para.dispkrig.trackline.type_indx=1;
para.dispkrig.trackline.line_color=1;
para.dispkrig.colormap_indx=11;
para.dispkrig.num_of_contour=4;
para.dispkrig.digits_of_contour=3;
para.dispkrig.trackline.color_indx=8;
para.dispkrig.trackline.size_indx=8;
para.dispkrig.validation_model=1;

para.status.dispkrigfig = 1;
hdl.status.dispkrigfig = 1;