my_menu2_sub1.m

一个小小的c语言编程

function my_menu2_sub1
global X1 X2 X3 t X0 Y0 Z0 t0 tf r sigma b time 
global h_menu2_sub1_text_bifucationz1 h_menu2_sub1_text_bifucationz2 
global h_menu2_sub1_radio_1 h_menu2_sub1_radio_2 h_menu2_sub1_radio_3
figure(8)
clf reset,
set(gcf,'unit','normalized','position',[0.002,0.01,0.94,0.92]);
set(gcf,'defaultuicontrolunits','normalized');
set(gcf,'defaultuicontrolfontsize',12);
set(gcf,'defaultuicontrolfontname','隶书');
set(gcf,'defaultuicontrolhorizontal','left');
str='lorenz function X-Y strange place phase';
set(gcf,'name',str,'numbertitle','off');	
h_axes=axes('position',[0.03,0.15,0.7,0.8]);	 
set(h_axes,'xlim',[-20,20],'ylim',[-30,30],'zlim',[0,50]);
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
h_menu2_sub1_text_1=uicontrol(gcf,'style','text',...
   'unit','normalized','position',[0.77,0.89,0.21,0.03],...
   'horizontal','left','string',{'x,y平面对应的奇点值'});
h_menu2_sub1_text_strangex=uicontrol(gcf,'style','text',...	       
   'unit','normalized','position',[0.77,0.85,0.07,0.03],...
   'horizontal','left','string',{'0'});
h_menu2_sub1_text_strangey=uicontrol(gcf,'style','text',...	       
   'unit','normalized','position',[0.84,0.85,0.07,0.03],...
  	'horizontal','left','string',{'0'});

h_menu2_sub1_text_2=uicontrol(gcf,'style','text',...
   'unit','normalized','position',[0.77,0.81,0.21,0.03],...
   'horizontal','left','string',{'鞍-结分岔点'});
h_menu2_sub1_text_bifucationz1=uicontrol(gcf,'style','text',...	       
   'unit','normalized','position',[0.77,0.77,0.07,0.05],...
  	'horizontal','left','string',['z1= ',sprintf('%1.5g\',r-1)]);
h_menu2_sub1_text_3=uicontrol(gcf,'style','text',...
   'unit','normalized','position',[0.77,0.73,0.21,0.03],...
   'horizontal','left','string',{'结-焦分岔点'});
h_menu2_sub1_text_bifucationz2=uicontrol(gcf,'style','text',...	       
   'unit','normalized','position',[0.77,0.69,0.07,0.05],...
  	'horizontal','left','string',['z2= ',sprintf('%1.5g\',r-1+(sigma+1)^2/(4*sigma))]);
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
h_menu2_sub1_radio_1=uicontrol(gcf,'style','radio',...	
   'position',[0.77,0.52,0.21,0.04],...
   'string','鞍点区',...
   'callback',[...
       'set(h_menu2_sub1_radio_1,''value'',get(h_menu2_sub1_radio_1,''max'')),',...
        'set(h_menu2_sub1_radio_2,''value'',get(h_menu2_sub1_radio_2,''min'')),',...
        'set(h_menu2_sub1_radio_3,''value'',get(h_menu2_sub1_radio_3,''min'')),',...
    'x_y_an_space']);
h_menu2_sub1_radio_2=uicontrol(gcf,'style','radio',...	
   'position',[0.77,0.42,0.21,0.04],...
   'string','稳定结点区',...
   'callback',[...
       'set(h_menu2_sub1_radio_1,''value'',get(h_menu2_sub1_radio_1,''Min'')),',...
        'set(h_menu2_sub1_radio_2,''value'',get(h_menu2_sub1_radio_2,''Max'')),',...
        'set(h_menu2_sub1_radio_3,''value'',get(h_menu2_sub1_radio_3,''Min'')),',...
    'x_y_jie_space']);

h_menu2_sub1_radio_3=uicontrol(gcf,'style','radio',...	
   'position',[0.77,0.32,0.21,0.04],...
   'string','稳定焦点区',...
   'callback',[...
       'set(h_menu2_sub1_radio_1,''value'',get(h_menu2_sub1_radio_1,''min'')),',...
        'set(h_menu2_sub1_radio_2,''value'',get(h_menu2_sub1_radio_2,''min'')),',...
        'set(h_menu2_sub1_radio_3,''value'',get(h_menu2_sub1_radio_3,''max'')),',...
    'x_y_jiao_space']);

h_menu2_sub1_push=uicontrol(gcf,'style','push',...
    'unit','normalized','position',[0.79,0.25,0.15,0.04],...
    'string','X-Y轨线动态绘图','callback','my_comet_strange_xy(X1,X2,0.02,time)');