|
|
发表于 2023-8-31 16:38:58
|
显示全部楼层
满足自动换刀 第一后处理是如果处理不同刀具号的 第二机床是如何识别不同刀具号的
举个例子 后处理和机床以T1D1的方式来识别的 那么你在编程的时候 就要把刀号和机床刀位号对应好
自动合并是简单的事就是把刀具路径串在一起
DIALOGS MESSAGE OFF
DIALOGS ERROR OFF
GRAPHICS LOCK
DEACTIVATE Workplane
UNDRAW Workplane "#"
STRING LIST Workplane=EXTRACT(FOLDER("Workplane"),'name')
int t = INPUT CHOICE $Workplane "选择坐标"
ACTIVATE Workplane $Workplane[t]
CREATE NCPROGRAM ; EDIT NCPROGRAM ; QUIT FORM NCTOOLPATH
NCTOOLPATH ACCEPT FORM ACCEPT NCTOOLPATHLIST FORM ACCEPT NCTOOLLIST
String ActivateTh=basename(pathname('Toolpath',name))
if ActivateTh=='' {
MESSAGE WARN "老板请激活刀路"
MACRO ABORT ALL
GRAPHICS UNLOCK
DIALOGS MESSAGE ON
DIALOGS ERROR ON
}
STRING Tpn = Toolpath.name
ACTIVATE NCProgram $Tpn
macro 'D:\work\pmill2\XuDa\AdditionVIP\DiaLog\mergeNC.mac'
DEACTIVATE NCProgram
macro的目标mac文件就是获取定义刀具路径列表的
原理就这么一个原理 再稍微串联一下 改一下代码就好了 |
|
