車削多頭螺紋宏程序

627604250

程序原文如下，廣數(shù)系統(tǒng)


%
O0001
#1=10.;(大徑)
#2=8.;(小徑)
5 l% n/ i! ~* D! K! v0 _#3=-50.;(終點(diǎn))
2 M6 t/ l' Z/ k' s. s#4=1.5;(牙距)
) D4 K( l, `! G+ I, F#5=1.012;(縮水率）
#6=15.;(起點(diǎn))
5 N: q  I2 a1 B#7=6;(螺紋頭數(shù))
) D! T4 b& t6 D, ?) C#8=#4*#5;
#9=#7*#8;
#10=#6+#9
T0101;
. {- f' N: N2 N2 X8 JM03 S500;
M08;
/ `7 D; `, x& @! M. yWHILE [#6 LT #10] DO 1;
G0 G99 X[#1+2.];
- r7 @8 {, H( n$ j5 ZZ#6;
% ~$ P. x) y  g3 NG76 P020160 Q20 R0.;
  S* S5 B, m8 I2 E# lG76 X#2 Z#3 P811 Q50 F#9;
#6=#6+#8;
' T! A8 g/ P0 IEND 1;
2 L" o' Y( Q) w* I+ }2 RG0 Z100. M09;
M05;
M30;
%

. G2 I4 R( P, x& {) `4 M) o# R現(xiàn)在想在這個(gè)基礎(chǔ)上進(jìn)一步車削多頭梯形螺紋，不知道該咋定義，目前的操作是車削完成了補(bǔ)刀補(bǔ)實(shí)現(xiàn)的，有沒有這方面大神指點(diǎn)一下呢？
3 L5 U, X6 y9 u1 J