一个圆弧螺纹程序

A思骏

朋友给 得一起分享
; z3 u2 @: f7 O. u9 ~& }#1=15
6 ^& u) e1 s! X' G#2=60
N2#1=15
6 m, K& b  v! P: C9 N. u1 LN3#3=2*[SQRT[#2*#2-#1*#1]-19.5]
G0X[#3]
G33X[#3]Z[#1]K7.5
#1=#1-1
! c( Q2 Z* T/ W. A6 Q" lIF[#1GE-15]GOTO3
! p" {4 Z+ B) O8 ]* p7 r0 x& Y' WG0X85
% f$ ~5 I: H( G" A  B' ~G0Z15
- w5 M3 y% n6 |: x#2=#2-0.3
IF[#2GE57]GOTO2
; s+ h- n; J  M# t" Z3 w5 cG00X80Z-60
7 g+ h; N& T3 h3 @#2=12.07
N5#1=-9*SQRT[1+#2*#2/56.25]+49
. U4 O6 m& K9 j: W& `* G( a#2=#2-1
! S7 O, v3 O; B1 v; c: _G01X[#1]+40Z#2-27
IF[#2GE0]GOTO5

shengliqiang

好像小螺距的圆弧螺纹还能近似描述，大螺距的螺纹不行吧！
另外，程序中的，G33X[#3]Z[#1]K7.5中的K7.5是导程吧，

但当Z轴的变量，#1=#1-1 按这样的步长进行循环时，得到的螺纹却是近似为螺距为1的螺纹，我试验此程序的结果是，程序中的螺距实际受：#1=#1-1中的步长值-1控制，得到的圆弧面螺纹不是完美的圆弧面螺旋线，准确的导程7.5也没有体现出来。
, {7 a" J+ z1 `# m+ P' }1 F
$ B4 j# T9 I# S. W不知我说的对不对，各位给个意见，期盼答复

shengliqiang

还有一个疑问：程序中的

# i, h. r! J+ s' P9 {0 H#2=12.07
N5#1=-9*SQRT[1+#2*#2/56.25]+49
! d; l- _& |8 J3 C. S#2=#2-1
G01X[#1]+40Z#2-27  --------这一段的表达式正确吗？？？？？
IF[#2GE0]GOTO5
' `/ `% J7 c) |; r是个什么东东？？？

qingwawanz

谢谢你提示思路

zhao98710014

谢谢分享！要是有图就好多咯

azhu008

我以前也干过，呵呵，增量至少要放到2mm以上才能加工出来，否则你会发现车出的螺距很小

zqlwx1

试试弄用吗 ~~~~~~~~~~~~~~~

vip008008

不知道你这个程序怎么能停下来

yuan6238

宏程序编的不错，学习了！有机会亲息试试，另外注明是什么系统最好！

zqlwx1

我今天试了 ，车出来的好像不是螺旋线