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

mcsino

7 D0 T8 C7 W, n
由于经常加工弯管压轮模，其程序基本就是修改一下几个固定值，最近因为又需要加工一批，量比较大规格比较多，每种规格都是一件，如果做完一件修改一下程序，一来容易出错，二来效率也不高，所以想把程序模块化，加工不同零件只需调用模块，输入必要参数即可，无需修改程序，现把用切刀加工(辅助加工)以及R圆弧头加工模块(采用B型补偿)及如何调用模块附上，有时间的话把程序流程图一起附上，希望像我等初学者共同进步.
/ h$ R; W) `" v' S& c  h' _
1)切刀辅助加工模块(
3 @1 o0 S" d0 C) S#1 切刀刀宽
#2 圆弧弦长
* C. d0 u9 j" P( a: d0 P+ m#3 圆弧半径
  t/ e* P8 R8 u' d1 N* f#7 进级量
3 Z) p+ ^9 K$ m#8 Z向圆弧起点
1 d6 Y2 u2 J7 j  y#9 X向圆弧起点
模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#7，#8，#9

% J) G5 R! r! }' m; a' H( M% J中间变量:#5,#6,#27，#28，#29,#30,#31 ,#32
$ M: L( j3 h/ r# m#29=0   
#30=#2-1
#32=#2/2
. d/ i* f7 A3 a  Q: V. HWHILE [#29<=#30]  DO1
#29=#29+#1*0.8
IF[ #29>#30] GOTO3
: m& m& F, ?' W6 mIF[#29>#32] GOTO2
#27=#32-#29
N1 #28=SQRT[#3*#3-#27*#27]
# l' ~. {" F" n#5=#8-#29-#1-1
#6=#9-#28*2
: l$ R/ o5 W% ]& Q, z#31=#9+2
, y/ s. K( x7 a. WG0 X#31
; S' J) r4 Q- ~0 ~% H" ~; S8 V7 c/ \G0 Z#5
G1 X#6 F#7
G0 X#31
4 Z' d9 W* _* L$ v1 G7 I, MGOTO3
N2 #27=#29-#32
* T  n% x  B  y: SGOTO1
2 A' w* q8 _# L7 f% u  eN3 END1
4 ]4 G6 ?' V) N7 [M99

* M; V% z, u4 ]

mcsino

( |: U* m# I( p9 z$ ^
2)R刀加工圆弧采用B型补偿，即采用刀心轨迹编程
/ E# Y5 n6 A  z$ Y, W8 e) T#1 X向圆弧起点
#2 Z向圆弧起点
2 x; l8 q% n6 I: Z6 r#3 R刀半径
2 ~& H& H/ s& M8 u#4 F进级量
#5 需要加工的圆弧半径
; y2 b* o" U6 f. N; b模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#4，#5
中间变量：#28，#29,#30,#31 ,#32，#33
O0002
7 Y# }$ }: u' w! J& ~0 K- o, I4 k#33=#1+2
! ?2 z6 A0 A: P4 k% c#32=#3*2
#31=#1-#32
& r2 K* J' n! n#30=#2-#32
#29=#5-#3
# _( W( x2 y/ M6 b0 k#28=0-#29*2
G0 X#33
G0 Z#30
G1 X#31 F#4
G2 W#28 R#29
2 h6 i' k6 }1 I  m/ N3 Q/ J) OG1 X#1
3 L( T2 N* e! WG0 X#33
M99

mcsino

3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
2 ~  T  r. x2 e; l+ N  E9 b, d入口参数：#21，#23
O003
G65 H23 P#101 Q#4120 R100；
& i& d5 C  n3 P! A' \6 G#102=2000+#101；  获取x向刀具磨损量
8 k6 Z6 y% U5 @8 O  r#103=2100+#101；  获取z向刀具磨损量
#9102=#9102+#21；修改x向刀具磨损量
#9103=#9103+#23；修改z向刀具磨损量
1 l2 p3 ?0 W: X* @T#4120                    ；更新刀补
8 i$ t6 [4 @7 b& D- ~$ C/ GM99；

mcsino

mcsino 发表于 2013-8-18 15:04
3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
" e% y/ |1 M7 e% Q; d8 K: A入口参数：#21，#23
7 ]" Q, x. _  {6 I# Q8 hO003 ...

$ x/ j$ l0 w7 M5 {, o$ C
4)模块调用
* r) _/ j/ T1 b, m% W$ a假设1)需要在外径100，z向为10的地方加工一半径为15的半圆弧，切刀刀宽为3，R刀半径为6，进级量每转0.05mm，则加工程序参考如下
T0*0*      ;换切刀
G0 X120 Z2
! Y1 x/ |# D* cG65 P001 A3 B30 C15 D0.05 E10 F100                      ||#1 切刀刀宽       A
, F6 S) Y9 }* a& p1 d                                                                                   ||#2 圆弧弦长       B
                                                                                   ||#3 圆弧半径       C
5 a% M. b% p8 V3 m1 z                                                                                   ||#7 进级量           D
                                                                                   ||#8 Z向圆弧起点  E
& N$ n( C0 b3 P. Z2 I  w3 r                                                                                   ||#9 X向圆弧起点  F
G0 X*   Z*    ;退出到换刀安全距离
T0*0*      ;换R刀
0 l& a) O+ l5 ?9 W" bG0 X120 Z2
G65 P002 A100 B10 C6  I0.05 J15            ||#1 X向圆弧起点              A
                                                                 ||#2 Z向圆弧起点              B
                                                                 ||#3 R刀半径                     C
                                                                 ||#4 F进级量                      I
! v9 ]& Q7 h: S7 T1 n- h1 l" @                                                                 ||#5 需要加工的圆弧半径   J

4 ^2 I. L3 p% H! o$ X* I: _

假设2)需要在外径200，z向为70的地方加工一半径为20的半圆弧，切刀刀宽为4，R刀半径为2，进级量为每转0.08mm，则加工程序参考如下
T0*0*      ;换切刀
G0 X220 Z2
G65 P001 A4 B40 C20 D0.08 E70 F200                      ||#1 切刀刀宽       A
                                                                                   ||#2 圆弧弦长       B
                                                                                   ||#3 圆弧半径       C
3 ~+ U: i/ F; s) T3 ~/ T" ], T                                                                                   ||#7 进级量           D
                                                                                   ||#8 Z向圆弧起点  E
) B/ {$ A/ }" R7 Y* }                                                                                   ||#9 X向圆弧起点  F
  R5 H: d. {* p  O' ]G0 X*   Z*    ;退出到换刀安全距离
% q+ E3 \8 \: DT0*0*      ;换R刀
G0 X120 Z2
& Z5 b1 ^" i) r* tG65 P002 A200 B70 C2  I0.08 J20           ||#1 X向圆弧起点              A
                                                                 ||#2 Z向圆弧起点              B
4 A7 H; ]4 ]$ g8 \. x9 C                                                                 ||#3 R刀半径                     C
% z0 X/ R# y: u4 y, S" L1 {                                                                 ||#4 F进级量                      I
  @! |6 U6 e( t2 ?0 C4 w- m                                                                 ||#5 需要加工的圆弧半径   J

/ S# P& |$ f; e: Z$ T3 |


' u( j/ A& d$ Y6 B

8 ~3 T1 ]! V  X

mjypc009

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

祭奠那岁月

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

mcsino

mjypc009 发表于 2013-8-18 16:59
& E, T4 X+ ^, O5 @太累了吧，直接电脑编程省事，而且安全

7 k: l  d0 i- N4 f$ O( N* A. k4 ^直接电脑编应该也没有模块化来得快

onelee

认真学习了