In DtMortise - Aggiunto parametro Q01=1 per non eseguire l'antischeggia

BatchProcessNew.lua

@@ -277,15 +277,6 @@ if bToProcess then
             else
                vBeam[i].Box = b3Solid
             end
-            if BD.MAX_LENGTH and BD.MAX_LENGTH > 10 and b3Solid:getDimX() > BD.MAX_LENGTH then
-               local sOut = 'Piece-Length ('  .. EgtNumToString( b3Solid:getDimX(), 2) .. ') ' ..
-                         'out of machine limits (' .. EgtNumToString( BD.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 = vBeam[1].Box:getDimX() + 10
@@ -339,15 +330,6 @@ if bToProcess then
          else
             vBeam[i].Box = b3Solid
          end
-         if BD.MAX_LENGTH and BD.MAX_LENGTH > 10 and b3Solid:getDimX() > BD.MAX_LENGTH then
-            local sOut = 'Piece-Length ('  .. EgtNumToString( b3Solid:getDimX(), 2) .. ') ' ..
-                         'out of machine limits (' .. EgtNumToString( BD.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

@@ -443,7 +443,7 @@ local function CalcHeadTailMachBeforeIntersDrillings( vProc, b3Raw)
    for i = 1, #vProc do
       local Proc = vProc[i]
       if Proc.Box and not Proc.Box:isEmpty() then
-         if Proc.Fct == 1 and ( BL.IsFeatureCuttingEntireSection( Proc.Box, b3Raw:getDimY(), b3Raw:getDimZ()) or Cut.Identify( Proc)) and ( Proc.Head or Proc.Tail) and Proc.Prc ~= 350 then
+         if Proc.Fct == 1 and BL.IsFeatureCuttingEntireSection( Proc.Box, b3Raw:getDimY(), b3Raw:getDimZ()) and ( Proc.Head or Proc.Tail) and Proc.Prc ~= 350 then
             if Proc.Head and Proc.Box:getCenter():getX() < dHeadX then
                dHeadX = Proc.Box:getCenter():getX()
                nHeadId = Proc.Id
@@ -915,22 +915,6 @@ local function ReorderFeatureWithDependency( vProc)
             table.insert( vProc, nRefIndex, table.remove( vProc, i))
             i = max( nRefIndex - 1, 1)
          end
-      elseif Drill.Identify( vProc[i]) and vProc[i].Dependency and vProc[i].Dependency.ExecAfter and vProc[i].Dependency.ExecAfter.Id then
-         local nRefId = vProc[i].Dependency.ExecAfter.Id
-         local nRefIndex
-
-         for j = 1, #vProc do
-            if i ~= j and vProc[j].Id == nRefId then
-               nRefIndex = j
-               break
-            end
-         end
-
-         -- se il processo deve stare dopo, ma ora è prima
-         if nRefIndex and nRefIndex > i then
-            table.insert( vProc, nRefIndex, table.remove( vProc, i))
-            i = max( nRefIndex - 1, 1)
-         end
       end
       i = i + 1
    end
@@ -996,12 +980,12 @@ local function OrderFeatures( vProc, b3Raw, nPartId)
          return true
       end
       -- se primo è foro e secondo è un ribasso o tenone, il foro va sempre prima a meno che il ribasso non sia di testa
-      if Drill.Identify(B1) and ( LapJoint.Identify(B2) or Mortise.Identify(B2) or Tenon.Identify(B2) or ScarfJoint.Identify(B2)) and B2.PassedByHole and
+      if Drill.Identify(B1) and ( LapJoint.Identify(B2) or Mortise.Identify(B2) or Tenon.Identify(B2)) and B2.PassedByHole and
          B1.Box:getCenter():getX() > B2.Box:getMin():getX() and B1.Box:getCenter():getX() < B2.Box:getMax():getX() then
          return true
       end
       -- se primo è un ribasso e secondo è un foro o tenone, il ribasso va sempre dopo a meno che il ribasso non sia di testa
-      if ( LapJoint.Identify(B1) or Mortise.Identify(B1) or Tenon.Identify(B1) or ScarfJoint.Identify(B1)) and B1.PassedByHole and Drill.Identify(B2) and
+      if ( LapJoint.Identify(B1) or Mortise.Identify(B1) or Tenon.Identify(B1)) and B1.PassedByHole and Drill.Identify(B2) and
          B2.Box:getCenter():getX() > B1.Box:getMin():getX() and B2.Box:getCenter():getX() < B1.Box:getMax():getX() then
          return false
       end
@@ -1657,8 +1641,7 @@ local function SetCutsOnFrontMortises( vProc)
                   -- verifico se i piani coincidono
                   local bSamePlane = ( ptC1 and vtN1 and ptC2 and vtN2 and AreSameVectorApprox( vtN1, vtN2) and ( ptC2 - ptC1) * vtN1 < 1.0)
                   if bSamePlane then
-                     --vProc[i].CutFront = vProc[j].Id
-                     vProc[j].bSkipCut = true
+                     vProc[i].CutFront = vProc[j].Id
                   end
                   -- log
                   local sMsg = string.format( 'Cut %d meet Mortise %d', vProc[i].Id, vProc[j].Id) .. EgtIf( bSamePlane, ' with same plane', '')
@@ -1675,8 +1658,7 @@ local function SetCutsOnFrontMortises( vProc)
                   -- verifico se i piani coincidono
                   local bSamePlane = ( ptC1 and vtN1 and ptC2 and vtN2 and AreSameVectorApprox( vtN1, vtN2) and ( ptC2 - ptC1) * vtN1 < 1.0)
                   if bSamePlane then
-                     --vProc[i].CutFront = vProc[j].Id
-                     vProc[j].bSkipCut = true
+                     vProc[i].CutFront = vProc[j].Id
                   end
                   -- log
                   local sMsg = string.format( 'Cut %d meet DtMortise %d', vProc[i].Id, vProc[j].Id) .. EgtIf( bSamePlane, ' with same plane', '')
@@ -2009,9 +1991,6 @@ local function VerifyDrillMirrored( Proc, vProc, b3Raw)
    end
    local dToolDoubleDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM, 'd')
    local dToolDoubleMaxDepth = EgtTdbGetCurrToolParam( MCH_TP.MAXMAT)
-   if ( sType == 'Pocket_AT' or sType == 'Pocket') then
-      dToolDoubleMaxDepth = EgtTdbGetCurrToolMaxDepth()
-   end
    dMachiningDepth = min( dMachiningDepth, dToolDoubleMaxDepth)
    -- recupero la lunghezza della parte inclinata della punta
    local dToolDoubleTipLength = EgtTdbGetCurrToolParam( MCH_TP.TOTLEN) - EgtTdbGetCurrToolParam( MCH_TP.LEN)
@@ -2227,8 +2206,8 @@ function GetFeatureInfoAndDependency( vProc, b3Raw, nPartId)
                   and DtMortise.SideIdentify( ProcB) and Overlaps( Proc.Box, ProcB.Box)  and DtMortise.IsDeeper( ProcB, b3Raw) then
                   Proc.PassedByDtMortise = true
                end
-               -- se tenone o ScarfJoint sono attraversati da foro allora il foro deve essere fatto prima
-               if ( Tenon.Identify( Proc) or ScarfJoint.Identify( Proc)) and Drill.Identify( ProcB) and Overlaps( Proc.Box, ProcB.Box) then
+               -- se tenone è attraversato da foro allora il foro deve essere fatto prima
+               if Tenon.Identify( Proc) and Drill.Identify( ProcB) and Overlaps( Proc.Box, ProcB.Box) then
                   Proc.PassedByHole = true
                end
                -- se taglio attraversato da foro, si definisce precedenza in base ad angolo
@@ -2300,7 +2279,7 @@ function BeamExec.ProcessFeatures()
       BD.IMPROVE_HEAD_TAIL_DRILLINGS = true
    end
    -- costanti per doppio
-   MIRROR_DRILLINGS_MIN_DISTANCE = 25 --TODO spostare la variabile MinDistToolX1X2 nel BeamData e usare quella
+   MIRROR_DRILLINGS_MIN_DISTANCE = 40
    MIRROR_POCKETS_MIN_DISTANCE = EgtIf( BD.DOWN_HEAD, 35, 50)
    -- verifica se possibile rotazione di 90 gradi
    BD.ROT90 = BD.ROT90 and Verify90DegRotation( EgtGetFirstRawPart())
@@ -2555,7 +2534,7 @@ function BeamExec.ProcessFeatures()
             local nNextRawId = EgtGetNextRawPart( nRawId)
             if nNextRawId  and  EgtGetPartInRawPartCount( nNextRawId) == 0  and  EgtGetRawPartBBox( nNextRawId):getDimX() < BD.MinRaw then
                EgtRemoveRawPartFromCurrPhase( nNextRawId)
-            end
+            end   
          end
          nPhase = EgtGetCurrPhase()
          nDispId = EgtGetPhaseDisposition( nPhase)

LuaLibs/BeamLib.lua

@@ -883,25 +883,6 @@ function BeamLib.GetBlockedAxis( sMachining, sBlockedAxis, b3Raw, vtTool, vtOut)
    return ''
 end
 
----------------------------------------------------------------------
-function BeamLib.GetAuxDir( sMachining, sBlockedAxis, b3Raw, vtTool, vtOut)
-   -- informazioni sull'utensile della lavorazione
-   local nToolType, sHead
-   if EgtMdbSetCurrMachining( sMachining) then
-      local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
-      if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid) or '') then
-         nToolType = EgtTdbGetCurrToolParam( MCH_TP.TYPE)
-         sHead = EgtTdbGetCurrToolParam( MCH_TP.HEAD)
-      end
-   end
-   -- se presente funzione specifica nella macchina, la richiamo
-   if BD.GetAuxDir then
-      return BD.GetAuxDir( sHead, nToolType, sBlockedAxis, b3Raw, vtTool, vtOut)
-   end
-   -- niente
-   return nil
-end
-
 ---------------------------------------------------------------------
 -- Trova l'Ind (0 based) della faccia meglio orientata come l'asse vtAx. Restituisce anche vtN e ptC della faccia stessa. La faccia di indice (0 based) fctExclude non viene considerata nella ricerca.
 function BeamLib.FindFaceBestOrientedAsAxis( Proc, vtAx, fctExclude)
@@ -1177,31 +1158,6 @@ function BeamLib.Is3EdgesApprox( Proc, nFacet, nAddGrpId)
    return bResult
 end
 
--------------------------------------------------------------------------------------------------------------
-function BeamLib.IsPointOnBoxLimits( ptPoint, b3Solid)
-    local dTol = 500 * GEO.EPS_SMALL
-
-    local dMinX = b3Solid:getMin():getX()
-    local dMinY = b3Solid:getMin():getY()
-    local dMinZ = b3Solid:getMin():getZ()
-
-    local dMaxX = b3Solid:getMax():getX()
-    local dMaxY = b3Solid:getMax():getY()
-    local dMaxZ = b3Solid:getMax():getZ()
-
-    -- Check di ogni piano limite
-    if abs( ptPoint:getX() - dMinX) < dTol then return true, "Left" end
-    if abs( ptPoint:getX() - dMaxX) < dTol then return true, "Right" end
- 
-    if abs( ptPoint:getY() - dMinY) < dTol then return true, "Front" end
-    if abs( ptPoint:getY() - dMaxY) < dTol then return true, "Back" end
- 
-    if abs( ptPoint:getZ() - dMinZ) < dTol then return true, "Bottom" end
-    if abs( ptPoint:getZ() - dMaxZ) < dTol then return true, "Top" end
-
-    return false
-end
-
 -------------------------------------------------------------------------------------------------------------
 -- restituisce le facce della parte interessate dalla feature Proc
 function BeamLib.GetProcessAffectedFaces( Proc)
@@ -1307,46 +1263,29 @@ function BeamLib.GetFacetsInfo( Proc, b3Raw)
 end
 
 ---------------------------------------------------------------------
-function BeamLib.GetEdgesInfo( ProcOrId, FaceId)
-
-   -- disambiguazione feature vs id trimesh
-   local Proc = {}
-   if type( ProcOrId) == "table" then
-      Proc = ProcOrId
-   elseif type( ProcOrId) == "number" then
-      Proc.Id = ProcOrId
-   else
-      error( 'GetEdgesInfo : Only feature or trimesh supported')
-   end
-
+function BeamLib.GetEdgesInfo( Proc, Face)
    local Edges = {}
-   local nFaceType, vEdges = EgtSurfTmGetFacetOutlineInfo( Proc.Id, FaceId, GDB_ID.ROOT)
+   local nFaceType, vEdges = EgtSurfTmGetFacetOutlineInfo( Proc.Id, Face.Id, GDB_ID.ROOT)
 
    if nFaceType < 1 then
-      for i = 1, #vEdges do
-         local nPreviousEdgeIndex = i - 1
-         if i == 1 then
+      for j = 1, #vEdges do
+         local nPreviousEdgeIndex = j - 1
+         if j == 1 then
             nPreviousEdgeIndex = #vEdges
          end
-         local nNextEdgeIndex = i + 1
-         if i == #vEdges then
+         local nNextEdgeIndex = j + 1
+         if j == #vEdges then
             nNextEdgeIndex = 1
          end
 
          local CurrentEdge = {}
-         CurrentEdge.AdjacentFaceId = vEdges[i].Adj
-         CurrentEdge.ToolDirection = Vector3d( vEdges[i].Norm)
-         CurrentEdge.Length = vEdges[i].Len
-         CurrentEdge.Elevation = vEdges[i].Elev
-         CurrentEdge.IsOpen = vEdges[i].Open
+         CurrentEdge.AdjacentFaceId = vEdges[j].Adj
+         CurrentEdge.ToolDirection = Vector3d( vEdges[j].Norm)
+         CurrentEdge.Length = vEdges[j].Len
+         CurrentEdge.Elevation = vEdges[j].Elev
+         CurrentEdge.IsOpen = vEdges[j].Open
          CurrentEdge.IsStartOpen = ( vEdges[nPreviousEdgeIndex].Open)
          CurrentEdge.IsEndOpen = ( vEdges[nNextEdgeIndex].Open)
-         CurrentEdge.ptStart = Point3d( vEdges[i].Start)
-         CurrentEdge.ptEnd = Point3d( vEdges[nNextEdgeIndex].Start)
-         CurrentEdge.vtEdge = CurrentEdge.ptEnd - CurrentEdge.ptStart ; CurrentEdge.vtEdge:normalize()
-         CurrentEdge.Id = i - 1
-         CurrentEdge.PreviousEdgeIndex = nPreviousEdgeIndex
-         CurrentEdge.NextEdgeIndex = nNextEdgeIndex
 
          table.insert( Edges, CurrentEdge)
       end
@@ -1448,7 +1387,7 @@ function BeamLib.GetToolFromMachining( sMachiningName)
             Tool.Thickness = EgtTdbGetCurrToolParam( MCH_TP.THICK) or 0
             Tool.CornerRadius = EgtTdbGetCurrToolParam( MCH_TP.CORNRAD) or 0
          -- fresa (TODO al momento aggiunte solo le informazioni che servono)
-         elseif Tool.Type == MCH_TY.MILL_STD or Tool.Type == MCH_TY.MILL_NOTIP then
+         elseif Tool.Type == MCH_TY.MILL_STD or MCH_TY.MILL_NOTIP then
             if BD.GetSetupInfo then
                Tool.IsOnAggregate = BD.GetSetupInfo( EgtTdbGetCurrToolParam( MCH_TP.HEAD)).bToolOnAggregate
             else
@@ -1459,8 +1398,6 @@ function BeamLib.GetToolFromMachining( sMachiningName)
             if Tool.StemDiameter > Tool.Diameter + GEO.EPS_SMALL then
                Tool.MaxDepth = Tool.MaxDepth - BD.COLL_SIC
             end
-         elseif Tool.Type == MCH_TY.DRILL_STD or Tool.Type == MCH_TY.DRILL_LONG then
-            Tool.Length = EgtTdbGetCurrToolParam( MCH_TP.LEN) or 0
          -- altri utensili al momento non previsti
          else
             error( 'Wrong tool type')

LuaLibs/FacesBySaw.lua

@@ -170,12 +170,6 @@ function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimD
    end
    local vtOut = EgtIf( vtN:getX() > 0, X_AX(), -X_AX())
    EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, BL.GetBlockedAxis( sCutting, 'perpendicular', b3Raw, vtTool, vtOut))
-   local sAuxDir, sInitAngs = BL.GetAuxDir( sCutting, 'perpendicular', b3Raw, vtTool, vtOut)
-   if sAuxDir then
-      sNotes = EgtSetValInNotes( sNotes, 'VtAuxDir', sAuxDir)
-      EgtSetMachiningParam( MCH_MP.INITANGS, sInitAngs)
-      EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.STD)
-   end
    -- eventuali note
    if ( sLeadInOutType == 'PerpendicularOutraw') then
       sNotes = EgtSetValInNotes( sNotes, 'OutRaw', 3)
@@ -457,7 +451,7 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
          -- se distanza al punto è maggiore del raggio lama, significa che non ho già lavorato, quindi calcolo entrata opportunamente
          if dDistPointToCenter > 0.5 * dSawDiam then
             dLiTang = -dAllStart * dCosAlpha
-            dLiPerp = dDist1 * dSinAlpha
+            dLiPerp = dDist1 * dSinAlpha 
          end
       end
       -- se ho accorciato uscita, setto componente tangente e perpendicolare sul percorso di uscita
@@ -637,12 +631,6 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
    -- imposto angolo 3° asse rot
    local sBlockedAxis = EgtIf( bMaximizeVerticalDepth, 'parallel', 'perpendicular')
    EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, BL.GetBlockedAxis( sCutting, sBlockedAxis, b3Raw, vtN, vtOrthO))
-   local sAuxDir, sInitAngs = BL.GetAuxDir( sCutting, sBlockedAxis, b3Raw, vtN, vtOrthO)
-   if sAuxDir then
-      sNotes = EgtSetValInNotes( sNotes, 'VtAuxDir', sAuxDir)
-      EgtSetMachiningParam( MCH_MP.INITANGS, sInitAngs)
-      EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.STD)
-   end
    -- eventuali note
    if ( sLeadInOutType == 'PerpendicularOutraw') then
       sNotes = EgtSetValInNotes( sNotes, 'OutRaw', 3)

LuaLibs/MachiningLib.lua

@@ -409,7 +409,6 @@ local function FindMachining( MachiningType, sType, Params, bTopHead, bDownHead,
                if nActiveHead == 0 then
                   return ReturnParams( MachiningType, Machining.Name, Machining.Type, ToolParams)
                -- verifico se posso usare lo stesso utensile della testa attiva
-               --TODO - se arrivano altri ticket come 3044, valutare rimozione controllo nActiveHead e usare l'utensile già caricato anche se non è sulla testa attiva (ultima utilizzata)
                elseif ( nActiveHead == 1 and not bH2 and sToolName == H1_TOOL) or ( nActiveHead == 2 and bH2 and sToolName == H2_TOOL) then
                -- se l'utensile sulla testa attiva è molto più piccolo rispetto a quelli salvati non lo scelgo, a meno che non siano entrambi grandi (truciolatori)
                   if ( not sH1Param or not sH1Param.TDiam or ( sH1Param.TDiam < 75 and ToolParams.TDiam < 75 and sH1Param.TDiam < dBiggerToolTolerance * ToolParams.TDiam)) and ( not sH2Param or not sH2Param.TDiam or ( sH2Param.TDiam < 75 and ToolParams.TDiam < 75 and sH2Param.TDiam < 1.25 * ToolParams.TDiam)) then

LuaLibs/ProcessCut.lua

@@ -63,7 +63,6 @@ function ProcessCut.Classify( Proc, b3Raw)
    if ( BD.C_SIMM and BD.DOWN_HEAD) or BD.TURN then
       return true
    end
-   local bForceNoBeamRotation = ( EgtGetInfo( Proc.Id, 'Q18', 'i') == 1)
    -- recupero i dati del taglio
    local ptC, vtN = EgtSurfTmFacetCenter( Proc.Id, 0, GDB_ID.ROOT)
    -- calcolo le massime estensioni lineari orizzontale e verticale della faccia
@@ -74,7 +73,7 @@ function ProcessCut.Classify( Proc, b3Raw)
    then
       -- confronto queste estensioni con la massima dimensione del DiceCut (impossibile lavorare se entrambe maggiori)
       if DimH > BD.MAX_DIM_DICE + 100 * GEO.EPS_SMALL and DimV > BD.MAX_DIM_DICE + 100 * GEO.EPS_SMALL then
-         return true, not bForceNoBeamRotation
+         return true, true
       end
    end
    -- se è un taglio da sotto, lo verifico
@@ -97,7 +96,7 @@ function ProcessCut.Classify( Proc, b3Raw)
       _, DimH, DimV = BL.GetFaceHvRefDim( Proc.Id, 0)
       -- confronto questo ingombro con il doppio della massima dimensione del DiceCut (impossibile lavorare sotto da sopra se più di 2 tagli oppure se tipo PF, taglio inclinato in Y e non taglio singolo orizzontale)
       if DimH > 2 * BD.MAX_DIM_DICE  or ( BD.C_SIMM and ( abs( vtN:getY()) > 0.1) and dMaxMat < DimH + BD.CUT_EXTRA) then
-         return true, not bForceNoBeamRotation
+         return true, true
       end
    end
    return true, false
@@ -479,16 +478,12 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
          -- determino il modo di tagliare
          local vtOrthoO
          local bNoPerpCuts = false
-         local vtO
-         -- Se tagli ortogonali (indice dispari)
          if i % 2 == 1 then
             vtOrthoO = Vector3d( vtN)
-         -- Se tagli perpendicolari (indice pari)
          else
-            -- Se elemento precedente contiene tagli ortogonali
+            local vtO
             if #vCuts[i-1] > 0 then
                vtO = EgtSurfTmFacetNormVersor( vCuts[i-1][1], 0, GDB_ID.ROOT)
-            -- Se elemento successivo contiene tagli ortogonali
             elseif vCuts[i+1] and #vCuts[i+1] > 0 then
                -- lunghezza faccia nell'eventuale direzione ortogonale
                local asseX = EgtSurfTmFacetNormVersor( vCuts[i+1][1], 0, GDB_ID.ROOT)
@@ -556,51 +551,8 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
             end
             local bOk2, sErr2 = Fbs.MakeOne( nSurfToCut, 0, sCutting, dSawDiam, nFaceUseCut2, nil, dCutExtra, BD.CUT_SIC, 0, 0, 0, '', b3Raw)
             if not bOk2 then return false, sErr2 end
-
          -- caso standard
          else
-            -- se necessario aggiungo tagli obliqui per cubettare pezzi lunghi che potrebbero cadere sul motore
-            if ( i % 2) == 0 and Proc.Fct == 1 and AreSameOrOppositeVectorApprox( vtO, Z_AX()) then
-               local vtOrthoVert = vtN ^ vtO
-               -- inverte direzione superfici per corretta direzione SCC
-               if ( vtN:getY() > 0 and vtOrthoVert:getY() > 0) or ( vtN:getY() < 0 and vtOrthoVert:getY() < 0) then
-                  vtOrthoVert = -vtOrthoVert
-               end
-               local Frame = Frame3d( ptC, vtN, vtO)
-               local b3Fac = EgtGetBBoxRef( vCuts[i][1], GDB_BB.STANDARD, Frame)
-               -- se cubetto più grande di MAX_DIM_DICE
-               if abs( b3Fac:getDimY() - BD.MAX_DIM_DICE) > 10 * GEO.EPS_SMALL then
-                  local nVerticalCuts = ceil( b3Fac:getDimY() / ( BD.MAX_LEN_DICE)) - 1
-                  local dVerticalSliceDist = b3Fac:getDimY() / ( nVerticalCuts + 1)
-                  -- selezione utensile
-                  local dSawDiam = 400
-                  if EgtMdbSetCurrMachining( sCutting) then
-                     local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
-                     if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid) or '') then
-                        dSawDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or dSawDiam
-                     end
-                  end
-                  -- crea faccia per tagli verticali e le taglia a dimensione corretta
-                  for k = 1, nVerticalCuts do
-                     local nFaceUse = BL.GetNearestOrthoOpposite( vtN)
-                     local dVerticalCutOffset = dVerticalSliceDist * k
-                     local sLeadInOutType = 'Perpendicular'
-                     local nMergedParallelSurfId = EgtSurfTmBySewing( nAddGrpId, vCuts[i], false)
-                     local ptVertCut = EgtSurfTmFacetCenter( nMergedParallelSurfId, 0, GDB_ID.ROOT)
-                     ptVertCut = ptVertCut + ( -b3Fac:getDimY()/2 + dVerticalCutOffset) * vtOrthoVert
-                     local nSurfId = EgtSurfTmPlaneInBBox( nAddGrpId, ptVertCut, vtOrthoVert, b3Raw, GDB_RT.GLOB)
-                     -- se non è il primo taglio parallelo taglia anche le superfici con la faccia parallela precedente
-                     if i ~= 2 then
-                        local nMergedPreviousParallelSurfId = EgtSurfTmBySewing( nAddGrpId, vCuts[i-2], false)
-                        local ptOnPreviousParallelSurf = EgtSurfTmFacetCenter( nMergedPreviousParallelSurfId, 0, GDB_ID.ROOT)
-                        EgtCutSurfTmPlane( nSurfId, ptOnPreviousParallelSurf, vtN, false, GDB_RT.GLOB)
-                     end
-                     EgtCutSurfTmPlane( nSurfId, ptVertCut, -vtN, false, GDB_RT.GLOB)
-                     local bOk, sErr = Fbs.MakeOne( nSurfId, 0, sCutting, dSawDiam, nFaceUse, nil, -0.1, BD.CUT_SIC, 0, 0, 0, '', b3Raw, nil, nil, nil, sLeadInOutType, nil, 0, nil)
-                     if not bOk then return bOk, sErr end
-                  end
-               end
-            end
             -- lavoro la faccia
             for j = 1, #vCuts[i] do
                -- se taglio dal basso

LuaLibs/ProcessDrill.lua

@@ -348,11 +348,6 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    if EgtGetInfo( Proc.Id, 'Q04', 'i') == 1 then
       return FreeContour.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    end
-
-   -- verifico se macchina configurata per avere le nuove svuotature in doppio
-   local sIniMachFile = EgtGetCurrMachineDir()..'\\'..EgtGetCurrMachineName()..'.ini'
-   local dPockDoubleNTActive =  ( EgtGetStringFromIni( 'Machinings', 'PocketingDoubleNT', '0', sIniMachFile) == '1')
-
    -- default per costanti
    BD.DRILL_VX_MAX_ANGLEDRILL = ( BD.DRILL_VX_MAX_ANGLEDRILL or 0.928)
    -- ingombro del pezzo
@@ -559,7 +554,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    nFac, CosB, vFaces = GetHoleStartData( ptCen, vtExtr, b3Solid)
    -- Calcolo acciorciamento affondamento utile per evitare collisione portautensile con faccia
    TgA = CosB / sqrt( 1 - CosB * CosB)
-   local dSubL = ( dDiamTh / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA
+   dSubL = ( dDiamTh / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA
    -- Per fori molto inclinati ( < 30 gradi) si usa la testa della macchina per l'accorciamento. Fast esclusa
    if BD.C_SIMM and CosB > 0.866  then
       dSubL = ( 190 / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA - 116
@@ -599,10 +594,8 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
          local dHoleToCutDistance = vDistance[1]
          -- se il taglio accorcia realmente il foro
          if ( dHoleToCutDistance > 10 * GEO.EPS_SMALL or Proc.AffectedFaces.Right) and dHoleToCutDistance < dLen then
-            local dToolTipFromCenterDrill = ( ( dDiam / 2) - ( dToolDiam / 2))
-            local dExtraSicDistFromThToTiltedCut = sqrt( ( dToolTipFromCenterDrill / CosB)^2 - dToolTipFromCenterDrill^2) + sqrt( ( ( dDiamTh / 2) / CosB)^2 - (dDiamTh / 2)^2)
             dMaxDepth = dMaxDepthOri
-            dMaxElev = dLen - ( dHoleToCutDistance - dExtraSicDistFromThToTiltedCut)
+            dMaxElev = dLen - dHoleToCutDistance
             bTryDrill = true
             local dToolAddLength = dLen - dMaxElev
             -- se l'utensile è comunque troppo corto lavoro il massimo possibile
@@ -620,7 +613,6 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
          end
       end
    end
-   local dDepthOri = dDepth
    -- se foro da saltare per eccessiva inclinazione
    if not bTryDrill then
       sMyWarn = 'Warning in drill : too slant hole'
@@ -658,22 +650,13 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    local dLastStepDepth
    if Proc.Double and Proc.Double > 0 then
       if ( sType == 'Pocket_AT' or sType == 'Pocket') then
-         if not dPockDoubleNTActive and bOpen then
+         if bOpen then
             local dReduceDepth = MIRROR_POCKETS_MIN_DISTANCE / 2 + 10
             dLastStepDepth = dDepth + dReduceDepth
             dDepth = dDepth - dReduceDepth
-            if ( dLastStepDepth > dMaxDepth + 10 * GEO.EPS_SMALL) and ( dMaxDepth <= ( dLen / 2) - dReduceDepth) and ( dDepthOri ~= dDepth) then
-               dDepth = dMaxDepth
-            end
          end
       else
-         local Tool = BL.GetToolFromMachining( sDrilling)
-         local dDrillbitTipLength_H1 = dMaxToolLength - Tool.Length
-         local sNotes = EgtTdbGetCurrToolParam( MCH_TP.USERNOTES)
-         EgtTdbSetCurrTool( EgtGetValInNotes( sNotes, 'DOUBLE', 's') or Tool.Name)
-         local dDrillbitTipLength_H2 = ( EgtTdbGetCurrToolParam( MCH_TP.TOTLEN) or 0) - ( EgtTdbGetCurrToolParam( MCH_TP.LEN) or 0)
-         EgtTdbSetCurrTool( Tool.Name)
-         sUserNotes = EgtSetValInNotes( sUserNotes, 'LastStep', ( MIRROR_DRILLINGS_MIN_DISTANCE + dDrillbitTipLength_H1 + dDrillbitTipLength_H2 + 10) / 2 + 1)
+         sUserNotes = EgtSetValInNotes( sUserNotes, 'LastStep', MIRROR_DRILLINGS_MIN_DISTANCE / 2 + 15)
       end
       if dDepth > Proc.MachDepthDouble + 10 * GEO.EPS_SMALL then
          sMyWarn = 'Warning in double head drilling : depth (' .. EgtNumToString( dDepth, 1) .. ') reduced to (' .. EgtNumToString( Proc.MachDepthDouble, 1) .. ') to match H2 max tool depth'
@@ -734,13 +717,13 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
          return false, sWarn
       else
          -- se DrillPocket passante in doppio si fa lavorazione aggiuntiva dell'ultimo step
-         if not dPockDoubleNTActive and Proc.Double and Proc.Double > 0 and ( sType == 'Pocket_AT' or sType == 'Pocket') and bOpen then
-            if dLastStepDepth > dMaxDepth + 10 * GEO.EPS_SMALL then
-               sMyWarn = 'Warning in drill pocket last step: depth (' .. EgtNumToString( dLastStepDepth, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepth, 1) .. ')'
-               return false, sMyWarn
-            end
+         if Proc.Double and Proc.Double > 0 and ( sType == 'Pocket_AT' or sType == 'Pocket') and bOpen then
             local idMachiningLastStep = EgtCopyMachining( EgtIf( EgtStartsWith( sType, 'Predrill'), 'Predrill_', 'Drill_') .. ( EgtGetName( Proc.Id) or tostring( Proc.Id)), sName)
             EgtSetCurrMachining( idMachiningLastStep)
+            if dLastStepDepth  > dMaxDepth + 10 * GEO.EPS_SMALL then
+               sMyWarn = 'Warning in drill pocket last step: depth (' .. EgtNumToString( dLastStepDepth, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepth, 1) .. ')'
+               dLastStepDepth = dMaxDepth
+            end
             local dMaxElevLastStep = dLastStepDepth - dDepth
             sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dMaxElevLastStep, 1))
             EgtSetMachiningParam( MCH_MP.DEPTH, dLastStepDepth)

LuaLibs/ProcessDtMortise.lua

@@ -229,14 +229,14 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    end
    local b3DtMrt = EgtGetBBoxRef( Proc.Id, GDB_BB.STANDARD, rfDtMrt)
    local dAltMort = b3DtMrt:getDimZ()
-   -- verifico se di tipo pocket o se antischeggia disabilitato
+   -- verifico se di tipo pocket
    local bPocket = ( EgtGetInfo( Proc.Id, 'P05', 'i') == 1)
-   local bDisableAntiSplint = ( EgtGetInfo( Proc.Id, 'Q01', 'i') or 0) == 1
-   if bPocket or bDisableAntiSplint then bMakeAntiSplitPath = false end
+   local dForcePrecutBypass = EgtGetInfo( Proc.Id, 'Q01', 'i')
+   if bPocket or dForcePrecutBypass == 1 then bMakeAntiSplitPath = false end
    -- verifico se frontale
    local bFront = ( Proc.Prc == 56)
    -- se mortasa di fronte, eseguo il taglio della faccia
-   if bFront and not Proc.bSkipCut then
+   if bFront then
       -- verifico esista la faccia di taglio
       local ptCutC, vtCutN = EgtSurfTmFacetCenter( Proc.Id, 1, GDB_ID.ROOT)
       if ptCutC and vtCutN and AreSameVectorApprox( vtExtr, vtCutN) then
@@ -362,7 +362,7 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
       dMaxMat = 30
       dSideAng = 0
       bCW = true
-      bMillOnAggregate = ( sMchExt == '_AT')
+      bMillOnAggregate = sMchExt == '_AT'
       if EgtMdbSetCurrMachining( sMilling) then
          local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
          if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid) or '') then
@@ -424,16 +424,8 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
       end
       -- aggiungo geometria
       EgtSetMachiningGeometry( {{ Aux2Id, -1}})
-      -- recupero note utente per aggiornarle
-      local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
-      -- eventuali impostazioni per 3° asse rot
-      local sAuxDir, sInitAngs = BL.GetAuxDir( sPocketing, "", b3Solid, vtExtr, vtExtr)
-      if sAuxDir then
-         sUserNotes = EgtSetValInNotes( sUserNotes, 'VtAuxDir', sAuxDir)
-         EgtSetMachiningParam( MCH_MP.INITANGS, sInitAngs)
-         EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.STD)
-      end
       -- dichiaro non si generano sfridi per VMill
+      local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
       sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dMaxMat - 0.1, 1))
       sUserNotes = EgtSetValInNotes( sUserNotes, 'VMRS', 0)
       EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes)
@@ -545,16 +537,8 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
                if nSCC then 
                   EgtSetMachiningParam( MCH_MP.SCC, nSCC)
                end
-               -- recupero note utente per aggiornarle
-               local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
-               -- eventuali impostazioni per 3° asse rot
-               local sAuxDir, sInitAngs = BL.GetAuxDir( sMilling, "", b3Solid, vtExtr, vtExtr)
-               if sAuxDir then
-                  sUserNotes = EgtSetValInNotes( sUserNotes, 'VtAuxDir', sAuxDir)
-                  EgtSetMachiningParam( MCH_MP.INITANGS, sInitAngs)
-                  EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.STD)
-               end
                -- dichiaro non si generano sfridi per VMill
+               local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
                sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dAltMort, 1))
                sUserNotes = EgtSetValInNotes( sUserNotes, 'VMRS', 0)
                -- se lavorazione in doppio
@@ -713,20 +697,12 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
       if nSCC then
          EgtSetMachiningParam( MCH_MP.SCC, nSCC)
       end
-      -- recupero note utente per aggiornarle
-      local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
-      -- eventuali impostazioni per 3° asse rot
-      local sAuxDir, sInitAngs = BL.GetAuxDir( sMilling, "", b3Solid, vtExtr, vtExtr)
-      if sAuxDir then
-         sUserNotes = EgtSetValInNotes( sUserNotes, 'VtAuxDir', sAuxDir)
-         EgtSetMachiningParam( MCH_MP.INITANGS, sInitAngs)
-         EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.STD)
-      end
       -- dichiaro massima elevazione e assenza sfridi per VMill
       local dMaxElev = dMaxMat
       if bMultipleZPasses then
          dMaxElev = dVerticalStep
       end
+      local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
       sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dMaxElev - 0.1, 1))
       sUserNotes = EgtSetValInNotes( sUserNotes, 'VMRS', 0)
       -- in presenza di pocket dichiaro che non sto entrando e uscendo nel grezzo

LuaLibs/ProcessHeadCut.lua

@@ -162,11 +162,10 @@ end
 ---------------------------------------------------------------------
 -- smussi in testa
 local function MakeHeadChamfer( idProc, nPartId)
-   
    local dDepthHeadChamfer = EgtGetInfo( idProc, 'Q08', 'd') or 0
    -- se non attivo esco subito
    if dDepthHeadChamfer < 100 * GEO.EPS_SMALL then
-      return true, nil
+      return
    end
 
    -- recupero gruppo per geometria aggiuntiva
@@ -255,8 +254,7 @@ local function MakeHeadChamfer( idProc, nPartId)
    EgtSetMachiningParam( MCH_MP.DEPTH, dDepthHeadChamfer + dExtra)
    EgtSetMachiningParam( MCH_MP.OFFSR, dExtra)
    -- assegno lato di lavoro
-   EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
-   EgtSetMachiningParam( MCH_MP.INVERT, true)
+   EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.RIGHT)
    -- eseguo
    if not ML.ApplyMachining( true, false) then
       local _, sErr = EgtGetLastMachMgrError()
@@ -641,12 +639,11 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
    
    local bOk, sErr = MakeStandardCuts( Proc, b3Raw, nCuts, dOffsL, HeadCutType, Cutting1Data, Cutting2Data, nil, dOvmHead)
 
+
    -- alla fine del taglio si aggiungono gli smussi in testa
    local _, sErrHeadChamfer = MakeHeadChamfer( nOriId or Proc.Id, nPartId)
    if sErr then
-      if sErrHeadChamfer then
-         sErr = sErr..'\n'..sErrHeadChamfer
-      end
+      sErr = sErr..'\n'..sErrHeadChamfer
    else
       sErr = sErrHeadChamfer
    end

LuaLibs/ProcessMortise.lua

@@ -32,7 +32,7 @@ local BD = require( 'BeamData')
 local ML = require( 'MachiningLib')
 
 -- variabili assegnazione parametri Q
-local Q_DEPTH_CHAMFER = 'Q01' -- d
+local Q_DEPTH_CHAMFER = 'Q02' -- d
 
 ---------------------------------------------------------------------
 -- Riconoscimento della feature
@@ -467,7 +467,7 @@ function ProcessMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    end
 
    -- se mortasa di fronte, eseguo il taglio della faccia
-   if bFront and not Proc.bSkipCut then
+   if bFront then
       -- verifico esista la faccia di taglio
       local ptCutC, vtCutN = EgtSurfTmFacetCenter( Proc.Id, 1, GDB_ID.ROOT)
       if ptCutC and vtCutN and AreSameVectorApprox( vtExtr, vtCutN) then

LuaLibs/ProcessProfCamb.lua

@@ -33,7 +33,6 @@ local sEnableExtraBladeUpperFace = 'Q02' -- i
 local sDepthChamferMill          = 'Q03' -- d
 local sOverMaterialForFinish     = 'Q04' -- d
 local sPreemptiveChamfer         = 'Q05' -- i
-local sDisableAntiSplint         = 'Q19'
 
 -- abilitazioni extra
 local dMakeAntiSplintOnHead = 1 -- valore impronta antischeggia, per disattivare settare = nil o = 0
@@ -302,14 +301,13 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    local sMilling
    -- in base alla direzione iniziale della curva e al valore di entrata valido, setto l'antischeggia
    local bMakeAs
-   local bDeleteAntiSplint = ( EgtGetInfo( Proc.Id, sDisableAntiSplint, 'i') or 0) == 1
    local vtStart = EgtSV( AuxId, GDB_ID.ROOT)
    if nSide == 0 then
-      if abs( vtStart:getY()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs( dMakeAntiSplintOnHead) > 0 and not bDeleteAntiSplint then
+      if abs(vtStart:getY()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs(dMakeAntiSplintOnHead) > 0 then
          bMakeAs = true
       end
    else
-      if abs( vtStart:getZ()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs( dMakeAntiSplintOnHead) > 0 and not bDeleteAntiSplint then
+      if abs(vtStart:getZ()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs(dMakeAntiSplintOnHead) > 0 then
          bMakeAs = true
       end
    end

LuaLibs/ProcessSplit.lua

@@ -258,8 +258,7 @@ local function MakeTailChamfer( idProc, nPartId, dDepthTailChamfer)
    EgtSetMachiningParam( MCH_MP.DEPTH, dDepthTailChamfer + dExtra)
    EgtSetMachiningParam( MCH_MP.OFFSR, dExtra)
    -- assegno lato di lavoro
-   EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
-   EgtSetMachiningParam( MCH_MP.INVERT, true)
+   EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.RIGHT)
    -- eseguo
    if not ML.ApplyMachining( true, false) then
       local _, sErr = EgtGetLastMachMgrError()

Process.lua

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

UpdateLog.txt

@@ -1,57 +1,4 @@
            ==== Beam Update Log ====
-
-Versione 3.1h2 (24/08/2026)
-- Fixed : in Drill - Fori in doppio con utensili lunghi, corretto calcolo LastStep
-- Fixed : AntiSplintBySaw - Se inverte lavorazione, inverte anche i parametri di LeadIn e LeadOut
-
-Versione 3.1h1 (05/08/2026)
-- Modif : in Pocket non eseguo lavorazione di pulizia tasca (laterale) se le lavorazioni sopra e sotto arrivano esattamente a metà tasca (senza affondamento extra)
-- Modif : in RoundCleanContour - tasca passante lavorata solo da sopra o da sotto e fresa di contorno non lavora tutto, attiva lavorazione in doppio
-
-Versione 3.1g5 (31/07/2026)
-- Fixed : in RoundCleanContour per tasche a 3 facce a U in doppio
-
-Versione 3.1g4 (31/07/2026)
-- Modif : in ProfCamb aggiunta Q19, se = 1 disabilita lavorazione AntiSplint
-- Fixed : in RoundCleanContour per tasche a 3 facce a U MillDown
-
-Versione 3.1g3 (24/07/2026)
-- Fixed : in slot con lama corretta scelta SCC
-
-Versione 3.1g2 (17/07/2026)
-- Modif : Diminuito LastStep forature in doppio
-- Modif : ScarfJoint tra le feature da eseguire dopo i fori che la attraversano
-
-Versione 3.1g1 (14/07/2026)
-- Modif : in slot con lama migliorati attacchi inclinati
-- Modif : in CleanCorner migliorie
-
-Versione 3.1f3 (25/06/2026)
-- Modif : LapJoint - migliorata gestione BirdsMouth con più di 3 facce
-- Modif : Per identificare feature di testa, oltre che verificare se sia troncante, si controlla anche la feature taglio
-- Added : LapJoint - CleanCorner per tasche a 3 facce a U
-
-Versione 3.1f2 (18/06/2026)
-- Added : Gestione svuotature in doppio tipo NT
-
-Versione 3.1f1 (17/06/2026)
-- Added : Tagli per dividere il cubetto in caso sia troppo lungo
-- Modif : DepthChamfer su feature Mortase (050 e 051) cambio di Q. Prima era Q02, ora è Q01
-
-Versione 3.1e2 (01/06/2026)
-- Added : in Cut aggiunta Q18 per evitare di ruotare
-- Modif : gli smussi di testa sono in senso orario
-- Modif : in mortasa coda di rondine piccole correzioni
-
-Versione 3.1e1 (05/05/2026)
-- Modif : in LapJoint migliorate slot con sega a catena
-- Fixed : in DrillPocket in doppio eliminata lavorazione aggiuntiva in caso di utensile non abbastanza lungo
-
-Versione 3.1d2 (10/04/2026)
-- Added : in StepJoint aggiunto Q02=1 per forzare fresa
-- Added : in DtMortise aggiunto Q01=1 per disabilitare antischeggia
-- Fixed : in LapJoint correzione a antischeggia con fresa in caso di feature spezzata
-
 Versione 3.1d1 (08/04/2026)
 - Added : le forature vengono accorciate con massima elevazione anche in presenza di tagli di testa
 - Modif : nelle slot con lama verticali si lavora sempre in concordanza

Version.lua

@@ -1,6 +1,6 @@
--- Version.lua by Egaltech s.r.l. 2026/08/05
+-- Version.lua by Egaltech s.r.l. 2026/02/09
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '3.1h2'
+VERSION = '3.1d1'
 MIN_EXE = '3.1b1'