ppsurf_test.m

来自「MatlabVisualization Package」· M 代码 · 共 30 行

function ppsurf(a)

[ecode,estr,w,h] = ppclient('ppsize',a);
if ecode ~= 0
 error(estr);
end; 

if h > 1024
  h = 1024; %max height
end;
if w >1024
  w = 1024;
end;
theta = 0;
phi = 0;
zoom = 0;

[ecode,estr,data] = ppclient('ppsurf',a,w,h,theta,phi,zoom);
if ecode ~= 0
  error(estr);
end;

D(:,:,1) = reshape(data(1:3:w*h*3), w, h);
D(:,:,2) = reshape(data(2:3:w*h*3), w, h);
D(:,:,3) = reshape(data(3:3:w*h*3), w, h);

image(D);

return;