def act var eid,ex,ey,ang x=max(5,min(x+vx,395)):y=max(5,min(y+vy,235)) spofs 0,x,y eid=sphitsp(0) if eid=-1 then spofs eid out ex,ey ang=atan(y-ey,x-ex) vx=v*cos(ang):vy=v*sin(ang) endif if 395<=x && 0<vx then vx=-vx if x<=5 && vx<0 then vx=-vx if 235<=y && 0<vy then vy=-vy if y<=5 && vy<0 then vy=-vy end