%exm1076_1.m
clf reset,shg
t=(0:20)/20;r=2.5-cos(2*pi*t);[x,y,z]=cylinder(r,40);
fc = get(gca,'color');		%獲得軸的背景顏色
h=surface(x,y,z,'FaceColor',fc,'EdgeColor','flat',...
   'FaceLighting', 'none','EdgeLighting','flat');
								%把FaceColor' 設置為背景色，產生網線圖<4>
view(3); grid on  

disp('按任意鍵，繼續。產生曲面圖。'),pause
set(h,'FaceColor','flat','LineStyle','-','EdgeColor',[.8 .8 .8]) %<6>  

disp('按任意鍵，繼續。產生瀑布水線圖'),pause
set(h,'FaceColor','interp','MeshStyle','column') 					%<7>