數(shù)控模塊化編程一一R刀車圓弧

mcsino

, }* w: [* M9 w' Q" ?
9 K# l- T% p4 N; j! J9 l5 Y由于經(jīng)常加工彎管壓輪模，其程序基本就是修改一下幾個固定值，最近因為又需要加工一批,，量比較大規(guī)格比較多，每種規(guī)格都是一件，如果做完一件修改一下程序，一來容易出錯,，二來效率也不高，所以想把程序模塊化,，加工不同零件只需調(diào)用模塊,，輸入必要參數(shù)即可，無需修改程序,，現(xiàn)把用切刀加工(輔助加工)以及R圓弧頭加工模塊(采用B型補償)及如何調(diào)用模塊附上,，有時間的話把程序流程圖一起附上，希望像我等初學者共同進步.

( y3 A7 G7 @3 u2 }" _, F1)切刀輔助加工模塊(
#1 切刀刀寬
; u6 [. u, a6 h- `#2 圓弧弦長
#3 圓弧半徑
#7 進級量
% z9 F; k4 v: E; N) S/ P+ }5 w#8 Z向圓弧起點
#9 X向圓弧起點
模塊入口參數(shù)（即調(diào)用此模塊需要輸入數(shù)據(jù)）：#1,，#2,，#3，#7,，#8,，#9

$ g6 ~3 B( J: S中間變量:#5,#6,#27，#28,，#29,#30,#31 ,#32
#29=0   
#30=#2-1
  b0 h) D: }" L' N# `. v' M#32=#2/2
6 f0 v2 M8 d+ I. h; B% H; }WHILE [#29<=#30]  DO1
9 ?" Q) I8 l3 y: n* n1 L#29=#29+#1*0.8
IF[ #29>#30] GOTO3
0 L# r9 r6 ?6 K5 b2 GIF[#29>#32] GOTO2
#27=#32-#29
3 D" E7 G/ G3 n: M9 PN1 #28=SQRT[#3*#3-#27*#27]
* ?$ z% D& E2 B2 I* [$ f#5=#8-#29-#1-1
#6=#9-#28*2
- I, }% f" n" E  G- S& k1 V6 v5 p#31=#9+2
G0 X#31
% {" [9 S+ q" X2 }G0 Z#5
4 E+ y$ _5 h6 I6 Q; J4 Q$ k4 J2 @G1 X#6 F#7
$ d1 }2 F7 B- I. h2 w( g& SG0 X#31
1 F! @8 X$ r& ^2 kGOTO3
N2 #27=#29-#32
  U# ~# c; f+ X$ I% Z  e/ X6 XGOTO1
N3 END1
% @$ ]5 ]! W$ v) \6 d% CM99

mcsino

: ^) l+ {- Q. `( O, x5 R9 k2)R刀加工圓弧采用B型補償，即采用刀心軌跡編程
#1 X向圓弧起點
+ h( G- z" k8 B2 I) B6 Z# f  j% G#2 Z向圓弧起點
+ i3 v: E/ M7 r#3 R刀半徑
# P% o9 d2 [8 {9 y: n- _( R0 Y#4 F進級量
#5 需要加工的圓弧半徑
" W' O/ y* \$ m3 Z模塊入口參數(shù)（即調(diào)用此模塊需要輸入數(shù)據(jù)）：#1,，#2,，#3，#4,，#5
中間變量：#28,，#29,#30,#31 ,#32,，#33
O0002
#33=#1+2
6 E+ e6 `7 B7 a2 L! K#32=#3*2
% W( x/ L2 v4 {$ V4 k#31=#1-#32
2 t) b; r; i- D7 {8 j9 V#30=#2-#32
& K' G' g* M4 }3 ]3 z#29=#5-#3
#28=0-#29*2
G0 X#33
+ j0 q# n0 Y7 p; z. aG0 Z#30
( g8 k; P- q0 pG1 X#31 F#4
2 i; @" w4 C- |& iG2 W#28 R#29
G1 X#1
# C% ]4 N$ v% a- A; VG0 X#33
M99

mcsino

3 j7 l: A9 Z4 V4 D/ T) v- |4 V$ d: i3) 如果R一次切削量過大，可以修改刀具磨損量,，進行多次重復切削,，修改刀補模塊
入口參數(shù)：#21，#23
6 g1 c6 `. U# w3 |( |O003
G65 H23 P#101 Q#4120 R100,；
#102=2000+#101；  獲取x向刀具磨損量
#103=2100+#101；  獲取z向刀具磨損量
+ d( V* s+ n4 [8 Y9 b7 w( Y. }  U#9102=#9102+#21,；修改x向刀具磨損量
#9103=#9103+#23,；修改z向刀具磨損量
$ g; l4 I! \7 r/ FT#4120                    ；更新刀補
M99,；
) r6 |9 K, x9 X  g  `3 r8 E

mcsino

mcsino 發(fā)表于 2013-8-18 15:04
7 v# y! d$ d1 }3) 如果R一次切削量過大,，可以修改刀具磨損量，進行多次重復切削,，修改刀補模塊
! t+ c, T" j/ p; {# v8 {5 v( b入口參數(shù)：#21,，#23
) \9 k6 e$ s+ B. D- x) OO003 ...

9 Z% G2 n; T6 v5 Y2 f
! x/ A1 m! h7 p' m' {( B) \9 d4)模塊調(diào)用
- b6 O8 v2 f" J5 @( ?/ `7 c- f% s假設1)需要在外徑100，z向為10的地方加工一半徑為15的半圓弧,，切刀刀寬為3,，R刀半徑為6，進級量每轉(zhuǎn)0.05mm,，則加工程序參考如下
T0*0*      ;換切刀
G0 X120 Z2
G65 P001 A3 B30 C15 D0.05 E10 F100                      ||#1 切刀刀寬       A
                                                                                   ||#2 圓弧弦長       B
' Q1 X; @0 r9 t5 ]( V                                                                                   ||#3 圓弧半徑       C
1 S" T* z# M, a7 s8 T                                                                                   ||#7 進級量           D
                                                                                   ||#8 Z向圓弧起點  E
                                                                                   ||#9 X向圓弧起點  F
G0 X*   Z*    ;退出到換刀安全距離
7 [) X* h3 }% W6 G! U3 `( V# K2 Q& wT0*0*      ;換R刀
G0 X120 Z2
2 _. ^) h% ^5 N1 ?/ \G65 P002 A100 B10 C6  I0.05 J15            ||#1 X向圓弧起點              A
$ N+ a" X6 F5 K; R, L$ @! G' Y* b                                                                 ||#2 Z向圓弧起點              B
                                                                 ||#3 R刀半徑                     C
                                                                 ||#4 F進級量                      I
                                                                 ||#5 需要加工的圓弧半徑   J
0 x3 \7 {7 d" R. l* N! X
  T0 v1 w, j4 @) Y8 W8 |- R
$ o! T* b7 Z* ^7 J5 c1 ^7 z
' E' ?1 z; i: R. k; Y5 ]) p假設2)需要在外徑200,，z向為70的地方加工一半徑為20的半圓弧，切刀刀寬為4,，R刀半徑為2,，進級量為每轉(zhuǎn)0.08mm，則加工程序參考如下
T0*0*      ;換切刀
G0 X220 Z2
/ B+ `# R2 F! n; Y# d: c4 ~$ g) GG65 P001 A4 B40 C20 D0.08 E70 F200                      ||#1 切刀刀寬       A
! G, R2 o2 \/ Z6 q) X' X/ _0 F- v                                                                                   ||#2 圓弧弦長       B
0 T6 T1 ?- A. P- u- t3 l                                                                                   ||#3 圓弧半徑       C
* I; K0 S3 S( h5 c& L0 u  n$ E                                                                                   ||#7 進級量           D
+ C- L. k/ X& h- b/ C: @2 P                                                                                   ||#8 Z向圓弧起點  E
8 {, d/ t: m; Q* i7 g; m                                                                                   ||#9 X向圓弧起點  F
' [. T. Y3 C; g; S, P% n' xG0 X*   Z*    ;退出到換刀安全距離
T0*0*      ;換R刀
- \% x; f$ O0 G1 D, n9 kG0 X120 Z2
. u4 w# {' K9 ]! nG65 P002 A200 B70 C2  I0.08 J20           ||#1 X向圓弧起點              A
* Y3 S: B: j4 W                                                                 ||#2 Z向圓弧起點              B
                                                                 ||#3 R刀半徑                     C
3 F6 H" g# Y5 S! R) E; A9 C0 p3 w                                                                 ||#4 F進級量                      I
                                                                 ||#5 需要加工的圓弧半徑   J


! X. L. r: N, d
/ ~! _5 _) g3 X5 r! ?

mjypc009

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

祭奠那歲月

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

mcsino

mjypc009 發(fā)表于 2013-8-18 16:59
4 N  U$ A; T0 J% p$ q2 F; S太累了吧，直接電腦編程省事,，而且安全

) {; R3 }( \) g5 }# ]/ Z直接電腦編應該也沒有模塊化來得快

onelee

認真學習了