JS1k: The JavaScript code golfing competition

(function(){var j=document,h=j.createElement("div");S="style";F="first";C="Child";A="append";M=Math;MR=M.random;MC=M.cos;MF=M.floor;MM=M.max;s=30;W=900;d=[];h[S].position="absolute";n=h[A+C](h.cloneNode(true));n.innerHTML=arguments.callee;with(n[S]){width=height=W;textAlign="center"}j.body[S].background="#000";with(h[S]){overflow="hidden";fontSize=height=width=s}for(Y=y=0;y<W;y+=s,Y++){t=d[Y]=[];for(X=x=0;x<W;x+=s,X++){t[X]=h=h.cloneNode(true);t[X].a=[0,0,0];h[S].margin=y+" 0 0 "+x;h[F+C][S].margin= -y+" 0 0 "+-x;j.body[A+C](h)}}c=e=a=R=G=B=f=r=g=b=l=m=n=o=0;i=6.2831/96;setInterval(function(){if(f++>l){p=MR()*Y&255;q=MR()*X&255;f=0;c=0.04;l=MR()*7&7;R=MC(n);G=R+o;B=G+o;n+=6.2831/128;o+=6.2831/512}for(m=0;m<128;a+=i){if(a>=6.2831){a=0;c+=0.02;i=6.2831/(c*200)}x=MF(MC(a)*X*c+p);y=MF(M.sin(a)*Y*c+q);if(y>=0&&y<Y&&x>=0&&x<X){R+=6.2831/1800;G+=6.2831/1801;B+=6.2831/1802;t=d[y][x];t.a=[MM(0,t.a[0]+MF(MC(R)*8)),MM(0,t.a[1]+MF(MC(G)*8)),MM(0,t.a[2]+MF(MC(B)*8))];t[S].color="rgb("+t.a.join()+")";m++}}},50)})();

KGZ1bmN0aW9uKCl7dmFyIGo9ZG9jdW1lbnQsaD1qLmNyZWF0ZUVsZW1lbnQoImRpdiIpO1M9InN0eWxlIjtGPSJmaXJzdCI7Qz0iQ2hpbGQiO0E9ImFwcGVuZCI7TT1NYXRoO01SPU0ucmFuZG9tO01DPU0uY29zO01GPU0uZmxvb3I7TU09TS5tYXg7cz0zMDtXPTkwMDtkPVtdO2hbU10ucG9zaXRpb249ImFic29sdXRlIjtuPWhbQStDXShoLmNsb25lTm9kZSh0cnVlKSk7bi5pbm5lckhUTUw9YXJndW1lbnRzLmNhbGxlZTt3aXRoKG5bU10pe3dpZHRoPWhlaWdodD1XO3RleHRBbGlnbj0iY2VudGVyIn1qLmJvZHlbU10uYmFja2dyb3VuZD0iIzAwMCI7d2l0aChoW1NdKXtvdmVyZmxvdz0iaGlkZGVuIjtmb250U2l6ZT1oZWlnaHQ9d2lkdGg9c31mb3IoWT15PTA7eTxXO3krPXMsWSsrKXt0PWRbWV09W107Zm9yKFg9eD0wO3g8Vzt4Kz1zLFgrKyl7dFtYXT1oPWguY2xvbmVOb2RlKHRydWUpO3RbWF0uYT1bMCwwLDBdO2hbU10ubWFyZ2luPXkrIiAwIDAgIit4O2hbRitDXVtTXS5tYXJnaW49IC15KyIgMCAwICIrLXg7ai5ib2R5W0ErQ10oaCl9fWM9ZT1hPVI9Rz1CPWY9cj1nPWI9bD1tPW49bz0wO2k9Ni4yODMxLzk2O3NldEludGVydmFsKGZ1bmN0aW9uKCl7aWYoZisrPmwpe3A9TVIoKSpZJjI1NTtxPU1SKCkqWCYyNTU7Zj0wO2M9MC4wNDtsPU1SKCkqNyY3O1I9TUMobik7Rz1SK287Qj1HK287bis9Ni4yODMxLzEyODtvKz02LjI4MzEvNTEyfWZvcihtPTA7bTwxMjg7YSs9aSl7aWYoYT49Ni4yODMxKXthPTA7Yys9MC4wMjtpPTYuMjgzMS8oYyoyMDApfXg9TUYoTUMoYSkqWCpjK3ApO3k9TUYoTS5zaW4oYSkqWSpjK3EpO2lmKHk+PTAmJnk8WSYmeD49MCYmeDxYKXtSKz02LjI4MzEvMTgwMDtHKz02LjI4MzEvMTgwMTtCKz02LjI4MzEvMTgwMjt0PWRbeV1beF07dC5hPVtNTSgwLHQuYVswXStNRihNQyhSKSo4KSksTU0oMCx0LmFbMV0rTUYoTUMoRykqOCkpLE1NKDAsdC5hWzJdK01GKE1DKEIpKjgpKV07dFtTXS5jb2xvcj0icmdiKCIrdC5hLmpvaW4oKSsiKSI7bSsrfX19LDUwKX0pKCk7

(function(){
         var     D = document,
                 w = D.createElement('div'), 
                 P = 6.2831;
                 S = 'style',
                 F = 'first',
                 C = 'Child',
                 A = 'append',
                 M = Math,
                 MR = M.random,
                 MC = M.cos,
                 MF = M.floor,
                 MM = M.max,
                 s = 30,
                 W = 900;
                 d = [];
 
         w[S].position='absolute';
         n = w[A+C](w.cloneNode(true));
         n.innerHTML = arguments.callee;
         with(n[S]){width=height=W;textAlign='center'}
 
         D.body[S].background='#000';
         with(w[S]){
                 overflow = 'hidden';
                 fontSize = height = width = s;
         }
 
 
         for(Y=y=0;y < W; y+= s,Y++) {
                 t=d[Y]=[];
                 for(X=x=0;x < W; x+= s,X++) {
                         t[X] = w = w.cloneNode(true);
                         t[X].c=[0,0,0];
                         w[S].margin=y+' 0 0 '+x;
                         w[F+C][S].margin=-y+' 0 0 '+-x;
 
                         D.body[A+C](w);
                 }
         }
 
 
         c=e=a=R=G=B=f=r=g=b=l=m=n=o=0;
         i=P/96;
         setInterval(function(){
                 if(f++>l) {
                         p=(MR()*Y)&255;
                         q=(MR()*X)&255;
                         f=0;c=0.04;
                         l=(MR()*7)&7;
                         R=MC(n);
                         G=R+o;
                         B=G+o;
                         n+=P/128;
                         o+=P/512;
                 }
                 for(m=0;m<128;a+=i){
                         if(a >= P) {
                                 a=0;
                                 c+=0.02;
                                 i=P/(c*200);
                         }
                         x = MF(MC(a) * X * c + p); 
                         y = MF(M.sin(a) * Y * c + q); 
                         if(y >= 0 && y < Y && x >= 0 && x < X) {
                                 R += P/1800;
                                 G += P/1801;
                                 B += P/1802;
                                 t=d[y][x];
                                 t.c= [ 
                                         MM(0, t.c[0] + MF(MC(R) * 8)),
                                         MM(0, t.c[1] + MF(MC(G) * 8)),
                                         MM(0, t.c[2] + MF(MC(B) * 8))
                                 ];
                                 t[S].color='rgb(' + t.c.join() + ')';
                                 m++;
                         } 
                 }
         }, 50);
 })();