c.width=c.height=500;
v=[[-99,-99,99],[99,-99,99],[99,99,99],[-99,99,99],[-99,-99,-99],[99,-99,-99],[99,99,-99],[-99,99,-99],[-99,-99,99],[99,-99,99],[99,-99,-99],[-99,-99,-99],[-99,99,99],[99,99,99],[99,99,-99],[-99,99,-99]];
M=Math;R=M.PI/180;t=0;a.strokeStyle="#fff";a.fillStyle="rgba(0,0,0,.5)";SD=1;S=0.1;
setInterval(function(){k=M.cos(t);s=M.sin(t);u=M.cos(t*3);w=M.sin(t*3);V=[];a.fillRect(0,0,500,500);a.beginPath();
for(I=0;I<16;I++)V[I]=[u*k*(v[I][0]*S)+(u*s*s-w*k)*(v[I][1]*S)+(u*s*k-w*-s)*(v[I][2]*S)+250,w*k*(v[I][0]*S)+(w*s*s+u*k)*(v[I][1]*S)+(w*s*k+u*-s)*(v[I][2]*S)+250]
for(I=0;I<16;I+=4)a.moveTo(V[I][0],V[I][1]),a.lineTo(V[I+1][0],V[I+1][1]),a.lineTo(V[I+2][0],V[I+2][1]),a.lineTo(V[I+3][0],V[I+3][1]),a.lineTo(V[I][0],V[I][1]);
a.stroke();a.closePath();t+=R;S+=SD?.01:-.02;S>=1.5?SD=0:S<=.0?SD=1:0},20);
Yy53aWR0aD1jLmhlaWdodD01MDA7DQp2PVtbLTk5LC05OSw5OV0sWzk5LC05OSw5OV0sWzk5LDk5LDk5XSxbLTk5LDk5LDk5XSxbLTk5LC05OSwtOTldLFs5OSwtOTksLTk5XSxbOTksOTksLTk5XSxbLTk5LDk5LC05OV0sWy05OSwtOTksOTldLFs5OSwtOTksOTldLFs5OSwtOTksLTk5XSxbLTk5LC05OSwtOTldLFstOTksOTksOTldLFs5OSw5OSw5OV0sWzk5LDk5LC05OV0sWy05OSw5OSwtOTldXTsNCk09TWF0aDtSPU0uUEkvMTgwO3Q9MDthLnN0cm9rZVN0eWxlPSIjZmZmIjthLmZpbGxTdHlsZT0icmdiYSgwLDAsMCwuNSkiO1NEPTE7Uz0wLjE7DQpzZXRJbnRlcnZhbChmdW5jdGlvbigpe2s9TS5jb3ModCk7cz1NLnNpbih0KTt1PU0uY29zKHQqMyk7dz1NLnNpbih0KjMpO1Y9W107YS5maWxsUmVjdCgwLDAsNTAwLDUwMCk7YS5iZWdpblBhdGgoKTsNCmZvcihJPTA7STwxNjtJKyspVltJXT1bdSprKih2W0ldWzBdKlMpKyh1KnMqcy13KmspKih2W0ldWzFdKlMpKyh1KnMqay13Ki1zKSoodltJXVsyXSpTKSsyNTAsdyprKih2W0ldWzBdKlMpKyh3KnMqcyt1KmspKih2W0ldWzFdKlMpKyh3KnMqayt1Ki1zKSoodltJXVsyXSpTKSsyNTBdDQpmb3IoST0wO0k8MTY7SSs9NClhLm1vdmVUbyhWW0ldWzBdLFZbSV1bMV0pLGEubGluZVRvKFZbSSsxXVswXSxWW0krMV1bMV0pLGEubGluZVRvKFZbSSsyXVswXSxWW0krMl1bMV0pLGEubGluZVRvKFZbSSszXVswXSxWW0krM11bMV0pLGEubGluZVRvKFZbSV1bMF0sVltJXVsxXSk7DQphLnN0cm9rZSgpO2EuY2xvc2VQYXRoKCk7dCs9UjtTKz1TRD8uMDE6LS4wMjtTPj0xLjU/U0Q9MDpTPD0uMD9TRD0xOjB9LDIwKTs=
Original source not submitted