在二次开发中没有螺旋线的命令怎么？

lnw430522

在api中和kf中没有螺旋线的命令。而只有spline的命令。这个时候该怎么办？也就是说怎么把螺旋线（比如螺旋线的参数为半径和螺距等）转为其他的api中有的命令？

rick

api的不会，grip的我有做过阿基米德螺旋线。

lnw430522

楼上的怎么做的？能实现参数化吗谢谢了 可以赐教吗？

rick

这是我做的阿基米德螺旋线(右旋)的程序,不知道你想实现怎样的参数化?

lnw430522

谢谢了 我先看看你的程序 。就是改变螺旋线的半径和圈数还有螺距就得到不同形状的螺旋线。要是看不懂你的程序还多请赐教

lnw430522

上面兄弟 ，我下载了你的文件。用记事本打不开，出现乱码的情况 。然后我试着用grip来调用，还是出现乱码的情况。不知道能否传一个能用记事本打开的文档？谢谢了

rick

这是编译好的文件,直接在UG里调用.

lnw430522

楼上兄弟，我在UG里直接调用你的程序，出来了螺旋线对话框。但我想看看你的源程序代码可以不？方便的话发到我邮箱或者上传到这里 谢谢了 我邮箱是 lnw430522@163.com

lnw430522

rick兄，能不能告诉我把helix的参数比如半径和螺旋角等转为阿基米德螺线的公式呢？谢谢了。

rick

这是我做的螺旋线的源程序:
ENTITY/POT(1000),SPL,ENT(1000)
NUMBER/START_ANG,END_ANG,BASE_R,LAP,DST,ANS
% G% i9 b/ x6 H, q
L10:
    PARAM/'Please input archimedes paremeter',$
, I4 L, }5 N) M) o0 s# D  P6 E        'BASE RADIUS',BASE_R,$
        'START ANGLE',START_ANG,$
        'PITCH OF WINDING',DST,$
        'WINDING AMOUNT',LAP,RESP
    JUMP/L10:,TRM:,,RESP
5 K* P. u; @1 C; `  
    DO/DOL99:,I,0,1.005,0.005
0 A- I) o7 R$ s) K+ i' r8 @$ |        HASPACE=START_ANG+BASE_R*360*I
' ^2 S7 S0 P0 d9 E) |9 M        PX=BASE_R*COSF(HASPACE)
        PY=BASE_R*SINF(HASPACE)
9 m$ }/ Z/ Z3 ~' l        PZ=DST*LAP*I
7 m3 J5 Z+ s. H4 c
! }7 L+ E. O) s; X        ANS=ANS+1
2 y# ], q$ `, d* ?        POT(ANS)=POINT/PX,PY,PZ
    DOL99:
. z0 ]( u+ Z) F* W
    SPL=SPLINE/POT(1..ANS)
( _! w& z% @8 S
1 ^+ }$ K# r: Z1 b& O" b$ zDRAW/SPL

. O0 D, L) c& g$ }: S    DELETE/POT(1..ANS)

( V9 |. E% i; x, L4 O6 WTRM:
HALT