gusucode.com > 《精通matlab 7》包括配套光盘 > 配套光盘里的程序附件/Ex-25/Ex2508.m

    %例25-8 光照方法
%Ex25-8 Lighting Method
clear
close all
[x,y]=meshgrid(-1:0.2:1);
z=sin(x*pi)+cos(y*pi);
subplot(2,2,1)
surf(x,y,z)
light('Color','r','Style','infinite','Position',[1 -1 2])
lighting none
title('lighting none')
subplot(2,2,2)
surf(x,y,z)
light('Color','r','Style','infinite','Position',[1 -1 2])
lighting flat
title('lighting flat')
subplot(2,2,3)
surf(x,y,z)
light('Color','r','Style','infinite','Position',[1 -1 2])
lighting gouraud
title('lighting gouraud')
subplot(2,2,4)
surf(x,y,z)
light('Color','r','Style','infinite','Position',[1 -1 2])
lighting phong
title('lighting phong')