程序头：BEGIN PGM abcd MM
呼叫刀具：TOOL CALL 1 Z S2500 F3000
启动自动对刀(本例是以对刀器为例)
TCH PROBE 483 MEASURE TOOL ~
Q340=+1 ; CHECK~
Q260=+100 ; CLEARANCE HEIGHT
Q341=+0 ; PROBING THE TEETH
快速抬刀到最高点：M140 MB MAX
重新调用刀具：
TOOL CALL 1 Z S3000 F3000
调用 工件坐标：
CYCL DEF 247 DATUM SETTING ~
Q339=+1 ;DATUM NUMBER
为当前坐标号
Q339=+1 +1
设定公差
CYCL DEF 32.0 TOLERANCE
T1为前刀号
CYCL DEF 32.1 T1
设定暂停时间 (检查是否异常) (视情况而定)
CYCL DEF 9.0 DWELL TIME
DWELL3为前暂停时间
CYCL DEF 9.1 DWELL3
启动主轴
M3
M7
直线快速移动
L X+0Y+0FMAX
L Z+0
循环程序头
LBL 1
I为增量坐标
L IZ-0.5 F500
直线进给
L X+10, F3000
圆弧进给(DR+为逆时针方向进给)
CR X20, Y0, R5 DR+
X轴直线进给
L X25
圆弧进给
CR X+30, Y+5 R5 DR+
Y轴直线进给
L Y+10
X轴直线进给
L X+37,5
倒圆角(也相当走R角)
RND R2,5 F800
倒斜角(按照交点长度进行倒角)
CHF 2,5 F800
与指定终点相切圆弧
CT X25, Y30, DR+
圆弧进给(DR-为顺时针方向进给)
CR X+10, Y30, R5 DR-
圆弧圆心
CC X5, Y25
圆弧终点坐标
C X0, Y25, DR+
循环程序尾(REP10为循环次数)
CALL LBL 1 REP10
给了进给率(防止的特殊情况下拉伤表面)
L Z5,0 F3000
快速抬刀到最高点
M140 MB MAX
停止主轴
M5
停止所用冷却
M9
程序结束END PGM abed MM程序尾(相当于我们G码"%")
STOP M30
|
