加工說明：右旋內錐螺紋，中心位置為（50，20），螺紋大端直徑為ф60mm，螺距=4mm，螺紋深度為Z-32，單刃螺紋銑刀半徑R=13.5mm，螺紋錐度角=10°+ z' G( _9 o/ L
假設螺紋底孔已預先加工，為簡明扼要說明宏程序原理，這里使用一刀精加工，實際加工可合理分配余量分次加工！
. y0 V# i, a' A" Q: f, X; t4 _& d/ S4 ]% l V: s
O0101
. t O0 B4 o+ O! S0 U8 t; x! S/ rS2000 M03
, F0 _2 ^2 q+ Q, dG54 G90 G00 X0 Y0 Z30.
( Q) u) [; l$ ?% ?G65 P8101 A10. B0 D60. Q4. R13.5 X50. Y20. Z-32. F500% h: e' ?0 D6 w; M- x1 C
M30
. F/ S9 f2 }1 m& Z- i# d- Y, L/ n' [自變量賦值說明；
3 w2 E3 R5 [( y5 f#1=A 螺紋的錐度角（以單邊計算）
( e- z4 |& `( d i#2=B 螺紋頂面Z坐標（非絕對值）
8 I: j5 H( e# J2 U1 l% R#7=D 螺紋起始點（大端）直徑4 j4 `+ l' r! p/ ?
#9=F 進給速度
6 Z7 r& q, l) S7 ~" z) K2 o- F#17=Q 螺距
x6 ~ D0 o4 S#18=R 刀具半徑（應使用單刃螺紋銑刀）9 r' v5 e4 C/ v' Q) L. N# _* `
#24=X 螺紋中心X坐標值9 J4 F" l7 L, E5 _8 u. A
#25=Y 螺紋中心Y坐標值& S. X) J4 [3 U @' f- e
#26=Z 螺紋深度（Z坐標，非絕對值） z) s. A& v& \# y5 U7 \
5 t ?. J: Z/ E4 z- R- m
宏程序- Y6 @' h5 n+ N
O8101
$ t' H/ a% `5 ?' Z; Z+ ]. I: F& M* o% O) bG52 X#24 Y#25 在螺紋中心（X，Y）建立局部坐標系, M- g7 z9 A" ]* O# k" k
#3=#7/2-#18 起始點刀心回轉半徑（初始值）
( D8 f* @1 L H+ I& s#4=TAN[#1] 錐度角正切值
! d& u/ l( ^- M* V3 l; D8 j, O#5=#17*#4 一個螺距所對應的半徑變化量0 \# q8 ~9 T9 B4 n. V2 D
#6=#3-#26*#4 螺紋底部（小端）半徑
5 v- G. k: ]1 T' v n8 E" NG00 X#3 Y0 G00移動到起始點的上方% A) K& M5 @ x; j" K x" e
Z[#2+1.] G00下降到Z#2面以上1.處
2 x5 e4 e9 R, S- u6 J4 t* hG01 Z#2 F#9 G01進給到Z#2面- x' c5 X# l" ~6 V& J R0 ~4 {+ f( b- G
WHILE [#3 GT #6] DO 1 如果#3＞#6,循環1繼續
' o- t' j3 ^9 H% R3 M9 fG91 G02 X-#5 I-#3 Z-#17 F#9 G02螺旋加工至下一層,實際軌跡為圓錐插補
+ Q K& s0 k) L#3=#3-#5 刀心回轉半徑依次遞減#5) m% N7 R$ u1 f! j* R) P" b/ ^
END 1 循環一結束(此時#3=#6)* v0 d& h4 @: x3 L/ z4 n V
G90 G01 X0 Y0 G01回到中心# L! L6 L& N& H0 ?$ u
G00 Z30. 快速提刀到安全高度
b- D O6 y; c3 n% ?/ q+ V" NG52 X0 Y0 恢復G54原點0 X* V+ M1 U i: L- [$ Q7 a, h& M
M99 宏程序結束返回
0 W6 R+ x9 j/ \; b% z* @ m) m | 
發表于 2012-10-25 22:14:56
QQ好友和群
QQ空間
