var im=[],P=[],M=Math,A=M.random,B=M.cos,C=M.sin,D=M.abs,F=M.floor,Y=M.round,G=M.log,K=M.max,L=M.min,T=9128,X=40,J=110,i,j;i=T;while(i--){z=190;f=L(i/z,1);a=C(i/z)*76+76;P[i]=[0,F(a*f),F((255-a)*f),255];im[i]=A()+.25;}function PM(i,x,y){x*=.7;y*=.7;return D(F((B(x*y*im[i]/9)*C(y*im[i])*570))+i);}var S=X,V=1.03,t=0,H=document,I,Z=H.getElementById('c');c=Z.getContext('2d');Z.width=Z.height=J;Z=Z.style;Z.position="absolute";Z.marginLeft=Z.marginTop=-J*1.5+"px";Z.left=Z.top="50%";Z.width=Z.height=J*3+"px";H.body.style.background="#000";I=c.getImageData(0,0,J,J);window.setInterval(function(){t+=3;S*=V;if(G(S)/G(X)>7||S<X)V=1/V;var xo=S/2+B(t/63)*G(S)*4,C1=F(G(S)/G(X)+0.999),SF=S/M.pow(X,C1-1),z=M.pow(SF/X,2);i=J*J;while(i--){S1=S;x=F(i/J);y=i%J;w=x-J/2;q=y-J/2;d=L((w*w+q*q)/(J*J/4),1);x-=xo;y-=xo;v=0;a=0;CC=C1;while(CC--){_=X/S1;xd=Y(x*_);yd=Y(y*_);b=PM(a,xd%X,yd%X);if(CC<2)v+=(CC-1?z:1-z)*PM(a,x*_,y*_);a=b;x-=xd/_;y-=yd/_;S1/=X;}y=P[Y(v*(1-d*d*d))%T];x=4;while(x--)I.data[i*4+x]=y[x];}c.putImageData(I,0,0);},70);
dmFyIGltPVtdLFA9W10sTT1NYXRoLEE9TS5yYW5kb20sQj1NLmNvcyxDPU0uc2luLEQ9TS5hYnMsRj1NLmZsb29yLFk9TS5yb3VuZCxHPU0ubG9nLEs9TS5tYXgsTD1NLm1pbixUPTkxMjgsWD00MCxKPTExMCxpLGo7aT1UO3doaWxlKGktLSl7ej0xOTA7Zj1MKGkveiwxKTthPUMoaS96KSo3Nis3NjtQW2ldPVswLEYoYSpmKSxGKCgyNTUtYSkqZiksMjU1XTtpbVtpXT1BKCkrLjI1O31mdW5jdGlvbiBQTShpLHgseSl7eCo9Ljc7eSo9Ljc7cmV0dXJuIEQoRigoQih4KnkqaW1baV0vOSkqQyh5KmltW2ldKSo1NzApKStpKTt9dmFyIFM9WCxWPTEuMDMsdD0wLEg9ZG9jdW1lbnQsSSxaPUguZ2V0RWxlbWVudEJ5SWQoJ2MnKTtjPVouZ2V0Q29udGV4dCgnMmQnKTtaLndpZHRoPVouaGVpZ2h0PUo7Wj1aLnN0eWxlO1oucG9zaXRpb249ImFic29sdXRlIjtaLm1hcmdpbkxlZnQ9Wi5tYXJnaW5Ub3A9LUoqMS41KyJweCI7Wi5sZWZ0PVoudG9wPSI1MCUiO1oud2lkdGg9Wi5oZWlnaHQ9SiozKyJweCI7SC5ib2R5LnN0eWxlLmJhY2tncm91bmQ9IiMwMDAiO0k9Yy5nZXRJbWFnZURhdGEoMCwwLEosSik7d2luZG93LnNldEludGVydmFsKGZ1bmN0aW9uKCl7dCs9MztTKj1WO2lmKEcoUykvRyhYKT43fHxTPFgpVj0xL1Y7dmFyIHhvPVMvMitCKHQvNjMpKkcoUykqNCxDMT1GKEcoUykvRyhYKSswLjk5OSksU0Y9Uy9NLnBvdyhYLEMxLTEpLHo9TS5wb3coU0YvWCwyKTtpPUoqSjt3aGlsZShpLS0pe1MxPVM7eD1GKGkvSik7eT1pJUo7dz14LUovMjtxPXktSi8yO2Q9TCgodyp3K3EqcSkvKEoqSi80KSwxKTt4LT14bzt5LT14bzt2PTA7YT0wO0NDPUMxO3doaWxlKENDLS0pe189WC9TMTt4ZD1ZKHgqXyk7eWQ9WSh5Kl8pO2I9UE0oYSx4ZCVYLHlkJVgpO2lmKENDPDIpdis9KENDLTE/ejoxLXopKlBNKGEseCpfLHkqXyk7YT1iO3gtPXhkL187eS09eWQvXztTMS89WDt9eT1QW1kodiooMS1kKmQqZCkpJVRdO3g9NDt3aGlsZSh4LS0pSS5kYXRhW2kqNCt4XT15W3hdO31jLnB1dEltYWdlRGF0YShJLDAsMCk7fSw3MCk7
Original source not submitted