JS1k: The JavaScript code golfing competition

A="for(p @ a)a[0]+(6]||)]=a[pc.ww=80c.height=h=60M=Math;R=M.random;d=1%=hA;f=s=u=oBBx=i=pl=1m=;Y=wA;D=18g=4;p=[<2y)z=\"#63E#00E#36E#FCEround1You have died of dysentery!1 steps\".split(1with(aS=QsGbax+Qr6(r	-H1HKH	442HKfGL};I=setLif(M.abs(7]-y)>DAba(0	<7;BR()+1,r6(1),50N-35N50N35N15)fG(1Y,hAs5(4,4TO5],-7KclearI9;}(2fc(w,h1sG115Tf+O6],	Ll@eWD;l@eJo@=O4strokeStyle=O3ba0]P=;<P;l6((i)*()+x,i])s6Lx-=g;if(x<=-()i=P]+((5-R())*1K(P>pl+3)?p=p.slice(1,P):i>8?8:i<2?2:ioBr%;B3d:-dy+=3020:-2	s=!s;x=u=:D-=5;:g;f;}S(oY,oyS(},25}onkeydown=ek=40-e.keyCode;e.type[5]&&k>=0&&k<3?u=1-k:9 };";for(B in C="Tfx(
Qtx,y
Oz[
N*
L
K1	
H5,
G4
E01
Dlw
Br=
A/2
@in
9turn
%;oy=y
idth=
h*
bC(
ta(
-1
++
f%50?0
*u+(s?
Y+m,y
){
p[
w/pl
r,
0.
p.push(
p.length
re
];
Interval(
m6(
	0
0;
(
0,
function(
for(i=0;i
fillStyle=z[
);".split("
"))A=A.replace(RegExp(C[B][0],"g"),C[B].slice(1));eval(A)

QT0iZm9yKHAgQCBhKWFbFTBdKygVNl18fBApXT1hW3AOYy53H3c9ODAIYy5oZWlnaHQ9aD02MAhNPU1hdGg7Uj1NLnJhbmRvbTtkPRIxJT1oQTtmPXM9dT1vQkJ4PWk9CHBsPTEIbT0UO1k9d0E7RD0xOAhnPTQ7cD1bDgQaPDIReSkCej1cIiM2M0UjMDBFIzM2RSNGQ0Vyb3VuZDFZb3UgaGF2ZSBkaWVkIG9mIGR5c2VudGVyeSExIHN0ZXBzXCIuc3BsaXQoMQJ3aXRoKGEWUz0FE1EWc0diYQcceCtRAnI2KHICCwYJHRsGLUgbBjFIBksLSAkdNAYbBjQGMgZIS2ZHTH07ST1zZXQMBRZMaWYoTS5hYnMoFTddLXkpPkRBFmJhKAMwDhwXCwYJBBo8NztCUigpKzEscjYoMSksHTUwTi0zNU41ME4zNU4xBjUpAmZHDygDMQ4LWSxoQQJzNSg0LDRUTzVdLC03BktjbGVhcgxJAjk7fQ8oAzIOZmMoBgZ3LGgDMQ5zRxwxBjE1VGYrTzZdLAYJTGxAZVcfRDtsQGVKb0A9TzQOc3Ryb2tlU3R5bGU9TzMOYmEHCwYVMF0CUD0QOwQ8UDtsNigoaRspKigUKSt4LBVpGl0pAnM2B0x4LT1nO2lmKHg8PS0oFCkWaT0VUBtdKygoEjUtUigpKSoxSyhQPnBsKzMpP3A9cC5zbGljZSgxLFApOhFpPh44Px44Omk8HjI/HjI6aQJvQnIlO0ISMxhkOi1kAnkrPTMwGDIwOi0yCXM9IXM7eD11PQgZOkQtPTU7GTpnGjtmGjt9UyhvE1ksb3kCUygTF30sMjUCfW9ua2V5ZG93bj0FZRZrPTQwLWUua2V5Q29kZTtlLnR5cGVbNV0mJms+PTAmJms8Mz91PTEtazoIOSAIfTsiO2ZvcihCIGluIEM9IlQCZngoAVF0eCx5AU96WwFOKhMBTA8HAUsxCQFINSwBRzQHAUUwMQFEbHcBQnI9AUEvMgFAaW4BOQ90dXJuASU7b3k9eQEfaWR0aD0BHmgqEgEdYkMoARx0YSgBGy0xARorKwEZZiU1MD8wARgqdSsocz8BF1krbSx5AgEWKXsBFXBbARR3L3BsARNyLAESMC4BEQhwLnB1c2goARBwLmxlbmd0aAEPcmUBDl07AQxJbnRlcnZhbCgBC202KAEJMAIBCDA7AQcoAgEGMCwBBWZ1bmN0aW9uKAEEZm9yKGk9MDtpAQMCZmlsbFN0eWxlPXpbAQIpOyIuc3BsaXQoIgEiKSlBPUEucmVwbGFjZShSZWdFeHAoQ1tCXVswXSwiZyIpLENbQl0uc2xpY2UoMSkpO2V2YWwoQSkNCg==

for (p in a) a[p[0] + (p[6] || p.length)] = a[p];
  s = 0;
  c.width = w = 800;
  c.height = h = 600;
  d = 0.1,
  oy = y = h / 2,
  mover = or = r = x = i = 0,
  pl = 10,
  m = w / pl,
  Y = w / 2,
  lw = 180,
  animationStep = 4;
  stepcount = 0;
  var p = [];
  for (i = 0; i++ < 20;) p.push(y);
  z='#6301#0001#3601#FC01round1You have died of dysentery!1 steps'.split(1);
  M = Math;
  R = M.random;


with(a) {

step =  function(r, tx, y) {
    save();
    beginPath();
    translate(x + tx, y);
    rotate(r);
    moveTo(0, 0);
    bezierCurveTo(-10, -5, -10, 15, 0, 10);
    moveTo(5, 0);
    bezierCurveTo(40, -10, 40, 20, 5, 10);
    fill();
    restore();
  }


  I = setInterval(function() {
    restore();

    if (M.abs(p[7] - y) > lw/2) {
      beginPath();

      fillStyle = z[0];
      translate(Y + m, y);
      moveTo(0, 0);
      for (q = 0; q++ < 7;) {
        rotate(1);
        r = R() + 1;
        bezierCurveTo(50 * r, -35 * r, 50 * r, 35 * r, 10, 5);
      }
      fill();
      restore();
      fillStyle = z[1];
      moveTo(Y, h / 2);
      scale(4, 4);
      fillText(z[5], -70, 10);
      clearInterval(I);
      return;
    }
    restore();
    fillStyle = z[2];
    fillRect(0, 0, w, h);
    fillStyle = z[1];
    save();
    translate(10,15);
    fillText(stepcount+z[6], 0, 0);
    restore();
    lineWidth = lw;
    lineJoin = z[4];
    strokeStyle = z[3];
    beginPath();
    moveTo(0, p[0]);
    for (i = 0; i < p.length; i++) {
      lineTo((i - 1) * (w / pl) + x, p[i]);
    }
    stroke();
    restore();


    x -= animationStep;
    if (x <= -(w / pl)) {
      v = p[p.length - 1] + ((0.5 - R()) * 110);

      if (p.length > pl + 3) {
        p = p.slice(1, p.length);
      }
      p.push(v > h * 0.8 ? h * 0.8 : v < h * 0.2 ? h * 0.2 : v);

      or = r;
      oy = y;
      r = 0.3 * mover + (s ? d : -d);
      y += 30 * mover + (s ? 20 : -20);
      s = !s;
      x=mover=0;
      stepcount % 50 ? 0 : lw -= 5;
      stepcount % 50 ? 0 : animationStep++;
      stepcount++;
    }


    step(or, Y, oy);
    step(r, Y + m, y);

  }, 25);
}

  onkeydown = function(e) {
    k = 40 - e.keyCode;
    e.type[5]&&k>=0&&k<3?mover=1-k:0;
    return 0;
  };