f=0
m=math
p=m.pi/48
h=m.floor
l=m.atan
n=68
o=120
function TIC()f=f+.1
d=m.sin(f)e=m.cos(f)for t=-n,n do
for s=-o,o do
k=(s*s+t*t)/48+1
x=s/k
y=t/k
z=64/k-1
q=d*x+e*y
u=e*x-d*y
v=d*q-e*z
pix(o+s,n+t,h(l(e*q+d*z,m.sqrt(u*u+v*v))/p)~h(l(u,v)/p))end
end
end
Comments
Log in with itch.io to leave a comment.
Source: