JS1k: The JavaScript code golfing competition

var W=640,H=400,X=256,Y=256,A=10,B=320,C=3840,D=60/W,E=Math.PI/180,F=266,G=[],I=[],J=[];function In(){m=Math;for(K=0;K<C;++K){L=K*D*E;I[K]=m.sin(L);G[K]=m.cos(L);if(K<B){J[K+B]=1/m.cos(L);J[B-K]=1/m.cos(L);}}}function DT(x,y,z,d,e){P=d-B;if(P<0){P+=C;}for(M=1;M<W;M++){for(N=100;N<300;N++){O=H-N;R=J[M]*((e*z)/(z-O));V=x+R*G[P]|0;T=y+R*I[P]|0;U=V%X;Z=T%Y;id=(Z*X+U)<<2;Q=bu[id+3];S=(F*Q/(R+1))|0;t=(H>>2)+N-S;bo=t+S;if(Q>0){a.fillStyle='rgb('+bu[id]+','+bu[id+1]+','+bu[id+2]+')';}else{a.fillStyle = '#c33';}a.fillRect(M,t,1,8);if(Q>0){a.fillStyle='#100';a.fillRect(M,bo,1,1);}}P=(P>C)?(0):(P+1);}}c.width=W;c.height=H;a.font=(X*1.3|0)+'px Arial';a.textAlign='center';a.textBaseline='middle';a.fillStyle='#c00';HT="\u2665";a.fillText(HT,128,128);a.strokeStyle='#900';a.lineWidth=2;a.strokeText(HT,128,128);bu=a.getImageData(0,0,X,Y).data;a.clearRect(0,0,W,H);a.fillStyle='#999';a.fillRect(0,0,W,H>>1);for(y=0;y<Y;++y){for(x=0;x<X;++x){ix=(y*X+x)<<2;bu[ix+3]=(bu[ix+3]>63)?(Y-1-(y&255)):(0);}}In();DT(512,1632,300,A*320,90);

dmFyIFc9NjQwLEg9NDAwLFg9MjU2LFk9MjU2LEE9MTAsQj0zMjAsQz0zODQwLEQ9NjAvVyxFPU1hdGguUEkvMTgwLEY9MjY2LEc9W10sST1bXSxKPVtdO2Z1bmN0aW9uIEluKCl7bT1NYXRoO2ZvcihLPTA7SzxDOysrSyl7TD1LKkQqRTtJW0tdPW0uc2luKEwpO0dbS109bS5jb3MoTCk7aWYoSzxCKXtKW0srQl09MS9tLmNvcyhMKTtKW0ItS109MS9tLmNvcyhMKTt9fX1mdW5jdGlvbiBEVCh4LHkseixkLGUpe1A9ZC1CO2lmKFA8MCl7UCs9Qzt9Zm9yKE09MTtNPFc7TSsrKXtmb3IoTj0xMDA7TjwzMDA7TisrKXtPPUgtTjtSPUpbTV0qKChlKnopLyh6LU8pKTtWPXgrUipHW1BdfDA7VD15K1IqSVtQXXwwO1U9ViVYO1o9VCVZO2lkPShaKlgrVSk8PDI7UT1idVtpZCszXTtTPShGKlEvKFIrMSkpfDA7dD0oSD4+MikrTi1TO2JvPXQrUztpZihRPjApe2EuZmlsbFN0eWxlPSdyZ2IoJytidVtpZF0rJywnK2J1W2lkKzFdKycsJytidVtpZCsyXSsnKSc7fWVsc2V7YS5maWxsU3R5bGUgPSAnI2MzMyc7fWEuZmlsbFJlY3QoTSx0LDEsOCk7aWYoUT4wKXthLmZpbGxTdHlsZT0nIzEwMCc7YS5maWxsUmVjdChNLGJvLDEsMSk7fX1QPShQPkMpPygwKTooUCsxKTt9fWMud2lkdGg9VztjLmhlaWdodD1IO2EuZm9udD0oWCoxLjN8MCkrJ3B4IEFyaWFsJzthLnRleHRBbGlnbj0nY2VudGVyJzthLnRleHRCYXNlbGluZT0nbWlkZGxlJzthLmZpbGxTdHlsZT0nI2MwMCc7SFQ9Ilx1MjY2NSI7YS5maWxsVGV4dChIVCwxMjgsMTI4KTthLnN0cm9rZVN0eWxlPScjOTAwJzthLmxpbmVXaWR0aD0yO2Euc3Ryb2tlVGV4dChIVCwxMjgsMTI4KTtidT1hLmdldEltYWdlRGF0YSgwLDAsWCxZKS5kYXRhO2EuY2xlYXJSZWN0KDAsMCxXLEgpO2EuZmlsbFN0eWxlPScjOTk5JzthLmZpbGxSZWN0KDAsMCxXLEg+PjEpO2Zvcih5PTA7eTxZOysreSl7Zm9yKHg9MDt4PFg7Kyt4KXtpeD0oeSpYK3gpPDwyO2J1W2l4KzNdPShidVtpeCszXT42Myk/KFktMS0oeSYyNTUpKTooMCk7fX1JbigpO0RUKDUxMiwxNjMyLDMwMCxBKjMyMCw5MCk7

Original source not submitted