教你如何修改新一代进玉电极外挂添加自己的后处理

52270559bai · 发表于 2012-3-11 16:16:07

本帖最后由 52270559bai 于 2012-3-11 16:27 编辑

论坛上看了一些关于进玉添加自己后处理的文章，我这里也做个视频和大家分享一下
主要讲述如何手动修改后处理，修改后处理程序头，增加后处理，例如法兰克的后处理要在程序头加进去要加G5.1Q1这个代码，如何修改后处理的格式，UG后处理出来的格式都是NC后缀的，像佳铁高科用PIM格式的后处理，NC格式的后处理是识别不了的，可以修改后处理代码达到这种目的

教你如何修改新一代进玉电极外挂添加自己的后处理

华为网盘附件：

全站免回复看隐藏内容

【华为网盘】进玉修改添加后处理-WRF.rar(18.26M)

进玉法兰克，三菱新代后处理（可添加到进玉自动后处理）

华为网盘附件：

全站免回复看隐藏内容

【华为网盘】法兰克+三菱新代后处理.rar(1.65M)

补充内容 :
修改过的进玉法兰克后处理，自动带出G5.1Q1，显示程序名，程序创建时间，刀具名称，实际刀具直径，R角
( 法兰克后处理 )
(PROGRAM NAME: 64B5-R1)
(Time: Fri Mar 09 08:37:33 2012)

补充内容
(ToolName=D10 D=10.00 R=0.00)
G90 G80 G00 G17 G40 G49
G91 G28 Z0.
G5.1Q1
G90G54G00X0.Y0.
G01 G90 X0.0 Y-17. Z10. F10000. S6000 M03 M09

补充内容
G00 Z.201
G01 Z-.299 F3000.
Y-9.
……………………………….
……………………………….
……………………………….
Z-26.54

补充内容
G00 Z10.
M05
M09
G5.1Q0
G91G28Z0.
M30%

补充内容
后处理TCL文件中程序头修改代码
MOM_output_literal "( 三菱，新代后处理 )"
MOM_output_literal "(PROGRAM NAME: $mom_group_name)"
MOM_output_literal "(Time: $mom_date)"

补充内容
#  MOM_output_literal "(Cutter Name: $mom_tool_name)"
MOM_output_literal "(ToolName=$mom_tool_name\
      D=[format "%.2f" $mom_tool_diameter]\
      R=[format "%.2f" $mom_tool_corner1_radius])"

补充内容
#  MOM_output_literal "T1D1"
#  MOM_output_literal "HSCB(0.01)"
MOM_output_literal "G90 G80 G00 G17 G40 G49"
MOM_output_literal "G91 G28 Z0."
MOM_output_literal "G90G54G00X0.Y0."

补充内容
后处理中TCL文件程序尾修改代码
MOM_output_literal "M05"
MOM_output_literal "M09"
MOM_output_literal "G91G28Z0."
MOM_output_literal "M30"
MOM_output_literal "%"

WEB压缩包是播放器，要安装一下

青春、任你放肆 · 发表于 2013-10-9 22:29:18

tcl文件如下修改

一、加output_desr

#=============================================================
proc MOM_end_of_program { } {
#=============================================================
MOM_force Once M_coolant
MOM_do_template coolant_off
MOM_force Once M_spindle
MOM_do_template spindle_off
PB_CMD_program_end1
MOM_do_template end_of_program
MOM_set_seq_off
MOM_do_template rewind_stop_code
PB_CMD_program_end2
output_desr

#**** The following procedure lists the tool list with time in commentary data
LIST_FILE_TRAILER

#**** The following procedure closes the warning and listing files
CLOSE_files
}

二、加prog_head

#=============================================================
proc PB_start_of_program { } {
#=============================================================

if [llength [info commands PB_CMD_kin_start_of_program] ] {
   PB_CMD_kin_start_of_program
}
prog_head

PB_CMD_init_turbo
MOM_set_seq_off
PB_CMD_program_start
PB_CMD_init_helix
PB_CMD_fix_RAPID_SET
}

三、加spindle_check，set_value_ju

#=============================================================
proc MOM_start_of_path { } {
#=============================================================
global mom_sys_in_operation
set mom_sys_in_operation 1

  global first_linear_move ; set first_linear_move 0
TOOL_SET MOM_start_of_path

if [llength [info commands PB_CMD_kin_start_of_path] ] {
   PB_CMD_kin_start_of_path
}

PB_CMD_start_of_operation_force_addresses
PB_CMD_path_start
spindle_check
set_value_ju
}

四、加cut_depth_circular

#=============================================================
proc MOM_linear_move { } {
#=============================================================
global feed_mode mom_feed_rate mom_kin_rapid_feed_rate

if { ![string compare $feed_mode "IPM"] || ![string compare $feed_mode "MMPM"] } {
   if { [EQ_is_ge $mom_feed_rate $mom_kin_rapid_feed_rate] } {
      MOM_rapid_move
      return
   }
}

global mom_sys_abort_next_event
if { [info exists mom_sys_abort_next_event] } {
   if { [llength [info commands PB_CMD_kin_abort_event]] } {
      PB_CMD_kin_abort_event
   }
}

五、加cut_depth_line

global first_linear_move

if { !$first_linear_move } {
   PB_first_linear_move
   incr first_linear_move
}

MOM_do_template linear_move
cut_depth_line}

六、加在最后面

#=============================================================
proc MOM_end_of_group { } {
prog_end
}
#=============================================================

##################################################################################
#=================================================================
proc prog_head { } {
#=================================================================
global mom_group_name mom_date mom_tool_name
global prev_spind

global  tool_name  cut_descr  cut_stock  cut_depth
set tool_name ""
set cut_descr ""
set cut_stock 1
set cut_depth 0

set prev_spind 0

# MOM_output_literal "%"
# MOM_output_literal "( ttp )"
# MOM_output_literal "(PROGRAM NAME: $mom_group_name)"
# MOM_output_literal "(Time: $mom_date)"
# MOM_output_literal "(Cutter Name: $mom_tool_name)"
# MOM_output_literal "T1D1"
# MOM_output_literal "HSCB(0.01)"
# MOM_output_literal "G90G54G00X0.Y0."
}

#=================================================================
proc prog_end { } {
#=================================================================

# MOM_output_literal "G91 Z150."
# MOM_output_literal "M05"
# MOM_output_literal "M09"
# MOM_output_literal "M30"
# MOM_output_literal "%"
}

#=================================================================
proc spindle_check { } {
#=================================================================
global mom_spindle_speed prev_spind

if { $mom_spindle_speed  < 1  } {
   if { $prev_spind == 0 } {
         set mom_spindle_speed  1500
      } else {
               set mom_spindle_speed  $prev_spind
               }
}

set prev_spind $mom_spindle_speed
}

#====================================================================
proc set_value_ju { } {
#====================================================================
global tool_name cut_descr cut_stock
global mom_tool_name mom_stock_part

if { $tool_name == "" } {
   set tool_name $mom_tool_name
   } else {
            if { $tool_name != $mom_tool_name } {
                                                set tool_name "操作中刀径不同"
                                                }
            }

if { $cut_stock == 1 } {
   set cut_stock $mom_stock_part
      } else {
            if { $cut_stock > $mom_stock_part } {
                  set cut_stock $mom_stock_part
               }
            }

if { $cut_stock < 0 } {
         set cut_descr "光"
   } elseif { $cut_stock >= 0 && $cut_stock <= 0.1 } {
               set cut_descr "中"
   } else {
               set cut_descr "粗"
            }
}

#======================================================================
proc cut_depth_line { } {
#======================================================================
global cut_depth
global mom_pos

if { $cut_depth > $mom_pos(2) } {
   set cut_depth $mom_pos(2)
   }

}

#======================================================================
proc cut_depth_circular { } {
#======================================================================
global cut_depth
global mom_pos

if { $cut_depth > $mom_pos(2) } {
   set cut_depth $mom_pos(2)
   }

}

#======================================================================
proc output_desr { } {
#======================================================================
global  tool_name  cut_descr  cut_stock  cut_depth
global  mom_group_name  mom_machine_time
global mom_output_file_basename  mom_output_file_directory  mom_sys_output_file_suffix

set desr_file_name "${mom_output_file_directory}${mom_output_file_basename}.${mom_sys_output_file_suffix}"

MOM_close_output_file $desr_file_name
set desr_file_name "D:\\ju_conf\\temp\\$mom_group_name.xl"
MOM_remove_file $desr_file_name
MOM_open_output_file $desr_file_name
MOM_output_literal "$mom_group_name  $tool_name  $cut_descr  [format %3.2f $cut_stock]  [format %4.1f $cut_depth] [format %4.0f $mom_machine_time]"
MOM_close_output_file $desr_file_name

197805029 · 发表于 2015-5-28 19:19:33

[分享资料] 教你如何修改新一代进玉电极外挂添加自己的后处理 [复制链接]


52270559bai 52270559bai 当前离线积分470.26
主题 33
帖子 470
积分
  IP卡

26

主题 33

帖子 470

积分

中级会员

.

中级会员, 积分 470, 距离下一级还需 530 积分

中级会员, 积分 470, 距离下一级还需 530 积分
UID34341主题26帖子33精华0Q币368 贡献0 技术0 流量368 阅读权限30在线时间8 小时.收听TA 发消息. 电梯直达 1#
发表于 2012-3-11 16:16:07 | 只看该作者 |只看大图  |倒序浏览 |阅读模式本帖最后由 52270559bai 于 2012-3-11 16:27 编辑

论坛上看了一些关于进玉添加自己后处理的文章，我这里也做个视频和大家分享一下
主要讲述如何手动修改后处理，修改后处理程序头，增加后处理，例如法兰克的后处理要在程序头加进去要加G5.1Q1这个代码，如何修改后处理的格式，UG后处理出来的格式都是NC后缀的，像佳铁高科用PIM格式的后处理，NC格式的后处理是识别不了的，可以修改后处理代码达到这种目的

193709yt7oah2htywhhomf.png (65.75 KB, 下载次数: 553)
下载附件  保存到相册
2012-3-11 16:04 上传

教你如何修改新一代进玉电极外挂添加自己的后处理

华为网盘附件：

197805029，如果您要查看本帖隐藏内容请回复

进玉法兰克，三菱新代后处理（可添加到进玉自动后处理）

华为网盘附件：

197805029，如果您要查看本帖隐藏内容请回复


补充内容 :
修改过的进玉法兰克后处理，自动带出G5.1Q1，显示程序名，程序创建时间，刀具名称，实际刀具直径，R角
( 法兰克后处理 )
(PROGRAM NAME: 64B5-R1)
(Time: Fri Mar 09 08:37:33 2012)

补充内容
(ToolName=D10 D=10.00 R=0.00)
G90 G80 G00 G17 G40 G49
G91 G28 Z0.
G5.1Q1
G90G54G00X0.Y0.
G01 G90 X0.0 Y-17. Z10. F10000. S6000 M03 M09

补充内容
G00 Z.201
G01 Z-.299 F3000.
Y-9.
……………………………….
……………………………….
……………………………….
Z-26.54

补充内容
G00 Z10.
M05

☆⌒_⌒☆奚 · 发表于 2013-12-2 22:26:46

谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享谢谢分享不错的资料，可以学习学习，谢谢楼主提供……

52270559bai · 发表于 2012-3-11 16:23:00

这个帖子不回对不起自己！沙发啊。。哈哈。。。

659568316 · 发表于 2012-3-11 16:56:27

温馨提示：回帖是一种尊重作者劳动的良好美德

jianchihu · 发表于 2012-3-11 17:59:34

楼主太厉害了，我支持你！
资料网“CNC数控论坛”加油！

D辉 · 发表于 2012-3-11 18:33:20

顶顶顶顶顶顶顶顶顶顶

凌空飘渺 · 发表于 2012-3-11 18:34:20

回帖是一种尊重作者劳动的举手之劳

songyu90 · 发表于 2012-3-11 19:46:22

支持下...

LiBuYun · 发表于 2012-3-11 22:40:17

jhuytrdgvffki

判若两人 · 发表于 2012-3-11 22:43:36

怎么添加啊老大？

hfly2002 · 发表于 2012-3-11 22:55:35

真的是太好的东西了

[分享资料] 教你如何修改新一代进玉电极外挂添加自己的后处理

全站免回复看隐藏内容

全站免回复看隐藏内容

评分

相关帖子

点评