JS1k: The JavaScript code golfing competition

function r(a,b,c){return{x:O(rY)*a+0*b+I(rY)*c,y:0*a+1*b+0*c+0,z:-I(rY)*a+0*b+O(rY)*c}}function p(a,b,c,d){d=r(a+oX,b+oY,c+oZ);return{x:mX+d.x*mZ/(d.z+mZ),y:mY-d.y*mZ/(d.z+mZ),z:d.z}}var M=Math,W=window,G=c.width=W.innerWidth,J=c.height=W.innerHeight,O=M.cos,I=M.sin,P=parseInt,t=rX=rY=rZ=oX=oZ=0,N=[],mX=G/2,mY=J/2,mZ=160,U=.13,Q=20;W=H=18;_=W*H;Z=12;x=0;for(var i=0;i<W*H;i++){N[i]={x:i%W*Z-W*Z/2,y:0,z:P((i%_-x%H)/W)*Z-W*Z/2}}setInterval(function(){t++;a.fillStyle="rgba(0,0,0,.1)";a.fillRect(0,0,G,J);rY+=.005;oY=I(t/50)*50;for(var b=0;b<_;b++){var c=b%W,d=P((b%_-c%H)/W);n=d*H+c;v=n+W+1;if(N[v]&&c<H-1){E=p(N[n].x,N[n].y+=I((t+c*20)/Q)*U,N[n].z);R=p(N[n+1].x,N[n+1].y+=I((t+c*24)/Q)*U,N[n+1].z);T=p(N[n+W].x,N[n+W].y+=O((t+d*3)/Q)*U*2,N[n+W].z);Y=p(N[v].x,N[v].y+=O((t+d*13)/Q)*U,N[v].z);a.beginPath();a.moveTo(E.x,E.y);a.lineTo(R.x,R.y);a.lineTo(Y.x,Y.y);a.lineTo(T.x,T.y);a.closePath();a.strokeStyle="rgb("+P(.5+Math.abs(I(d+t/10)*255))+",128,255)";a.stroke()}}},0)

ZnVuY3Rpb24gcihhLGIsYyl7cmV0dXJue3g6TyhyWSkqYSswKmIrSShyWSkqYyx5OjAqYSsxKmIrMCpjKzAsejotSShyWSkqYSswKmIrTyhyWSkqY319ZnVuY3Rpb24gcChhLGIsYyxkKXtkPXIoYStvWCxiK29ZLGMrb1opO3JldHVybnt4Om1YK2QueCptWi8oZC56K21aKSx5Om1ZLWQueSptWi8oZC56K21aKSx6OmQuen19dmFyIE09TWF0aCxXPXdpbmRvdyxHPWMud2lkdGg9Vy5pbm5lcldpZHRoLEo9Yy5oZWlnaHQ9Vy5pbm5lckhlaWdodCxPPU0uY29zLEk9TS5zaW4sUD1wYXJzZUludCx0PXJYPXJZPXJaPW9YPW9aPTAsTj1bXSxtWD1HLzIsbVk9Si8yLG1aPTE2MCxVPS4xMyxRPTIwO1c9SD0xODtfPVcqSDtaPTEyO3g9MDtmb3IodmFyIGk9MDtpPFcqSDtpKyspe05baV09e3g6aSVXKlotVypaLzIseTowLHo6UCgoaSVfLXglSCkvVykqWi1XKlovMn19c2V0SW50ZXJ2YWwoZnVuY3Rpb24oKXt0Kys7YS5maWxsU3R5bGU9InJnYmEoMCwwLDAsLjEpIjthLmZpbGxSZWN0KDAsMCxHLEopO3JZKz0uMDA1O29ZPUkodC81MCkqNTA7Zm9yKHZhciBiPTA7YjxfO2IrKyl7dmFyIGM9YiVXLGQ9UCgoYiVfLWMlSCkvVyk7bj1kKkgrYzt2PW4rVysxO2lmKE5bdl0mJmM8SC0xKXtFPXAoTltuXS54LE5bbl0ueSs9SSgodCtjKjIwKS9RKSpVLE5bbl0ueik7Uj1wKE5bbisxXS54LE5bbisxXS55Kz1JKCh0K2MqMjQpL1EpKlUsTltuKzFdLnopO1Q9cChOW24rV10ueCxOW24rV10ueSs9TygodCtkKjMpL1EpKlUqMixOW24rV10ueik7WT1wKE5bdl0ueCxOW3ZdLnkrPU8oKHQrZCoxMykvUSkqVSxOW3ZdLnopO2EuYmVnaW5QYXRoKCk7YS5tb3ZlVG8oRS54LEUueSk7YS5saW5lVG8oUi54LFIueSk7YS5saW5lVG8oWS54LFkueSk7YS5saW5lVG8oVC54LFQueSk7YS5jbG9zZVBhdGgoKTthLnN0cm9rZVN0eWxlPSJyZ2IoIitQKC41K01hdGguYWJzKEkoZCt0LzEwKSoyNTUpKSsiLDEyOCwyNTUpIjthLnN0cm9rZSgpfX19LDAp

// Change the Canvas to be the size of the window  and setting global Width and Height variables
var M=Math,W=window,G=c.width=W.innerWidth,J=c.height=W.innerHeight,

	// Reduce characters needed to call re-used Math functions
	O=M.cos,I=M.sin,P=parseInt,

	// Set up the 3D world's properties
	t=rX=rY=rZ=oX=oZ=0,N=[],mX=G/2,mY=J/2,mZ=160,U=.13,Q=20;

// Convert 3D point-data to 2D screen co-ordinates
function p(x,y,z,p){
  p=r(x+oX,y+oY,z+oZ);
  return{x:mX+p.x*mZ/(p.z+mZ),y:mY-p.y*mZ/(p.z+mZ),z:p.z};
};

// Return an point as an object transformed through a Rotation Matrix
function r(x,y,z){return{
  x:O(rY)*x+0*y+I(rY)*z,
  y:0*x+1*y+0*z+0,
  z:-I(rY)*x+0*y+O(rY)*z
}};


// Generate the Magic Carpet
W=H=18;_=W*H;Z=12;x=0;
for(var i=0;i<W*H;i++){
	N[i]={x:(i%W*Z)-(W*Z/2),y:0,z:(P(((i%(_))-x%H)/W)*Z)-(W*Z/2)};
}

// Define The Draw Loop
setInterval(function(){
	t++;
	a.fillStyle="rgba(0,0,0,.1)";
	a.fillRect(0,0,G,J);

  // Rotate the world and modulate the Y offset (Y is up and down, Z is near to far)
  rY+=.005;
  oY=I(t/50)*50;

	// Loop through the vertexes
	for(var i=0;i<_;i++){
		var x=i%W, y=P((i%(_)-x%H)/W);
		n=(y*H)+x;
		v=n+W+1;

		// If the values are within bounds
		if(N[v]&&x<H-1){

			// Calculate the 2D co-ordinates to draw between the 3D vertices on the screen
	    E=p(N[n].x,N[n].y+=I((t+x*20)/Q)*U,N[n].z);
			R=p(N[n+1].x,N[n+1].y+=I((t+x*24)/Q)*U,N[n+1].z);
			T=p(N[n+W].x,N[n+W].y+=O((t+y*3)/Q)*U*2,N[n+W].z);
			Y=p(N[v].x,N[v].y+=O((t+y*13)/Q)*U,N[v].z);

			// Draw paths to the Canvas
			a.beginPath();
				a.moveTo(E.x,E.y);
				a.lineTo(R.x,R.y);
				a.lineTo(Y.x,Y.y);
				a.lineTo(T.x,T.y);
			a.closePath();
			a.strokeStyle="rgb("+(P(.5+ Math.abs(I(y+t/10)*255)))+",128,255)";
			a.stroke();
		}
	}
},0);