>    with(plots):

>    cykloida:= plot( [t-sin(t), 1-cos(t), t=0..4*Pi]):
animate( pointplot, [ [t-sin(t), 1-cos(t)], symbol=circle, symbolsize=20],
         t=0..4*Pi, frames=60, background=cykloida );

[Maple Plot]

>