- /
-
Flare
on 28 Oct 2021
- 27
- 167
- 1
- 0
- 280
a=500;
b=130;
X=-180:.72:179.5;
colormap(flip(hot))
p=@randi;
r=abs((X-b)+(X'-b)*i);
image(r)
hold
s=ones(a);
g=s;
g(r>160)=0;
for k=1:60
c=1E4*abs(ifft2(r.^-1.*cos(7*rand(a))));
f=c.*g;
if k<10
f=c.*exp(-(abs((X-p(b))+(X'-p(b))*i)-p(40)-40).^2/60);
end
image(p(210).*s,'AlphaData',rescale(f,0,1))
end
camva(4)