求批处理开头要所有刀具信息的

1    FDK       D6  光    0.00  -10.0
   2    F01      D12  粗    0.30   -8.2
   3    F02       D4  光    0.00  -28.4
-   Time   77 Minute

不知道是不是在DEF中后面加下面这段就好了，请高手帮忙，我想做后处理自动程式单。有一个只能出信息没得程序，感觉不爽


BLOCK_TEMPLATE end_of_path
  {
       M_spindle[$mom_sys_spindle_direction_code(OFF)]
       M_coolant[$mom_sys_coolant_code(OFF)]
  }
  BLOCK_TEMPLATE end_of_program
  {
       M[$mom_sys_end_of_program_code]
  }
  BLOCK_TEMPLATE from
  {
       G_motion[$mom_sys_rapid_code]
       X[$mom_from_pos(0)]
       Y[$mom_from_pos(1)]
       Z[$mom_from_pos(2)]
  }
  BLOCK_TEMPLATE inch_metric_mode
  {
       G[$mom_sys_unit_code(IN)]
  }
  BLOCK_TEMPLATE incremental_mode
  {
       G_mode[$mom_sys_output_code(INCREMENTAL)]
  }
  BLOCK_TEMPLATE linear_move_1
  {
       G_motion[$mom_sys_linear_code]
       X[$mom_pos(0)]
       Y[$mom_pos(1)]
       Z[$mom_pos(2)]
       F[$feed]
  }
  BLOCK_TEMPLATE manual_tool_change
  {
       M[$mom_sys_program_stop_code]
  }
  BLOCK_TEMPLATE output_unit
  {
       G[$mom_sys_unit_code(IN)]
  }
  BLOCK_TEMPLATE rapid_spindle
  {
       X[$mom_pos(0)]
       Y[$mom_pos(1)]
       Z[$mom_pos(2)]
  }
  BLOCK_TEMPLATE rapid_traverse
  {
       G_motion[$mom_sys_rapid_code]
       G_mode[$mom_sys_output_code($mom_output_mode)]\opt
       X[$mom_pos(0)]
       Y[$mom_pos(1)]
       Z[$mom_pos(2)]
  }
  BLOCK_TEMPLATE return_home
  {
       G_return[$mom_sys_return_code]
       G_mode[91]
       Z[$mom_sys_home_pos(2)]
  }
  BLOCK_TEMPLATE return_motion
  {
       M_spindle[$mom_sys_spindle_direction_code(OFF)]
       M_coolant[$mom_sys_coolant_code(OFF)]
  }
  BLOCK_TEMPLATE return_motion_1
  {
       G_return[$mom_sys_return_code]
       G_mode[91]
       Z[0]
       T[$mom_tool_number]
       H[$mom_sys_zero]
  }
  BLOCK_TEMPLATE return_motion_2
  {
       M_spindle[$mom_sys_spindle_direction_code(OFF)]
       M_coolant[$mom_sys_coolant_code(OFF)]
  }
  BLOCK_TEMPLATE return_motion_5
  {
       G_return[$mom_sys_return_code]
       G_mode[91]
       Z[0]
       H[$mom_sys_zero]
  }
  BLOCK_TEMPLATE rewind_stop_code
  {
       Text[%]
  }
  BLOCK_TEMPLATE sequence_number
  {
       N[$mom_seqnum]
  }
  BLOCK_TEMPLATE spindle_rpm_1
  {
       M_range[$mom_sys_spindle_range_code($mom_spindle_range)]\opt
  }
  BLOCK_TEMPLATE tool_change
  {
       G_mode[$mom_sys_output_code(INCREMENTAL)]
       G[$mom_sys_return_code]
       Z[$mom_sys_home_pos(2)]
  }
  BLOCK_TEMPLATE tool_change_1
  {
       T[$mom_tool_number]
       M[$mom_sys_tool_change_code]
  }
  BLOCK_TEMPLATE tool_change_2
  {
       T[$mom_next_tool_number]
  }
  BLOCK_TEMPLATE tool_len_adj_off
  {
       H[$mom_sys_zero]
  }
############ BLOCK TEMPLATE DECLARATIONS #############
  BLOCK_TEMPLATE post_cycle_set
  {
       G_motion[$mom_sys_cycle_reps_code]
       R[$mom_cycle_rapid_to_pos($mom_cycle_spindle_axis)]
  }
############ BLOCK TEMPLATE DECLARATIONS #############
  BLOCK_TEMPLATE comment_data
  {
       LF_XABS[$mom_pos(0)]
       LF_YABS[$mom_pos(1)]
       LF_ZABS[$mom_pos(2)]
       LF_AAXIS[$mom_pos(3)]
       LF_BAXIS[$mom_pos(4)]
       LF_FEED[$mom_feed_rate]
       LF_SPEED[$mom_spindle_speed]
  }

请问是不是在后处理里面添加这个变量就可以了？
proc MOM_end_of_path { } {
#_____________________________________________________________
# This procedure is executed at the end of a path.
#_____________________________________________________________
   global nurbs_move_flag
   global max_z min_z
   global max_x min_x
   global max_y min_y
   global mom_path_name
   global mon_tool_name
   global mom_tool_diameter
   global mom_tool_cornerl_radius
   global nurbs_move_flag
   global mom_stock_part
   global mom_stock_floor
   global mom_cutting_time
   global mom_cut_level_min_depth
   global mom_cut_level_max_depth
   global mom_oper_program
   global mom_spindel_rpm
}

#================================================================
proc MOM_end_of_group {} {
#===============================================================
    global mom_stock_part
    global max_cut_depth
    global mom_group_name
    global mom_tool_name
    global mom_machine_time
    global sub_machine_time
    global mom_stock_part
    global mom_stock_floor
    global stock_part
    global machine_time
    global cut_method
    global depth
    global sn aq tls clm
    global mom_clearance_plane_status
  global mom_spindle_speed
  global mom_feed_cut_value   
    set aq ""
   #set sub_machine_time $mom_machine_time
    set sub_machine_time [expr $mom_machine_time - $sub_machine_time]
    set stock_part [format "%.2f" $mom_stock_part]
    if { $mom_clearance_plane_status == 1} {
       if {$clm <= 0 } {set aq "请检查安全高度"}
       }
    if {$mom_clearance_plane_status != 1 } {set aq "未设安全高度"}
    if {$mom_stock_part >= 0.1 } { set cut_method "粗" }
    if {$mom_stock_part >= 0.03 && $mom_stock_part < 0.1 } { set cut_method "中光" }
    if {$mom_stock_part < 0.03  && $mom_stock_part >= 0  } { set cut_method "光" }
    if {$mom_stock_part <-0.15 } { set cut_method "光" }
    if {$mom_stock_part >=-0.15 && $mom_stock_part < 0 } { set cut_method "光" }


  if {[EQ_is_gt $sub_machine_time 0]} {
     set sn [expr $sn+1]
     MOM_output_literal "[format "%4d" $sn] [format "%6s" $mom_group_name] [format "%8s" $mom_tool_name] [format "%3s" $cut_method] [format "%7.2f" $stock_part] [format "%6.1f" $max_cut_depth]"
    #MOM_output_literal "-------------------------------------------------------------------------------"
     set sub_machine_time $mom_machine_time
     }

}
为什么我改成这样就不行呢？

哎，头好晕

该TCL......

后处理自动程序单是不是在制作后处理里面添加变量的，我没学过，不会，自已摸的玩玩，明天上班去试试，
我看到TCL里面有command_01~~~~command_11，里面有刀径不同刀长之类的，估计是这个
看到COMMAND就知道是在后处理器里面添加的变量，是不是把哪里面的内容复制下来然后用后处理器添加这些变量吧，我一个个比，看能出来不。谢谢大家！

复制粘贴也有讲究的，要是随便复制，粘贴就能改好后处理，那人人都会了

今天用后处理编辑器把哪个自动程序单的后处理PUI文件打开，里的看到变量函数了。我什么都没改然后保存就没有了自动程序单的功能，怪事，TCL内容自动变了，本想加个加速后处理的，可惜没了自动程序单功能了，怪事！
有哪位高手能否帮下忙。我可以把自动程序单带PUI文件的后处理发上来。

帮你顶下 学不会太难了