數控模塊化編程一一R刀車圓弧

mcsino

5 V0 E0 s$ Y+ x0 y由于經常加工彎管壓輪模，其程序基本就是修改一下幾個固定值，最近因為又需要加工一批，量比較大規格比較多，每種規格都是一件，如果做完一件修改一下程序，一來容易出錯，二來效率也不高，所以想把程序模塊化，加工不同零件只需調用模塊，輸入必要參數即可，無需修改程序，現把用切刀加工(輔助加工)以及R圓弧頭加工模塊(采用B型補償)及如何調用模塊附上，有時間的話把程序流程圖一起附上，希望像我等初學者共同進步.
/ s- z8 z4 e/ M
  t, E, A( c& J  E! q: r7 r1)切刀輔助加工模塊(
3 s  e; q2 [  o* P' G#1 切刀刀寬
#2 圓弧弦長
#3 圓弧半徑
#7 進級量
  {) Z" [4 K8 \#8 Z向圓弧起點
#9 X向圓弧起點
模塊入口參數（即調用此模塊需要輸入數據）：#1，#2，#3，#7，#8，#9
) b% L! q/ C; x0 o5 v0 f  F
" C# ^3 X- ?, S5 ~% B中間變量:#5,#6,#27，#28，#29,#30,#31 ,#32
/ ~6 U5 ~! p& x! I#29=0   
#30=#2-1
#32=#2/2
WHILE [#29<=#30]  DO1
#29=#29+#1*0.8
) E& Q" t! g8 l( h& ]2 s! {$ qIF[ #29>#30] GOTO3
IF[#29>#32] GOTO2
#27=#32-#29
) O7 p8 O. I4 D% D5 TN1 #28=SQRT[#3*#3-#27*#27]
( f! `; u' P% z! ]! N#5=#8-#29-#1-1
#6=#9-#28*2
#31=#9+2
7 w6 S- j8 n% K$ H4 x% kG0 X#31
G0 Z#5
" o+ N* `2 c, q. I& |6 j. x3 sG1 X#6 F#7
7 d* _  B8 W  CG0 X#31
; N" v; V, _6 X0 G! hGOTO3
N2 #27=#29-#32
GOTO1
N3 END1
0 A$ d" Z8 e3 \# tM99
0 s2 @% A, ?$ W6 O4 G1 S/ y% o9 Q
7 J% _8 b+ p$ A9 E) R" i

mcsino

, p+ V) |$ w0 s: \  m8 C
2)R刀加工圓弧采用B型補償，即采用刀心軌跡編程
5 Y9 Z2 Z( p- g5 V$ {* e! Y0 I3 l#1 X向圓弧起點
8 i% X3 n- H( j/ \  d#2 Z向圓弧起點
, X: `$ [" U. ^" b' t+ {#3 R刀半徑
#4 F進級量
#5 需要加工的圓弧半徑
模塊入口參數（即調用此模塊需要輸入數據）：#1，#2，#3，#4，#5
% b5 x7 u9 n' Q7 d; x- @" I; J8 t中間變量：#28，#29,#30,#31 ,#32，#33
O0002
  O/ C: [0 n# P& V: O" h#33=#1+2
#32=#3*2
+ i" ]/ i) a$ b: @5 a#31=#1-#32
#30=#2-#32
#29=#5-#3
#28=0-#29*2
G0 X#33
# Z+ @' C( l) UG0 Z#30
G1 X#31 F#4
& T) |5 L% X) y: w/ f3 Y# RG2 W#28 R#29
" h- M( t4 G7 u; H6 ~G1 X#1
* U, S! c5 {. [; f3 X* ?G0 X#33
M99

mcsino

* O# O7 E. ^- o# s& P  O5 E3 T
" H' b! Z8 G) `& d3) 如果R一次切削量過大，可以修改刀具磨損量，進行多次重復切削，修改刀補模塊
3 T/ o/ `9 q- V$ w入口參數：#21，#23
0 v9 b- y) I$ I$ y& A9 oO003
G65 H23 P#101 Q#4120 R100；
#102=2000+#101；  獲取x向刀具磨損量
#103=2100+#101；  獲取z向刀具磨損量
#9102=#9102+#21；修改x向刀具磨損量
#9103=#9103+#23；修改z向刀具磨損量
T#4120                    ；更新刀補
M99；
! \8 b* P% h. m, _  h

mcsino

9 a9 ~8 I! x$ y1 @. h: X( h8 @/ X

mcsino 發表于 2013-8-18 15:04
3) 如果R一次切削量過大，可以修改刀具磨損量，進行多次重復切削，修改刀補模塊
% d; l1 J% r9 D+ n/ z7 u入口參數：#21，#23
O003 ...

. I1 p) Q3 s. L# g# `* Y
  x$ q+ T/ C; K  u$ C# Y' M4)模塊調用
8 _1 X+ F7 i2 O假設1)需要在外徑100，z向為10的地方加工一半徑為15的半圓弧，切刀刀寬為3，R刀半徑為6，進級量每轉0.05mm，則加工程序參考如下
  S" A8 d7 W/ P+ E3 P  \5 k" ^T0*0*      ;換切刀
5 d) Q& _- s# ~9 @G0 X120 Z2
G65 P001 A3 B30 C15 D0.05 E10 F100                      ||#1 切刀刀寬       A
0 J1 s. P' T, ~$ P& {3 u' q$ t" `                                                                                   ||#2 圓弧弦長       B
                                                                                   ||#3 圓弧半徑       C
                                                                                   ||#7 進級量           D
, n+ [/ x5 x, O9 O- I( B( A                                                                                   ||#8 Z向圓弧起點  E
2 r7 p( |7 O; h4 M6 h                                                                                   ||#9 X向圓弧起點  F
6 P: ?+ r4 c0 x  S: x2 iG0 X*   Z*    ;退出到換刀安全距離
T0*0*      ;換R刀
G0 X120 Z2
6 p% ~  I" G4 x. Q7 wG65 P002 A100 B10 C6  I0.05 J15            ||#1 X向圓弧起點              A
                                                                 ||#2 Z向圓弧起點              B
/ y6 }2 s* B# K! r* ?                                                                 ||#3 R刀半徑                     C
8 G, }, f) E" D3 l3 a                                                                 ||#4 F進級量                      I
                                                                 ||#5 需要加工的圓弧半徑   J
6 q" |" H( j: Y* j; F* ~


假設2)需要在外徑200，z向為70的地方加工一半徑為20的半圓弧，切刀刀寬為4，R刀半徑為2，進級量為每轉0.08mm，則加工程序參考如下
8 m% l7 K' b& T0 _! VT0*0*      ;換切刀
G0 X220 Z2
& U; |  d3 `: N3 m4 G6 n, AG65 P001 A4 B40 C20 D0.08 E70 F200                      ||#1 切刀刀寬       A
                                                                                   ||#2 圓弧弦長       B
: @7 y0 S* d# ~) V6 g$ ^. Y% U; T                                                                                   ||#3 圓弧半徑       C
0 m  o& P7 M% J. U- u# I( [' N                                                                                   ||#7 進級量           D
                                                                                   ||#8 Z向圓弧起點  E
                                                                                   ||#9 X向圓弧起點  F
G0 X*   Z*    ;退出到換刀安全距離
( D! t/ }2 S8 |* z9 G' c1 jT0*0*      ;換R刀
G0 X120 Z2
G65 P002 A200 B70 C2  I0.08 J20           ||#1 X向圓弧起點              A
                                                                 ||#2 Z向圓弧起點              B
                                                                 ||#3 R刀半徑                     C
( n6 {2 h' _- \+ C# h0 t                                                                 ||#4 F進級量                      I
                                                                 ||#5 需要加工的圓弧半徑   J
% a+ U6 M& Y7 \+ I
( q% p& w5 G* K; x/ D9 p* a

( M, A  o5 P' W
! H, y: e& e- u1 F5 ?& O; N
4 W; }) m  f( d: ~

mjypc009

太累了吧，直接電腦編程省事，而且安全

祭奠那歲月

宏程序的主要用途之一  相同類型 相同工藝 修改幾個賦值用同一程序做不同尺寸的工件 方便 高效

mcsino

mjypc009 發表于 2013-8-18 16:59
2 g1 ^" s: d- H1 b! O太累了吧，直接電腦編程省事，而且安全

. C; z2 V7 D& I- I+ }2 O直接電腦編應該也沒有模塊化來得快

onelee

認真學習了