fmt "X" 2 g32_xabs #G32X
fmt "Z" 2 g32_zabs #G32Z
fmt "Z" 2 g32_dzabs #G32Z起点 对应杂项 mr1$
fmt "Z" 2 g32_nzabs #G32螺纹终点 对应杂项 mr2$
fmt "Q" 2 G32_Q #G32Q
pthrg32_1$ #G32 threading first
comment$
gcode$ = zero
if tool_op$ = 227,
[
copy_x = vequ(x$)
pcan
c_rcc_setup$
plcc_lead_begin
pcom_moveb
g32_xabs = xabs
g32_zabs = zabs
!zabs
]
else, lrapid$
pthrg32_2$ #G32 threading second
gcode$ = zero
if tool_op$ = 227, #自定义螺纹
[
copy_x = vequ(x$)
pcan
c_rcc_setup$
plcc_lead_begin
pcom_moveb
g32_dzabs = mr1$
*g32_dzabs, e$
!zabs, pxout, e$
]
else, lrapid$
pthrg32_3$ #G32 threading third
copy_x = vequ(x$)
pcom_moveb
g32_nzabs = mr2$
G32_Q = (g32_zabs - g32_dzabs )/feed * 360
pcan1, pbld, sgfeed, *sthdgcode, pxout, pyout, *g32_nzabs, !zabs, pcout, pffr, *G32_Q,
strcantext, e$
pcom_movea
prv_gcode$ = m_one
谢谢老师分享
linaihao 发表于 2025-11-18 11:27
谢谢分享
内容还是不错的111
感谢大佬分享
谢谢大佬无私奉献
感谢分享
谢谢分享
好东西,感谢分享