10.4为低层指令绘图准备图/轴
10.4.3 高层绘图文件的形成
【例 10.4.3 -1 】高层作图函数 surf.m 文件与底层作图指令 surface 的关系。

[surf.m]

function h = surf(varargin)

cax = newplot; % 准备图形窗和轴，并返回轴句柄。

if nargin == 0

error( Not enough input arguments. )

elseif nargin == 1

if min( size( varargin{1} ) ) == 1

error( Input argument must be a matrix not a vector or a scalar )

else

hh = surface(varargin{1}); % 单输入宗量格式创建面

end

else

hh = surface(varargin{:}); % 多输入宗量格式创建面

end

next = lower(get(cax, NextPlot )); % 把大写字母变为小写

if ~ishold % 假如当前图形不处在 hold on 状态为真

view(3) % 在默认视点观看三维图形

grid on % 画分格线

end

if nargout == 1

h = hh; % 输出宗量数为 1 时，将 surface 的句柄赋给变量 h 。

end