JS1k: The JavaScript code golfing competition

function d(){N=[{x:1,y:i(1,S)},{x:i(1,S),y:1},{x:S,y:i(1,S)}];H=N[i(0,2)];H.b="abcdefghijklmnopqrstuvwxyz"[i(0,25)];return H}M=Math;S=500;V=250;a.a=a.fillText;B=[d()];Y=0;W=1;c.width=c.height=S;a.font="18pt arial";a.textBaseline="middle";a.fillStyle="#FFF";function i(b,h){return M.floor(M.random()*(h-b+1))+b} function m(b,h){var f=B,e,g,k,l,n;for(e=0;e<f.length&&!n;e++)switch(I=f[e],b){case "d":a.a(I.b,I.x,I.y);break;case "s":g=V-I.x;k=V-I.y;l=g<0?-1:1;T=M.atan(k/g);I.x+=M.cos(T)*2*l;I.y+=M.sin(T)*2*l;M.abs(g)<1&&M.abs(k)<1&&(clearInterval(G),o(),a.a("You got "+Y+" pounds of meat.",9,V),Y>10&&(a.a("But you can only bring 10 pounds back",9,310),a.a("to the wagon.",9,340)));break;case "k":if(I.b==h&&(f.splice(e,1),n=!0,Y++,f.length==0)){W++;for(j=0;j<W;j++)B.push(d())}}} function o(){a.save();a.clearRect(0,0,S,S);a.fillStyle="#000";a.fillRect(0,0,S,S);a.restore()}G=setInterval(function(){o();a.a("{ }",V,V);m("d");a.a(Y,450,20);m("s")},40);onkeypress=function(b){m("k",String.fromCharCode(b.charCode))};

ZnVuY3Rpb24gZCgpe049W3t4OjEseTppKDEsUyl9LHt4OmkoMSxTKSx5OjF9LHt4OlMseTppKDEsUyl9XTtIPU5baSgwLDIpXTtILmI9ImFiY2RlZmdoaWprbG1ub3BxcnN0dXZ3eHl6IltpKDAsMjUpXTtyZXR1cm4gSH1NPU1hdGg7Uz01MDA7Vj0yNTA7YS5hPWEuZmlsbFRleHQ7Qj1bZCgpXTtZPTA7Vz0xO2Mud2lkdGg9Yy5oZWlnaHQ9UzthLmZvbnQ9IjE4cHQgYXJpYWwiO2EudGV4dEJhc2VsaW5lPSJtaWRkbGUiO2EuZmlsbFN0eWxlPSIjRkZGIjtmdW5jdGlvbiBpKGIsaCl7cmV0dXJuIE0uZmxvb3IoTS5yYW5kb20oKSooaC1iKzEpKStifSBmdW5jdGlvbiBtKGIsaCl7dmFyIGY9QixlLGcsayxsLG47Zm9yKGU9MDtlPGYubGVuZ3RoJiYhbjtlKyspc3dpdGNoKEk9ZltlXSxiKXtjYXNlICJkIjphLmEoSS5iLEkueCxJLnkpO2JyZWFrO2Nhc2UgInMiOmc9Vi1JLng7az1WLUkueTtsPWc8MD8tMToxO1Q9TS5hdGFuKGsvZyk7SS54Kz1NLmNvcyhUKSoyKmw7SS55Kz1NLnNpbihUKSoyKmw7TS5hYnMoZyk8MSYmTS5hYnMoayk8MSYmKGNsZWFySW50ZXJ2YWwoRyksbygpLGEuYSgiWW91IGdvdCAiK1krIiBwb3VuZHMgb2YgbWVhdC4iLDksViksWT4xMCYmKGEuYSgiQnV0IHlvdSBjYW4gb25seSBicmluZyAxMCBwb3VuZHMgYmFjayIsOSwzMTApLGEuYSgidG8gdGhlIHdhZ29uLiIsOSwzNDApKSk7YnJlYWs7Y2FzZSAiayI6aWYoSS5iPT1oJiYoZi5zcGxpY2UoZSwxKSxuPSEwLFkrKyxmLmxlbmd0aD09MCkpe1crKztmb3Ioaj0wO2o8VztqKyspQi5wdXNoKGQoKSl9fX0gZnVuY3Rpb24gbygpe2Euc2F2ZSgpO2EuY2xlYXJSZWN0KDAsMCxTLFMpO2EuZmlsbFN0eWxlPSIjMDAwIjthLmZpbGxSZWN0KDAsMCxTLFMpO2EucmVzdG9yZSgpfUc9c2V0SW50ZXJ2YWwoZnVuY3Rpb24oKXtvKCk7YS5hKCJ7IH0iLFYsVik7bSgiZCIpO2EuYShZLDQ1MCwyMCk7bSgicyIpfSw0MCk7b25rZXlwcmVzcz1mdW5jdGlvbihiKXttKCJrIixTdHJpbmcuZnJvbUNoYXJDb2RlKGIuY2hhckNvZGUpKX07

Original source not submitted