加工说明：右旋内锥螺纹，中心位置为（50，20），螺纹大端直径为ф60mm，螺距=4mm，螺纹深度为Z-32，单刃螺纹铣刀半径R=13.5mm，螺纹锥度角=10°1 X+ c' `* i5 t
假设螺纹底孔已预先加工，为简明扼要说明宏程序原理，这里使用一刀精加工，实际加工可合理分配余量分次加工！
& Y- T0 j9 D9 a* _, @! W v
' Q1 X3 i) |0 }' OO0101
+ E3 X$ D6 A; a- }$ j" HS2000 M03
! W& G& O( d/ C/ F# g3 j/ ~' MG54 G90 G00 X0 Y0 Z30.: S: o" k3 P: @' Z, d
G65 P8101 A10. B0 D60. Q4. R13.5 X50. Y20. Z-32. F500* {9 x( ?) u" m2 H0 [ v9 q: O
M30 : J* _9 g1 q% }* {/ S9 k% |
自变量赋值说明；
8 w! `; f- [, F#1=A 螺纹的锥度角（以单边计算）
i0 @+ q' C. E; X% ]( `( D& s+ d#2=B 螺纹顶面Z坐标（非绝对值）/ H9 F, \ t: ^: L) Y
#7=D 螺纹起始点（大端）直径6 @1 |* k. _2 T0 f' B
#9=F 进给速度3 Z( S2 X& A; v2 m& D, Y7 }5 ^
#17=Q 螺距) T' z7 F9 K7 Y e5 v
#18=R 刀具半径（应使用单刃螺纹铣刀）
5 Q! \/ R$ F; C8 N( S0 x" h#24=X 螺纹中心X坐标值* |5 ~7 G0 G( z2 F
#25=Y 螺纹中心Y坐标值
6 O. a+ l! u B& y# K0 L#26=Z 螺纹深度（Z坐标，非绝对值）
/ Z; L( h/ y0 d- [! R' W5 q
+ @+ I$ i9 E7 Q6 s6 D 宏程序
& e+ P2 W. U7 n* z. i t3 `O81018 i/ Q7 k2 d% m G
G52 X#24 Y#25 在螺纹中心（X，Y）建立局部坐标系
. Y2 J. ]7 }# ?#3=#7/2-#18 起始点刀心回转半径（初始值）5 T& g. |* _" ]% e( Q' i/ G
#4=TAN[#1] 锥度角正切值% H7 n# z$ a; C. D" M: o4 s9 A
#5=#17*#4 一个螺距所对应的半径变化量 g# j p7 F; i( S* _/ u
#6=#3-#26*#4 螺纹底部（小端）半径/ ]9 k1 m: O) |/ f& X& r! d8 Q# R# l P
G00 X#3 Y0 G00移动到起始点的上方
2 Q1 L" P- b3 \9 qZ[#2+1.] G00下降到Z#2面以上1.处
0 L$ V* x9 t3 V" v2 h( u* a9 P+ oG01 Z#2 F#9 G01进给到Z#2面' w0 ]* m0 Y) V+ W
WHILE [#3 GT #6] DO 1 如果#3＞#6,循环1继续3 o( e }/ A, o% _% x
G91 G02 X-#5 I-#3 Z-#17 F#9 G02螺旋加工至下一层,实际轨迹为圆锥插补2 J: W/ {! K. k. |9 n- e9 t, S$ a
#3=#3-#5 刀心回转半径依次递减#5" g" `( f, f# R9 A( o
END 1 循环一结束(此时#3=#6)0 L0 Z& s3 ?3 V' j% @1 h
G90 G01 X0 Y0 G01回到中心) j- d8 ~ |" `
G00 Z30. 快速提刀到安全高度0 w6 B# F, O4 d7 P. V+ k
G52 X0 Y0 恢复G54原点: t! n( \# V% G, y4 ~
M99 宏程序结束返回
0 h1 w* r( A S* L/ f2 e | 
发表于 2012-10-25 22:14:56
