分享法那科、西门子840D、海德汉iTNC530(640)高级后处理(2)

风浪越大鱼越贵

感谢分享

Apologize*

proc PB_CMD__check_block_G40 { } {
#=============================================================
# This custom command should return
#   1 : Output BLOCK
#   0 : No output

global mom_parent_group_name g41d
global mom_group_name
global mom_operation_name

if {$g41d == 1} {
if {[info exists mom_group_name]} {
   MOM_output_to_listing_device "**************************************************************
   操作提示您 : 该工序($mom_parent_group_name--->$mom_group_name--->$mom_operation_name)有半径补偿。
**************************************************************"
  set msg [MOM_display_message 工序:（$mom_parent_group_name--->$mom_group_name--->$mom_operation_name）有半径补偿。 后处理消息： I 继续后处理 中止后处理]
    switch $msg {
        1 {
            set offset_flag 1
        }
        2 {
            MOM_abort 中止
        }
    }
} elseif {[info exists mom_operation_name]} {
   MOM_output_to_listing_device "**************************************************************
   操作提示您 : 该工序($mom_operation_name)有半径补偿。
**************************************************************"
  set msg [MOM_display_message 工序:（$mom_operation_name）有半径补偿。 后处理消息： I 继续后处理 中止后处理]
    switch $msg {
        1 {
            set offset_flag 1
        }
        2 {
            MOM_abort 中止
        }
    }
}
return 1
} else {
return 0
}


}

兄弟 可以致指点吗 有酬谢   这段代码加了不起作用     

410469799

大佬。我用你的四轴出的程序做螺旋槽时，到A360和A1的时就是出现跳刀怎么回事？

cwdliqiang

为啥都那么优秀啊整得我就像个白痴一样啥都不懂

xlyou

410469799 发表于 2025-5-14 10:15
大佬。我用你的四轴出的程序做螺旋槽时，到A360和A1的时就是出现跳刀怎么回事？ ...

达到极限值时，刀具会退刀，也可以设置不退刀。

410469799

xlyou 发表于 2025-5-16 21:44
达到极限值时，刀具会退刀，也可以设置不退刀。

是怎么改的大佬。我后处理进去看了一下。我看别人的是360-0是可以的。你的这个我改了还是不行。还有就是你发的车铣复合外径打孔用C打孔出来R是不对的

陈博华

感谢分享

HUOBAO*

有没有海德汉BC轴后处理，可以发一个给我用用嘛，DMG50  ，谢谢

xlyou

410469799 发表于 2025-5-17 08:51
是怎么改的大佬。我后处理进去看了一下。我看别人的是360-0是可以的。你的这个我改了还是不行。还有就是 ...

能发截图吗？

xlyou

HUOBAO* 发表于 2025-5-17 16:44
有没有海德汉BC轴后处理，可以发一个给我用用嘛，DMG50  ，谢谢

把A改为B就可以了。