加工说明:右旋内锥螺纹,中心位置为(50,20),螺纹大端直径为ф60mm,螺距=4mm,螺纹深度为Z-32,单刃螺纹铣刀半径R=13.5mm,螺纹锥度角=10° ; ^5 q ~2 u9 K' N3 Q假设螺纹底孔已预先加工,为简明扼要说明宏程序原理,这里使用一刀精加工,实际加工可合理分配余量分次加工! / R+ a/ z+ W/ F' t5 _0 @- F+ h" e' l! c b+ c0 [9 l
O0101
, j4 K5 w3 ^8 r ~S2000 M03
* H- ?& c9 ^0 s) W6 L5 vG54 G90 G00 X0 Y0 Z30.
! O" `9 _4 y% d/ i/ d' |0 e' PG65 P8101 A10. B0 D60. Q4. R13.5 X50. Y20. Z-32. F500
' U+ a2 e: n9 t4 r1 h* h4 h1 o7 q, z5 {
M30
; T0 B) f8 [0 M2 G) H自变量赋值说明;5 t6 K7 R7 D5 v9 V* y& C #1=A 螺纹的锥度角(以单边计算) 4 M0 C' B3 G* e$ t2 N9 F$ ~; C#2=B 螺纹顶面Z坐标(非绝对值) 5 G1 D9 Q0 @- A" G#7=D 螺纹起始点(大端)直径 6 v, {! d7 p. n- S& E! `#9=F 进给速度 7 ?; B6 e8 ^! A/ G2 a' E( C$ \#17=Q 螺距 - I4 F9 {+ V/ E% R& ~#18=R 刀具半径(应使用单刃螺纹铣刀)% b9 T, ?) l1 y3 r3 Z #24=X 螺纹中心X坐标值0 N8 K2 @9 z0 P2 ^$ J #25=Y 螺纹中心Y坐标值" M; Q! h( W2 l- x" g; l8 w3 p/ Y, [ #26=Z 螺纹深度(Z坐标,非绝对值)+ g- ^( Y5 F, B: X9 \ $ u0 o% V# s9 H+ F j& o' q 宏程序 " h7 B5 [( e9 [3 l4 h% S7 Y2 fO81010 L& C5 o" N ?5 ~+ p G52 X#24 Y#25 在螺纹中心(X,Y)建立局部坐标系 9 F! e# c q: ]& n" i9 c0 p% J& p( \2 q#3=#7/2-#18 起始点刀心回转半径(初始值) * |4 B Q0 _" C* k#4=TAN[#1] 锥度角正切值 $ F4 n5 _$ M* B/ n* d' _1 {( @#5=#17*#4 一个螺距所对应的半径变化量 6 G3 t4 I; w+ U( L- X! M3 p#6=#3-#26*#4 螺纹底部(小端)半径 0 c) P& r4 i3 y: Q/ m8 AG00 X#3 Y0 G00移动到起始点的上方 $ n$ p, U0 m X; OZ[#2+1.] G00下降到Z#2面以上1.处 + p0 ^7 r- r+ k9 i1 ZG01 Z#2 F#9 G01进给到Z#2面5 l& o9 H9 n0 T% j% N' C6 Q9 W WHILE [#3 GT #6] DO 1 如果#3>#6,循环1继续* m0 c3 p0 @, @ N+ b3 x; a G91 G02 X-#5 I-#3 Z-#17 F#9 G02螺旋加工至下一层,实际轨迹为圆锥插补5 C n* L0 q! M #3=#3-#5 刀心回转半径依次递减#5; ?' {( N% W' F( O END 1 循环一结束(此时#3=#6)0 Q5 p2 ?( }- ^7 W& O L, Q G90 G01 X0 Y0 G01回到中心5 M7 H* p) K; j* _2 ^! T3 c& D G00 Z30. 快速提刀到安全高度 ; m0 \- v4 B E H, T1 b; XG52 X0 Y0 恢复G54原点, O+ N& }) r0 ? M99 宏程序结束返回7 p, h& u1 L6 W ? |