给我看看实现着几个运动的程序对不对
<p>我现在有两个圆柱体，圆柱体1用E1表示，圆柱体2用E2表示，我想实现以下运动：当E1绕其轴旋转一圈时，E2旋转一个固定角度（小于360），这个运动循环，直到E2旋转了一周，E1沿E2轴线方向移动一固定距离，循环，直到移动距离达到设定值。</p><p>我写的程序如下，大家看对不，有什么意见提下，谢谢：</p><p> (setq i 0)<br/> (while (<= i h) <br/> (setq j 1)<br/> (while (<= j z)<br/> (command "rotate" e2 "" pt7 360)<br/> (command "rotate" e1 "" p0 pj)<br/> (setq j(+ j 1))<br/> )<br/> <font color="#dd6d22">（command "move" )移动命令暂时不会写</font><br/> (setq i(+ i hi))<br/>)</p> <p>思路完全不对呀</p><p>E2旋转了一周，E1沿E2轴线方向移动一固定距离（dist）</p><p>移动距离达到设定值(len)</p><p>len/dist=移动次数，即E2旋转总周数(R2N)</p><p>E1绕其轴旋转一圈时，E2旋转一个固定角度(ANG2)</p><p>360*R2N/ANG2=E1需要旋转的总周数(R1N)<br/><br/></p><p>如果给定dist</p><p>直接可以计算出R1N和R2N</p><p>为什么要用while这么麻烦？</p>
页:
[1]