宏程序加工梯形螺纹TR36X6——请指教

sniper2006

O2242
G97
: w' h% R- u) d% z0 Y$ t0 IG99
4 j9 B, V! |" {; \1 JT0101 M03 S300
G00 X38 Z5                              
: K' [9 Y' v# E% U6 N6 B4 |#101=36                                         螺纹的公称直径                                       
& p1 C- e' A' ]3 w#102=0                                          螺纹的右借刀量初始值
* l' O; g, p( x#103=-1.876                                     螺纹的左借刀量初始值
#104=0.2                                        被吃刀量的初始值
2 _0 Y6 \+ }# V! z; H' N#105=6                                          螺纹的升程
+ {1 n  m7 a: w+ B3 Y7 A#106=-90                                        螺纹的终点坐标                                                               
* t7 N7 V' n8 y3 n# R0 Y8 F9 z' n#107=6                                          螺纹的螺距
#108=29                                         螺纹的底径
2 c" V/ c( Q9 r$ m- f: l#109=#105+#102                                  螺纹切深的变化，导致右借刀量的变化                                   
#110=#105+#103                                  螺纹切深的变化，导致左借刀量的变化
N1 IF(#101 LT #108) GOTO2                       加工到螺纹底径，循环结束，跳转到N2
G00 Z#109                                       快速定位到右边加工起刀点
. [& m& Q) S5 h& jG92 X#101 Z#106 F#107                           右边加工一刀     
G00 Z#110                                       快速定位到左边加工起刀点                                       
G92 X#101 Z#106 F#107                           左边加工一刀                           
#101=#101-#104                                  改变加工直径，分层加工                                                        
#102=#102-0.134*#104                            加工直径的变化，右借刀量发生改变(tg15/2=0.134)      
#103=#102+0.134*#104                            加工直径的变化，左借刀量发生改变(tg15/2=0.134)
$ K  I% i3 \( ^2 w2 y% `#109=#105+#102                                 
7 D& D' V! K. ~; u+ i# O#110=#105+#103
/ u) G6 s. p3 L: |% h$ iIF(#101 LT 34) THEN #104=0.15                   直径小于34时，每次切深0.15
IF(#101 LT 32) THEN #104=0.10                   直径小于32时，每次切深0.10
6 L% G7 J: f% s0 S) V) F: ]IF(#101 LT 30) THEN #104=0.05                   直径小于30时，每次切深0.05
; b9 ~( ~; l( a* {GOTO1                                          
N2 G92 X#108 Z#106 F#107                        螺纹光整2到，提高表面质量
% B- |3 C% E1 K: f& j  H* uG92 X#108 Z#106 F#107
& l5 w$ s- X8 y: V: W6 A5 JG00 X100 Z150
2 P- _4 m) ^9 v# \. P5 f: G6 vM05
3 Q7 B/ ^' c; t3 YM30

* M+ A3 A/ q6 Q0 ^  y" ?: U2 h% `程序中有错误和不当之处，欢迎指正，共同探讨，谢谢。

8 J" f# K8 z4 E; D7 n/ F
1 `5 o) `* r/ a* f  S
补充内容 (2012-3-19 19:43):
GSK980TDa模拟软件在88楼有下载，修改参数 不能输刀补 不能建程序的帮助使用教程在84楼

sniper2006

- g* R' }: ^, Y
  {' }. Z% }6 e$ Q$ E  K回复 sniper2006 的帖子
% t. N" n, O4 d3 @, [; `1 R
% O/ }7 O$ g$ o0 o1 Q: J/ c  J仿真的时候，结果有问题。经过本人的认真研究分析，发现错在哪里了，直接上修改后的宏程序。红色部分为修改的地方。O2242
G97
G99
T0101 M03 S300                           
' z1 i7 `. C0 ~' Q9 [( I#101=36                                         螺纹的公称直径                                       
: O- v* Q2 @+ ]* e#102=0.938                                    螺纹的借刀量初始值(39-27)/2*tg15=0.938
( C5 s# J: ]. X8 @9 B
# ]0 Q, v- \8 J; O#104=0.2                                        被吃刀量的初始值
- ^: j+ Z( b0 F#105=6                                           螺纹的升程
  [/ g. g/ Q! u) ~#106=-90                                        螺纹的终点坐标                                                               
* V/ E. |3 W1 u4 @0 H3 I#107=6                                           螺纹的螺距
#108=29                                         螺纹的底径
% s! c: l+ i5 z* i: B! M#109=#105+#102                          螺纹切深的变化，导致右借刀量的变化                                   
$ E$ O- [) [, Y) i. D+ m#110=#105-#102                           螺纹切深的变化，导致左借刀量的变化
/ m  t  F  N& k) fG00 X38 Z#105
N1 IF(#101 LT #108) GOTO2           加工到螺纹底径，循环结束，跳转到N2
G00 Z#109                                       快速定位到右边加工起刀点
+ m5 Y9 H6 V+ f* v$ h9 PG92 X#101 Z#106 F#107                右边加工一刀     
8 G4 P7 K0 `/ y1 s  ?; T6 lG00 Z#110                                       快速定位到左边加工起刀点                                       
G92 X#101 Z#106 F#107                左边加工一刀                           
& |3 E! U& x7 ]' a. t, C" Q$ i#101=#101-#104                           改变加工直径，分层加工                                                        
* s7 {. o/ @9 u5 f4 }: _#102=#102-0.134*#104                加工直径的变化，右借刀量发生改变,半径值(tg15/2=0.134)      
( g: v( E) [) O5 l+ `' v) P, Q
#109=#105+#102                                 
  b: |+ b) p- W, U" F( n& Z; V5 X#110=#105-#102
IF(#101 LT 34) THEN #104=0.15                   直径小于34时，每次切深0.15
! v0 w. c, o- v8 y# ~7 I- UIF(#101 LT 32) THEN #104=0.10                   直径小于32时，每次切深0.10
IF(#101 LT 30) THEN #104=0.05                   直径小于30时，每次切深0.05
! K% q1 p1 `  l3 h2 cGOTO1                                          

N2 G92 X#108 Z#106 F#107                        螺纹光整2刀，提高表面质量

) M9 j0 c0 L$ m. y% KG92 X#108 Z#106 F#107
5 _% t# ~8 [4 L0 `4 F3 a7 @, DG00 X100 Z150
M05
2 S- A% w( V# f, Z1 hM30

4 W# R( \% }- M) h: [二、附仿真截图(仿真时为了节省时间把螺纹长度修改为30mm了）

# }2 ^% l7 w. Z2 V1 t  X, P" u4 J

     如果还有错误和不当之处，欢迎指正，谢谢各位了。

9 k' ~3 ?- g/ _- ?
+ g  E, b& n) T3 i6 @  @3 i! {. ^
3 P$ }# O, n5 ~( W. e0 b


2 V# Y( C3 {. I3 ]8 w& C& q
补充内容 (2012-3-19 19:44):
3 p5 d& W2 O+ |2 ]) G/ c! g% IGSK980TDa模拟软件在88楼有下载，修改参数 不能输刀补 不能建程序的帮助使用教程在84楼，安装程序要将文件名后缀rar改成exe

gaojian2008

学习学习！！！！！！！！！！！！！！！

veroinca

LZ是用什么软件仿真的

rlbb

GSK数控模拟软件(980TDa)只有60度的螺纹刀，不知楼主用什么软件仿真，用什么刀具？

sniper2006

回复 gaojian2008 的帖子
7 C* N+ A1 Z' }! r; _
! N( ~$ V6 p* n4 j, d: h6 iGSK数控模拟软件(980TDa)软件仿真的。

sniper2006

回复 rlbb 的帖子

7 y6 o7 a& K9 ]% s有切槽刀仿真的，实际加工用梯形螺纹刀就行。

wangsong4839

回复 sniper2006 的帖子

你的是什么仿真软件啊    能用宏程序？？
6 }7 \; @9 g+ u  L1 q. Y

sniper2006

回复 wangsong4839 的帖子
) }; p3 J& t8 S+ I% x6 ^$ }
- h( c/ T6 G/ s+ z3 G. J3 ^就是广州数控官方出的仿真软件，你留个地址给我，我发给你。

wangsong4839

回复 sniper2006 的帖子
! d# u/ \# E& N
- k7 o  J) k% M6 I+ o) n386029556@qq.com   谢谢