|
|
发表于 2026-1-15 14:05:41
|
显示全部楼层
本帖最后由 hsrsung.sung 于 2026-1-15 14:10 编辑
pretract #刀具路径结束，换刀
sav_absinc = absinc$
absinc$ = one
pcool_off
#在此处的刀具更改中重置cc_pos
cc_pos$ = zero
gcode$ = zero
holejs = 0,
sdkcx = 0,
if convert_rpd$, pconvert_rpd
pbld, [if Globe_valve = 2 | Globe_valve = 3 | Globe_valve = 4, sm99], e$
if use_rot_lock & rot_on_x,
[
if (index = one & (prv_indx_out <> fmtrnd(indx_out)) | (prv_cabs <> fmtrnd(cabs)))
| nextop$ = 1003 | frc_cinit, prot_unlock1
]
if gwdy = 1, pbld, sggsg, gwdy = 0, e$
pcoordinate1
pbld, sccomp, *sm05, psub_end_mny, e$
pbld, "M09", e$
if reference_point = 1, pbld, [if gcode$, sgfeed], sgabsinc, sgcode, *sg28ref, "Z0.", [if Globe_valve = 1, [if gcode$, feed], scoolant], e$
if reference_point = 2 | reference_point = 3, pbld, [if gcode$, sgfeed], sgabsinc, sgcode, *sg330ref, "Z0.", [if Globe_valve = 1, [if gcode$, feed], scoolant], e$
if nextop$ = 1003, pbld, [if reference_point = 1 | reference_point = 2, *sg28ref, "Y0."],
[if reference_point = 3, *sg330ref, "Y0."], [ if shlx = 0, "X0."], [if Fourth_Axis = 2, protretinc], e$
else, pbld, [if Fourth_Axis = 2, protretinc], e$
if nextop$ <> 1003 & tlchg_home = 1, *shdhl1, e$
if nextop$ <> 1003 & tlchg_home = 2, *shdhl2, e$
if custom_dm = 2 & nextop$ = 1003, pszdydw, e$
if Types_of_Machine_Tools = 3, pbld, "G290", e$
absinc$ = sav_absinc
coolant$ = sav_coolant
uninhibit_probe$ |
|
