工  具：PowerPoint 2016
插  件：Pocket(口袋动画)

    在魅力老猫还没掌握通过VBA自定义PPT动画属性这一技术之前，对复杂的动画是用VBA编程实现的，如老猫的一些早期作品《曲柄连杆机构》。随着老猫对PPT动画属性的进一步认识，一些复杂的动画通过程序定义后就脱离代码以纯动画的形式进行演示。这里特别推荐PA插件，它让不懂编程的人也可以做出专业的、炫酷的动画，本期实例是将魅力老猫的早期的编程作品《对心曲柄滑块机构》再次以纯动画的形式呈现。
    尽管该动画脱离了代码，但其综合难度指数对老猫而言却由★★★变成了★★★★★。这是因为它考验的是数学应用能力，而这一点老猫也全凭多年编程用到的数学知识而为之。

效果图：

http://s7/mw690/0021ixd0zy7dyAC2x9Aa6&690

算  法：
       难点是写出长杆x的坐标公式。如果只简单写出长杆中心点（即旋转点）的椭圆轨迹方程则会存在长短杆不吻合的误差：
#ppt_x+2*cos($)/33.86
#ppt_y-1*sin($)/19.05
改进算法，按图示给出的辅助线，计算位移，写出长杆x、y 坐标

长杆：8cm，短杆：2cm
(#ppt_x-2/33.86)-(4-2*cos($)-(sqrt(4^2-(1*sin($))^2)))/33.86

 #ppt_y-1*sin($)/19.05
滑块只有x位移，方法同长杆：
#ppt_x-6/33.86-(4-2*cos($)-2*(sqrt(4^2-(1*sin($))^2)))/33.86

动画以磅为单位，所以要将公式中以厘米为单位的数据按屏幕纵横比换算成磅。即按960×540的屏幕进行换算：
1cm≈28.35，960/28.35=33.86，540/28.35=19.05

源文件下载：

http://www.rapidbbs.cn/forum.php?mod=viewthread&tid=289650&extra=page=1&filter=sortid&typeid=4&sortid=5