From e0dfd45f1cb85d671ef428898e1f9fb7c0dda376 Mon Sep 17 00:00:00 2001 From: "andrea.villa" Date: Tue, 26 May 2026 11:23:07 +0200 Subject: [PATCH] Corretto comando allo split che muove entrambe le pinze --- Common_ONE-PF.NUM.mlpe | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/Common_ONE-PF.NUM.mlpe b/Common_ONE-PF.NUM.mlpe index a57f6ac..1d29495 100644 --- a/Common_ONE-PF.NUM.mlpe +++ b/Common_ONE-PF.NUM.mlpe @@ -485,6 +485,7 @@ end --------------------------------------------------------------------- function OnMachiningEnd() --EmtOutput( ';Mach End') + local bMoveBothClampsOnSplit = false if #EMT.MDCHAR > 0 then -- Emissione split if EMT.AUXTYPE == 'S' then @@ -515,6 +516,7 @@ function OnMachiningEnd() EMT.MDCHAR[1].MovType = nil EMT.MDCHAR[1].Y2 = ParkV2 - EMT.LT + EMT.Y2DELTA EMT.MDCHAR[1].V2 = ParkV2 + bMoveBothClampsOnSplit = true end end @@ -558,8 +560,13 @@ function OnMachiningEnd() end if #EMT.MDCHAR > 0 then if EMT.AUXTYPE == 'S' then - EmitMoveStartChars( 1) - EmitMoveWaitChars( 1) + if bMoveBothClampsOnSplit then + EmitMoveStartChars( 3) + EmitMoveWaitChars( 3) + else + EmitMoveStartChars( 1) + EmitMoveWaitChars( 1) + end elseif EMT.AUXTYPE == 'U' then local nMoveType = EgtIf( EMT.CHY_ON, 3, 2) EmitMoveStartChars( nMoveType)