function mmenus()%MMENUS Simple menu example.% MMENUS uses waitforbuttonpress and gco in the callback strings%  to let the user make a menu selection and then select an object %  by clicking on it with the mouse. The callback strings then use %  the set function to apply the property value to the selected object.% B.R. Littlefield, University of Maine, Orono ME 04469% 5/30/95% Copyright (c) 1996 Prentice Hall, Inc.Hm_line   = uimenu(gcf,'label','Line');Hm_lstyle = uimenu(Hm_line,'label','Line Style');Hm_lwidth = uimenu(Hm_line,'label','Line Width');Hm_lcolor = uimenu(Hm_line,'label','Line Color');uimenu(Hm_lstyle,'Label','Solid',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineStyle'',''-''),',...        'end']);uimenu(Hm_lstyle,'Label','Dotted',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineStyle'','':''),',...        'end']);uimenu(Hm_lstyle,'Label','Dashed',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineStyle'',''--''),',...        'end']);uimenu(Hm_lstyle,'Label','DashDot',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineStyle'',''-.''),',...        'end']);uimenu(Hm_lwidth,'Label','Default',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineWidth'',0.5),',...        'end']);uimenu(Hm_lwidth,'Label','Thick',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineWidth'',2.0),',...        'end']);uimenu(Hm_lwidth,'Label','Thicker',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineWidth'',3.0),',...        'end']);uimenu(Hm_lwidth,'Label','Thickest',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''LineWidth'',4.0),',...        'end']);uimenu(Hm_lcolor,'Label','Yellow',...    'BackgroundColor','y',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''y''),',...        'end']);uimenu(Hm_lcolor,'Label','Magenta',...    'BackgroundColor','m','ForegroundColor','w',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''m''),',...        'end']);uimenu(Hm_lcolor,'Label','Cyan',...    'BackgroundColor','c',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''c''),',...        'end']);uimenu(Hm_lcolor,'Label','Red',...    'BackgroundColor','r','ForegroundColor','w',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''r''),',...        'end']);uimenu(Hm_lcolor,'Label','Green',...    'BackgroundColor','g',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''g''),',...        'end']);uimenu(Hm_lcolor,'Label','Blue',...    'BackgroundColor','b','ForegroundColor','w',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''b''),',...        'end']);uimenu(Hm_lcolor,'Label','White',...    'BackgroundColor','w',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''w''),',...        'end']);uimenu(Hm_lcolor,'Label','Black',...    'BackgroundColor','k','ForegroundColor','w',...    'CallBack',['waitforbuttonpress;',...        'if get(gco,''Type'') == ''line'',',...            'set(gco,''Color'',''k''),',...        'end']);Hm_cmap = uimenu(gcf,'Label','Color Map');uimenu(Hm_cmap,'Label','Lighter','CallBack','brighten(.3)');uimenu(Hm_cmap,'Label','Darker','CallBack','brighten(-.3)');uimenu(Hm_cmap,'Label','Default','CallBack','colormap(''default'')');uimenu(Hm_cmap,'Label','Gray','CallBack','colormap(gray)');uimenu(Hm_cmap,'Label','Hot','CallBack','colormap(hot)');uimenu(Hm_cmap,'Label','Cool','CallBack','colormap(cool)');uimenu(Hm_cmap,'Label','Bone','CallBack','colormap(bone)');uimenu(Hm_cmap,'Label','Copper','CallBack','colormap(copper)');uimenu(Hm_cmap,'Label','Pink','CallBack','colormap(pink)');uimenu(Hm_cmap,'Label','Prism','CallBack','colormap(prism)');uimenu(Hm_cmap,'Label','Jet','CallBack','colormap(jet)');uimenu(Hm_cmap,'Label','Flag','CallBack','colormap(flag)');uimenu(Hm_cmap,'Label','HSV','CallBack','colormap(hsv)');Hm_quit = uimenu(gcf,'Label','Quit');uimenu(Hm_quit,'Label','Close Figure','CallBack','close; return');uimenu(Hm_quit,'Label','Remove Menus',...    'CallBack',[...	    'delete(findobj(gcf,''Type'',''uimenu'',''Parent'',gcf)),',...		'drawnow']);