- in STR0011 e 13 aggiunto SCC

- in BeamExec il clamp del MaxReprocess è portato a 5

BatchProcessNew.lua

@@ -388,6 +388,15 @@ if bToProcess then
             else
                PARTS[i].b3PartOriginal = b3Solid
             end
+            if BeamData.MAX_LENGTH and BeamData.MAX_LENGTH > 10 and b3Solid:getDimX() > BeamData.MAX_LENGTH then
+               local sOut = 'Piece-Length ('  .. EgtNumToString( b3Solid:getDimX(), 2) .. ') ' ..
+                         'out of machine limits (' .. EgtNumToString( BeamData.MAX_LENGTH, 2) .. ') '
+               BEAM.ERR = 17
+               BEAM.MSG = sOut
+               WriteErrToLogFile( BEAM.ERR, BEAM.MSG)
+               PostErrView( BEAM.ERR, BEAM.MSG)
+               return
+            end
          end
          -- Assegno lunghezza della barra
          dBarLen = PARTS[1].b3PartOriginal:getDimX() + 10
@@ -447,6 +456,15 @@ if bToProcess then
          else
             PARTS[i].b3PartOriginal = b3Solid
          end
+         if BeamData.MAX_LENGTH and BeamData.MAX_LENGTH > 10 and b3Solid:getDimX() > BeamData.MAX_LENGTH then
+            local sOut = 'Piece-Length ('  .. EgtNumToString( b3Solid:getDimX(), 2) .. ') ' ..
+                         'out of machine limits (' .. EgtNumToString( BeamData.MAX_LENGTH, 2) .. ') '
+            BEAM.ERR = 17
+            BEAM.MSG = sOut
+            WriteErrToLogFile( BEAM.ERR, BEAM.MSG)
+            PostErrView( BEAM.ERR, BEAM.MSG)
+            return
+         end
       end
    end
 

LuaLibs/BeamExec.lua

@@ -341,6 +341,11 @@ function BeamExec.GetAvailableCombinations( PartInfo, bIsFlipRot)
       nCycles = 2
    end
 
+   if bIsFlipRot and PartInfo.GeneralParameters.GEN_bGetAlternativesNesting2D then
+      BeamData.ROT90 = false
+      BeamData.ROT180 = false
+   end
+
    -- verifico tutte le combinazioni che possono essere considerate
    for nInvertIndex = 1, nCycles do
       for nUnloadPos = 1, 4 do
@@ -358,22 +363,31 @@ function BeamExec.GetAvailableCombinations( PartInfo, bIsFlipRot)
                   Combination.bPartInCombiIsInverted = true
                end
 
+               -- counter numero totale di rotazioni della combinazione
+               Combination.nRotationCounter = 0
+
                -- se posizionamento iniziale attivo
                if string.sub( sBitIndexCombination, 1, 1) == '1' then
                   CombinationList.Rotations[1] = 1
+                  Combination.nRotationCounter = Combination.nRotationCounter + 1
                end
                -- se attiva rotazione 90
                if string.sub( sBitIndexCombination, 2, 2) == '1' then
                   CombinationList.Rotations[2] = 1
+                  Combination.nRotationCounter = Combination.nRotationCounter + 1
                end
                -- se attiva rotazione 180
                if string.sub( sBitIndexCombination, 3, 3) == '1' then
                   CombinationList.Rotations[3] = 1
+                  Combination.nRotationCounter = Combination.nRotationCounter + 1
                end
                -- se attiva rotazione 270
                if string.sub( sBitIndexCombination, 4, 4) == '1' then
                   CombinationList.Rotations[4] = 1
+                  Combination.nRotationCounter = Combination.nRotationCounter + 1
                end
+
+               Combination.nRotationCounter = Combination.nRotationCounter - 1
             end
          end
       end
@@ -436,36 +450,47 @@ function BeamExec.ProcessBeams( dRawW, dRawH, dRawL, dOvmHead, dOvmMid, PARTS, b
       local dPartWidth  = CurrentPart.b3PartOriginal:getDimY( )
       local dPartHeight = CurrentPart.b3PartOriginal:getDimZ( )
 
-      local dStartOffset = dNextStartOffset
+      -- Se il pezzo corrente non ha coordinata, si calcola da OvmMid
-      local dEndOffset   = dOvmMid
+      if ( not CurrentPart.dPosX) then
+         if ( i == 1) then
+            CurrentPart.dPosX = dOvmHead
+         else
+            CurrentPart.dPosX = PARTS[i - 1].dPosX + PARTS[i - 1].b3PartOriginal:getDimX( ) + dOvmMid
+         end
+      end
 
-      -- LOGICA LOOK-AHEAD: Analisi del gap reale per la ripartizione specchiata
+      -- Se il pezzo SUCCESSIVO non ha coordinata, si calcola da OvmMid
+      if ( i < #PARTS and not PARTS[i + 1].dPosX) then
+         PARTS[i + 1].dPosX = CurrentPart.dPosX + dPartLen + dOvmMid
+      end
+
+      local dStartOffset = dNextStartOffset
+      local dEndOffset   = ( i == #PARTS ) and 0 or dOvmMid
+
+      -- Gap reale tra i pezzi (può essere negativo in caso di compenetrazione nesting obliqui)
       if ( i < #PARTS ) then
          local dTotalGap = PARTS[i + 1].dPosX - CurrentPart.dPosX - dPartLen
          if ( dTotalGap > dOvmMid ) then
-            dEndOffset = dOvmMid -- Max 5.4mm sulla coda (lato sinistro del grezzo)
+            dEndOffset = dOvmMid
-            dNextStartOffset = dTotalGap - dOvmMid -- Il residuo sulla testa del prossimo (lato destro)
+            dNextStartOffset = dTotalGap - dOvmMid
          else
-            -- Gestione automatica sotto-soglia o compenetrazione geometrica (Nesting Obliquo)
+            -- Gap minore dello spessore lama (compenetrazione per nesting obliqui)
             dEndOffset = dTotalGap
             dNextStartOffset = 0
          end
       end
 
-      -- MATEMATICA CORRETTA PER X CAD INVERTITA:
+      local dCurrentRawLen  = dPartLen + dStartOffset + dEndOffset
-      -- Il grezzo idRaw si estende verso destra. Spostando il pezzo internamente di dEndOffset (dDelta),
-      -- lasciamo dEndOffset a sinistra (coda) e matematicamente dStartOffset a destra (testa).
-      local dCrawLen  = dPartLen + dStartOffset + dEndOffset
       local dDelta    = dEndOffset
       local dStartPos = CurrentPart.dPosX - dStartOffset
 
       local bIsSectionOk = ( ( abs( dPartWidth - dRawW ) < 100 * GEO.EPS_SMALL and abs( dPartHeight - dRawH ) < 100 * GEO.EPS_SMALL ) or
                              ( abs( dPartHeight - dRawW ) < 100 * GEO.EPS_SMALL and abs( dPartWidth - dRawH ) < 100 * GEO.EPS_SMALL ) )
 
-      if ( bIsSectionOk and ( dStartPos + dCrawLen <= dRawL + GEO.EPS_SMALL ) ) then
+      if ( bIsSectionOk and ( dStartPos + dCurrentRawLen <= dRawL + GEO.EPS_SMALL ) ) then
          
          -- 5. Creazione e Posizionamento del Contenitore RawPart
-         CurrentPart.idRaw = EgtAddRawPart( Point3d( 0, 0, 0 ), dCrawLen, dRawW, dRawH, BeamData.RAWCOL )
+         CurrentPart.idRaw = EgtAddRawPart( Point3d( 0, 0, 0 ), dCurrentRawLen, dRawW, dRawH, BeamData.RAWCOL )
          EgtMoveToCornerRawPart( CurrentPart.idRaw, BeamData.ptOriXR, BeamData.dPosXR )
          EgtMoveRawPart( CurrentPart.idRaw, Vector3d( -dStartPos, 0, 0 ) )
 
@@ -530,7 +555,7 @@ function BeamExec.ProcessBeams( dRawW, dRawH, dRawL, dOvmHead, dOvmMid, PARTS, b
          CurrentPart.CombinationList = BeamExec.GetAvailableCombinations( CurrentPart, bIsFlipRot )
 
          -- Avanzamento calcolato sulla coordinata reale di fine RawPart (estremità sinistra sulla barra)
-         dMaxX = max( dMaxX, dStartPos + dCrawLen )
+         dMaxX = max( dMaxX, dStartPos + dCurrentRawLen )
          CurrentPart.dRestLength = dRawL - dMaxX
          idPrevRaw = CurrentPart.idRaw
       else
@@ -797,7 +822,7 @@ local function AreDrillingsMirrored( Proc, ProcMirror, Part)
 end
 
 -------------------------------------------------------------------------------------------------------------
-local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
+local function GetFeatureInfoAndDependency( vProcSingleRot, Part, bIsFlipRot)
    -- gruppo per geometrie temporanee
    local idTempGroup = BeamLib.GetTempGroup()
 
@@ -809,12 +834,10 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
    -- ciclo tutte le feature
    for i = 1, #vProcSingleRot do
       local Proc = vProcSingleRot[i]
-      if Proc.Topology.sName == 'HeadCut' then
+      if not HeadProcOriginal and Proc.Topology.sName == 'HeadCut' then
          HeadProcOriginal = Proc
-         HeadProcOriginal.bIsOriginalHeadcut = true
+      elseif not TailProcOriginal and Proc.Topology.sName == 'TailCut' then
-      elseif Proc.Topology.sName == 'TailCut' then
          TailProcOriginal = Proc
-         TailProcOriginal.bIsOriginalTailcut = true
       end
       -- se feature abilitata alla lavorazione
       if Proc.nFlg ~= 0 then
@@ -829,7 +852,7 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
                   and ( FeatureLib.IsFeatureCuttingEntireSection( Proc.b3Box, Part) and FeatureLib.IsFeatureCuttingEntireSection( ProcB.b3Box, Part))
 
                -- si trovano i veri tagli di testa e coda e si disattivano gli altri, se necessario
-               if bAreBothTruncatingCuts then
+               if bIsFlipRot and Part.GeneralParameters.GEN_bGetAlternativesNesting2D and bAreBothTruncatingCuts then
                   -- testa
                   if Proc.Faces[1].vtN:getX() > GEO.EPS_SMALL and ProcB.Faces[1].vtN:getX() > GEO.EPS_SMALL then
                      -- il primo taglio è più verso il centro della trave
@@ -849,7 +872,7 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
                            ProcB.nFlg = 0
                         end
                      -- il secondo taglio è più verso il centro della trave
-                     elseif Proc.b3Box:getMin():getX() >= ProcB.b3Box:getMin():getX() - 10 * GEO.EPS_SMALL then
+                     else
                         HeadProc = ProcB
                         local idProcCopy = EgtCopyGlob( Proc.id, idTempGroup)
                         local idProcBCopy = EgtCopyGlob( ProcB.id, idTempGroup)
@@ -884,7 +907,7 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
                            ProcB.nFlg = 0
                         end
                      -- il secondo taglio è più verso il centro della trave
-                     elseif Proc.b3Box:getMax():getX() >= ProcB.b3Box:getMax():getX() - 10 * GEO.EPS_SMALL then
+                     else
                         TailProc = ProcB
                         local idProcCopy = EgtCopyGlob( Proc.id, idTempGroup)
                         local idProcBCopy = EgtCopyGlob( ProcB.id, idTempGroup)
@@ -911,6 +934,7 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
                   table.insert( Proc.SlaveProcIndexes, j)
                   ProcB.nIndexMasterProc = i
                   ProcB.nFlg = 0
+                  HeadProcOriginal = Proc
                end
                -- se entrambi tagli di coda, si tiene sempre il primo ( ma non quello aggiunto dall'automatismo)
                if ( ID.IsTailCut( Proc) and not EgtGetInfo( Proc.id, 'HEAD_ADD_CUT', 'i')) and ID.IsTailCut( ProcB) then
@@ -920,6 +944,7 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
                   table.insert( Proc.SlaveProcIndexes, j)
                   ProcB.nIndexMasterProc = i
                   ProcB.nFlg = 0
+                  TailProcOriginal = Proc
                end
                -- verifico se feature tipo LapJoint è attraversata da almeno un foro
                if ( Proc.Topology.sFamily == 'Pocket' or Proc.Topology.sFamily == 'Tunnel' or Proc.Topology.sFamily == 'Groove' or ID.IsMortise( Proc)) and
@@ -941,12 +966,24 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
       end
    end
 
+   if not Part.GeneralParameters.GEN_bGetAlternativesNesting2D then
+      return vProcSingleRot
+   end
+
+   -- si tiene via il riferimento alla Proc Head/Tail originale in caso si dovesse rimpiazzare
+   HeadProcOriginal.bIsOriginalHeadcut = true
+   TailProcOriginal.bIsOriginalTailcut = true
    if not HeadProc then
       HeadProc = HeadProcOriginal
+   else
+      HeadProc.HeadProcOriginal = HeadProcOriginal
    end
    if not TailProc then
       TailProc = TailProcOriginal
+   else
+      TailProc.TailProcOriginal = TailProcOriginal
    end
+
    HeadProc.Topology = {}
    TailProc.Topology = {}
    HeadProc.Topology.sFamily = 'HeadCut'
@@ -968,7 +1005,7 @@ local function GetFeatureInfoAndDependency( vProcSingleRot, Part)
    local PtSortedTail = BeamLib.GetSortedVertices( TailProc)
    if PtSortedTail then
       TailcutInfo.OffsetX = {}
-      for i = 1, #PtSortedHead do
+      for i = 1, #PtSortedTail do
          table.insert( TailcutInfo.OffsetX, Part.b3Part:getMin():getX() - PtSortedTail[i]:getX())
       end
    end
@@ -1416,7 +1453,7 @@ function BeamExec.GetProcessings( PARTS, bIsFlipRot)
 
                -- recupero informazioni ausiliarie feature e dipendenze tra feature stesse
                -- TODO le dipendenze cambiano in base alla rotazione del pezzo? probabilmente no
-               vProcRot[nIndex], HeadcutInfo, TailcutInfo = GetFeatureInfoAndDependency( vProcRot[nIndex], PARTS[nPart])
+               vProcRot[nIndex], HeadcutInfo, TailcutInfo = GetFeatureInfoAndDependency( vProcRot[nIndex], PARTS[nPart], bIsFlipRot)
             else
                -- inserisco una tabella vuota
                table.insert( vProcRot, {})
@@ -1803,7 +1840,7 @@ function BeamExec.ProcessMachinings( PARTS, bIsFlipRot)
    -- ricerca strategia di lavorazione per ogni pezzo e applicazione lavorazioni
    for nPart = 1, #PARTS do
       local nCycles = 1
-      local nMaxReProcessCycles = EgtClamp( PARTS[nPart].GeneralParameters.GEN_nMaxReProcessCycles, 1, 3)
+      local nMaxReProcessCycles = EgtClamp( PARTS[nPart].GeneralParameters.GEN_nMaxReProcessCycles, 1, 5)
 
       -- la parte di applicazione lavorazioni può essere lanciata più volte in caso della presenza di errori
       local bProcess = true

LuaLibs/MachiningLib.lua

@@ -347,7 +347,7 @@ local function TestEngagement( sBladeEngagement, Parameters, OptionalParameters)
       return false
    end
    -- lavorazione in collisione con il pezzo: non fattibile
-   local bCollisionFound, bMoveAfterSplit = PreSimulationLib.CheckCollision( sBladeEngagement, CheckCollisionParameters, CheckCollisionOptionalParameters)
+   local bCollisionFound, bMoveAfterSplit = PreSimulationLib.CheckCollision( CheckCollisionParameters, CheckCollisionOptionalParameters)
    if bCollisionFound then
       return false
    end
@@ -373,7 +373,7 @@ local function TestEngagement( sBladeEngagement, Parameters, OptionalParameters)
       CheckCollisionOptionalParameters.PointsToCheck = {}
       table.insert( CheckCollisionOptionalParameters.PointsToCheck, PerpendicularLeadInOut.LeadIn.ptPoint)
       table.insert( CheckCollisionOptionalParameters.PointsToCheck, PerpendicularLeadInOut.LeadOut.ptPoint)
-      local bCollisionFoundPerpendicular, bMoveAfterSplitPerpendicular = PreSimulationLib.CheckCollision( sBladeEngagement, CheckCollisionParameters, CheckCollisionOptionalParameters)
+      local bCollisionFoundPerpendicular, bMoveAfterSplitPerpendicular = PreSimulationLib.CheckCollision( CheckCollisionParameters, CheckCollisionOptionalParameters)
       -- attacco perpendicolare possibile
       if not bCollisionFoundPerpendicular then
          LeadInOut.Perpendicular = PerpendicularLeadInOut
@@ -403,7 +403,7 @@ local function TestEngagement( sBladeEngagement, Parameters, OptionalParameters)
       CheckCollisionOptionalParameters.PointsToCheck = {}
       table.insert( CheckCollisionOptionalParameters.PointsToCheck, TangentLeadInOut.LeadIn.ptPoint)
       table.insert( CheckCollisionOptionalParameters.PointsToCheck, TangentLeadInOut.LeadOut.ptPoint)
-      local bCollisionFoundTangent, bMoveAfterSplitTangent = PreSimulationLib.CheckCollision( sBladeEngagement, CheckCollisionParameters, CheckCollisionOptionalParameters)
+      local bCollisionFoundTangent, bMoveAfterSplitTangent = PreSimulationLib.CheckCollision( CheckCollisionParameters, CheckCollisionOptionalParameters)
       -- attacco tangenziale possibile
       if not bCollisionFoundTangent then
          LeadInOut.Tangent = TangentLeadInOut
@@ -625,7 +625,7 @@ function MachiningLib.FindBlade( Proc, ToolSearchParameters)
    local bForceLongcutBlade = ToolSearchParameters.bForceLongcutBlade or false
    local EdgeToMachine = ToolSearchParameters.EdgeToMachine
    local Part = ToolSearchParameters.Part
-   local bIsDicing = ToolSearchParameters.bIsDicing or false
+   local idCheckCollisionTm = ToolSearchParameters.idCheckCollisionTm
    local sRestLengthSideForPreSimulation = ToolSearchParameters.sRestLengthSideForPreSimulation or 'Tail'
    local bCannotSplitRestLength = ToolSearchParameters.bCannotSplitRestLength or false
    local bDisableRealElevationCheck = ToolSearchParameters.bDisableRealElevationCheck or false
@@ -660,7 +660,7 @@ function MachiningLib.FindBlade( Proc, ToolSearchParameters)
                dDepthToMachine = min( dElevation, TOOLS[i].dMaxDepth)
             }
             local BladeEngagementOptionalParameters = {
-               bIsDicing = bIsDicing,
+               idCheckCollisionTm = idCheckCollisionTm,
                sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
                bCannotSplitRestLength = bCannotSplitRestLength,
                bDisableRealElevationCheck = bDisableRealElevationCheck
@@ -1584,8 +1584,8 @@ function MachiningLib.GetTimeToMachineAllStepsWithLeadInOut( Machining, Part)
          Machining.CloneStepsLongitudinal.nCount = 1
       end
       -- stima tempi di lavorazione per i diversi tratti
-      local dTimeToMachineLeadIn = ( Machining.dDepthToMachine + ( TOOLS[Machining.nToolIndex].SetupInfo.dZSafeDelta or 60) + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)) / dToolStartFeed
+      local dTimeToMachineLeadIn = ( Machining.dDepthToMachine + ( TOOLS[Machining.nToolIndex].SetupInfo.dZSafeDelta or 0) + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)) / dToolStartFeed
-      local dTimeToMachineLeadOut = ( Machining.dDepthToMachine + ( TOOLS[Machining.nToolIndex].SetupInfo.dZSafeDelta or 60) + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)) / dToolEndFeed
+      local dTimeToMachineLeadOut = ( Machining.dDepthToMachine + ( TOOLS[Machining.nToolIndex].SetupInfo.dZSafeDelta or 0) + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)) / dToolEndFeed
       local dTimeToMachineEdge = Machining.dLengthToMachine / dToolFeed
       -- calcolo lunghezze e tempi
       if Machining.Steps.nStepType == MCH_MILL_ST.ZIGZAG then

LuaLibs/PreSimulationLib.lua

@@ -209,12 +209,6 @@ local function CheckOutOfStrokePoint( ptOnToolTipCenter, vtHead, nSCC, Tool, vtA
       return true
    end
 
-   -- EgtSetAxisPos( 'T', dT)
-   -- EgtSetAxisPos( 'Y', dY)
-   -- EgtSetAxisPos( 'Z', dZ)
-   -- EgtSetAxisPos( 'C', dC1)
-   -- EgtSetAxisPos( 'A', dA1)
-
    -- se si arriva qui, il punto non è in finecorsa
    return false
 end
@@ -305,7 +299,7 @@ local function MoveMachineAxesToPosition( ptOnToolTipCenter, vtHead, vtAux)
 end
 
 -------------------------------------------------------------------------------------------------------------
-local function CheckCollisionPoint( sAxis, ptOnToolTipCenter, vtHead, vtAux, Part, bCannotSplitRestLength, sRestLengthSideForPreSimulation, bCheckOnlyRestlength)
+local function CheckCollisionPoint( sAxis, ptOnToolTipCenter, vtHead, vtAux, Part, bCannotSplitRestLength, sRestLengthSideForPreSimulation, idCheckCollisionTm)
 
    -- spostamento assi macchina in posizione
    local dDeltaXHeadOffset = MoveMachineAxesToPosition( ptOnToolTipCenter, vtHead, vtAux)
@@ -337,32 +331,32 @@ local function CheckCollisionPoint( sAxis, ptOnToolTipCenter, vtHead, vtAux, Par
 
    -- check collisione con pezzo
    local bCollisionFoundPiece = false
-   if not bCheckOnlyRestlength then
+   if not idCheckCollisionTm then
-      local idCheckCollisionTm = Part.idBoxTm
+      idCheckCollisionTm = Part.idBoxTm
       -- se testa o coda attaccate, si considerano nella superficie di collisione
       if bCannotSplitRestLength then
          local b3CheckCollision = BeamLib.GetPartBoxWithHeadTail( Part, sRestLengthSideForPreSimulation)
          idCheckCollisionTm = EgtSurfTmBBox( Part.idTempGroup, b3CheckCollision, false, GDB_RT.GLOB)
       end
-      for i = 1, #CollisionSurfTmId do
+   end
-         bCollisionFoundPiece = EgtCDeSolidSolid( idCheckCollisionTm, CollisionSurfTmId[i], BeamData.COLL_SIC)
+   for i = 1, #CollisionSurfTmId do
-         if not type( bCollisionFoundPiece) == "boolean" then
+      bCollisionFoundPiece = EgtCDeSolidSolid( idCheckCollisionTm, CollisionSurfTmId[i], BeamData.COLL_SIC)
-            error( 'Presimulation fail')
+      if not type( bCollisionFoundPiece) == "boolean" then
-         end
+         error( 'Presimulation fail')
-         if EgtGetDebugLevel() >= 3 and bCollisionFoundPiece then
-            EgtSetColor( CollisionSurfTmId[i], RED())
-         end
-         if bCollisionFoundPiece then
-            break
-         end
       end
+      if EgtGetDebugLevel() >= 3 and bCollisionFoundPiece then
+         EgtSetColor( CollisionSurfTmId[i], RED())
+      end
+      if bCollisionFoundPiece then
+         break
+      end
+   end
 
       -- se trovata collisione con pezzo è inutile procedere con il grezzo
       if bCollisionFoundPiece then
 
          return true
       end
-   end
 
    -- check collisione con grezzo restante, se con il pezzo non c'è collisione e non è un taglio di testa o coda
    local bCollisionFoundRestLength = false
@@ -401,7 +395,7 @@ local function CheckCollisionWithAxis( sAxis, MachiningParameters, OptionalParam
 
    -- parametri opzionali
    OptionalParameters = OptionalParameters or {}
-   local bCheckOnlyRestlength = OptionalParameters.bCheckOnlyRestlength or false
+   local idCheckCollisionTm = OptionalParameters.idCheckCollisionTm
    local sRestLengthSideForPreSimulation = OptionalParameters.sRestLengthSideForPreSimulation or 'Tail'
    local bCannotSplitRestLength = OptionalParameters.bCannotSplitRestLength or false
    local vtAux = OptionalParameters.vtAux
@@ -426,7 +420,7 @@ local function CheckCollisionWithAxis( sAxis, MachiningParameters, OptionalParam
    -- se non si trova collisione si ritorna se è necessario separare prima di effettuare la lavorazione (ossia non c'è collisione con il pezzo ma c'è con il grezzo restante)
    for i = 1, #PointsOnToolTipCenter do
 
-      local bCollisionFoundPiece, bCollisionFoundRestLength = CheckCollisionPoint( sAxis, PointsOnToolTipCenter[i], vtHead, vtAux, Part, bCannotSplitRestLength, sRestLengthSideForPreSimulation, bCheckOnlyRestlength)
+      local bCollisionFoundPiece, bCollisionFoundRestLength = CheckCollisionPoint( sAxis, PointsOnToolTipCenter[i], vtHead, vtAux, Part, bCannotSplitRestLength, sRestLengthSideForPreSimulation, idCheckCollisionTm)
 
       -- se trovata collisione con pezzo è inutile controllare gli altri punti
       if bCollisionFoundPiece then
@@ -445,7 +439,7 @@ local function CheckCollisionWithAxis( sAxis, MachiningParameters, OptionalParam
 end
 
 -------------------------------------------------------------------------------------------------------------
-function PreSimulationLib.CheckCollision( sBladeEngagement, Parameters, OptionalParameters)
+function PreSimulationLib.CheckCollision( Parameters, OptionalParameters)
 
    local bCollisionFound
    local bMoveAfterSplitL3, bMoveAfterSplitR3, bMoveAfterSplitR2, bMoveAfterSplitR1
@@ -459,24 +453,19 @@ function PreSimulationLib.CheckCollision( sBladeEngagement, Parameters, Optional
    OptionalParameters = OptionalParameters or {}
 
    local OptionalParametersCheckCollisionWithAxis = {}
-   OptionalParametersCheckCollisionWithAxis.bCheckOnlyRestlength = false
    OptionalParametersCheckCollisionWithAxis.PointsToCheck = OptionalParameters.PointsToCheck or nil
    OptionalParametersCheckCollisionWithAxis.sRestLengthSideForPreSimulation = OptionalParameters.sRestLengthSideForPreSimulation or 'Tail'
    OptionalParametersCheckCollisionWithAxis.bCannotSplitRestLength = OptionalParameters.bCannotSplitRestLength or false
    OptionalParametersCheckCollisionWithAxis.sBlockedAxis = OptionalParameters.sBlockedAxis
    OptionalParametersCheckCollisionWithAxis.vtAux = OptionalParameters.vtAux
+   OptionalParametersCheckCollisionWithAxis.idCheckCollisionTm = OptionalParameters.idCheckCollisionTm
 
    local sBlockedAxis = OptionalParameters.sBlockedAxis
-   local bIsDicing = OptionalParameters.bIsDicing or false
    local bDisableRealElevationCheck = OptionalParameters.bDisableRealElevationCheck or false
-   local bCheckOnlyRestlengthForAxisABC = false
 
-   -- se cubetti in modalità standard (no DownUp) gli assi AB e C si controllano solo con grezzo (ci sarebbe collisione con il materiale già rimosso controllando AB e C con pezzo)
-   if bIsDicing and ( sBladeEngagement == 'Standard') then
-      bCheckOnlyRestlengthForAxisABC = true
    -- se l'elevazione reale (rispetto al pezzo + eventuale materiale in testa/coda) è maggiore del massimo materiale è sempre collisione
    -- TODO rifare con funzione
-   elseif not bDisableRealElevationCheck then
+   if not bDisableRealElevationCheck then
       local Edge = Parameters.Edge
       local vtNFace = Parameters.vtNFace
       local dDepthToMachine = Parameters.dDepthToMachine
@@ -523,9 +512,6 @@ function PreSimulationLib.CheckCollision( sBladeEngagement, Parameters, Optional
    -- ultimo asse lineare prima dei rotativi (solitamente Z) si controlla sempre
    bCollisionFound, bMoveAfterSplitL3 = CheckCollisionWithAxis( sL3, Parameters, OptionalParametersCheckCollisionWithAxis)
 
-   -- assi rotativi: se richiesto si controlla la collisione solo col grezzo
-   OptionalParametersCheckCollisionWithAxis.bCheckOnlyRestlength = bCheckOnlyRestlengthForAxisABC
-
    if sR3 and not bCollisionFound then
       bCollisionFound, bMoveAfterSplitR3 = CheckCollisionWithAxis( sR3, Parameters, OptionalParametersCheckCollisionWithAxis)
    end

Process.lua

@@ -131,6 +131,14 @@ local function MyProcessInputData()
       else
          PARTS[i].b3PartOriginal = b3Solid
       end
+      if BeamData.MAX_LENGTH and BeamData.MAX_LENGTH > 10 and b3Solid:getDimX() > BeamData.MAX_LENGTH then
+         local sOut = 'Lunghezza ('  .. EgtNumToString( b3Solid:getDimX(), 2) .. ') ' ..
+                      'oltre i limiti della macchina (' .. EgtNumToString( BeamData.MAX_LENGTH, 2) .. ') '
+         EgtOutLog( sOut)
+         EgtOutBox( sOut, 'Lavora Travi', 'WARNING')
+         EgtDraw()
+         return false
+      end
    end
    dRawW = PARTS[1].b3PartOriginal:getDimY()
    dRawH = PARTS[1].b3PartOriginal:getDimZ()

Strategies/GeneralParameters.json

@@ -46,7 +46,7 @@
       "sName": "GEN_bGetAlternativesNesting2D",
       "sNameNge": "GET_ALTERNATIVES_NEST2D",
       "sValue": "false",
-      "sDescriptionShort": "Enable material optimization function in nesting",
+      "sDescriptionShort": "Enable material optimization function in nesting (part rotation disabled)",
       "sDescriptionLong": "",
       "sType": "b",
       "sMessageId": " ",

Strategies/Standard/STR0001/STR0001.lua

@@ -87,6 +87,7 @@ local function GetTenonStrategy( Proc, Part)
       ToolSearchParameters.dElevation = EgtSurfTmFacetElevationInBBox( Strategy.idTenonCutPlane, 0, Part.b3Part, true, GDB_ID.ROOT)
 
       ToolSearchParameters.vtToolDirection = Proc.FeatureInfo.vtTenonN
+      ToolSearchParameters.sMillShape = 'STANDARD'
       ToolSearchParameters.AvailableToolList = MachiningLib.GetAvailableToolList( Proc, Strategy.Parameters.sPocketingList, 'Pocketing')
       Machining.Cutting.ToolInfo = MachiningLib.FindMill( Proc, ToolSearchParameters)
 

Strategies/Standard/STR0003/STR0003.lua

@@ -415,7 +415,8 @@ function STR0003.Make( bAddMachining, Proc, Part, CustomParameters)
       end
       
       -- ancora materiale residuo - se possibile si lavora dal lato
-      if Chainsaw.Result.Bottom[#Chainsaw.Result.Bottom].dResidualDepth > 10 * GEO.EPS_SMALL
+      if ( Chainsaw.Result.Bottom[#Chainsaw.Result.Bottom].dResidualDepth > 10 * GEO.EPS_SMALL
+         or not Chainsaw.Result.Bottom[#Chainsaw.Result.Bottom].bIsApplicable)
          and #Proc.MainFaces.SideFaces == 1 then
 
          -- si lavora solamente l'impronta lama sul fondo
@@ -698,7 +699,13 @@ function STR0003.Make( bAddMachining, Proc, Part, CustomParameters)
       else
          Strategy.Result.sStatus = 'Not-Completed'
       end
-      Strategy.Result.dQuality = FeatureLib.GetStrategyQuality( Result)
+
+      if Proc.Topology.sName == 'Groove-4-Blind' or Proc.Topology.sName == 'Pocket-5-Blind' then
+         Strategy.Result.dQuality = FeatureLib.GetStrategyQuality( 'SEMI')
+      else
+         Strategy.Result.dQuality = FeatureLib.GetStrategyQuality( Result)
+      end
+
       Strategy.Result.dTimeToMachine = FeatureLib.GetStrategyTimeToMachine( Result)
       Strategy.Result.dMRR = ( dFeatureVolume / Strategy.Result.dTimeToMachine) / pow( 10, 6)
    else

Strategies/Standard/STR0011/STR0011.lua

@@ -16,6 +16,27 @@ local Strategy = {}
 
 -- TODO Da fare completamente gestione foratura doppia con 2 teste
 
+-------------------------------------------------------------------------------------------------------------
+local function GetSCC( vtMachiningDirection)
+   -- TODO implementare SCC come per FacesBySaw
+   local nSCC = MCH_SCC.NONE
+   if vtMachiningDirection:getZ() < -0.9 then
+      nSCC = MCH_SCC.ADIR_ZM
+   elseif vtMachiningDirection:getZ() > 0.9 then
+      nSCC = MCH_SCC.ADIR_ZP
+   elseif vtMachiningDirection:getY() < -0.707 then
+      nSCC = MCH_SCC.ADIR_YM
+   elseif vtMachiningDirection:getY() > 0.707 then
+      nSCC = MCH_SCC.ADIR_YP
+   elseif vtMachiningDirection:getX() < -0.707 then
+      nSCC = MCH_SCC.ADIR_XM
+   elseif vtMachiningDirection:getX() > 0.707 then
+      nSCC = MCH_SCC.ADIR_XP
+   end
+
+   return nSCC
+end
+
 -------------------------------------------------------------------------------------------------------------
 local function GetDrillingStrategy( Proc, Part)
    local ToolSearchParameters = {}
@@ -39,6 +60,7 @@ local function GetDrillingStrategy( Proc, Part)
       Drilling.nToolIndex = Drilling.ToolInfo.nToolIndex
       Drilling.vtToolDirection = Proc.FeatureInfo.vtDrillExtrusion
       Drilling.dStep = TOOLS[Drilling.nToolIndex].dStep
+      Drilling.nSCC = GetSCC( -Drilling.vtToolDirection)
    end
 
    -- TODO se utensile 2 che si torverà è il gemello da usare nelle lavorazioni in doppio, allora gestire di conseguenza l'applicazione delle lavorazioni in doppio
@@ -61,6 +83,7 @@ local function GetDrillingStrategy( Proc, Part)
          Drilling2.bInvert = true
          Drilling2.vtToolDirection = -Proc.FeatureInfo.vtDrillExtrusion
          Drilling2.dStep = TOOLS[Drilling2.nToolIndex].dStep
+         Drilling2.nSCC = GetSCC( -Drilling2.vtToolDirection)
       end
    end
 

Strategies/Standard/STR0013/STR0013.lua

@@ -14,6 +14,27 @@ local FeatureLib = require( 'FeatureLib')
 local STR0013 = {}
 local Strategy = {}
 
+-------------------------------------------------------------------------------------------------------------
+local function GetSCC( vtMachiningDirection)
+   -- TODO implementare SCC come per FacesBySaw
+   local nSCC = MCH_SCC.NONE
+   if vtMachiningDirection:getZ() < -0.9 then
+      nSCC = MCH_SCC.ADIR_ZM
+   elseif vtMachiningDirection:getZ() > 0.9 then
+      nSCC = MCH_SCC.ADIR_ZP
+   elseif vtMachiningDirection:getY() < -0.707 then
+      nSCC = MCH_SCC.ADIR_YM
+   elseif vtMachiningDirection:getY() > 0.707 then
+      nSCC = MCH_SCC.ADIR_YP
+   elseif vtMachiningDirection:getX() < -0.707 then
+      nSCC = MCH_SCC.ADIR_XM
+   elseif vtMachiningDirection:getX() > 0.707 then
+      nSCC = MCH_SCC.ADIR_XP
+   end
+
+   return nSCC
+end
+
 -------------------------------------------------------------------------------------------------------------
 local function GetDrillingWithMillStrategy( Proc, Part)
    local ToolSearchParameters = {}
@@ -172,6 +193,7 @@ function STR0013.Make( bAddMachining, Proc, Part, CustomParameters)
             MachiningToAdd = MachiningLib.InitMachiningParameters( MCH_MY.DRILLING)
             MachiningToAdd = BeamLib.MergeTables( MachiningToAdd, Strategy.Machinings[j])
             MachiningToAdd.Steps.dStep = TOOLS[nIndexTool].dStep / 3
+            MachiningToAdd.nSCC = GetSCC( -MachiningToAdd.vtToolDirection)
          -- se diametro foro più grande della fresa, ma non oltre il doppio del diametro, si fa contornatura a spirale
          elseif Proc.FeatureInfo.dDrillDiam < ( TOOLS[nIndexTool].dDiameter * 0.75) * 2 or Strategy.Parameters.bOnlyContouring then
             MachiningToAdd = MachiningLib.InitMachiningParameters( MCH_MY.MILLING)
@@ -184,6 +206,7 @@ function STR0013.Make( bAddMachining, Proc, Part, CustomParameters)
             MachiningToAdd.LeadOut.dTangentDistance = 0.5
             MachiningToAdd.LeadOut.dPerpDistance = 0.5
             MachiningToAdd.LeadOut.dElevation = Proc.FeatureInfo.dDrillLen
+            MachiningToAdd.nSCC = GetSCC( -MachiningToAdd.vtToolDirection)
          -- se diametro foro più grande del doppio del diametro fresa, si fa svuotatura
          else
             MachiningToAdd = MachiningLib.InitMachiningParameters( MCH_MY.POCKETING)
@@ -194,6 +217,7 @@ function STR0013.Make( bAddMachining, Proc, Part, CustomParameters)
             MachiningToAdd.LeadIn.nType = MCH_POCK_LI.HELIX
             MachiningToAdd.LeadIn.dTangentDistance = TOOLS[nIndexTool].dDiameter / 2
             MachiningToAdd.LeadIn.dElevation = MachiningToAdd.Steps.dStep / 2
+            MachiningToAdd.nSCC = GetSCC( -MachiningToAdd.vtToolDirection)
          end
 
          MachiningToAdd.nToolIndex = nIndexTool

StrategyLibs/BLADEKEEPWASTE.lua

@@ -222,21 +222,21 @@ function BLADEKEEPWASTE.Make( Proc, Part, OptionalParameters)
    elseif Proc.nFct == 2 then
       -- per angolo tra le facce >= 90deg (feature convessa) non applicabile
       if Proc.AdjacencyMatrix[1][2] > 10 * GEO.EPS_SMALL or Proc.AdjacencyMatrix[1][2] < -91 then
-         Result = FeatureLib.GetStrategyResultNotApplicable( 'BladeKeepWaste : angle between faces must be concave and >= 90deg')
+         Result = FeatureLib.GetStrategyResultNotApplicable()
          return Machinings, Result
       end
    elseif Proc.nFct == 3 then
       -- caso speciale RidgeLap - per angolo tra le facce >= 90deg (feature convessa) non applicabile
       if Proc.AdjacencyMatrix[1][2] > 10 * GEO.EPS_SMALL or Proc.AdjacencyMatrix[1][2] < -91 then
-         Result = FeatureLib.GetStrategyResultNotApplicable( 'BladeKeepWaste : angle between faces must be concave and >= 90deg')
+         Result = FeatureLib.GetStrategyResultNotApplicable()
          return Machinings, Result
       end
       if Proc.AdjacencyMatrix[1][3] > 10 * GEO.EPS_SMALL or Proc.AdjacencyMatrix[1][3] < -91 then
-         Result = FeatureLib.GetStrategyResultNotApplicable( 'BladeKeepWaste : angle between faces must be concave and >= 90deg')
+         Result = FeatureLib.GetStrategyResultNotApplicable()
          return Machinings, Result
       end
       if Proc.AdjacencyMatrix[2][3] > 10 * GEO.EPS_SMALL or Proc.AdjacencyMatrix[2][3] < -91 then
-         Result = FeatureLib.GetStrategyResultNotApplicable( 'BladeKeepWaste : angle between faces must be concave and >= 90deg')
+         Result = FeatureLib.GetStrategyResultNotApplicable()
          return Machinings, Result
       end
    end

StrategyLibs/BLADETOWASTE.lua

@@ -260,7 +260,7 @@ local function GetBestBlade( Proc, Part, Face, OptionalParameters)
    local dShortPartLength = OptionalParameters.dShortPartLength or BeamData.LEN_SHORT_PART
    local EdgeToMachineTop = OptionalParameters.EdgeToMachineTop
    local EdgeToMachineBottom = OptionalParameters.EdgeToMachineBottom
-   local bIsDicing = OptionalParameters.bIsDicing
+   local idCheckCollisionTm = OptionalParameters.idCheckCollisionTm
    local sRestLengthSideForPreSimulation = OptionalParameters.sRestLengthSideForPreSimulation
    local bCannotSplitRestLength = OptionalParameters.bCannotSplitRestLength
    -- TODO qui sarebbe meglio avere dExtra come OptionalParameter???
@@ -289,7 +289,7 @@ local function GetBestBlade( Proc, Part, Face, OptionalParameters)
          FaceToMachine = Face,
          EdgeToMachine = EdgeToMachineTop,
          Part = Part,
-         bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength
       })
@@ -304,7 +304,7 @@ local function GetBestBlade( Proc, Part, Face, OptionalParameters)
          FaceToMachine = Face,
          EdgeToMachine = EdgeToMachineBottom,
          Part = Part,
-         bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength
       })
@@ -371,7 +371,7 @@ local function GetSingleCutStrategy( Proc, Part, OptionalParameters)
    local bReduceBladePath = OptionalParameters.bReduceBladePath or false
    local bAllowFastCuts = OptionalParameters.bAllowFastCuts or false
    local FaceToMachine = Proc.Faces[OptionalParameters.nFaceToMachineIndex or 1]
-   local bIsDicing = OptionalParameters.bIsDicing or false
+   local idCheckCollisionTm = OptionalParameters.idCheckCollisionTm
    local sRestLengthSideForPreSimulation = OptionalParameters.sRestLengthSideForPreSimulation or 'Tail'
    local bCannotSplitRestLength = OptionalParameters.bCannotSplitRestLength or false
    -- lati da lavorare in base al tipo di lama
@@ -390,7 +390,7 @@ local function GetSingleCutStrategy( Proc, Part, OptionalParameters)
       EdgeToMachineTop = EdgeToMachineList.Top,
       EdgeToMachineBottom = EdgeToMachineList.Bottom,
       nToolIndex = nToolIndex,
-      bIsDicing = bIsDicing,
+      idCheckCollisionTm = idCheckCollisionTm,
       sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
       bCannotSplitRestLength = bCannotSplitRestLength
    }
@@ -442,7 +442,7 @@ local function GetSingleCutStrategy( Proc, Part, OptionalParameters)
          FaceToMachine = FaceToMachine,
          EdgeToMachine = EdgeToMachineList.TopGuillotine,
          Part = Part,
-         bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength
       })
@@ -475,7 +475,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
    OptionalParameters = OptionalParameters or {}
    local nToolIndex = OptionalParameters.nToolIndex
    local FaceToMachine = Proc.Faces[OptionalParameters.nFaceToMachineIndex or 1]
-   local bIsDicing = OptionalParameters.bIsDicing or false
+   local idCheckCollisionTm = OptionalParameters.idCheckCollisionTm
    local sRestLengthSideForPreSimulation = OptionalParameters.sRestLengthSideForPreSimulation or 'Tail'
    local bCannotSplitRestLength = OptionalParameters.bCannotSplitRestLength or false
 
@@ -499,7 +499,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
          FaceToMachine = FaceToMachine,
          EdgeToMachine = EdgeToMachine,
          Part = Part,
-         bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength
       })
@@ -512,7 +512,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
          FaceToMachine = FaceToMachine,
          EdgeToMachine = BeamLib.FindEdgeBestOrientedAsDirection( FaceToMachine.Edges, -EdgeToMachine.vtN),
          Part = Part,
-         bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength
       })
@@ -534,7 +534,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
             FaceToMachine = FaceToMachine,
             EdgeToMachine = BeamLib.FindEdgeBestOrientedAsDirection( FaceToMachine.Edges, -EdgeToMachine.vtN),
             Part = Part,
-            bIsDicing = bIsDicing,
+            idCheckCollisionTm = idCheckCollisionTm,
             sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
             bCannotSplitRestLength = bCannotSplitRestLength
          })
@@ -553,7 +553,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
             FaceToMachine = FaceToMachine,
             EdgeToMachine = EdgeToMachine,
             Part = Part,
-            bIsDicing = bIsDicing,
+            idCheckCollisionTm = idCheckCollisionTm,
             sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
             bCannotSplitRestLength = bCannotSplitRestLength
          })
@@ -589,7 +589,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
       FaceToMachine = FaceToMachine,
       EdgeToMachine = EdgeToMachine,
       Part = Part,
-      bIsDicing = bIsDicing,
+      idCheckCollisionTm = idCheckCollisionTm,
       sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
       bCannotSplitRestLength = bCannotSplitRestLength
    })
@@ -607,7 +607,7 @@ local function GetDualSideCutStrategy( Proc, Part, OptionalParameters)
          dDepthToMachine = dDepthToMachine
       }
       local BladeEngagementOptionalParameters = {
-         bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength
       }
@@ -782,6 +782,52 @@ local function CutWholeWaste( Proc, Part, OptionalParameters)
 end
 
 
+local function UpdateDiceRaw( idRaw, idParallelTm, idPerpendicularTm, Part, MainFace, OtherFace)
+
+   -- frame solidale alla feature
+   local vtZ = MainFace.vtN
+   local vtX = OtherFace and OtherFace.vtN or nil
+   local frMainFace = Frame3d( MainFace.ptCenter, vtZ, vtX)
+
+   -- box del cubetto in riferimento feature
+   local b3Surf = EgtGetBBoxRef( idParallelTm, GDB_BB.STANDARD, frMainFace)
+   if idPerpendicularTm then
+      local b3SurfPerpendicular = EgtGetBBoxRef( idPerpendicularTm, GDB_BB.STANDARD, frMainFace)
+      b3Surf:Add( b3SurfPerpendicular)
+   else
+      -- se non arriva la superficie perpendicolare è un solo taglio parallelo: si estende il box in Z in modo da uscire dal pezzo
+      local ptDeltaZ = b3Surf:getMax() + vtZ * ( MainFace.dElevation + 5)
+      b3Surf:Add( ptDeltaZ)
+   end
+
+   -- estensione box per non avere problemi nella sottrazione booleana
+   if OtherFace and idPerpendicularTm then
+      local vtY = vtZ ^ vtX
+      local ptDeltaX = b3Surf:getMax() + vtX * 1
+      local ptDeltaZ = b3Surf:getMax() + vtZ * 1
+      local ptDeltaYplus = b3Surf:getMax() + vtY * 1
+      local ptDeltaYminus = b3Surf:getMin() - vtY * 1
+      b3Surf:Add( ptDeltaX)
+      b3Surf:Add( ptDeltaZ)
+      b3Surf:Add( ptDeltaYplus)
+      b3Surf:Add( ptDeltaYminus)
+   else
+      b3Surf:expand( 1)
+   end
+   
+   -- si porta il box in riferimento globale 
+   b3Surf:toGlob( frMainFace)
+
+   -- conversione box cubetto in superficie
+   local idSurfTmToSubtract = EgtSurfTmBBox( Part.idTempGroup, b3Surf, false, GDB_RT.GLOB)
+
+   -- sottrazione del cubetto dal grezzo
+   EgtSurfTmSubtract( idRaw, idSurfTmToSubtract)
+
+   return idRaw
+end
+
+
 local function CalculateDiceMachinings( vCuts, Parameters)
    local Machinings = {}
    local bMoveAfterSplit = false
@@ -789,6 +835,7 @@ local function CalculateDiceMachinings( vCuts, Parameters)
    local Proc = Parameters.Proc
    local Part = Parameters.Part
    local MainFace = Parameters.MainFace
+   local OtherFace = next( Parameters.OtherFace) and Parameters.OtherFace or nil
    local Tool = Parameters.Tool
    local sChosenBladeType = Parameters.sChosenBladeType
    local dExtendAfterTail = Parameters.dExtendAfterTail
@@ -797,21 +844,15 @@ local function CalculateDiceMachinings( vCuts, Parameters)
    local bCannotSplitRestLength = Parameters.bCannotSplitRestLength
    local bReduceDiceDepth = Parameters.bReduceDiceDepth
 
+   -- trimesh con RestLength
+   local b3CheckCollision = BeamLib.GetPartBoxWithHeadTail( Part, sRestLengthSideForPreSimulation)
+   local idCheckCollisionTm = EgtSurfTmBBox( Part.idTempGroup, b3CheckCollision, false, GDB_RT.GLOB)
+
    -- eventuale inversione tagli ortogonali e aggiunta informazioni alla geometria
    local bAreOrthogonalCutsInverted = false
    for i = 1, #vCuts do
       for j = 1, #vCuts[i] do
          SetDiceFaceInfo( Proc, vCuts[i][j])
-         -- TODO vedere se questa parte serve ancora; in teoria no perchè il taglio è girato automaticamente nella FaceByBlade
-         -- if ( i % 2) == 1 then
-         --    local vtO = EgtSurfTmFacetNormVersor( vCuts[i][j], 0, GDB_ID.ROOT)
-         --    if MachiningLib.IsFaceZOutOfRange( vtO, Tool) then
-         --       EgtInvertSurf( vCuts[i][j])
-         --       local vtCurrentFaceNormal = EgtSurfTmFacetNormVersor( vCuts[i][j], 0, GDB_ID.ROOT)
-         --       EgtMove( vCuts[i][j], -vtCurrentFaceNormal * Tool.dThickness, GDB_RT.GLOB)
-         --       bAreOrthogonalCutsInverted = true
-         --    end
-         -- end
       end
    end
    -- calcolo lavorazioni
@@ -852,19 +893,17 @@ local function CalculateDiceMachinings( vCuts, Parameters)
       end
       -- calcolo lavorazione della singola faccia
       -- per tagli paralleli e faccia aperta si prova a tagliare come se fosse una faccia singola, accorpando i tagli
-      -- TODO bIsDicing è da mettere a true?
       local bCanMergeParallelCuts = ( ( i % 2) == 0) and ( Proc.nFct == 1)
       local bIsDicingOk = true
       if bCanMergeParallelCuts then
          local nAddGrpId = BeamLib.GetAddGroup( Part.id)
-         local nSurfToCut = EgtSurfTmBySewing( nAddGrpId, vCuts[i], false)
+         local idSurfToCut = EgtSurfTmBySewing( nAddGrpId, vCuts[i], false)
-         local ProcTrimesh = FeatureLib.GetProcFromTrimesh( nSurfToCut, Part)
+         local ProcTrimesh = FeatureLib.GetProcFromTrimesh( idSurfToCut, Part)
 
          local OptionalParametersCutWholeWaste = {
             nToolIndex = Tool.nIndex,
             dExtendAfterTail = dExtendAfterTail,
             bReduceBladePath = bReduceBladePath,
-            bIsDicing = false,
             sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
             bCannotSplitRestLength = bCannotSplitRestLength
          }
@@ -877,8 +916,12 @@ local function CalculateDiceMachinings( vCuts, Parameters)
                   bMoveAfterSplit = true
                end
             end
+            -- aggiornamento grezzo dinamico
+            if i % 2 == 0 then
+               UpdateDiceRaw( idCheckCollisionTm, idSurfToCut, vCuts[i-1][#vCuts[i-1]], Part, MainFace, OtherFace)
+            end
          else
-            EgtErase( nSurfToCut)
+            EgtErase( idSurfToCut)
             bIsDicingOk = false
          end
       end
@@ -919,9 +962,10 @@ local function CalculateDiceMachinings( vCuts, Parameters)
                dRadialStepSpan = 0,
                dExtendAfterTail = dExtendAfterTail,
                bIsDicing = true,
+               idCheckCollisionTm = idCheckCollisionTm,
                sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
                bCannotSplitRestLength = bCannotSplitRestLength,
-               bDisableRealElevationCheck = ( i % 2) > 0 -- se taglio perpendicolare non si deve mai considerare il materiale precedente
+               bDisableRealElevationCheck = true
             }
             Cutting = FaceByBlade.Make( ProcTrimesh, Part, FaceToMachine, EdgeToMachine, OptionalParametersFaceByBlade)
             Cutting.ptCenter = Point3d( ProcTrimesh.Faces[1].ptCenter:getX(), 0, 0)
@@ -936,6 +980,10 @@ local function CalculateDiceMachinings( vCuts, Parameters)
             if Cutting.sStage == 'AfterTail' then
                bMoveAfterSplit = true
             end
+            -- aggiornamento grezzo dinamico
+            if i % 2 == 0 then
+               UpdateDiceRaw( idCheckCollisionTm, vCuts[i][j], vCuts[i-1][j], Part, MainFace, OtherFace)
+            end
          end
       end
    end
@@ -1013,6 +1061,7 @@ local function CutWithDicing( Proc, Part, OptionalParameters)
       Proc = Proc,
       Part = Part,
       MainFace = Face1,
+      OtherFace = Face2,
       Tool = TOOLS[nToolIndex],
       sChosenBladeType = sChosenBladeType,
       dExtendAfterTail = dExtendAfterTail,

StrategyLibs/FACEBYBLADE.lua

@@ -209,6 +209,7 @@ function FACEBYBLADE.Make( Proc, Part, FaceToMachine, EdgeToMachine, OptionalPar
    local dRadialStepSpan = OptionalParameters.dRadialStepSpan
    local sUserNotes = OptionalParameters.sUserNotes or ''
    local bIsDicing = OptionalParameters.bIsDicing or false
+   local idCheckCollisionTm = OptionalParameters.idCheckCollisionTm
    local sRestLengthSideForPreSimulation = OptionalParameters.sRestLengthSideForPreSimulation or 'Tail'
    local bCannotSplitRestLength = OptionalParameters.bCannotSplitRestLength or false
    local bDisableRealElevationCheck = OptionalParameters.bDisableRealElevationCheck or false
@@ -237,6 +238,7 @@ function FACEBYBLADE.Make( Proc, Part, FaceToMachine, EdgeToMachine, OptionalPar
       end
       local BladeEngagementOptionalParameters = {
          bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength,
          bDisableRealElevationCheck = bDisableRealElevationCheck
@@ -360,6 +362,7 @@ function FACEBYBLADE.Make( Proc, Part, FaceToMachine, EdgeToMachine, OptionalPar
       }
       local BladeEngagementOptionalParameters = {
          bIsDicing = bIsDicing,
+         idCheckCollisionTm = idCheckCollisionTm,
          sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
          bCannotSplitRestLength = bCannotSplitRestLength,
          bDisableRealElevationCheck = bDisableRealElevationCheck
@@ -478,6 +481,7 @@ function FACEBYBLADE.Make( Proc, Part, FaceToMachine, EdgeToMachine, OptionalPar
          }
          local BladeEngagementOptionalParameters = {
             bIsDicing = bIsDicing,
+            idCheckCollisionTm = idCheckCollisionTm,
             sRestLengthSideForPreSimulation = sRestLengthSideForPreSimulation,
             bCannotSplitRestLength = bCannotSplitRestLength,
             bDisableRealElevationCheck = bDisableRealElevationCheck

StrategyLibs/FACEBYCHAINSAW.lua

@@ -44,8 +44,9 @@ local function CalculateLeadInOut( Machining, EdgeToMachine, sSideToMachine, dLe
    end
 
    -- punti dell'attacco
-   LeadIn.ptPoint = EdgeToMachine.ptStart - EdgeToMachine.vtEdge * LeadIn.dStartAddLength + EdgeToMachine.vtN * ( EdgeToMachine.dElevation - Machining.dDepthToMachine)
+   local dLengthToAdd = EgtIf( Machining.bToolInvert, -Machining.dStartSafetyLength, EdgeToMachine.dElevation - ( Machining.dMaxElev or 0) + Machining.dStartSafetyLength)
-   LeadOut.ptPoint = EdgeToMachine.ptEnd + EdgeToMachine.vtEdge * LeadOut.dEndAddLength + EdgeToMachine.vtN * ( EdgeToMachine.dElevation - Machining.dDepthToMachine)
+   LeadIn.ptPoint = EdgeToMachine.ptStart - EdgeToMachine.vtEdge * LeadIn.dStartAddLength + EdgeToMachine.vtN * dLengthToAdd
+   LeadOut.ptPoint = EdgeToMachine.ptEnd + EdgeToMachine.vtEdge * LeadOut.dEndAddLength + EdgeToMachine.vtN * dLengthToAdd
 
    return LeadIn, LeadOut
 end
@@ -173,7 +174,7 @@ function FACEBYCHAINSAW.Make( Proc, Part, FaceToMachine, EdgeToMachine, Optional
    -- offset radiale
    Mortising.dRadialOffset = 0
    -- distanza di sicurezza
-   Mortising.dStartSafetyLength = max( EdgeToMachine.dElevation, ( TOOLS[Mortising.nToolIndex].SetupInfo.dZSafeDelta or 60) + EgtMdbGetGeneralParam( MCH_GP.SAFEZ))
+   Mortising.dStartSafetyLength = ( TOOLS[Mortising.nToolIndex].SetupInfo.dZSafeDelta or 0) + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)
    -- overlap
    Mortising.dOverlap = 0
    -- step

UpdateLog.txt

@@ -1,4 +1,4 @@
            ==== Beam Update Log ====
 
-Versione 2.6-- (--/--/2024)
+Versione 3.1e1 (29/05/2026)
-- Primo commit creazione nuovo automatismo BEAM con strategie
+- Primo commit nuovo automatismo a strategie

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '2.8a1'
+VERSION = '3.1e1'
-MIN_EXE = '2.7j2'
+MIN_EXE = '3.1e1'