+
−% ALLGRID Set all the grids to 'state'
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−%
+
−% DESCRIPTION: ALLGRID Set all the grids to 'state'
+
−%
+
−% CALL:        allgrid('state')
+
−%
+
−% VERSION:     $Id: allgrid.m,v 1.1 2008/08/05 17:51:32 ingo Exp $
+
−%
+
−% HISTORY:     17-11-2002 M Hewitson
+
−%                 Creation.
+
−%
+
−%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
−
+
−function allgrid(state)
+
−
+
−  if (strcmp(state,'on') || strcmp(state,'off'))
+
−
+
−    c = get(gcf, 'children');
+
−
+
−    for k=1:length(c)
+
−
+
−      t = get(c(k), 'Tag');
+
−      if t==''
+
−        set(c(k), 'XGrid', state);
+
−        set(c(k), 'YGrid', state);
+
−      end
+
−
+
−    end
+
−  else
+
−    error('state must be on or off');
+
−  end
+
−
+
−end
+
−