Code:
Reset of position at the end of every g-code program
[code]G10 L20 P#5220 A[[[#5423+180] MOD 360] -180]
[/code]
Ah, ok, I see. I admit that is a clever hack to that eternal and weird unwinding issue. With that 'unlimited' suspicion I had I hacked up something similar in post/tcl yesterday (had too) but that G10 ending you've thrown here is for
The WIN! and what fix it at the controller end. Thank You So So Much. And pardon my lack of lcnc voodoo skillset, I'm used to old school modulo and DPM hidden inside those industrial ctrl (sinumerik -360 ~ 360) in my case.
Logic for cam postp, in case it helps anyone:
Code:
#------------------------------------------------------
proc MOM_end_of_program_LIB_ENTRY {position} {
#------------------------------------------------------
switch -- $position {
"start"
{
if { [ info exists ::last4thpos ] } {
if [EQ_is_equal $::last4thpos 0] {
### do nothing
set mom_rot_ang_4th 0
} elseif { ([expr $::last4thpos <= 180]) } {
set mom_rot_ang_4th [ expr $::last4thpos - fmod($::last4thpos, 360) ]
} elseif { ([expr $::last4thpos > 180]) } {
set mom_rot_ang_4th [ expr $::last4thpos + fmod(360, $::last4thpos) ]
}
} else {
### do nothing
set mom_rot_ang_4th 0
}
### Output rotary return using recalculted modulo angle
MOM_output_literal "G0 A$mom_rot_ang_4th"
###Ref: https://forum.linuxcnc.org/38-general-linuxcnc-questions/51373-4th-axis-how-do-you-set-up-your-rotary-axis#290869
MOM_output_literal "G10 L20 P#5220 A\[\[\[#5423+180\] MOD 360\] -180\]"
}
}
}
#------------------------------------------------------
