机械必威体育网址

找回密码
注册会员

QQ登录

只需一步,快速开始

搜索
查看: 4436 | 回复: 7
打印 上一主题 下一主题

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

[复制链接]
跳转到指定楼层
1#
发表于 2013-8-18 14:20:20 来自手机 | 只看该作者 回帖奖励 | 倒序浏览 | 阅读模式
本帖最后由 mcsino 于 2013-8-18 15:14 编辑
0 W0 _4 m3 I) ?2 B6 b/ I/ A" x/ U7 B
由于经常加工弯管压轮模,其程序基本就是修改一下几个固定值,最近因为又需要加工一批,量比较大规格比较多,每种规格都是一件,如果做完一件修改一下程序,一来容易出错,二来效率也不高,所以想把程序模块化,加工不同零件只需调用模块,输入必要参数即可,无需修改程序,现把用切刀加工(辅助加工)以及R圆弧头加工模块(采用B型补偿)及如何调用模块附上,有时间的话把程序流程图一起附上,希望像我等初学者共同进步.$ |+ w$ T0 d' y! e% n
3 ?& V( @5 o) a6 L$ s6 F
1)切刀辅助加工模块(1 [5 \: g8 `. r I5 e' A# y! I5 y
#1 切刀刀宽8 w \" }2 l3 V; O: b t- b
#2 圆弧弦长
1 ~# ~( @9 M1 ^% k% _4 l#3 圆弧半径
0 @$ P4 l( K& L#7 进级量
+ q3 I. Y/ M0 _/ o3 q0 q( ]! ?" d0 ]#8 Z向圆弧起点
5 X6 J8 r/ ~* r8 c. [2 y#9 X向圆弧起点& b0 v. L$ _) W' B, z9 \5 c1 i
模块入口参数(即调用此模块需要输入数据):#1,#2,#3,#7,#8,#9?% d6 U- f# ?5 A
. J/ a; y) k# \8 K/ ^. H
中间变量:#5,#6,#27,#28,#29,#30,#31 ,#32" X- D- c% s: @
#29=0) b4 F8 ]* ^9 M: i; X7 h7 y- o
#30=#2-1
- U* y+ K, o! p5 W#32=#2/2
9 D8 B0 T' G2 ~0 v6 [$ wWHILE [#29<=#30] DO1" U3 {- |+ b! M# Z- B
#29=#29+#1*0.8( D0 h$ M. v/ T+ |' `6 \8 [
IF[ #29>#30] GOTO3
& K8 N# }9 ~5 w9 I/ cIF[#29>#32] GOTO2# R L' p- |# N3 ?
#27=#32-#29( F6 i( S. L5 v* X, n
N1 #28=SQRT[#3*#3-#27*#27]
4 R, F2 U0 ?: e. X0 ^3 Y' Q8 H#5=#8-#29-#1-1
. g S" Y ?+ k( i( P) ]' G#6=#9-#28*2
+ t& {0 j! q& \( _& l1 U' f#31=#9+2
6 ^ K4 d9 i: G& y+ v+ S0 ?) L1 yG0 X#31
" T- T6 R. [9 |G0 Z#5
, j* L7 y( r3 _' b# t$ ?G1 X#6 F#78 q" `% y- _2 ?4 p7 w# n
G0 X#31
9 \' r$ o7 t8 e# N* k; K! ]: Q& i. [GOTO3
8 b9 s9 U2 e+ b/ i) t" RN2 #27=#29-#32
. J# E2 x% a8 ]* }* @GOTO19 e3 | ?! s# P0 _
N3 END1% F. w! @- b1 O
M99
) l/ |/ I/ b" P. j
- o& T- q. w4 k$ _) {3 J8 v! \
2#
楼主 | 发表于 2013-8-18 14:57:58 | 只看该作者
本帖最后由 mcsino 于 2013-8-18 15:38 编辑
; K) Z8 o# W8 U6 L1 \1 k1 V. W( v$ {: Y" X/ I, S
2)R刀加工圆弧采用B型补偿,即采用刀心轨迹编程
" C' R# A/ G v7 d#1 X向圆弧起点9 a$ T6 \# b5 b7 m7 j! K
#2 Z向圆弧起点
5 E; D7 k( O: ]- F( h/ i! g: @& P#3 R刀半径9 K9 n. p, W! S0 F" U
#4 F进级量4 t: H6 j1 H4 R
#5 需要加工的圆弧半径
' u- `( K: ~: @" Q, {3 h模块入口参数(即调用此模块需要输入数据):#1,#2,#3,#4,#5p+ }1 t2 E+ V- L4 K- Z
中间变量:#28,#29,#30,#31 ,#32,#33) J$ F" }3 C4 f
O0002
9 R; k6 R3 L# I6 y$ C#33=#1+2, x% S# a+ C% h6 t6 L: P: b+ _
#32=#3*2- H! `' ]; X& ^7 [/ X* u
#31=#1-#328 }; b( z. ^6 \1 N, [
#30=#2-#32
, q/ m4 T+ q8 G% G" i5 k#29=#5-#3
7 X6 o0 S& _$ U1 V6 L7 g- q& d. h#28=0-#29*22 G2 f. o$ T! F; d: z
G0 X#33& Y7 [ N5 C, o# C" q# T* l5 a3 p) k1 ]/ Y
G0 Z#30* B0 }) s, c0 z- K7 E) H
G1 X#31 F#4! G( g& |4 K9 U* l4 }; g% A
G2 W#28 R#29
* Y: i7 b4 z' Q! C# gG1 X#1
$ x6 |; _5 ^8 R) ]G0 X#33
" H; I2 y/ `$ Y# {; b" eM99
3#
楼主 | 发表于 2013-8-18 15:04:29 | 只看该作者
本帖最后由 mcsino 于 2013-8-18 15:41 编辑' b3 k, {# w$ I6 l$ T1 A3 m5 T

- s. ]) B T y5 T5 v+ o4 K3) 如果R一次切削量过大,可以修改刀具磨损量,进行多次重复切削,修改刀补模块
+ n: ?7 j9 l+ `3 n4 l# V1 ^) B入口参数:#21,#23! R5 m- c3 W5 }# v) m' d
O0034 T& S) ]' S3 a
G65 H23 P#101 Q#4120 R100;
, S. y9 c9 _) s4 s9 S#102=2000+#101; 获取x向刀具磨损量
9 i# l: g7 V7 O# g! _#103=2100+#101; 获取z向刀具磨损量
) n$ y4 @1 a. r7 O' E t; {! _#9102=#9102+#21;修改x向刀具磨损量
! U. M5 V0 ^# J, z1 S# ?* R8 K#9103=#9103+#23;修改z向刀具磨损量
4 z V9 [" z; t; @T#4120 ;更新刀补1 |. q) q+ ~/ Q; f3 A! G! Q
M99;8 M6 A% u/ @6 R
4#
楼主 | 发表于 2013-8-18 15:59:31 | 只看该作者
本帖最后由 mcsino 于 2013-8-18 16:07 编辑
, N* G. k: i7 j8 Y
mcsino 发表于 2013-8-18 15:04 / ~+ }, s2 I5 }8 {7 h
3) 如果R一次切削量过大,可以修改刀具磨损量,进行多次重复切削,修改刀补模块
* S* l# g% A0 d6 _4 g入口参数:#21,#23 6 W. ?7 q- n) k, T- P
O003 ...

& ]. P, @. m0 b% y9 H# p2 ?. K% f; n# {$ c9 g7 D3 i& y" ~
4)模块调用u: V- T3 ]+ B5 _' U4 o: }* b
假设1)需要在外径100,z向为10的地方加工一半径为15的半圆弧,切刀刀宽为3,R刀半径为6,进级量每转0.05mm,则加工程序参考如下
- v- \+ O; v6 X( B' iT0*0* ;换切刀
: v! J; k9 w+ C4 h2 F1 q% D* ?G0 X120 Z2
0 M, I; m5 _4 ~! RG65 P001 A3 B30 C15 D0.05 E10 F100 ||#1 切刀刀宽 A
5 m3 B7 K& ~; \7 p- a8 c||#2 圆弧弦长 B
# O( O: E! G7 X; H* Y9 {||#3 圆弧半径 C
4 ^% B) T) b( ?' b: v||#7 进级量 D1 F& p& ~* n# u( G& b i$ G) @' o
||#8 Z向圆弧起点 EK7 _& r* M8 y7 g- _
||#9 X向圆弧起点 F
. T6 ~- @8 @. B) H, z b* y7 qG0 X* Z* ;退出到换刀安全距离
$ Q4 b3 _ ?( \* ^, ^T0*0* ;换R刀! z, i$ ^' z0 d8 J
G0 X120 Z2
4 m7 s% f' i/ vG65 P002 A100 B10 C6 I0.05 J15 ||#1 X向圆弧起点 A
# @# l( S! a, h; I9 i! L5 Y||#2 Z向圆弧起点 B
- T% t) l( u' c# E* N% j$ \( b% z, r# S||#3 R刀半径 C
$ o4 G+ l7 w4 L||#4 F进级量 I) k* I# @& _" T" p( m+ A: P
||#5 需要加工的圆弧半径 J, l: N1 ?5 o) x/ G% W

7 h. r" ]2 \6 r. [1 A# l" h! y
( [3 {8 B; U. A! U5 L/ x& Q3 @
1 q* D5 u8 L3 Z1 d; n假设2)需要在外径200,z向为70的地方加工一半径为20的半圆弧,切刀刀宽为4,R刀半径为2,进级量为每转0.08mm,则加工程序参考如下9 N9 N: Z' x6 I
T0*0* ;换切刀8 H' H# d7 x. a; P5 f# y
G0 X220 Z2
! b$ D1 [; s2 r* DG65 P001 A4 B40 C20 D0.08 E70 F200 ||#1 切刀刀宽 A
. v4 T2 g* S: F9 D8 R||#2 圆弧弦长 B
: N2 [' M4 U# ]" ~/ B7 l6 M2 J||#3 圆弧半径 C3 R* d& O& k1 g; U: E- x
||#7 进级量 D5 L" b# E! w O0 _9 @( ?
||#8 Z向圆弧起点 E
0 I+ }/ J6 e' F S2 m9 U||#9 X向圆弧起点 F7 ?) I, `* {- U' _1 p* @) F% F
G0 X* Z* ;退出到换刀安全距离5 _' B# S, T+ x4 F- [* Z
T0*0* ;换R刀. S6 y. `2 r; m' w( k$ ?
G0 X120 Z2
4 l. r3 y) o7 R, D; gG65 P002 A200 B70 C2 I0.08 J20 ||#1 X向圆弧起点 A! P f! E. F. V- o5 _) z, }
||#2 Z向圆弧起点 B) P2 l) V, e' q7 y
||#3 R刀半径 C- C2 |) E$ C! Q2 q7 o
||#4 F进级量 I6 J5 K8 t4 H1 o* A
||#5 需要加工的圆弧半径 J
/ ~4 }1 o' x4 z0 g; q
% d- Y( z- X$ @3 h
0 s) ]6 G3 C/ S. O, F- ]! o, }$ D* N# g8 { a
0 H9 m, l1 Q$ r' M7 P) ^+ e8 e0 W
5 K: v0 K7 G# O/ [, v9 B
* Y8 o* h2 `: @2 m! S0 ~9 x
5#
发表于 2013-8-18 16:59:50 | 只看该作者
太累了吧,直接电脑编程省事,而且安全
6#
发表于 2013-8-18 19:42:48 | 只看该作者
宏程序的主要用途之一 相同类型 相同工艺 修改几个赋值用同一程序做不同尺寸的工件 方便 高效
7#
楼主 | 发表于 2013-8-18 22:55:18 来自手机 | 只看该作者
mjypc009 发表于 2013-8-18 16:59 3 m U+ k2 l+ j; I
太累了吧,直接电脑编程省事,而且安全

D+ Z; C9 u% w) O3 G直接电脑编应该也没有模块化来得快
8#
发表于 2013-8-19 10:28:38 | 只看该作者
认真学习了
您需要登录后才可以回帖 登录| 注册会员

本版积分规则

小黑屋|手机版|Archiver|机械必威体育网址(京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号)

GMT+8, 2024-4-29 02:48, Processed in 0.054918 second(s), 16 queries , Gzip On.

Powered byDiscuz!X3.4Licensed

? 2001-2017Comsenz Inc.

快速回复 返回顶部 返回列表