ファイル名：ZgridAll.m

function zgridall(opt_grid);
% ZGRIDALL  Grid lines at all axeses.
%   ZGRIDALL ON  adds grid lines to all axes.
%   ZGRIDALL OFF  takes them off.
%   ZGRIDALL, by itself, toggles the grid state.
%
%   ZGRIDALL  sets the ZGrid properties of the all axeses in the current figure.
%
%   See also TITLE, XLABEL, YLABEL, ZLABEL, AXES, PLOT.

%   Copyright (c) 1984-97 by The MathWorks, Inc.
%   $Revision: 5.3 $  $Date: 1997/04/08 06:08:16 $
ax = findobj(gcf,'Type','axes');
% ax = gca;
if nargin == 0
   if strcmp(get(ax,'ZGrid'),'off')
       set(ax,'ZGrid','on');
   else
       set(ax,'ZGrid','off');
   end
elseif strcmp(opt_grid, 'on')
    set(ax,'ZGrid', 'on');
elseif strcmp(opt_grid, 'off')
    set(ax,'ZGrid', 'off');
else
    error('Unknown command option.');
end