分享通用的去掉多余角度的四轴、五轴联动UG后处理

冬天的飞雪

感谢楼主的分享！

hp512

我先下载试试上机如何//

CAM小菜

Bridge_︻︻︻︻ 发表于 2020-4-11 15:49
攻丝模式一直不能用，请高手解答，谢谢！

我有修改好代码

CAM小菜

hp512 发表于 2020-4-11 20:24
我先下载试试上机如何//

螺旋进刀有问题，注意别装机了

CAM小菜

Bridge_︻︻︻︻ 发表于 2020-4-11 15:49
攻丝模式一直不能用，请高手解答，谢谢！

  global cycle_init_flag
  global mom_cycle_rapid_to mom_cycle_retract_to
  global mom_tool_pitch ff fh fp fm1 S1
  global mom_parent_group_name afterG95
  global mom_spindle_speed
  global mom_group_name
  global mom_tool_type
  global feed
  global feed_mode
  global mom_spindle_rpm
# if it's the first hole, force output the hole parameters
  if { [info exists cycle_init_flag] && [string match "TRUE" $cycle_init_flag] } {
      MOM_force once X Y Z R cycle_dwell cycle_step G_return G_motion F tap_string cycle_orient user_tapF Q_tap S
      if {[string match "Tap" $mom_tool_type ]} {
      set afterG95 1
      if {![info exists mom_tool_pitch ]} {
      set mom_tool_pitch 0.0
      }
      set fh [expr $mom_tool_pitch*$mom_spindle_speed]
      set S1 [format "%.0f" $mom_spindle_speed]
      if { [info exists fm1] } {
      set ff [ format "%.2f" $mom_tool_pitch ]
      MOM_output_literal ""
      } else {
      set ff [ format "%.1f" $fh ]
#      MOM_output_literal "/ M29 S$S1"
      }
      } else {
      if {[string match "*PR" $feed_mode]} {
      set ff [expr $feed*$mom_spindle_rpm]
      } else {
      set ff $feed
      }
      MOM_output_literal ""
    }
  }

# if retract move has been output for last hole, force output the hole parameters
# for next hole
  if { [EQ_is_lt $mom_cycle_rapid_to $mom_cycle_retract_to] } {
      MOM_force once X Y Z R cycle_dwell cycle_step G_return G_motion F tap_string cycle_orient user_tapF Q_tap S
  }

1196095169*

CAM小菜 发表于 2020-4-13 13:06
我有修改好代码

大师可以共享一下改好的后处理吗  谢谢了

1196095169*

谢谢了支持一下楼主无私奉献的精神

1196095169*

谢谢了支持一下   楼主可以再完善一下就更完美了  四轴A

猛禽fdq

楼主你分享的后处理解压提示已损坏

1196095169*

选择实体边缘螺旋铣出G06代码
线加工输出G01