- /
-
Pumpkin
on 12 Oct 2022
- 39
- 156
- 1
- 0
- 263
% Snack Jack pumpkin
[X,Y,Z]=sphere(160);
R=1+(-(1-mod(0:.1:16,2)).^2)/40+(-(1-mod(0:.2:32,2)).^2)/40;
surf(R.*X,R.*Y,(.8+(0-(1:-.0125:-1)'.^4)*.3).*Z.*R.*1.2,FaceC='#e60',EdgeC='n')
% Recycle the sphere coords for the stem.
surface(X/15,Y/15,Z/2+.6,FaceC='#040', EdgeC='n')
% Setup the axes. Use command-dual version of title to save the ') at end.
axis equal off
% Setup lighting parameters.
lighting g
material([.6 .7 .2 3 .5])
camlight