UG环境下自动输出程序单

先看一下我的程序单,是HTML格式

可以吗  我想用用噶

看看哈，~~~~~

琢磨了很长时间,为什么不输出刀具名称.
  
大家都给出个主意.
  
########################################################################
proc TOOL_body {} {
   global mom_tool_name
   global mom_tool_type
   global mom_tool_number
   
     OBJ_title "Tool Parameters"
     OBJ_info "$mom_tool_name ($mom_tool_type)"
     OBJ_info "Tool Number"    $mom_tool_number
  
     switch -exact -- $mom_tool_type {
     #------
     # Mill
     #------
       "Milling Tool-5 Parameters"  {
          TOOL_mill_5_parms
       }
  
       "Milling Tool-7 Parameters"  {
          TOOL_mill_5_parms
       }
  
       "Milling Tool-10 Parameters" {
          TOOL_mill_5_parms
       }
  
       "Milling Tool-Barrel"        {
          TOOL_barrel_tool
       }
  
       "Milling Tool-T Cutter"      {
          TOOL_T_cutter
       }
  
     #-------
     # Drill
     #-------
       "Drilling Tool"              {
          TOOL_drill_tool
       }
  
     #-------
     # Lathe
     #-------
       "Turning Tool-Standard"      {
          TOOL_std_turn_tool
       }
  
       "Turning Tool-Button"        {
          TOOL_button_turn_tool
       }
  
       "Turning Tool-Boring Bar"    {
          TOOL_boring_turn_bar
       }
  
     #--------
     # Groove
     #--------
       "Grooving Tool-Standard"     {
          TOOL_std_groove_tool
       }
  
       "Grooving Tool-Ring"         {
          TOOL_ring_groove_tool
       }
  
     #--------
     # Thread
     #--------
       "Threading Tool-Standard"    {
          TOOL_std_thread_tool
       }
  
       "Threading Tool-Butress"     {
          TOOL_butress_thread_tool
       }
  
       "Threading Tool-ACME"        {
          TOOL_acme_thread_tool
       }
     }
     OBJ_info " "
}
######################################################################

到此为止有人做出来了吗?

顶！！！

多谢楼主.

谁做出来了没有?

好多不行哦.程序名称不能显示,刀具不能显示,路经不能显示,图不能显示,还有用Microsoft Office Excel 2003打开时显示乱码,是不是变量设置的问题啊?变量怎么设置?谢谢!

好啊,大家来顶啊!