dividing_planes.m

beamlet变化的工具箱

n=1; dx=0; dy=0; dz=0;
v=[0 0 0;0 n 0;n n 0;n 0 0;0 0 n;0 n n;n n n;n 0 n];
vz=[0 0 n/2;0 n n/2;n n n/2;n 0 n/2];
vy=[0 n/2 0;0 n/2 n;n n/2 n;n n/2 0];
vx=[n/2 0 0;n/2 0 n;n/2 n n;n/2 n 0];
v=v+[dx*ones(8,1),dy*ones(8,1),dz*ones(8,1)];
f=[1 2 3 4;5 6 7 8;1 5 6 2;2 6 7 3;3 7 8 4;4 8 5 1];
p=patch('faces',f,'vertices',v,'facecolor','n');
p=patch('faces',f(1,:),'vertices',vx,'facecolor','y');
p=patch('faces',f(1,:),'vertices',vy,'facecolor','g');
p=patch('faces',f(1,:),'vertices',vz,'facecolor','b');



cameramenu
axis off
set(gca,'view',[-30,30],'Projection','orthographic');

zoom(0.8)
axis image
hold on

%
% Part of BeamLab Version:200
% Built:Friday,23-Aug-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%
%
% Part of BeamLab Version:200
% Built:Saturday,14-Sep-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%