(257 chars)
?"\^!5f100▒1⬇️3⬅️;⌂" n=600 ::_:: cls(0) p = 2.2929 for i=0,n do f=p*i y=1-(i/n*2) r=sqrt(1-y*y) x=cos(f)*r z=sin(f)*r b=(x+z*1.3)+3.3 b=b^5/700 x=64+x*30 y=64+y*30 srand(i) u=4*sin(t()/3)+3 v=5*abs(cos(rnd()+t())) line(x,y,x+u,y+v,1.5*(b+1)) end flip() goto _ |
[Please log in to post a comment]