JS1k: The JavaScript code golfing competition

M=Math;M.c=M.cos;M.s=M.sin;d=document;D=d.body.style;D.overflow="hidden";D.margin=t=0;w=this;c=d.getElementById("c");g=c.getContext("2d");k=c.width=w.innerWidth;l=c.height=w.innerHeight;a=d.createElement("canvas");a.width=o=200;a.height=o/2;a.style.display="none";b=a.getContext("2d");d.body.appendChild(a);s=1;f=q=255;setInterval(i,16); function i(){function e(h,j){I=j||0;return I=0==I?M.max(0,M.min(q,q*h)):M.sqrt(h*h+j*j)}p=b.getImageData(0,0,o,o/2);t=t<o*10?t+=2:t=0;Q=t/75;if(t%o)if(o/2<f)f=q;else f+=2;else{s+=1;f=1}S=s=s>4?1:s;for(y=0;y<o/2;y++){if(f<o/2&&f<y){if(s==1)S=4;if(s==2)S=1;if(s==3)S=2;if(s==4)S=3}for(x=0;x<o;x++){m=x/10-20;Z=M.abs(m);n=y/10-10;if(S==1)v=8/(M.pow(Z,2)+n*n)+M.pow(e(Z,n),-(t*0.1))-M.pow(e(Z-t*0.05,M.abs(n)-t*0.0080),-9)-M.log(e(m,n)/9);if(S==2)v=M.s(m*Q)+M.s(n*Q)+M.s(Q*Q+m*m+n*n);if(S==3)v=M.s(m+n*Q)- M.c(n+m*Q);if(S==4)v=M.s(Q*m*n)+M.s(n)*M.c(Q)/1E3;z=4*(y*o+x);P=p.data;P[z+0]=e(v);P[z+1]=e(v-M.c(Q*S));P[z+2]=e(v-M.s(Q*S));P[z+3]=q}}b.putImageData(p,0,0);g.drawImage(a,0,0,k,l)};

TT1NYXRoO00uYz1NLmNvcztNLnM9TS5zaW47ZD1kb2N1bWVudDtEPWQuYm9keS5zdHlsZTtELm92ZXJmbG93PSJoaWRkZW4iO0QubWFyZ2luPXQ9MDt3PXRoaXM7Yz1kLmdldEVsZW1lbnRCeUlkKCJjIik7Zz1jLmdldENvbnRleHQoIjJkIik7az1jLndpZHRoPXcuaW5uZXJXaWR0aDtsPWMuaGVpZ2h0PXcuaW5uZXJIZWlnaHQ7YT1kLmNyZWF0ZUVsZW1lbnQoImNhbnZhcyIpO2Eud2lkdGg9bz0yMDA7YS5oZWlnaHQ9by8yO2Euc3R5bGUuZGlzcGxheT0ibm9uZSI7Yj1hLmdldENvbnRleHQoIjJkIik7ZC5ib2R5LmFwcGVuZENoaWxkKGEpO3M9MTtmPXE9MjU1O3NldEludGVydmFsKGksMTYpOyBmdW5jdGlvbiBpKCl7ZnVuY3Rpb24gZShoLGope0k9anx8MDtyZXR1cm4gST0wPT1JP00ubWF4KDAsTS5taW4ocSxxKmgpKTpNLnNxcnQoaCpoK2oqail9cD1iLmdldEltYWdlRGF0YSgwLDAsbyxvLzIpO3Q9dDxvKjEwP3QrPTI6dD0wO1E9dC83NTtpZih0JW8paWYoby8yPGYpZj1xO2Vsc2UgZis9MjtlbHNle3MrPTE7Zj0xfVM9cz1zPjQ/MTpzO2Zvcih5PTA7eTxvLzI7eSsrKXtpZihmPG8vMiYmZjx5KXtpZihzPT0xKVM9NDtpZihzPT0yKVM9MTtpZihzPT0zKVM9MjtpZihzPT00KVM9M31mb3IoeD0wO3g8bzt4Kyspe209eC8xMC0yMDtaPU0uYWJzKG0pO249eS8xMC0xMDtpZihTPT0xKXY9OC8oTS5wb3coWiwyKStuKm4pK00ucG93KGUoWixuKSwtKHQqMC4xKSktTS5wb3coZShaLXQqMC4wNSxNLmFicyhuKS10KjAuMDA4MCksLTkpLU0ubG9nKGUobSxuKS85KTtpZihTPT0yKXY9TS5zKG0qUSkrTS5zKG4qUSkrTS5zKFEqUSttKm0rbipuKTtpZihTPT0zKXY9TS5zKG0rbipRKS0gTS5jKG4rbSpRKTtpZihTPT00KXY9TS5zKFEqbSpuKStNLnMobikqTS5jKFEpLzFFMzt6PTQqKHkqbyt4KTtQPXAuZGF0YTtQW3orMF09ZSh2KTtQW3orMV09ZSh2LU0uYyhRKlMpKTtQW3orMl09ZSh2LU0ucyhRKlMpKTtQW3orM109cX19Yi5wdXRJbWFnZURhdGEocCwwLDApO2cuZHJhd0ltYWdlKGEsMCwwLGssbCl9Ow==

Original source not submitted