Alien giant

on 25 Oct 2021

a=716;

i=@image;

o=@ones;

X=linspace(-50,50,a); %create gradient

x=meshgrid(X+49); %greate matrix for horizontal patterns

[t,r]=cart2pol(X,X'); %crieate matrix to define edge of planet

colormap([[0 0 0];cool.*bone;o(a,3)]) %colormap based on built-in

b=0*o(a); %create dark surround

b(rand(a)>.995)=258; %add stars

i(b); %image basic planet

hold

Current plot held

for k=1:.5:100 %loop through horizontal strata

h=exp(-(x-k).^2).*abs(ifft2(r.^-1.3.*cos(rand(a)))); %create horizontal cloud with 'gaussian-ish' envelope

h(r>20)=0; %lose cloud in space area

i(randi(450)*o(a),'AlphaData',rescale(h',0,1)) %add each cloud layer using alpha with random color selected from map

end

camva(3)