JS1k: The JavaScript code golfing competition

J=S=O=N=E=K=0,v=f=1,o=150,n=o*o,C=o/2,g=255,H=[],b=[[],[],[],[]];with(m=Math){h=sin,L=min,M=max,Q=sqrt,r=random,R=abs}function q(s){for(i in b)for(j=3;j--;)b[i][s+j]=r()*2-1}function w(){J+=r()*31.4;O=L(2.5,O+1);v=L(.1,v-S);N++;q(2);setTimeout("w()",r()*2e3)}e=(d=(c=document.body.children[0].getContext("2d")).getImageData(0,0,o,o)).data;for(i=n;i--;)e[i*4+3]=g;q(0);w();t=new Date;setInterval("p=new Date;s=(p-t)/1e3;t=p;v=M(1,L(25,v+s));O=M(.1,L(2.5,O-s*2));S+=O;if(N>9){f=!f;N=0;if(K){K=0;E=!E}else K++}J+=s;H[0]=h(J)/2+.5;H[1]=h(J+2.09)/2+.7;H[2]=h(J+4.18)/2+.9;for(i in b){B=b[i];W=Q((B[4]=B[2]-B[0])*B[4]+(B[5]=B[3]-B[1])*B[5]);for(j=2;j--;){u=B[4+j];B[j]+=!u?0:R(V=u/W*s)>R(u)?u:V}}for(i=n;i--;){x=i%o/C-1;y=~~(i/o)/C-1;z=1;for(j in b){P=x-b[j][0];A=y-b[j][1];z*=1/Q(P*P+A*A)}Z=2-(f?1/z*25:z);X=x-h(S)/4.5;Y=y-m.cos(S)/4.5;for(j=3;j--;)e[i*4+j]=R((E?g:0)-L(g,H[j]/(Q(X*X+Y*Y+Z*Z)*v)*g))}c.putImageData(d,0,0)",9);a='010010010100010100110101010010010110100100010101';for(i=48;i--;)+a[i]&&c.fillRect(i%12+g,i/12|0,1,1)

Sj1TPU89Tj1FPUs9MCx2PWY9MSxvPTE1MCxuPW8qbyxDPW8vMixnPTI1NSxIPVtdLGI9W1tdLFtdLFtdLFtdXTt3aXRoKG09TWF0aCl7aD1zaW4sTD1taW4sTT1tYXgsUT1zcXJ0LHI9cmFuZG9tLFI9YWJzfWZ1bmN0aW9uIHEocyl7Zm9yKGkgaW4gYilmb3Ioaj0zO2otLTspYltpXVtzK2pdPXIoKSoyLTF9ZnVuY3Rpb24gdygpe0orPXIoKSozMS40O089TCgyLjUsTysxKTt2PUwoLjEsdi1TKTtOKys7cSgyKTtzZXRUaW1lb3V0KCJ3KCkiLHIoKSoyZTMpfWU9KGQ9KGM9ZG9jdW1lbnQuYm9keS5jaGlsZHJlblswXS5nZXRDb250ZXh0KCIyZCIpKS5nZXRJbWFnZURhdGEoMCwwLG8sbykpLmRhdGE7Zm9yKGk9bjtpLS07KWVbaSo0KzNdPWc7cSgwKTt3KCk7dD1uZXcgRGF0ZTtzZXRJbnRlcnZhbCgicD1uZXcgRGF0ZTtzPShwLXQpLzFlMzt0PXA7dj1NKDEsTCgyNSx2K3MpKTtPPU0oLjEsTCgyLjUsTy1zKjIpKTtTKz1PO2lmKE4+OSl7Zj0hZjtOPTA7aWYoSyl7Sz0wO0U9IUV9ZWxzZSBLKyt9Sis9cztIWzBdPWgoSikvMisuNTtIWzFdPWgoSisyLjA5KS8yKy43O0hbMl09aChKKzQuMTgpLzIrLjk7Zm9yKGkgaW4gYil7Qj1iW2ldO1c9USgoQls0XT1CWzJdLUJbMF0pKkJbNF0rKEJbNV09QlszXS1CWzFdKSpCWzVdKTtmb3Ioaj0yO2otLTspe3U9Qls0K2pdO0Jbal0rPSF1PzA6UihWPXUvVypzKT5SKHUpP3U6Vn19Zm9yKGk9bjtpLS07KXt4PWklby9DLTE7eT1+fihpL28pL0MtMTt6PTE7Zm9yKGogaW4gYil7UD14LWJbal1bMF07QT15LWJbal1bMV07eio9MS9RKFAqUCtBKkEpfVo9Mi0oZj8xL3oqMjU6eik7WD14LWgoUykvNC41O1k9eS1tLmNvcyhTKS80LjU7Zm9yKGo9MztqLS07KWVbaSo0K2pdPVIoKEU/ZzowKS1MKGcsSFtqXS8oUShYKlgrWSpZK1oqWikqdikqZykpfWMucHV0SW1hZ2VEYXRhKGQsMCwwKSIsOSk7YT0nMDEwMDEwMDEwMTAwMDEwMTAwMTEwMTAxMDEwMDEwMDEwMTEwMTAwMTAwMDEwMTAxJztmb3IoaT00ODtpLS07KSthW2ldJiZjLmZpbGxSZWN0KGklMTIrZyxpLzEyfDAsMSwxKQ==

Original source not submitted