c.height=c.width=W=255
c.style.border='4px solid #000'
V=3
h=X=10
Y=125
$=[s=t=L=U=0]
with(Math)with(a)K=r=random,setInterval(function(){X+=L
Y+=U
I=createImageData(W,W)
$=$.filter(P=onkeydown=onkeyup=function(x,y,p){if(x[1])return!(P(p=--x[0],y=25+x[1],G),p<1|p>=X&p-X<8&abs(y-Y)<8?V--+(K=P):h|t>p||p-t>9|y>b||b-y>9?0:h=++s%20||++V)
if(p)for(J=2;p/=2;J++)p&1&&P(x+J%8,y+J/8)
else if(y)for(z=5;z;I.data[m*4-z]=--z&4&&W)m=x+~~y*W
else x?(v=[-1,-2,1,2][x.which-37],w=!!x.type[6]&&v,v?v&1?L=w:U=w:w+h&&(h=0,t=X+8,b=Y+1)):fillRect(0,0,W,W,fillStyle='red',K=r)})
for(i=V;i>0;P(W-i--*10,245,Z=0x3F6DFFBF12720C))fillStyle='#000'
P(X,Y,Z)
h||P(t,b,h=(t+=4)>251)
K(r(V>0&&P(4,3,G=0x607E416AD57E60)+putImageData(I,0,0)+fillText(s,15,10))>.93&!$[3]&&$.push([246,r()*25<<3]))},70)