TP.rar_TP_communityqjz_matlab

function varargout = Tp4(varargin) % TP3 Application M-file for Tp4.fig % FIG = TP3 launch Tp4 GUI. % TP3('callback_name', ...) invoke the named callback. % Last Modified by GUIDE v2.0 08-Mar-2004 20:13:50 if nargin == 0 % LAUNCH GUI fig = openfig(mfilename,'reuse'); % 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 [varargout{1:nargout}] = feval(varargin{:}); % FEVAL switchyard 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 = Syst3_Callback(h, eventdata, handles, varargin) % Stub for Callback of the uicontrol handles.Syst3. v=get(gcbo,'value'); if v==1, h=findobj(gcbf,'tag','Syst4'); set(h,'value',0); h=findobj(gcbf,'tag','Syst5'); set(h,'value',0); h=findobj(gcbf,'tag','K2'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit3'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit6'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit8'); set(h,'visible','off'); h=findobj(gcbf,'tag','x2'); set(h,'visible','off'); h=findobj(gcbf,'tag','w2'); set(h,'visible','off'); h=findobj(gcbf,'tag','text16'); set(h,'visible','off'); h=findobj(gcbf,'tag','K'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit1'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit4'); set(h,'visible','on'); h=findobj(gcbf,'tag','T'); set(h,'visible','on'); h=findobj(gcbf,'tag','K1'); set(h,'visible','on'); h=findobj(gcbf,'tag','x1'); set(h,'visible','on'); h=findobj(gcbf,'tag','w1'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit2'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit5'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit7'); set(h,'visible','on'); h=findobj(gcbf,'tag','text15'); set(h,'visible','on'); else h=findobj(gcbf,'tag','K'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit1'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit4'); set(h,'visible','off'); h=findobj(gcbf,'tag','T'); set(h,'visible','off'); h=findobj(gcbf,'tag','K1'); set(h,'visible','off'); h=findobj(gcbf,'tag','x1'); set(h,'visible','off'); h=findobj(gcbf,'tag','w1'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit2'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit5'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit7'); set(h,'visible','off'); h=findobj(gcbf,'tag','text15'); set(h,'visible','off'); end % -------------------------------------------------------------------- function varargout = Syst4_Callback(h, eventdata, handles, varargin) % Stub for Callback of the uicontrol handles.Syst4. v=get(gcbo,'value'); if v==1, h=findobj(gcbf,'tag','Syst3'); set(h,'value',0); h=findobj(gcbf,'tag','Syst5'); set(h,'value',0); h=findobj(gcbf,'tag','K'); set(h,'visible','off'); h=findobj(gcbf,'tag','T'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit1'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit4'); set(h,'visible','off'); h=findobj(gcbf,'tag','K2'); set(h,'visible','on'); h=findobj(gcbf,'tag','x2'); set(h,'visible','on'); h=findobj(gcbf,'tag','w2'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit3'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit6'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit8'); set(h,'visible','on'); h=findobj(gcbf,'tag','K1'); set(h,'visible','on'); h=findobj(gcbf,'tag','x1'); set(h,'visible','on'); h=findobj(gcbf,'tag','w1'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit2'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit5'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit7'); set(h,'visible','on'); h=findobj(gcbf,'tag','text15'); set(h,'visible','on'); h=findobj(gcbf,'tag','text16'); set(h,'visible','on'); else h=findobj(gcbf,'tag','K2'); set(h,'visible','off'); h=findobj(gcbf,'tag','x2'); set(h,'visible','off'); h=findobj(gcbf,'tag','w2'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit3'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit6'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit8'); set(h,'visible','off'); h=findobj(gcbf,'tag','K1'); set(h,'visible','off'); h=findobj(gcbf,'tag','x1'); set(h,'visible','off '); h=findobj(gcbf,'tag','w1'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit2'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit5'); set(h,'visible','off'); h=findobj(gcbf,'tag','edit7'); set(h,'visible','off'); h=findobj(gcbf,'tag','text15'); set(h,'visible','off'); h=findobj(gcbf,'tag','text16'); set(h,'visible','off'); end % -------------------------------------------------------------------- function varargout = Syst5_Callback(h, eventdata, handles, varargin) % Stub for Callback of the uicontrol handles.Syst5. v=get(gcbo,'value'); if v==1, h=findobj(gcbf,'tag','Syst4'); set(h,'value',0); h=findobj(gcbf,'tag','Syst3'); set(h,'value',0); h=findobj(gcbf,'tag','K'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit1'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit4'); set(h,'visible','on'); h=findobj(gcbf,'tag','T'); set(h,'visible','on'); h=findobj(gcbf,'tag','K2'); set(h,'visible','on'); h=findobj(gcbf,'tag','x2'); set(h,'visible','on'); h=findobj(gcbf,'tag','w2'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit3'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit6'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit8'); set(h,'visible','on'); h=findobj(gcbf,'tag','K1'); set(h,'visible','on'); h=findobj(gcbf,'tag','x1'); set(h,'visible','on'); h=findobj(gcbf,'tag','w1'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit2'); set(h,'visible','on'); h=findobj(gcbf,'tag','edit5'); set(h