Allineamento con common ver. 3.1e2

Beam/BeamData.lua

@@ -116,8 +116,8 @@ if EgtExistsFile( sDataBeam) then
          if Machine.Offsets.SECONDSAW then SecondSaw = ( Machine.Offsets.SECONDSAW == 1) end
          BeamData.USE_LONGCUT = SecondSaw or BeamData.USE_LONGCUT
          if Machine.Offsets.CUT_SIC then BeamData.CUT_SIC = EgtClamp( Machine.Offsets.CUT_SIC, 15, 50) end
-         if Machine.Offsets.MIN_JOIN_S then BeamData.MIN_JOIN_S = Machine.Offsets.MIN_JOIN_S end
-         if Machine.Offsets.MIN_JOIN_L then BeamData.MIN_JOIN_L = Machine.Offsets.MIN_JOIN_L end
+         if Machine.Offsets.MIN_JOIN_S then BeamData.MIN_JOIN_S = EgtClamp( Machine.Offsets.MIN_JOIN_S, 80, 150) end
+         if Machine.Offsets.MIN_JOIN_L then BeamData.MIN_JOIN_L = EgtClamp( Machine.Offsets.MIN_JOIN_L, 300, 450) end
       end
       if Machine.Trave then
          BeamData.MIN_WIDTH = Machine.Trave.XMIN or BeamData.MIN_WIDTH

Common_PF1250.TPA.mlpe

@@ -2079,12 +2079,16 @@ function PrepareUnload( sCmd, nInd)
 
    local Cmd = EgtSplitString( sCmd)
    if Cmd[1] == '0' then
-      -- non interessa
+      if Cmd[3] == 'Manual Unloading' then
+         EMT.MANUAL_UNL = true
+      end
    elseif Cmd[1] == '1' then
       if Cmd[2] == 'Y2' then
          -- se non è ultima fase e non è fase successiva a scarico su carico c'è una barra sulla pinza Y1
+         local dUnloadMacroCode = EgtIf( EMT.MANUAL_UNL, 85, 84)
+         EMT.MANUAL_UNL = nil
          local bBarOnY = ( EMT.PHASE < EgtGetPhaseCount() and not IsEnd2Phase( EMT.PHASE))
-         local MDChar = { Y2=tonumber(Cmd[3]), V2=ParkV2, IniStatY2=1, FinStatY2=-84, BeamVise=EgtIf( bBarOnY, 1, 0), MovType=EgtIf( EMT.CHY_ON, 3, 2)}
+         local MDChar = { Y2=tonumber(Cmd[3]), V2=ParkV2, IniStatY2=1, FinStatY2=-dUnloadMacroCode, BeamVise=EgtIf( bBarOnY, 1, 0), MovType=EgtIf( EMT.CHY_ON, 3, 2)}
          table.insert( EMT.MDCHAR, MDChar)
       end
    elseif Cmd[1] == '2' then

Common_PF1250.mlpe

@@ -1270,7 +1270,7 @@ function OnSimulMoveStart()
             EMT.A6 = EgtClamp( Z2, MinZ2, MaxZ2)
             -- dato che la testa 2 è slave, bisogna controllare eventuale extra-corsa da post
             if not( EMT.MOVE == 0 and EMT.FLAG == 2) and Z2 > MaxZ2 then
-               local sErr = EMT.MCHNAME..'  ==>  Out of Stroke: Z2 : '.. EgtNumToString( dZ2-MaxZ2, 2)
+               local sErr = EMT.MCHNAME..'  ==>  Out of Stroke: Z2 : '.. EgtNumToString( Z2-MaxZ2, 2)
                EmtSetLastError( 1220, sErr, true)
                EgtOutBox( sErr, 'ERROR')
             end

Common_PF1250.mlse

@@ -1406,7 +1406,9 @@ function SpecCalcUnload()
       table.insert( vCmd, { 2, 'T', dFinT, 'Y2', dFinY2})
       EgtOutLog( '  Y2PosF=' .. EgtNumToString( dFinY2), 1)
    else
-      table.insert( vCmd, { 1, 'Y2', MaxY2})
+      local dFinT = min( MaxY2 - EMC.Y2DELTA, max( UnloadT - MaxUnloadLen, MinY2 - EMC.Y2DELTA))
+      local dFinY2 = dFinT + EMC.Y2DELTA
+      table.insert( vCmd, { 2, 'T', dFinT, 'Y2', dFinY2})
    end
    -- apro la morsa
    table.insert( vCmd, { 12, 0})
@@ -2533,6 +2535,9 @@ function SpecOutputCmds( vCmd, bEnd)
       -- commento
       if Cmd[1] == 0 then
          local sInfo = '0,'..Cmd[2]
+         if Cmd[3] then
+            sInfo = sInfo..','..Cmd[3]
+         end
          EgtSetInfo( EMC.PATHID, sKey, sInfo)
       -- movimento di 1 asse
       elseif Cmd[1] == 1 then

Essetre-PF1250.mlde

@@ -30,8 +30,8 @@
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '3.1c1'
-PP_NVER = '3.1.3.1'
+PP_VER = '3.1e2'
+PP_NVER = '3.1.5.2'
 MIN_MACH_VER = '2.7d2'
 MACH_NAME = EgtGetCurrMachineName()
 

UpdateLog.txt

@@ -1,6 +1,12 @@
            ==== Common_PF1250 Update Log ====
 
-Versione 3.1c1 (12/03/2026)
+Versione 3.1e2 (15/05/2026)
+- (SIM-GEN) Corretta gestione scarico manuale ( errore in versione 3.1e1)
+
+Versione 3.1e1 (12/05/2026)
+- (SIM-GEN) Corretta SIM (muoveva Y2 a MaxY2 senza aprire pinza) e GEN (non chiudeva rulliere e dava extracorsa e non generava P7=-85) di pezzi lunghi che necessitano lo scarico manuale. Ticket#2971
+
+Versione 3.1c1 
 - (SIM-GEN) Corretto calcolo rimanenza durante ParkRoller. Ticket#2832
 - (SIM) Corretto caricamento geometrie di collisioni. Modificato indice di collisione per una migliore gestione. ATT: MIN_MACH -> 3.1b2
 - (SIM-GEN) Aggiunta OnSpecialApplyMachining per calcolare i carrelli da subito

Version.lua

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