如何能让这三条线跟着一起做？

hpucq

C=0:.1:2*pi;r=0.05;
plot([12,14],[6,6],'r','linewidth',2);
plot([12,14],[3.25,3.25],'r','linewidth',2);
plot([13,13],[3.25,6],'r','linewidth',2);
请教大神，这个球在做正弦运动，如何能让这三条线跟着一起做？非常感谢！

Taio

这个没做过。