c2fgui3.m

matlab的大量实例代码

function varargout = c2fgui3(varargin)
% C2FGUI3 Application M-file for c2fgui3.fig
%    FIG = C2FGUI3 launch c2fgui3 GUI.
%    C2FGUI3('callback_name', ...) invoke the named callback.

% Last Modified by GUIDE v2.0 26-Sep-2001 12:29:23

if nargin == 0  % LAUNCH GUI

	fig = openfig(mfilename,'reuse');

	% Use system color scheme for figure:
	set(fig,'Color',get(0,'defaultUicontrolBackgroundColor'));

	% Generate a structure of handles to pass to callbacks, and store it. 
	handles = guihandles(fig);
	guidata(fig, handles);

	if nargout > 0
		varargout{1} = fig;
	end

elseif ischar(varargin{1}) % INVOKE NAMED SUBFUNCTION OR CALLBACK

	try
		if (nargout)
			[varargout{1:nargout}] = feval(varargin{:}); % FEVAL switchyard
		else
			feval(varargin{:}); % FEVAL switchyard
		end
	catch
		disp(lasterr);
	end

end


%| ABOUT CALLBACKS:
%| GUIDE automatically appends subfunction prototypes to this file, and 
%| sets objects' callback properties to call them through the FEVAL 
%| switchyard above. This comment describes that mechanism.
%|
%| Each callback subfunction declaration has the following form:
%| <SUBFUNCTION_NAME>(H, EVENTDATA, HANDLES, VARARGIN)
%|
%| The subfunction name is composed using the object's Tag and the 
%| callback type separated by '_', e.g. 'slider2_Callback',
%| 'figure1_CloseRequestFcn', 'axis1_ButtondownFcn'.
%|
%| H is the callback object's handle (obtained using GCBO).
%|
%| EVENTDATA is empty, but reserved for future use.
%|
%| HANDLES is a structure containing handles of components in GUI using
%| tags as fieldnames, e.g. handles.figure1, handles.slider2. This
%| structure is created at GUI startup using GUIHANDLES and stored in
%| the figure's application data using GUIDATA. A copy of the structure
%| is passed to each callback.  You can store additional information in
%| this structure at GUI startup, and you can change the structure
%| during callbacks.  Call guidata(h, handles) after changing your
%| copy to replace the stored original so that subsequent callbacks see
%| the updates. Type "help guihandles" and "help guidata" for more
%| information.
%|
%| VARARGIN contains any extra arguments you have passed to the
%| callback. Specify the extra arguments by editing the callback
%| property in the inspector. By default, GUIDE sets the property to:
%| <MFILENAME>('<SUBFUNCTION_NAME>', gcbo, [], guidata(gcbo))
%| Add any extra arguments after the last argument, before the final
%| closing parenthesis.



% --------------------------------------------------------------------
function varargout = btnDraw_Callback(h, eventdata, handles, varargin)
try
   str=get(handles.strB,'String'); str0=[];
   for i=1:size(str,1) % 将所有输入的字符串串接起来
      str0=[str0, deblank(str(i,:))];
   end    
   eval(str0); % 对字符串求值，
   axes(handles.myAxes); % 将坐标系设置为当前坐标系
   surf(x,y,z); % 绘制三维图
catch
   errordlg('数据有问题，请检查'); % 如果上述程序出错，则显示错误信息
end


% --------------------------------------------------------------------
function varargout = btnDemo_Callback(h, eventdata, handles, varargin)
str1='[x,y]=meshgrid(-3:0.1:3, -2:0.1:2);';
str2='z=(x.^2-2*x).*exp(-x.^2-y.^2-x.*y);';
set(handles.strB,'String',str2mat(str1,str2));
eval(get(handles.btnDraw,'Callback'));



% --------------------------------------------------------------------
function varargout = edXPos_Callback(h, eventdata, handles, varargin)
try
   xx=eval(get(handles.edXPos,'String')); % 读取光源位置 
   yy=eval(get(handles.edYPos,'String')); 
   zz=eval(get(handles.edZPos,'String')); 
   axes(handles.myAxes); % 将坐标系设置为当前坐标系
   light('Position',[xx,yy,zz]); % 设置光源
catch
   errordlg('数据有问题，请检查'); % 如果上述程序出错，则显示错误信息
end



% --------------------------------------------------------------------
function varargout = chkX_Callback(h, eventdata, handles, varargin)
try
   xx=get(handles.chkX,'Value'); % 读取是否要网格标志
   yy=get(handles.chkY,'Value'); 
   zz=get(handles.chkZ,'Value'); 
%   set(handles.myAxes,'XGrid',onoff(xx),'YGrid',onoff(yy),'ZGrid',onoff(zz))
   set(handles.myAxes,'XGrid',xx,'YGrid',yy,'ZGrid',zz)
catch
   errordlg('数据有问题，请检查'); % 如果上述程序出错，则显示错误信息
end

function out=onoff(in) % 将 0,1 转换成 off, on
out='off'; if in==1, out='on'; end




% --------------------------------------------------------------------
function varargout = lstColor_Callback(h, eventdata, handles, varargin)
v=get(handles.lstColor,'Value'); % 得出列表框的选项
axes(handles.myAxes); % 将坐标系设置为当前坐标系
switch v
case 1, shading flat; 
case 2, shading interp;
case {3,4}, shading faceted;
end




% --------------------------------------------------------------------
function varargout = mnuFile_Callback(h, eventdata, handles, varargin)




% --------------------------------------------------------------------
function varargout = mnuFNew_Callback(h, eventdata, handles, varargin)




% --------------------------------------------------------------------
function varargout = mnuFOpen_Callback(h, eventdata, handles, varargin)




% --------------------------------------------------------------------
function varargout = mnuFExit_Callback(h, eventdata, handles, varargin)