JS1k: The JavaScript code golfing competition

R=Math.random;B=c.beginPath.bind(c);M=c.moveTo.bind(c);Q=c.quadraticCurveTo.bind(c);A=(x,y,r)=>c.arc(x,y,r,0,7);F=c.fill.bind(c);c.lineWidth=6;c.font="55px Arial";z=20;X=Y=T=P=180;U=D=V=S=0;W=2;C=[];for(i=7;i--;)C[i]={X:90,Y:-90,J:1};d.onkeydown=e=>{U=e.which==38;D=e.which==40};d.onkeyup=e=>U=D=0;setInterval(_=>{if(S+1){Y+=V+=D-U;Y=Y<z?z:Y>340?340:Y;V*=.8;c[f="fillStyle"]=q="#77e";c.fillRect(0,0,640,360);T+=(Y-T)*.05;P+=(Y-P)*.1;for(i=7;i--;)c.strokeStyle="#"+"f00f90ff00708cf00f83d".substr(i*3,3),B(),M(-9,T+6*i-z),Q(40,P+6*i-z,X-35,Y+6*i-z),c.stroke();c[f]="#038";x=X+10;y=Y-15;B();M(X-26,Y-5);Q(X,Y-2,X-26,Y+3);F();M(X-3,Y-3);Q(x,Y-z,X-25,y);F();M(X,Y-5);Q(x,y,X+18,y);Q(X+25,Y-z,X+z,Y-13);Q(X+29,Y+3,X+19,Y-2);Q(x,Y-8,x,Y+10);F();B();A(X,Y+15,22);F();c[f]=q;B();A(X+2,Y+27,25);F();c[f]=w="#eee";c.fillText(S,40,60);W/=.9995;C.some(O=>{x=O.X-=W,y=O.Y;if(Math.hypot(X-x,Y-y)<40)O.X=-40,O.J?++S:S=-1;if(x<-90)O.X=640+200*R(),O.Y=R()*360,O.J=R()>.2;c[f]=O.J?w:"#222";B(),A(x-z,y,12),A(x,y,z),A(x+z,y,16),F()})}},16)

Uj1NYXRoLnJhbmRvbTtCPWMuYmVnaW5QYXRoLmJpbmQoYyk7TT1jLm1vdmVUby5iaW5kKGMpO1E9Yy5xdWFkcmF0aWNDdXJ2ZVRvLmJpbmQoYyk7QT0oeCx5LHIpPT5jLmFyYyh4LHksciwwLDcpO0Y9Yy5maWxsLmJpbmQoYyk7Yy5saW5lV2lkdGg9NjtjLmZvbnQ9IjU1cHggQXJpYWwiO3o9MjA7WD1ZPVQ9UD0xODA7VT1EPVY9Uz0wO1c9MjtDPVtdO2ZvcihpPTc7aS0tOylDW2ldPXtYOjkwLFk6LTkwLEo6MX07ZC5vbmtleWRvd249ZT0+e1U9ZS53aGljaD09Mzg7RD1lLndoaWNoPT00MH07ZC5vbmtleXVwPWU9PlU9RD0wO3NldEludGVydmFsKF89PntpZihTKzEpe1krPVYrPUQtVTtZPVk8ej96Olk+MzQwPzM0MDpZO1YqPS44O2NbZj0iZmlsbFN0eWxlIl09cT0iIzc3ZSI7Yy5maWxsUmVjdCgwLDAsNjQwLDM2MCk7VCs9KFktVCkqLjA1O1ArPShZLVApKi4xO2ZvcihpPTc7aS0tOyljLnN0cm9rZVN0eWxlPSIjIisiZjAwZjkwZmYwMDcwOGNmMDBmODNkIi5zdWJzdHIoaSozLDMpLEIoKSxNKC05LFQrNippLXopLFEoNDAsUCs2KmkteixYLTM1LFkrNippLXopLGMuc3Ryb2tlKCk7Y1tmXT0iIzAzOCI7eD1YKzEwO3k9WS0xNTtCKCk7TShYLTI2LFktNSk7UShYLFktMixYLTI2LFkrMyk7RigpO00oWC0zLFktMyk7USh4LFkteixYLTI1LHkpO0YoKTtNKFgsWS01KTtRKHgseSxYKzE4LHkpO1EoWCsyNSxZLXosWCt6LFktMTMpO1EoWCsyOSxZKzMsWCsxOSxZLTIpO1EoeCxZLTgseCxZKzEwKTtGKCk7QigpO0EoWCxZKzE1LDIyKTtGKCk7Y1tmXT1xO0IoKTtBKFgrMixZKzI3LDI1KTtGKCk7Y1tmXT13PSIjZWVlIjtjLmZpbGxUZXh0KFMsNDAsNjApO1cvPS45OTk1O0Muc29tZShPPT57eD1PLlgtPVcseT1PLlk7aWYoTWF0aC5oeXBvdChYLXgsWS15KTw0MClPLlg9LTQwLE8uSj8rK1M6Uz0tMTtpZih4PC05MClPLlg9NjQwKzIwMCpSKCksTy5ZPVIoKSozNjAsTy5KPVIoKT4uMjtjW2ZdPU8uSj93OiIjMjIyIjtCKCksQSh4LXoseSwxMiksQSh4LHkseiksQSh4K3oseSwxNiksRigpfSl9fSwxNik=

R=Math.random
B=c.beginPath.bind(c)
M=c.moveTo.bind(c)
Q=c.quadraticCurveTo.bind(c)
A=(x,y,r)=>c.arc(x,y,r,0,7)
F=c.fill.bind(c)

c.lineWidth=6
c.font="55px Arial"
z=20

// pegasus
X=Y=T=P=180
U=D=V=S=0
W=2

// clouds
C=[]
for(i=7;i--;)
	C[i]={X:90,Y:-90,J:1}

// controls
d.onkeydown=e=>{U=e.which==38;D=e.which==40}
d.onkeyup=e=>U=D=0

// main loop
setInterval(_=>{
	if(S+1){
		Y+=V+=D-U
		Y=Y<z?z:Y>340?340:Y
		V*=.8

		// clear screen
		c[f="fillStyle"]=q="#77e"
		c.fillRect(0,0,640,360)

		T+=(Y-T)*.05
		P+=(Y-P)*.1

		// draw rainbow
		for(i=7;i--;)
			c.strokeStyle="#"+"f00f90ff00708cf00f83d".substr(i*3,3), B(), M(-9,T+6*i-z), Q(40,P+6*i-z,X-35,Y+6*i-z), c.stroke()

		// draw pegasus
		c[f]="#038"
		x=X+10
		y=Y-15
		B()
		M(X-26,Y-5)
		Q(X,Y-2,X-26,Y+3)
		F()
		M(X-3,Y-3)
		Q(x,Y-z,X-25,y)
		F()
		M(X,Y-5)
		Q(x,y,X+18,y)
		Q(X+25,Y-z,X+z,Y-13)
		Q(X+29,Y+3,X+19,Y-2)
		Q(x,Y-8,x,Y+10)
		F()
		B()
		A(X,Y+15,22)
		F()
		c[f]=q
		B()
		A(X+2,Y+27,25)
		F()

		// cloud counter
		c[f]=w="#eee"
		c.fillText(S,40,60)

		// update and draw clouds
		W/=.9995
		C.some(O=>{
			x=O.X-=W,y=O.Y;

			if(Math.hypot(X-x,Y-y)<40)
				O.X=-40,O.J?++S:S=-1;

			if(x<-90)
				O.X=640+200*R(),O.Y=R()*360,O.J=R()>.2;

			c[f]=O.J?w:"#222";
			B(),A(x-z,y,12),A(x,y,z),A(x+z,y,16),F()
		})
	}
}, 16)