Question: Animate lines between points while animating a continuous moving object

Hi,

     So I'm trying to animate a ball moving around in a moving circle. I can do a sequence of points, and a sequence of static circles which works okay but I'd like a continuous animation. Here is the points where the ball hits the circle (x,y) position and the times (t).  and the animation of the circle

restart;
with(plots);

x1 := [.9, -0.6953537244e-1, .5084436548, .5084436548, -.5253004431, -.4186356935,
     -.8180728424, -.8180728424, -.8180728424, -.8180728424, -.8180728424];

y1 := [0., .9695353733, -.6962325098, -.6962325098, .7042299044, -1.000215134,
     -.7602254226, -.7602254226, -.7602254226, -.7602254226, -.7602254226];

t1 := [0., 0., 1.371130074, 2.332404401, 2.332404401, 2.455605070, 2.508461412,
     2.516164274, 2.516164274, 2.516164274, 2.516164274, 2.516164274, 2.516164274];

 L1 := zip( (X,Y)->[X,Y], x1, y1):

plot(L1, style=point);

animate(polarplot,[1+0.2*sin(t)*sin(2*(theta)), theta=0..2*Pi, gridlines=false],
        t=0..2*Pi, frames=20);

Is there an efficient way to do this?

Thanks!