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

mcsino

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

1)切刀辅助加工模块(
#1 切刀刀宽
, {& f6 R4 r. J2 c+ l" X#2 圆弧弦长
8 E& e5 M6 c( i! y#3 圆弧半径
#7 进级量
#8 Z向圆弧起点
8 W4 ?$ U! L; i- s#9 X向圆弧起点
5 q# q2 G+ i; q& q2 f模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#7，#8，#9

中间变量:#5,#6,#27，#28，#29,#30,#31 ,#32
$ U; u7 e! I$ I2 N( G: O1 W#29=0   
+ j# K* U" L. L! J: V#30=#2-1
6 q0 j- i+ f( `5 O8 E: H#32=#2/2
8 r, |0 Y2 Y6 `  U3 FWHILE [#29<=#30]  DO1
#29=#29+#1*0.8
7 X. Z9 D4 b5 uIF[ #29>#30] GOTO3
! n: y* [6 I4 i- b: RIF[#29>#32] GOTO2
#27=#32-#29
N1 #28=SQRT[#3*#3-#27*#27]
#5=#8-#29-#1-1
$ q4 z4 F- r: \# \6 [- i) s- X( G#6=#9-#28*2
. h0 \( E4 H3 h, V#31=#9+2
G0 X#31
* R5 b- E- [1 Z# Q. ^7 t4 MG0 Z#5
G1 X#6 F#7
G0 X#31
( U* g( t* R" ?; FGOTO3
" w0 j5 s5 J- Z! gN2 #27=#29-#32
GOTO1
N3 END1
4 p8 b8 s' x+ Q" D* h8 LM99

mcsino

; N5 A7 ~/ T0 @! C4 c% |+ s8 b
3 _' y; E3 h. C, o2)R刀加工圆弧采用B型补偿，即采用刀心轨迹编程
#1 X向圆弧起点
9 s: E# ^- ?7 g$ z7 q#2 Z向圆弧起点
* M9 G% N. E) f9 n# F& c5 ^. H/ v) E# h#3 R刀半径
#4 F进级量
#5 需要加工的圆弧半径
模块入口参数（即调用此模块需要输入数据）：#1，#2，#3，#4，#5
中间变量：#28，#29,#30,#31 ,#32，#33
O0002
#33=#1+2
#32=#3*2
#31=#1-#32
#30=#2-#32
#29=#5-#3
) `( b6 H/ b, d6 ]  l#28=0-#29*2
G0 X#33
G0 Z#30
% o+ z6 T" j0 ^1 g$ T6 V1 BG1 X#31 F#4
  T7 g" n( Z% E+ f. _G2 W#28 R#29
7 z. [7 Q3 W& W8 t) T" _" dG1 X#1
- }# @# ]/ f+ I* ~5 A5 z6 y# gG0 X#33
M99

mcsino

3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
  N9 Z" x% K+ J+ w5 J入口参数：#21，#23
O003
G65 H23 P#101 Q#4120 R100；
#102=2000+#101；  获取x向刀具磨损量
- E# |, {9 K6 h4 `#103=2100+#101；  获取z向刀具磨损量
#9102=#9102+#21；修改x向刀具磨损量
#9103=#9103+#23；修改z向刀具磨损量
T#4120                    ；更新刀补
* a5 f6 w0 c  L6 n3 u+ Z/ U1 D+ FM99；

mcsino

mcsino 发表于 2013-8-18 15:04
3) 如果R一次切削量过大，可以修改刀具磨损量，进行多次重复切削，修改刀补模块
入口参数：#21，#23
2 H# q) H2 T; K( lO003 ...

4)模块调用
' h2 }- \, {2 Z/ j假设1)需要在外径100，z向为10的地方加工一半径为15的半圆弧，切刀刀宽为3，R刀半径为6，进级量每转0.05mm，则加工程序参考如下
T0*0*      ;换切刀
G0 X120 Z2
: `  \% r3 ?; V& C, O! Q; jG65 P001 A3 B30 C15 D0.05 E10 F100                      ||#1 切刀刀宽       A
                                                                                   ||#2 圆弧弦长       B
                                                                                   ||#3 圆弧半径       C
+ ]+ k8 S2 L8 M* q5 ~* O                                                                                   ||#7 进级量           D
+ l$ B2 g' z% P                                                                                   ||#8 Z向圆弧起点  E
& }0 n( ^+ n9 L  t' J* q2 _                                                                                   ||#9 X向圆弧起点  F
G0 X*   Z*    ;退出到换刀安全距离
T0*0*      ;换R刀
2 }8 I4 y7 h( CG0 X120 Z2
* @, o2 L: Y0 R. O3 ~7 p! r. SG65 P002 A100 B10 C6  I0.05 J15            ||#1 X向圆弧起点              A
4 g) l5 P7 F  q$ a/ \* }# P                                                                 ||#2 Z向圆弧起点              B
9 z- p$ g. s6 J( ~2 g3 V                                                                 ||#3 R刀半径                     C
                                                                 ||#4 F进级量                      I
                                                                 ||#5 需要加工的圆弧半径   J



1 V' i# v. Y0 l1 r3 b/ v假设2)需要在外径200，z向为70的地方加工一半径为20的半圆弧，切刀刀宽为4，R刀半径为2，进级量为每转0.08mm，则加工程序参考如下
T0*0*      ;换切刀
1 o) @  d0 k2 d1 j( @" n" cG0 X220 Z2
; a- [; Q3 o: a1 s5 ]G65 P001 A4 B40 C20 D0.08 E70 F200                      ||#1 切刀刀宽       A
                                                                                   ||#2 圆弧弦长       B
                                                                                   ||#3 圆弧半径       C
                                                                                   ||#7 进级量           D
: j  N1 |1 x& F                                                                                   ||#8 Z向圆弧起点  E
7 M* {+ k* \9 V; }# _0 s" i                                                                                   ||#9 X向圆弧起点  F
G0 X*   Z*    ;退出到换刀安全距离
T0*0*      ;换R刀
G0 X120 Z2
G65 P002 A200 B70 C2  I0.08 J20           ||#1 X向圆弧起点              A
" q" L4 B: ?6 i8 M/ |/ i" s                                                                 ||#2 Z向圆弧起点              B
                                                                 ||#3 R刀半径                     C
3 j" k# T& Y: q/ x                                                                 ||#4 F进级量                      I
                                                                 ||#5 需要加工的圆弧半径   J

2 I; \" u; ?/ H" _8 b  F
+ ?) w9 Y, D8 s! ]/ u0 F: Y


3 i) [7 G$ }/ [: e

mjypc009

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

祭奠那岁月

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

mcsino

mjypc009 发表于 2013-8-18 16:59
  S6 C0 {" |* p/ q+ Z% m& ^太累了吧，直接电脑编程省事，而且安全

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

onelee

认真学习了