JS1k: The JavaScript code golfing competition

W=c.width=c.height=600;for($ in a)a[$[0]+($[6]||'')]=a[$];M=Math;I=M.PI;p=P=[];Q=S=T=p.v=p.V=0;p.x=p.y=W/2;q=20;z=40;w="px A";U=3;F=0.85;document.onmousemove=function(e){J=e.pageX-c.offsetLeft;K=e.pageY-c.offsetTop};A="M.ceil(M.random()*(W-z))";b=eval(A);e=eval(A);setInterval('with(a){if(Q){alert("Again?");Q=0}fillStyle="#9CF";fc(0,0,W,W);P=p;t=80;E=P.x-J;D=P.y-K;d=M.sqrt(E*E+D*D);E/=d;D/=d;L=b-p.x;N=e-p.y;O=M.sqrt(L*L+N*N);T+=1;if(O<45&T>0|T==0){b=eval(A);e=eval(A);T>1?S+=1:0;T=0}d>W?d=W:0;H=d/70;P.v-=E*H;P.V-=D*H;P.v*=F;P.V*=F;x=p.x;y=p.y;K>y?D=K-y:D=y-K;J>x?E=J-x:E=x-J;R=M.atan2(D,E)*180/I;c=1;K>y?R+=90:R-=90;J<x&K>y?c*=-1:0;J>x&K<y?c*=-1:0;R/=180/I*c;p=P;G=P.x+P.v;g=P.y+P.V;P.x=G;P.y=g;fillStyle="#F00";ba();save();ta(x,y);rotate(R);ta(-x,-y);fc(G-1,g-30,2,60);font=12+w;fx("▲",G-6,g-25);m(G-z,g);bC(G+z,g+z,G-z,g+z,G+z,g);stroke();font=94+w;fx("︵",G-47,g+9);re();if(T>z|T<0){if(T>z){T=-t;U-=1};fillStyle="#69F";}font=z+w;fx(S,9,z);fx(U,570,z);font=t+w;fx("♥",b-q,e+q);if(U<1){Q=U=3;S=0;T=-1}}',q)

Vz1jLndpZHRoPWMuaGVpZ2h0PTYwMDtmb3IoJCBpbiBhKWFbJFswXSsoJFs2XXx8JycpXT1hWyRdO009TWF0aDtJPU0uUEk7cD1QPVtdO1E9Uz1UPXAudj1wLlY9MDtwLng9cC55PVcvMjtxPTIwO3o9NDA7dz0icHggQSI7VT0zO0Y9MC44NTtkb2N1bWVudC5vbm1vdXNlbW92ZT1mdW5jdGlvbihlKXtKPWUucGFnZVgtYy5vZmZzZXRMZWZ0O0s9ZS5wYWdlWS1jLm9mZnNldFRvcH07QT0iTS5jZWlsKE0ucmFuZG9tKCkqKFcteikpIjtiPWV2YWwoQSk7ZT1ldmFsKEEpO3NldEludGVydmFsKCd3aXRoKGEpe2lmKFEpe2FsZXJ0KCJBZ2Fpbj8iKTtRPTB9ZmlsbFN0eWxlPSIjOUNGIjtmYygwLDAsVyxXKTtQPXA7dD04MDtFPVAueC1KO0Q9UC55LUs7ZD1NLnNxcnQoRSpFK0QqRCk7RS89ZDtELz1kO0w9Yi1wLng7Tj1lLXAueTtPPU0uc3FydChMKkwrTipOKTtUKz0xO2lmKE88NDUmVD4wfFQ9PTApe2I9ZXZhbChBKTtlPWV2YWwoQSk7VD4xP1MrPTE6MDtUPTB9ZD5XP2Q9VzowO0g9ZC83MDtQLnYtPUUqSDtQLlYtPUQqSDtQLnYqPUY7UC5WKj1GO3g9cC54O3k9cC55O0s+eT9EPUsteTpEPXktSztKPng/RT1KLXg6RT14LUo7Uj1NLmF0YW4yKEQsRSkqMTgwL0k7Yz0xO0s+eT9SKz05MDpSLT05MDtKPHgmSz55P2MqPS0xOjA7Sj54Jks8eT9jKj0tMTowO1IvPTE4MC9JKmM7cD1QO0c9UC54K1AudjtnPVAueStQLlY7UC54PUc7UC55PWc7ZmlsbFN0eWxlPSIjRjAwIjtiYSgpO3NhdmUoKTt0YSh4LHkpO3JvdGF0ZShSKTt0YSgteCwteSk7ZmMoRy0xLGctMzAsMiw2MCk7Zm9udD0xMit3O2Z4KCLilrIiLEctNixnLTI1KTttKEcteixnKTtiQyhHK3osZyt6LEcteixnK3osRyt6LGcpO3N0cm9rZSgpO2ZvbnQ9OTQrdztmeCgi77i1IixHLTQ3LGcrOSk7cmUoKTtpZihUPnp8VDwwKXtpZihUPnope1Q9LXQ7VS09MX07ZmlsbFN0eWxlPSIjNjlGIjt9Zm9udD16K3c7ZngoUyw5LHopO2Z4KFUsNTcwLHopO2ZvbnQ9dCt3O2Z4KCLimaUiLGItcSxlK3EpO2lmKFU8MSl7UT1VPTM7Uz0wO1Q9LTF9fScscSk=

// Score is on the topleft, and lives left are on the topright.
// I hope you enjoy my first javascript game :)
//The code below is slightly different, I did some last minute change to the minimized code to make it opera/safari/chrome friendly

W=c.width=c.height=600;

// creates abbreviations for context functions
for($ in a)a[$[0]+($[6]||'')]=a[$];

M=Math;
I=M.PI;
p=P=[];
Q=S=T=p.v=p.V=0;
p.x=p.y=W/2;

q=20;
z=40;
w="px A";
U=3;

//friction
F=0.85;

document.onmousemove=function(e){J=e.pageX-c.offsetLeft;K=e.pageY-c.offsetTop};

A="M.ceil(M.random()*(W-z))";
b=eval(A);
e=eval(A);

setInterval(function(){
	with(a){
		// had to put this alert on top because of some differences in the browsers
		if(Q){alert("Again?");Q=0}
		fillStyle="#9CF";
		fc(0,0,W,W);
		
		// free letters (B,C,Z)!

		P=p;
		t=80;

		E=P.x-J;
		D=P.y-K;
		d=M.sqrt(E*E+D*D);
		E/=d;
		D/=d;
		
		L=b-p.x;
		N=e-p.y;
		O=M.sqrt(L*L+N*N);
		// Check for collision between heart and arrow
		T+=1;
		if(O<z&T>0|T==0){
			b=eval(A);
			e=eval(A);
			T>1?S+=1:0;
			T=0
		}

		// Set max speed //
		d>W?d=W:0;

		// Moves towards the mouse //
		H=d/70;
		P.v-=E*H;
		P.V-=D*H;

		// Slows it down //
		P.v*=F;
		P.V*=F;

		// Get the playerobject to rotate towards the mouse //
		x=p.x;
		y=p.y;
		K>y?D=K-y:D=y-K;
		J>x?E=J-x:E=x-J;
		R=M.atan2(D,E)*180/I;
		c=1;
		// The part below are 4 if's minimized into one nice little sentence //
		K>y?R+=90:R-=90;J<x&K>y?c*=-1:0;J>x&K<y?c*=-1:0;

		R/=180/I*c;
		p=P;
		G=P.x+P.v;
		g=P.y+P.V;
		P.x=G;
		P.y=g;

		fillStyle="#F00";
		
		// Save, translate, rotate, translate, draw, restore
		ba();
		save();
		ta(x,y);
		rotate(R);
		ta(-x,-y);

		// Draw the arrow
		fc(G-1,g-30,2,60);
		font=12+w;
		fx("▲",G-6,g-25);
		
		// Draw the string
		m(G-z,g);
		bC(G+z,g+z,G-z,g+z,G+z,g);
		stroke();
		
		// Draw the bow
		//fillStyle="#C60"; //dont have room for this code, sadly.
		font=94+w;
		fx("︵",G-47,g+9);

		re();
		// END Save, translate, rotate, translate, draw, restore
		
		// Print the score
		font=z+w;
		fx(S,9,z);
				
		// update lives
		T>z?U-=1:0;
		
		// Print lives
		fx(U,570,z);

		// Set the timer
		if(T>z|T<0){
			T>z?T=-z:0;
			t=20
		}
		// Draw the heart
		font=t+w;
		fx("♥",b-q,e+q);
		
		if(U<1){Q=U=3;S=0;T=-1}
	}

},q)