UG哈斯三菱法兰克三轴四轴通用后处理刀具列表各种友情提示让你编程无忧无虑

天蓝123 · 发表于 2019-6-5 20:30

大师们，在那下载的啊

lureman · 发表于 2019-6-6 08:52

下载学习一下。不错的材料。

tmkfnpl · 发表于 2019-6-6 09:14

更好好好好好

lqcyl · 发表于 2019-6-6 09:24

米兰圣徒 · 发表于 2019-6-6 09:28

好好学习天天向上

w315098686 · 发表于 2019-6-9 01:56

求下载求下载不甚感激

二當家 · 发表于 2019-6-11 23:27

谢谢分享！

至525021 · 发表于 2019-6-12 10:53

谢谢楼主分享

xubinggang · 发表于 2019-6-13 09:04

#=============================================================
proc PB_CMD_Zmax_Zmin_start_of_program { } {
#=============================================================
   #
   # This custom command may be used to check for the maximum
   # travel for each axis.  A warning will be output for each
   # GOTO that exceeds the limits.  It does not check for
   # parallel axis such as Z and W.  It does not account for
   # any modifications done by the user to mom_pos before the
   # coordinates are output.
   #
   #
   # Import and call this command in PB_CMD_before_motion.
   #
   #
      global mom_sys_max_travel
      global mom_sys_min_travel
      global mom_kin_x_axis_limit
      global mom_kin_y_axis_limit
      global mom_kin_z_axis_limit
      global mom_pos
      global mom_cycle_rapid_to_pos
      global mom_cycle_feed_to_pos
      global mom_cycle_retract_to_pos
      global mom_motion_type
      global mom_warning_info

      if {![info exists mom_sys_max_travel]} {

         for {set i 0} {$i < 3} {incr i} {

            set mom_sys_max_travel($i) $mom_pos($i)
            set mom_sys_min_travel($i) $mom_pos($i)
         }

      } elseif { ![string compare "CYCLE" $mom_motion_type] } {

         for {set i 0} {$i < 3} {incr i} {

            if {$mom_cycle_rapid_to_pos($i) < $mom_sys_min_travel($i)} {
               set mom_sys_min_travel($i) $mom_cycle_rapid_to_pos($i)
            }
            if {$mom_cycle_rapid_to_pos($i) > $mom_sys_max_travel($i)} {
               set mom_sys_max_travel($i) $mom_cycle_rapid_to_pos($i)
            }
            if {$mom_cycle_feed_to_pos($i) < $mom_sys_min_travel($i)} {
               set mom_sys_min_travel($i) $mom_cycle_feed_to_pos($i)
            }
            if {$mom_cycle_feed_to_pos($i) > $mom_sys_max_travel($i)} {
               set mom_sys_max_travel($i) $mom_cycle_feed_to_pos($i)
            }
            if {$mom_cycle_retract_to_pos($i) < $mom_sys_min_travel($i)} {
               set mom_sys_min_travel($i) $mom_cycle_retract_to_pos($i)
            }
            if {$mom_cycle_retract_to_pos($i) > $mom_sys_max_travel($i)} {
               set mom_sys_max_travel($i) $mom_cycle_retract_to_pos($i)
            }
         }

      } else {

         for {set i 0} {$i < 3} {incr i} {
            if {$mom_pos($i) < $mom_sys_min_travel($i)} {
               set mom_sys_min_travel($i) $mom_pos($i)
            }
            if {$mom_pos($i) > $mom_sys_max_travel($i)} {
               set mom_sys_max_travel($i) $mom_pos($i)
            }
         }
      }

      if {[expr $mom_sys_max_travel(0) - $mom_sys_min_travel(0)] > $mom_kin_x_axis_limit} {
         set mom_warning_info "Maximum X axis travel exceeded, did not alter output"
         MOM_catch_warning
      }

      if {[expr $mom_sys_max_travel(1) - $mom_sys_min_travel(1)] > $mom_kin_y_axis_limit} {
         set mom_warning_info "Maximum Y axis travel exceeded, did not alter output"
         MOM_catch_warning
      }

      if {[expr $mom_sys_max_travel(2) - $mom_sys_min_travel(2)] > $mom_kin_z_axis_limit} {
         set mom_warning_info "Maximum Z axis travel exceeded, did not alter output"
         MOM_catch_warning
      }
}

flg123 · 发表于 2019-6-13 13:44

1222222222222

		自动登录	找回密码
密码			注册

[分享] UG哈斯三菱法兰克三轴四轴通用后处理刀具列表各种友情提示让你编程无忧无虑

浏览过的版块