Merge remote-tracking branch 'origin/main' into develop

- Cambio versione epr rilascio a cliente

Common_PF1250.TPA.mlpe

@@ -867,10 +867,19 @@ function OnRapid()
                   end
                end
                if EMT.HEAD ~= 'H13' then 
-                  EmitMoveDataHead( 1, { Z=EMT.L3, S=Speed})
-                  EmitMoveDataHead( 1, { B=EMT.R2, S=Speed})
-                  EmitMoveDataHead( 1, { C=EMT.R1, S=Speed})
-                  EmitMoveDataHead( 1, { X=EMT.L2, S=Speed})
+                  -- utensili lunghi
+                  if EMT.TTOTLEN > LongTool then
+                     EmitMoveDataHead( 1, { B=0, S=Speed})
+                     EmitMoveDataHead( 1, { C=EMT.R1, S=Speed})
+                     EmitMoveDataHead( 1, { B=EMT.R2, S=Speed})
+                     EmitMoveDataHead( 1, { X=EMT.L2, S=Speed})
+                     EmitMoveDataHead( 1, { Z=EMT.L3, S=Speed})
+                  else
+                     EmitMoveDataHead( 1, { Z=EMT.L3, S=Speed})
+                     EmitMoveDataHead( 1, { B=EMT.R2, S=Speed})
+                     EmitMoveDataHead( 1, { C=EMT.R1, S=Speed})
+                     EmitMoveDataHead( 1, { X=EMT.L2, S=Speed})
+                  end
                else
                   EmitMoveDataHead( 1, { Z=EMT.L3, B=EMT.R2, S=Speed})
                   EmitMoveDataHead( 1, { C=EMT.R1, S=Speed})

Common_PF1250.mlse

@@ -1203,7 +1203,9 @@ function SpecCalcCarriages( dDistFront, dDistBack, dRollFront, dRollBack, dY1Del
       WorkTab.dY1DeltaMaxF = min( EMC.LB - MinJoin, MaxY1 + dDistFront + dRollFront + AGG_V)
       WorkTab.dY2DeltaMinF = nil
       WorkTab.dY2DeltaMaxF = nil
-      if dY1DeltaMaxSP then WorkTab.dY1DeltaMaxF = min( WorkTab.dY1DeltaMaxF, dY1DeltaMaxSP) end
+      if dY1DeltaMaxSP and dY1DeltaMaxSP > WorkTab.dY1DeltaMinF then
+         WorkTab.dY1DeltaMaxF = min( WorkTab.dY1DeltaMaxF, dY1DeltaMaxSP)
+      end
       WorkTab.dV1PosF = dRollBack
       WorkTab.bV1CloseF = false
       WorkTab.dV2PosF = -dRollFront
@@ -1428,6 +1430,12 @@ function SpecCalcUnloadOnLoadPos()
          table.insert( vCmd, { 11, 1})
       end
    end
+   -- se l'ultima posizione di Y1 (calcolata in modo che PosT sia nella posizione di scarico) è fuori dalla corsa massima ricalcola le due quote alla quota massima raggiungibile
+   if dY1Move > MaxY1 then
+      dRotT = dRotT - ( dY1Move - MaxY1)
+      dY1Move = MaxY1
+      EgtOutLog( '  Warning : Impossible to Reach Unloading on Load Position')
+   end
    table.insert( vCmd, { 2, 'Y1', dY1Move, 'T', dRotT, 'BrakeBeam'})
    -- apro la morsa
    table.insert( vCmd, { 11, 0})

UpdateLog.txt

@@ -1,5 +1,12 @@
            ==== Common_PF1250 Update Log ====
 
+Versione 3.1g1 (15/07/2026)
+- (GEN) Se prima lavorazione con punta lunga sbagliava movimenti approccio.
+
+Versione 3.1f2 (24/06/2026)
+- (SIM-GEN) UnloadOnLoad - se posizione di scarico non raggiungibile lo scarica dove può. Ticket#3041
+- (SIM-GEN) SpecCalcCarriages - se dY1DeltaMaxSP < dY1DeltaMinF non lo considera. Ticket#3041
+
 Versione 3.1f1 (05/06/2026)
 - (GEN) In caso di ultimo movimento come scarico rimanenza, porta V2 in posizione di parcheggio. Ticket#3006
 - (SIM-GEN) Gestione nuova macchina 3T_5Ax

Version.lua

@@ -3,7 +3,7 @@
 
 local InfoCommon_STD_PP = {
    NAME = 'Common_PF1250',            -- nome script PP standard
-   VERSION = '3.1f1',                 -- versione script
+   VERSION = '3.1g1',                 -- versione script
    MIN_MACH_VER_PP_COMMON = '3.1b2'   -- versione minima kernel
 }