数控模块化编程一一R刀车圆弧

mcsino

* E8 Z$ n: V7 i) M由于经常加工弯管压轮模，其程序基本就是修改一下几个固定值，最近因为又需要加工一批，量比较大规格比较多，每种规格都是一件，如果做完一件修改一下程序，一来容易出错，二来效率也不高，所以想把程序模块化，加工不同零件只需调用模块，输入必要参数即可，无需修改程序，现把用切刀加工(辅助加工)以及R圆弧头加工模块(采用B型补偿)及如何调用模块附上，有时间的话把程序流程图一起附上，希望像我等初学者共同进步.

! I( y  t  z/ l/ `4 A- ^; m1)切刀辅助加工模块(
7 V! r0 c# l0 [9 H- N) |#1 切刀刀宽
#2 圆弧弦长
#3 圆弧半径
#7 进级量
#8 Z向圆弧起点
#9 X向圆弧起点
模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#7，#8，#9
; O' |% e. b& Y: k8 c% d0 H$ {
中间变量:#5,#6,#27，#28，#29,#30,#31 ,#32
- j- T% d- y- Y/ G" V  J5 v#29=0   
#30=#2-1
5 j+ e' R2 R6 t- @' j/ W" I#32=#2/2
# @5 s* h3 W5 k3 ?+ f8 P2 zWHILE [#29<=#30]  DO1
9 e' A- l5 M- m2 L# B( w#29=#29+#1*0.8
IF[ #29>#30] GOTO3
8 m# B; w2 [2 c$ s, SIF[#29>#32] GOTO2
5 T- E5 e" j" w4 {2 w, O% f) r0 p#27=#32-#29
. i1 j7 }3 o$ l7 r- LN1 #28=SQRT[#3*#3-#27*#27]
) o5 Y8 i) R3 @! g: S% [#5=#8-#29-#1-1
1 f0 p1 R) }. e8 |# @#6=#9-#28*2
3 t, O. ^# T1 {  B! ^#31=#9+2
' [" ]5 b7 P  bG0 X#31
% {2 R; J/ ]0 q# _G0 Z#5
G1 X#6 F#7
# A4 D% ~! B& r5 AG0 X#31
- m1 I) n% S1 l1 fGOTO3
N2 #27=#29-#32
GOTO1
N3 END1
M99
# q% ]5 u( C/ w: \4 Z+ j

mcsino

. v' ^; V' y* q; B- ~$ C8 G
2)R刀加工圆弧采用B型补偿，即采用刀心轨迹编程
#1 X向圆弧起点
#2 Z向圆弧起点
2 b7 P: V; Q* x, L5 S5 O#3 R刀半径
  {4 F! u5 b! X. H' Y! j#4 F进级量
) i* Y& I. N, \0 k2 |#5 需要加工的圆弧半径
2 ]" C7 C" u8 Q& H模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#4，#5
中间变量：#28，#29,#30,#31 ,#32，#33
  N3 _) I  W' q0 CO0002
( J; w0 f8 J/ T5 k7 v/ h9 U9 h! W2 z2 g#33=#1+2
#32=#3*2
#31=#1-#32
# y" x% _3 C) i/ m! W, |#30=#2-#32
#29=#5-#3
; }3 `& I& {' U7 B#28=0-#29*2
G0 X#33
1 r: L# s6 o& d) _5 j' ~% rG0 Z#30
! n' Z. W& J) ~+ W5 B3 j, w) R; RG1 X#31 F#4
( g  S) p8 G/ o/ F5 n4 eG2 W#28 R#29
G1 X#1
G0 X#33
M99

mcsino

3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
入口参数：#21，#23
0 j! {, y5 ]% s6 S9 TO003
$ V3 U4 A* G/ A5 h8 t( DG65 H23 P#101 Q#4120 R100；
5 o3 L2 Z3 g! c, u& @#102=2000+#101；  获取x向刀具磨损量
+ r8 C9 h4 _5 H2 r/ f8 j#103=2100+#101；  获取z向刀具磨损量
' v- B) u$ M5 H* X0 a! H% C#9102=#9102+#21；修改x向刀具磨损量
#9103=#9103+#23；修改z向刀具磨损量
/ W. ~& D+ h* p1 {! YT#4120                    ；更新刀补
M99；

mcsino

mcsino 发表于 2013-8-18 15:04
6 _& _8 k) W: d# K/ {3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
入口参数：#21，#23
5 a6 r, E3 B5 |/ F- }* _; \O003 ...

& Z& Z' T8 l' X, `5 U1 ^- E2 Q7 v
. j8 [7 s; L% n' A( r# J4)模块调用
! ^4 w" q7 d  F- x& a) `/ y假设1)需要在外径100，z向为10的地方加工一半径为15的半圆弧，切刀刀宽为3，R刀半径为6，进级量每转0.05mm，则加工程序参考如下
! \/ @7 u% Z6 N; DT0*0*      ;换切刀
, L# G- h/ h! ^: P! KG0 X120 Z2
5 B- A4 t  _, NG65 P001 A3 B30 C15 D0.05 E10 F100                      ||#1 切刀刀宽       A
                                                                                   ||#2 圆弧弦长       B
$ m  u! w7 A0 K4 T8 m$ G- Y                                                                                   ||#3 圆弧半径       C
+ z/ F2 }$ [$ [                                                                                   ||#7 进级量           D
                                                                                   ||#8 Z向圆弧起点  E
# f9 ?" T- Z3 \6 c                                                                                   ||#9 X向圆弧起点  F
G0 X*   Z*    ;退出到换刀安全距离
5 H+ R& @$ ?/ M9 A# nT0*0*      ;换R刀
5 L; B! o' u. Z6 \* \G0 X120 Z2
2 y" f5 R% l/ ZG65 P002 A100 B10 C6  I0.05 J15            ||#1 X向圆弧起点              A
                                                                 ||#2 Z向圆弧起点              B
! l* @3 F$ E8 K; K; r4 `3 i) O                                                                 ||#3 R刀半径                     C
+ l$ k+ Z( ?* V: H1 P                                                                 ||#4 F进级量                      I
                                                                 ||#5 需要加工的圆弧半径   J
: D# A: H4 \9 Q& M+ D6 B


  Z$ s/ g3 t, u1 C9 ~, R假设2)需要在外径200，z向为70的地方加工一半径为20的半圆弧，切刀刀宽为4，R刀半径为2，进级量为每转0.08mm，则加工程序参考如下
2 r- U7 V' U5 \9 I) D4 QT0*0*      ;换切刀
! d. v* Z( B) M* y" g7 _) kG0 X220 Z2
G65 P001 A4 B40 C20 D0.08 E70 F200                      ||#1 切刀刀宽       A
                                                                                   ||#2 圆弧弦长       B
                                                                                   ||#3 圆弧半径       C
# ~' ^! r) q9 i- O                                                                                   ||#7 进级量           D
                                                                                   ||#8 Z向圆弧起点  E
& r" A8 u# k9 Q6 {8 l                                                                                   ||#9 X向圆弧起点  F
2 c* R' G8 _9 y2 H  yG0 X*   Z*    ;退出到换刀安全距离
T0*0*      ;换R刀
G0 X120 Z2
5 f: e9 E- D/ @, k3 nG65 P002 A200 B70 C2  I0.08 J20           ||#1 X向圆弧起点              A
& G9 M+ q1 [7 b6 q- i6 m5 v                                                                 ||#2 Z向圆弧起点              B
$ Z) r, e. l, {5 X                                                                 ||#3 R刀半径                     C
                                                                 ||#4 F进级量                      I
0 \" }9 a( \7 m, T' M0 M# [                                                                 ||#5 需要加工的圆弧半径   J
# N7 P: |& j8 ]) M
% l  Y: u/ n7 f: C8 k/ H/ w
8 J. I" R- B7 G) W1 J' k0 [4 h  J' Y
/ z: E8 T2 o2 y, a

% x# B6 P1 A* S5 ?; T+ A! I

mjypc009

太累了吧，直接电脑编程省事，而且安全

祭奠那岁月

宏程序的主要用途之一  相同类型 相同工艺 修改几个赋值用同一程序做不同尺寸的工件 方便 高效

mcsino

mjypc009 发表于 2013-8-18 16:59
太累了吧，直接电脑编程省事，而且安全

直接电脑编应该也没有模块化来得快

onelee

认真学习了