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

mcsino

" }8 N/ b) T: Q. i0 ^  R9 K由于经常加工弯管压轮模，其程序基本就是修改一下几个固定值，最近因为又需要加工一批，量比较大规格比较多，每种规格都是一件，如果做完一件修改一下程序，一来容易出错，二来效率也不高，所以想把程序模块化，加工不同零件只需调用模块，输入必要参数即可，无需修改程序，现把用切刀加工(辅助加工)以及R圆弧头加工模块(采用B型补偿)及如何调用模块附上，有时间的话把程序流程图一起附上，希望像我等初学者共同进步.
2 d6 C& p9 K0 m% ~- n
2 Z# E  }. o3 e3 p* v8 x1)切刀辅助加工模块(
#1 切刀刀宽
  R: N# u; x! i/ A! `#2 圆弧弦长
#3 圆弧半径
2 X0 I" Q( R) G+ R( q#7 进级量
#8 Z向圆弧起点
#9 X向圆弧起点
模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#7，#8，#9

中间变量:#5,#6,#27，#28，#29,#30,#31 ,#32
#29=0   
#30=#2-1
#32=#2/2
WHILE [#29<=#30]  DO1
#29=#29+#1*0.8
; ~# p: ]( ~/ {- r- W* Z/ fIF[ #29>#30] GOTO3
IF[#29>#32] GOTO2
#27=#32-#29
9 K. g, f; C9 y* _( W7 h2 d7 N; \N1 #28=SQRT[#3*#3-#27*#27]
/ B$ A: W1 S4 A+ R& F#5=#8-#29-#1-1
* y6 D1 E  y  u#6=#9-#28*2
#31=#9+2
( N- P5 C  ?8 o) M- a5 |2 ?5 J  ]% UG0 X#31
G0 Z#5
1 k, t* g% x8 C. z, u* L# wG1 X#6 F#7
G0 X#31
GOTO3
0 b2 t- ?9 D; L) `5 EN2 #27=#29-#32
GOTO1
N3 END1
M99
& P& K1 `5 I& P! V, B; l
( D! X* W& ^9 B/ Z3 V

mcsino

- w/ {2 k. R" [; q+ A$ Z! q( b/ f2)R刀加工圆弧采用B型补偿，即采用刀心轨迹编程
( R; t5 n8 n. A- C( K#1 X向圆弧起点
#2 Z向圆弧起点
#3 R刀半径
#4 F进级量
#5 需要加工的圆弧半径
/ h" b: `5 g/ d9 p模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#4，#5
6 O7 F) e2 {% s' |! \, {" q中间变量：#28，#29,#30,#31 ,#32，#33
; U  L9 B7 B4 h$ E3 z+ _O0002
#33=#1+2
#32=#3*2
#31=#1-#32
; L2 c" X0 A2 N2 U1 W) a6 k#30=#2-#32
4 ~3 w- S, H% x& Z$ S1 \5 `#29=#5-#3
#28=0-#29*2
G0 X#33
; g0 H' T9 E' f+ U% y$ u# MG0 Z#30
* L- d6 \, A4 K: B2 p9 S2 U, BG1 X#31 F#4
G2 W#28 R#29
0 G! _6 d' X1 \! ]3 f3 e( C+ BG1 X#1
G0 X#33
M99

mcsino

  _* a6 ^# B* ?, z3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
) K. c& n6 \  `/ o# R* L入口参数：#21，#23
O003
" n$ R; ]( @: ?" ~' }G65 H23 P#101 Q#4120 R100；
#102=2000+#101；  获取x向刀具磨损量
/ b* @* `0 r/ s' x#103=2100+#101；  获取z向刀具磨损量
; H$ @. h4 h5 }: ^8 f#9102=#9102+#21；修改x向刀具磨损量
2 p$ K2 R) k  l" d1 a#9103=#9103+#23；修改z向刀具磨损量
" B) U1 j4 j8 AT#4120                    ；更新刀补
6 ~+ I! G& j3 e: u, D- Y! S$ R+ R  dM99；

mcsino

+ j0 t' O; u/ q+ J$ k$ J* `$ z8 S

mcsino 发表于 2013-8-18 15:04
. Q7 j& v9 T0 p8 O. b1 ]% B3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
入口参数：#21，#23
( F$ m  \& {* I1 W- _  ]! WO003 ...

$ m5 @% l! P, q2 A0 _: D: ]( Q* \
2 l/ G$ }5 }0 U% \& s; H5 {; O4)模块调用
假设1)需要在外径100，z向为10的地方加工一半径为15的半圆弧，切刀刀宽为3，R刀半径为6，进级量每转0.05mm，则加工程序参考如下
6 f6 q! y% _4 kT0*0*      ;换切刀
! s0 o% O! d! ]: d) T% l. P: nG0 X120 Z2
8 I5 A6 A" ?  |. OG65 P001 A3 B30 C15 D0.05 E10 F100                      ||#1 切刀刀宽       A
* z2 O9 c, R* @                                                                                   ||#2 圆弧弦长       B
                                                                                   ||#3 圆弧半径       C
                                                                                   ||#7 进级量           D
- y0 S# I  F5 d                                                                                   ||#8 Z向圆弧起点  E
                                                                                   ||#9 X向圆弧起点  F
G0 X*   Z*    ;退出到换刀安全距离
T0*0*      ;换R刀
G0 X120 Z2
G65 P002 A100 B10 C6  I0.05 J15            ||#1 X向圆弧起点              A
                                                                 ||#2 Z向圆弧起点              B
                                                                 ||#3 R刀半径                     C
                                                                 ||#4 F进级量                      I
% j" d' m/ g6 {6 w! d8 e( d* ?3 R                                                                 ||#5 需要加工的圆弧半径   J
: k# ]4 o) w, a

- _0 G. s& u- s& ~. l; }$ H
" u: U6 @2 F2 T& i6 j假设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
: j7 n: \+ K9 E; m# m8 e( c8 _* h                                                                                   ||#7 进级量           D
- z$ E0 g, t' A                                                                                   ||#8 Z向圆弧起点  E
                                                                                   ||#9 X向圆弧起点  F
1 |: F+ v9 ~! e8 lG0 X*   Z*    ;退出到换刀安全距离
4 D# P7 `% s0 @- U! ~' f3 [. H# cT0*0*      ;换R刀
G0 X120 Z2
, C8 i- W- j2 h( Y  iG65 P002 A200 B70 C2  I0.08 J20           ||#1 X向圆弧起点              A
                                                                 ||#2 Z向圆弧起点              B
                                                                 ||#3 R刀半径                     C
* q' ~  T, F4 |3 T& v) U8 X6 J9 l                                                                 ||#4 F进级量                      I
, Z2 A$ ^# a1 m5 Z/ u; V                                                                 ||#5 需要加工的圆弧半径   J


; c% O) e  D5 j6 P4 T  _, T8 y4 V



  [' N) B; K  \' f  F% Z

mjypc009

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

祭奠那岁月

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

mcsino

mjypc009 发表于 2013-8-18 16:59
: [) L$ ?$ @+ U$ z$ w; e. l太累了吧，直接电脑编程省事，而且安全

+ Q$ \" }: y% i$ c3 E9 w直接电脑编应该也没有模块化来得快

onelee

认真学习了