M=Math;U=1E3;$=[];P=[];for(y=12E6;y--;)t=y+1E3,z=M.random(),P[y]=.997<z,v=$[t-1]+$[t]+$[t+1]||2,v=v/3+z/25-.02,$[y]=0>v?0:1<v?1:v;T=I=0;_="7811099 0005079 9003851 8901882 9403999 000X305".split(" ");setInterval(function(){T++;for(f=+new Date+45;new Date<f;)C=I%786433,I+=3E5,x=C%1024,y=C/1024|0,o=1.5-T/92E3,p=M.cos(o),q=M.sin(o),r=x-500,s=1E3,X=r*q+s*p,Y=s*q-r*p,Z=y-384,h([1E3-16E3*p,16E3*-q,0]),O=J^5,S=_[J],V=e[0]-V,B=e[1]-B,A=e[2]-A,u=M.atan2(V,B)/6.29+(O&&T/6E3)+1,u=4E3*u%2E3|0,v=636*M.asin(A/H)%1E3|0,K=2E6*J+1E3*u+v,G=.7*V-B/2-A/2,X=.7,Z=Y=-.5,L=28*$[K]*((0>G||O&&!h(e,5)&&D?0:.7*G/H)+.3),O=!O&&P[K]&&128,c.fillStyle="rgb("+[S[4]*L|O,S[5]*L|O,S[6]*L|O]+")",c.fillRect(x,y,1,1)},50);function h(d,k){D=0;for(i=k||6;i--;)s=_[i],g=T/45836+.628*s[1],b=s[0]*U,v=M.cos(g)*b,b*=M.sin(g),a=s[2]*U,R=s[3]*U||1E7,l=X*X+Y*Y+Z*Z,m=d[0]-v,n=d[1]-b,o=d[2]-a,p=-2*(X*m+Y*n+Z*o),E=p*p-4*l*(m*m+n*n+o*o-R*R),0>E||(E=M.sqrt(E),p+=p<E?E:-E,p*=.5/l,1>p||D&&!(p<D)||(D=p,J=i,V=v,B=b,A=a,H=R));e=[d[0]+D*X,d[1]+D*Y,d[2]+D*Z]};
TT1NYXRoO1U9MUUzOyQ9W107UD1bXTtmb3IoeT0xMkU2O3ktLTspdD15KzFFMyx6PU0ucmFuZG9tKCksUFt5XT0uOTk3PHosdj0kW3QtMV0rJFt0XSskW3QrMV18fDIsdj12LzMrei8yNS0uMDIsJFt5XT0wPnY/MDoxPHY/MTp2O1Q9ST0wO189Ijc4MTEwOTkgMDAwNTA3OSA5MDAzODUxIDg5MDE4ODIgOTQwMzk5OSAwMDBYMzA1Ii5zcGxpdCgiICIpO3NldEludGVydmFsKGZ1bmN0aW9uKCl7VCsrO2ZvcihmPStuZXcgRGF0ZSs0NTtuZXcgRGF0ZTxmOylDPUklNzg2NDMzLEkrPTNFNSx4PUMlMTAyNCx5PUMvMTAyNHwwLG89MS41LVQvOTJFMyxwPU0uY29zKG8pLHE9TS5zaW4obykscj14LTUwMCxzPTFFMyxYPXIqcStzKnAsWT1zKnEtcipwLFo9eS0zODQsaChbMUUzLTE2RTMqcCwxNkUzKi1xLDBdKSxPPUpeNSxTPV9bSl0sVj1lWzBdLVYsQj1lWzFdLUIsQT1lWzJdLUEsdT1NLmF0YW4yKFYsQikvNi4yOSsoTyYmVC82RTMpKzEsdT00RTMqdSUyRTN8MCx2PTYzNipNLmFzaW4oQS9IKSUxRTN8MCxLPTJFNipKKzFFMyp1K3YsRz0uNypWLUIvMi1BLzIsWD0uNyxaPVk9LS41LEw9MjgqJFtLXSooKDA+R3x8TyYmIWgoZSw1KSYmRD8wOi43KkcvSCkrLjMpLE89IU8mJlBbS10mJjEyOCxjLmZpbGxTdHlsZT0icmdiKCIrW1NbNF0qTHxPLFNbNV0qTHxPLFNbNl0qTHxPXSsiKSIsYy5maWxsUmVjdCh4LHksMSwxKX0sNTApO2Z1bmN0aW9uIGgoZCxrKXtEPTA7Zm9yKGk9a3x8NjtpLS07KXM9X1tpXSxnPVQvNDU4MzYrLjYyOCpzWzFdLGI9c1swXSpVLHY9TS5jb3MoZykqYixiKj1NLnNpbihnKSxhPXNbMl0qVSxSPXNbM10qVXx8MUU3LGw9WCpYK1kqWStaKlosbT1kWzBdLXYsbj1kWzFdLWIsbz1kWzJdLWEscD0tMiooWCptK1kqbitaKm8pLEU9cCpwLTQqbCoobSptK24qbitvKm8tUipSKSwwPkV8fChFPU0uc3FydChFKSxwKz1wPEU/RTotRSxwKj0uNS9sLDE+cHx8RCYmIShwPEQpfHwoRD1wLEo9aSxWPXYsQj1iLEE9YSxIPVIpKTtlPVtkWzBdK0QqWCxkWzFdK0QqWSxkWzJdK0QqWl19Ow==
Original source not submitted