- /
-
Hot Air Balloon
on 29 Oct 2021
- 6
- 758
- 0
- 0
- 280
% Let's make a hot air ballon!
figure('color','k')
% Define grid:
a=101;
b=0:.01:1;
% Taper function
t=sin(b'.^2*pi);
% Basic sphere
[x,y,z]=sphere(a-1);
% Ripples
v=(abs(sin(20*b'))+3)/4;
% Opening
t(1:30)=nan;
% Color
A=v'.^6.*cat(3,1,0,1).*t;
u=v'.*t;
% Low Specular, High ambient: make it glow!
surf(x.*u,y.*u,z,A,'SpecularStrength',.2,'AmbientStrength',1);
hold
% Carriage
surf(x/4,y/4,erf(z*6)/9-1);
% Pretty
shading flat
view([45,-35])
axis equal off
camzoom(1.4)
light