#=============================
proc PB_CMD_fanuc_G54 { } {
#=============================
global mom_fixture_offset_value
set b [expr $mom_fixture_offset_value+53]
set c [expr $mom_fixture_offset_value+54]
set d [expr 0-$mom_fixture_offset_value]
global e
if {$mom_fixture_offset_value > "0"} {
set e $b
} elseif {$mom_fixture_offset_value == "0"} {
set e $c
} else {
set e 54.1\ P[format "%02.0f" $d]
}
#=============================================================
global mom_fixture_offset_value
if { $mom_fixture_offset_value > "6" || $mom_fixture_offset_value < "-48"} {
set errmes "\n\n scope -48<=夹具偏置<=6 0-G54 1~6-G54~G59 -48~-1-G54.1 P1~P48 \n\n"
set msg [MOM_display_message 坐标系夹具偏置错误,请注意! 赋值错误提醒!-48<=偏置值<=6 I 中止后处理]
switch $msg {
1 {
MOM_abort "$errmes"
}
}
}
}