nkeydown=e=>k[e.key]=1,onkeyup=e=>k[e.key]=0,onclick=_=>{if(am){am--,fl=2,rc=.2,e.forEach(o=>{let d=hypot(o.x-x,o.y-y),r=atan2(o.y-y,o.x-x);d<5&&abs(r-a)<.3&&(o.h-=50)})}};R=_=>{rc=rc>.02?rc-.02:0,fl&&fl--,e=e.filter(o=>o.h>0),h.fillStyle="#000",h.fillRect(0,0,320,240),k.ArrowLeft&&(a-=.1),k.ArrowRight&&(a+=.1),m=.1,(k.ArrowUp||k.w)&&(nx=x+cos(a)*m,ny=y+sin(a)*m,f(floor(nx),floor(ny))!=1&&(x=nx,y=ny)),(k.ArrowDown||k.s)&&(nx=x-cos(a)*m,ny=y-sin(a)*m,f(floor(nx),floor(ny))!=1&&(x=nx,y=ny)),(k.ArrowUp||k.w||k