发布于 2004-11-04 22:33:45
0楼
补充一下,如果你对FULL圆不了解,可以参考我写的加工一个环形槽的子程序来看看。
这个程序是我自己编写的,在SIEMENS840D上面已经加工过了好个阀体了,没有问题的说。
你自己研究一下吧,如果你是840D的系统,可以拿去直接使用的,没有问题。
使用注意:我所假设的槽位于零件的最断面,不包括止口深度什么的。在退Z的时候,如果Z15小了,你可以加大,以防止干涉。这是根据我以前负责的产品写的,有时候具体情况要具体修改一下,我没有写成全参数化的了。当时偷懒了一下,其实可以写成CYCLE那种形式的,但是我没有,你要注意了。
===================
%_N_XHC_SPF
;$PATH=/_N_SPF_DIR
PROC HUAN_XING_CAO(REAL DA_JING,REAL XIAO_JING,REAL CAO_KUAN) SAVE
;MUST DEFINE R90,R91,R92,R93,R94,R95,D1,D2
;D1 FOR DA_JING
;D2 FOR XIAO_JING
;R90 R91 IS THE HOLE'S CENTER PLACE
;R92 IS THE HUAN_XING_CAO DEEPTH
DEF REAL DA_JING,XIAO_JING,CAO_KUAN
IF (CAO_KUAN/2)<$A_TOOLR
MSG("There is a wrong ! Tool_Radius is bigger than a half of cao_kuan !")
M0
M2
ELSE
D1 ;FOR DA_JING
S=R93 M3
M8
G0 X=R90 Y=R91
Z15
G1 G42 Y=IC(DA_JING/2) F=R95
Z=AC(-R92)
G2 G64 I=0 J=-DA_JING/2
G0 Z15
G0 G40 X=R90 Y=R91
D0
D2 ;FOR XIAO_JING
G1 G41 Y=IC(XIAO_JING/2) F=R95
Z=AC(-R92)
G2 G64 I=0 J=-XIAO_JING/2
G0 Z15
G0 G40 X=R90 Y=R91
D0
D1
M5
M9
STOPRE
ENDIF
M17