|
发表于 2022-8-13 08:27:19
|
显示全部楼层
用记事本打开TCL文件
#=============================================================
proc PB_CMD_custom_command_7 { } {
#=============================================================
global a0 mom_out_angle_pos song4 suo4 miao locka mom_operation_type setsuo
if { $setsuo != 0 } { (删掉这行)
if { $setsuo != 0 && $mom_operation_type != "Cylinder Milling"} { (替换成这个,意思是如果操作类型等于孔铣则不输出M10,就少一个M10)
MOM_output_literal "M$song4"
}
if { $miao != 0 } {
MOM_output_literal "G04 X$miao"
}
set locka 0
}
#=============================================================
proc PB_CMD_custom_command_8 { } {
#=============================================================
global a0 mom_out_angle_pos song4 suo4 miao locka mom_operation_type opty setsuo
if { $mom_operation_type != "Cylinder Milling" } { (删掉红色字,原意思是操作类型不等于孔铣则初始移动都输出M11)
set a0 $mom_out_angle_pos(0)
if { $opty == 0 } {
if { $setsuo != 0 } {
MOM_output_literal "M$suo4"
}
if { $miao != 0 } {
MOM_output_literal "G04 X$miao"
}
set locka 1
}
}
}
#=============================================================
proc PB_CMD_custom_command_10 { } {
#=============================================================
global opty a0 mom_out_angle_pos song4 suo4 miao locka mom_operation_type setsuo
if { $mom_operation_type != "Cylinder Milling" } { (删掉红色字,原意思是操作类型不等于孔铣则子工序都输出M11)
if { $opty == 0 && $locka == 0 && $a0 != $mom_out_angle_pos(0) } {
if { $setsuo != 0 } {
MOM_output_literal "M$suo4"
}
if { $miao != 0 } {
MOM_output_literal "G04 X$miao"
}
set locka 1
set a0 $mom_out_angle_pos(0)
}
}
}
|
评分
-
查看全部评分
|