JS1k: The JavaScript code golfing competition

C=document.createElement("canvas");S=C.style;S.position="relative";A=C.getContext("2d");b.appendChild(C);w=C.width=C.height=c.width=c.height=400;with(M=Math)R=random,q=P=PI,G=cos,F=floor;S.top=0+'px';S.left=-w+'px';L=P/4;s=n=f=false;T=setTimeout;r=5;g=195;e=320;k=100;l=50;X=o=p=0;z=10;function B(x,y,r,a){a.beginPath();a.arc(x,y,r,P*2,0,f);a.fillStyle='#'+F(R()*z)+'8'+F(R()*z);a.fill();a.stroke()}A.translate(190,e);O(0,0,0);function O(a,U,V){A.translate(U,V);A.rotate(a);for(i=1;i<4;i++){t=i*r*3;A.beginPath();A.arc(X,r-25-t,30,L,3*L,f);A.stroke();B(X,r-t,z,A)}B(-4,-45,3,A);B(4,-45,3,A);A.rotate(-a)}function H(z){x=(20+(16*M.pow(M.sin(q),3)))*z;y=(15-(13*G(q)-5*G(q*2)-2*G(3*q)-G(4*q)))*z;h=[1,-1,0,0];for(i=0;i<4;i++){B(x+h[i]*r,y+h[3-i]*r,r,a)}B(x,y,r/1.3,a);m=M.atan2(l-y,k-x);if(!n){A.clearRect(-g,-g,w,w);O(-(p),(-g+x),(-e+y))}p+=(o-m)%(L);o=m;k=g=x;l=e=y;if(!s&q>0){q-=.1;T("H(z)",170)}else if(!n&q>-P){if(!s)p+=-P/1.5;s=!f;q-=.1;T("H(z)",170)}else{n=s;q-=.3;T("H(z)",6)}}T("H(z)",170);c.style.background='#234';

Qz1kb2N1bWVudC5jcmVhdGVFbGVtZW50KCJjYW52YXMiKTtTPUMuc3R5bGU7Uy5wb3NpdGlvbj0icmVsYXRpdmUiO0E9Qy5nZXRDb250ZXh0KCIyZCIpO2IuYXBwZW5kQ2hpbGQoQyk7dz1DLndpZHRoPUMuaGVpZ2h0PWMud2lkdGg9Yy5oZWlnaHQ9NDAwO3dpdGgoTT1NYXRoKVI9cmFuZG9tLHE9UD1QSSxHPWNvcyxGPWZsb29yO1MudG9wPTArJ3B4JztTLmxlZnQ9LXcrJ3B4JztMPVAvNDtzPW49Zj1mYWxzZTtUPXNldFRpbWVvdXQ7cj01O2c9MTk1O2U9MzIwO2s9MTAwO2w9NTA7WD1vPXA9MDt6PTEwO2Z1bmN0aW9uIEIoeCx5LHIsYSl7YS5iZWdpblBhdGgoKTthLmFyYyh4LHkscixQKjIsMCxmKTthLmZpbGxTdHlsZT0nIycrRihSKCkqeikrJzgnK0YoUigpKnopO2EuZmlsbCgpO2Euc3Ryb2tlKCl9QS50cmFuc2xhdGUoMTkwLGUpO08oMCwwLDApO2Z1bmN0aW9uIE8oYSxVLFYpe0EudHJhbnNsYXRlKFUsVik7QS5yb3RhdGUoYSk7Zm9yKGk9MTtpPDQ7aSsrKXt0PWkqciozO0EuYmVnaW5QYXRoKCk7QS5hcmMoWCxyLTI1LXQsMzAsTCwzKkwsZik7QS5zdHJva2UoKTtCKFgsci10LHosQSl9QigtNCwtNDUsMyxBKTtCKDQsLTQ1LDMsQSk7QS5yb3RhdGUoLWEpfWZ1bmN0aW9uIEgoeil7eD0oMjArKDE2Kk0ucG93KE0uc2luKHEpLDMpKSkqejt5PSgxNS0oMTMqRyhxKS01KkcocSoyKS0yKkcoMypxKS1HKDQqcSkpKSp6O2g9WzEsLTEsMCwwXTtmb3IoaT0wO2k8NDtpKyspe0IoeCtoW2ldKnIseStoWzMtaV0qcixyLGEpfUIoeCx5LHIvMS4zLGEpO209TS5hdGFuMihsLXksay14KTtpZighbil7QS5jbGVhclJlY3QoLWcsLWcsdyx3KTtPKC0ocCksKC1nK3gpLCgtZSt5KSl9cCs9KG8tbSklKEwpO289bTtrPWc9eDtsPWU9eTtpZighcyZxPjApe3EtPS4xO1QoIkgoeikiLDE3MCl9ZWxzZSBpZighbiZxPi1QKXtpZighcylwKz0tUC8xLjU7cz0hZjtxLT0uMTtUKCJIKHopIiwxNzApfWVsc2V7bj1zO3EtPS4zO1QoIkgoeikiLDYpfX1UKCJIKHopIiwxNzApO2Muc3R5bGUuYmFja2dyb3VuZD0nIzIzNCc7

C=document.createElement("canvas");S=C.style;S.position="relative";A=C.getContext("2d");b.appendChild(C);//add extra canvas for the ant
w=C.width=C.height=c.width=c.height=400;
with(M=Math)R=random,q=P=PI,G=cos,F=floor;
S.top=0+'px';S.left=-w+'px';
L=P/4;
s=n=f=false;
T=setTimeout;
r=5;g=195;e=320;k=100;l=50;X=o=p=0;z=10;
function B(x,y,r,a){//draw a circle
	a.beginPath();
	a.arc(x,y,r,P*2,0,f);
	a.fillStyle='#'+F(R()*z)+'8'+F(R()*z);
	a.fill();
	a.stroke()
}
A.translate(190,e);O(0,0,0);
function O(a,U,V){//draws the ant
	A.translate(U,V);
	A.rotate(a);
	for(i=1;i<4;i++){
		t=i*r*3;
		//the legs
		A.beginPath();
		A.arc(X,r-25-t,30,L,3*L,f);
		A.stroke();
		//the body
		B(X,r-t,z,A)
	}
	//the eyes
	B(-4,-45,3,A);
	B(4,-45,3,A);
	A.rotate(-a)
}
function H(z){
	//http://mathworld.wolfram.com/HeartCurve.html
//thanks to Love trails By Rauri Rochford for the link
	x=(20+(16*M.pow(M.sin(q),3)))*z;
	y=(15-(13*G(q)-5*G(q*2)-2*G(3*q)-G(4*q)))*z;
	//draw the flower leaves as circles
	h=[1,-1,0,0];
	for(i=0;i<4;i++){
		B(x+h[i]*r,y+h[3-i]*r,r,a)
	}
	//add the flower heart
	B(x,y,r/1.3,a);
	m=M.atan2(l-y,k-x);//find the tangent angle to the heart curve
	if(!n){//the ant only walks the first tour
		A.clearRect(-g,-g,w,w);
		O(-(p),(-g+x),(-e+y))
	}
	p+=(o-m)%(L);
	o=m;
	k=g=x;
	l=e=y;
	if(!s&q>0){//do the right half
	q-=.1;
	T("H(z)",170)
	}else if(!n&q>-P){//do the left half
		if(!s)p+=-P/1.5;
		s=!f;
		q-=.1;
		T("H(z)",170)
	}else{//keep the flowers looping
		n=s;
		q-=.3;
		T("H(z)",6)
	}
}
T("H(z)",170);
c.style.background='#234';