- ProfCamb - aggiunta Q19, se = 1 disabilita lavorazione AntiSplint.

- update versione e log

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()) and ( Proc.Head or Proc.Tail) and Proc.Prc ~= 350 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.Head and Proc.Box:getCenter():getX() < dHeadX then
                dHeadX = Proc.Box:getCenter():getX()
                nHeadId = Proc.Id
@@ -915,6 +915,22 @@ 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
@@ -980,12 +996,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)) and B2.PassedByHole and
+      if Drill.Identify(B1) and ( LapJoint.Identify(B2) or Mortise.Identify(B2) or Tenon.Identify(B2) or ScarfJoint.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)) and B1.PassedByHole and Drill.Identify(B2) and
+      if ( LapJoint.Identify(B1) or Mortise.Identify(B1) or Tenon.Identify(B1) or ScarfJoint.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
@@ -2211,8 +2227,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 è 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
+               -- 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
                   Proc.PassedByHole = true
                end
                -- se taglio attraversato da foro, si definisce precedenza in base ad angolo

LuaLibs/BeamLib.lua

@@ -1307,29 +1307,46 @@ function BeamLib.GetFacetsInfo( Proc, b3Raw)
 end
 
 ---------------------------------------------------------------------
-function BeamLib.GetEdgesInfo( Proc, Face)
+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
+
    local Edges = {}
-   local nFaceType, vEdges = EgtSurfTmGetFacetOutlineInfo( Proc.Id, Face.Id, GDB_ID.ROOT)
+   local nFaceType, vEdges = EgtSurfTmGetFacetOutlineInfo( Proc.Id, FaceId, GDB_ID.ROOT)
 
    if nFaceType < 1 then
-      for j = 1, #vEdges do
-         local nPreviousEdgeIndex = j - 1
-         if j == 1 then
+      for i = 1, #vEdges do
+         local nPreviousEdgeIndex = i - 1
+         if i == 1 then
             nPreviousEdgeIndex = #vEdges
          end
-         local nNextEdgeIndex = j + 1
-         if j == #vEdges then
+         local nNextEdgeIndex = i + 1
+         if i == #vEdges then
             nNextEdgeIndex = 1
          end
 
          local CurrentEdge = {}
-         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.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.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

LuaLibs/MachiningLib.lua

@@ -409,6 +409,7 @@ 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/ProcessDrill.lua

@@ -667,7 +667,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
             end
          end
       else
-         sUserNotes = EgtSetValInNotes( sUserNotes, 'LastStep', MIRROR_DRILLINGS_MIN_DISTANCE / 2 + 15)
+         sUserNotes = EgtSetValInNotes( sUserNotes, 'LastStep', MIRROR_DRILLINGS_MIN_DISTANCE / 2 + 10)
       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'

LuaLibs/ProcessLapJoint.lua

@@ -1955,14 +1955,21 @@ local function MakeRoundCleanContour( Proc, nPhase, nRawId, nPartId, b3Raw,
       -- inversione direzione utensile
       local bInvertMach = false
       if nPathInt then
-         -- verifico se devo invertire direzione utensile (in caso di direzione verso la verticale)
-         if vtN1:getZ() < BD.NZ_MINA and abs(vtN1:getZ()) >= 0.707 then
-            EgtSetMachiningParam( MCH_MP.TOOLINVERT, true)
-            bInvertMach = true
-         -- altrimenti se da fare in una sola volta e direzionato verso Y+ lo inverto per lavorarlo davanti
-         elseif not bDoubleSide and vtN1:getY() > GEO.EPS_SMALL then
-            EgtSetMachiningParam( MCH_MP.TOOLINVERT, true)
-            bInvertMach = true
+         if bMillDown then
+            if vtN1:getZ() > 10 * GEO.EPS_SMALL then
+               EgtSetMachiningParam( MCH_MP.TOOLINVERT, true)
+               bInvertMach = true
+            end
+         else
+            -- verifico se devo invertire direzione utensile (in caso di direzione verso la verticale)
+            if vtN1:getZ() < BD.NZ_MINA and abs(vtN1:getZ()) >= 0.707 then
+               EgtSetMachiningParam( MCH_MP.TOOLINVERT, true)
+               bInvertMach = true
+            -- altrimenti se da fare in una sola volta e direzionato verso Y+ lo inverto per lavorarlo davanti
+            elseif not bDoubleSide and vtN1:getY() > GEO.EPS_SMALL then
+               EgtSetMachiningParam( MCH_MP.TOOLINVERT, true)
+               bInvertMach = true
+            end
          end
       end
       -- imposto posizione braccio porta testa
@@ -3570,7 +3577,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
             -- se necessario, avverto limitazione dell'affondamento
             if dElev > dMaxDepth + 10 * GEO.EPS_SMALL then
                if Proc.Fct == 3 and Proc.Topology == 'Groove' and Proc.IsThrough and (Proc.AffectedFaces.Left or Proc.AffectedFaces.Right) and not Proc.IsParallel then
-                  local Edges = BL.GetEdgesInfo( Proc, Proc.Face[nFacAdj+1])
+                  local Edges = BL.GetEdgesInfo( Proc, Proc.Face[nFacAdj+1].Id)
                   local dWorkEdgeWidth
                   for i = 1, #Edges do 
                      if Edges[i].AdjacentFaceId == nFacInd then
@@ -3701,7 +3708,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
                   EgtSetMachiningParam( MCH_MP.DEPTH, dMachiningDepth)
                   -- si decidono lato di lavoro, inversione e estensione in base al lato aperto
                   local nEdgeIndex = BL.GetEdgeToMachineFromVector( Proc.Id, nFacAdj, vtRef)
-                  local EdgesEgt = BL.GetEdgesInfo( Proc, Proc.Face[nFacAdj+1])
+                  local EdgesEgt = BL.GetEdgesInfo( Proc, Proc.Face[nFacAdj+1].Id)
                   local CurrentEdge = EdgesEgt[nEdgeIndex+1]
                   local dStartAddLen = 0
                   local dEndAddLen = 0
@@ -4052,7 +4059,7 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, tvtN, nBas
       -- faccia principale e quindi la componente X del versore della faccia potrebbe dare un valore non coerente
       local dDiffFromSqAng = dAng + 90
       -- informazioni sul lato da lavorare
-      local Edges = BL.GetEdgesInfo( Proc, Proc.Face[nSideFace + 1])
+      local Edges = BL.GetEdgesInfo( Proc, Proc.Face[nSideFace + 1].Id)
       local EdgeToMachine = {}
       for i = 1, #Edges do
          local CurrentEdge = Edges[i]
@@ -4823,7 +4830,7 @@ local function ManageAntiSplintBySaw( Proc, b3Raw, b3Solid, bIsU, vtN, nFacInd,
          local dMaxDepth = 200
          local bAdj, dAng, dExtraOffs, sWarn2, nIdMach
          -- Se faccia sulla quale cerca di applicare l'antisplint è chiusa e limitata da altre facce non lo applica
-         local FacetEdge = BL.GetEdgesInfo( Proc, Proc.Face[nFacet+1])
+         local FacetEdge = BL.GetEdgesInfo( Proc, Proc.Face[nFacet+1].Id)
          for nEdge = 1, #FacetEdge do
             if AreSameVectorApprox( FacetEdge[nEdge].ToolDirection, vtN) and ( not FacetEdge[nEdge].IsStartOpen or not FacetEdge[nEdge].IsEndOpen) and not FacetEdge[nEdge].IsOpen then
                sWarn2 = 'Warning : antisplint not applicable on closed face'
@@ -5555,25 +5562,31 @@ function SawPlusChain.GetBottomFaceEdges( Proc, Face)
 
    local nFaceType, vEdges = EgtSurfTmGetFacetOutlineInfo( Proc.Id, Face.Id, GDB_ID.ROOT)
    if nFaceType < 1 then
-      for j = 1, #vEdges do
-         local nPreviousEdgeIndex = j - 1
-         if j == 1 then
+      for i = 1, #vEdges do
+         local nPreviousEdgeIndex = i - 1
+         if i == 1 then
             nPreviousEdgeIndex = #vEdges
          end
-         local nNextEdgeIndex = j + 1
-         if j == #vEdges then
+         local nNextEdgeIndex = i + 1
+         if i == #vEdges then
             nNextEdgeIndex = 1
          end
 
          local CurrentEdge = {}
-         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.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.IsStartOpen = ( vEdges[nPreviousEdgeIndex].Open)
          CurrentEdge.IsEndOpen = ( vEdges[nNextEdgeIndex].Open)
-         CurrentEdge.Id = j - 1
+         CurrentEdge.Id = i - 1
+         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
 
          if CurrentEdge.AdjacentFaceId == Proc.MainFaces.LongFace.Id then
             table.insert( Edges.LongEdges, CurrentEdge)
@@ -5601,25 +5614,30 @@ function SawPlusChain.GetLongFaceEdges( Proc, Face)
 
    local nFaceType, vEdges = EgtSurfTmGetFacetOutlineInfo( Proc.Id, Face.Id, GDB_ID.ROOT)
    if nFaceType < 1 then
-      for j = 1, #vEdges do
-         local nPreviousEdgeIndex = j - 1
-         if j == 1 then
+      for i = 1, #vEdges do
+         local nPreviousEdgeIndex = i - 1
+         if i == 1 then
             nPreviousEdgeIndex = #vEdges
          end
-         local nNextEdgeIndex = j + 1
-         if j == #vEdges then
+         local nNextEdgeIndex = i + 1
+         if i == #vEdges then
             nNextEdgeIndex = 1
          end
 
          local CurrentEdge = {}
-         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.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.IsStartOpen = ( vEdges[nPreviousEdgeIndex].Open)
          CurrentEdge.IsEndOpen = ( vEdges[nNextEdgeIndex].Open)
-         CurrentEdge.Id = j - 1
+         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
 
          if Proc.Topology == 'Tunnel' then
             if CurrentEdge.AdjacentFaceId > -1 then
@@ -5651,7 +5669,7 @@ function SawPlusChain.GetLongFaceEdges( Proc, Face)
 end
 
 
-function SawPlusChain.CalculateLeadInOut( Machining, EdgeToMachine)
+function SawPlusChain.CalculateLeadInOut( Machining, EdgeToMachine, FaceToMachine, b3Raw)
    -- TODO implementare le funzioni di Tool Collision Avoidance (vedi wiki e FacesBysaw -> CalcLeadInOutPerpGeom)
 
    -- si determina l'eventuale riduzione da applicare in caso di inizio o fine chiusi
@@ -5702,6 +5720,18 @@ function SawPlusChain.CalculateLeadInOut( Machining, EdgeToMachine)
          LeadIn.StartAddLength = BD.CUT_EXTRA
          LeadOut.EndAddLength = BD.CUT_EXTRA
       end
+      local ptP1 = Point3d( EdgeToMachine.ptStart)
+      local ptP2 = Point3d( EdgeToMachine.ptEnd)
+      
+      local bInvert = Machining.Invert
+      if bInvert then
+         ptP1, ptP2 = ptP2, ptP1
+         vtV1, vtV2 = vtV2, vtV1
+      end
+      local vtTg = ptP2 - ptP1 ;   vtTg:normalize()
+      Machining.vtTg = vtTg
+      Machining.vtV = vtV1
+      
    else
       if Machining.IsStartClosed then
          LeadIn.StartAddLength = -dAddLengthToReduce
@@ -5814,32 +5844,52 @@ function SawPlusChain.ApplyMachining( Machining, b3Raw)
 end
 
 
-function SawPlusChain.Saw.GetSCC( vtMachiningDirection)
+function SawPlusChain.Saw.GetSCC( vtMachiningDirection, vtN, vtTg)
    -- TODO implementare SCC come per FacesBySaw
-   local nSCC = MCH_SCC.NONE
-   if AreSameVectorApprox( vtMachiningDirection, Z_AX()) then
-      nSCC = MCH_SCC.ADIR_ZP
-   elseif AreOppositeVectorApprox( vtMachiningDirection, Z_AX()) then
-      nSCC = MCH_SCC.ADIR_ZM
-   elseif AreSameVectorApprox( vtMachiningDirection, Y_AX()) then
-      nSCC = MCH_SCC.ADIR_YP
-   elseif AreOppositeVectorApprox( vtMachiningDirection, Y_AX()) then
-      nSCC = MCH_SCC.ADIR_YM
-   elseif AreSameVectorApprox( vtMachiningDirection, X_AX()) then
-      nSCC = MCH_SCC.ADIR_XP
-   elseif AreOppositeVectorApprox( vtMachiningDirection, X_AX()) then
-      nSCC = MCH_SCC.ADIR_XM
+   if not BD.TURN then
+      -- per ora aggregato usato in verticale solo in split e headcut; Fast non influenzata
+      if BD.C_SIMM and bMaximizeVerticalDepth then
+         nSCC = MCH_SCC.ADIR_ZM
+      elseif abs( vtMachiningDirection:getX()) > abs( vtMachiningDirection:getY()) - GEO.EPS_SMALL then
+         -- se il taglio è orizzontale, si gira aggregato lama per facilitare caduta del legno
+         if abs( vtTg:getZ()) < 10 * GEO.EPS_SMALL and not AreSameOrOppositeVectorApprox( vtN, Z_AX()) then
+            nSCC = EgtIf( ( vtMachiningDirection:getX() > -GEO.EPS_SMALL), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
+         else
+            nSCC = EgtIf( ( vtMachiningDirection:getX() > -GEO.EPS_SMALL), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
+         end
+      else
+         -- se il taglio è orizzontale, si gira aggregato lama per facilitare caduta del legno
+         if abs( vtTg:getZ()) < 10 * GEO.EPS_SMALL and not AreSameOrOppositeVectorApprox( vtN, Z_AX()) then
+            nSCC = EgtIf( ( vtMachiningDirection:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YM, MCH_SCC.ADIR_YP)
+         else
+            nSCC = EgtIf( ( vtMachiningDirection:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
+         end
+      end
+   else
+      if AreSameVectorApprox( vtMachiningDirection, Z_AX()) then
+         nSCC = MCH_SCC.ADIR_ZP
+      elseif AreOppositeVectorApprox( vtMachiningDirection, Z_AX()) then
+         nSCC = MCH_SCC.ADIR_ZM
+      elseif AreSameVectorApprox( vtMachiningDirection, Y_AX()) then
+         nSCC = MCH_SCC.ADIR_YP
+      elseif AreOppositeVectorApprox( vtMachiningDirection, Y_AX()) then
+         nSCC = MCH_SCC.ADIR_YM
+      elseif AreSameVectorApprox( vtMachiningDirection, X_AX()) then
+         nSCC = MCH_SCC.ADIR_XP
+      elseif AreOppositeVectorApprox( vtMachiningDirection, X_AX()) then
+         nSCC = MCH_SCC.ADIR_XM
+      end
    end
-
    return nSCC
 end
 
 
-function SawPlusChain.Saw.CalculateMachiningParameters( Proc, FaceToMachine, EdgeToMachine)
+function SawPlusChain.Saw.CalculateMachiningParameters( Proc, FaceToMachine, EdgeToMachine, b3Raw)
    local Cutting = {}
    Cutting.CanApply = true
    Cutting.Message = ''
    Cutting.ProcId = Proc.Id
+   EdgeToMachine.FaceId = FaceToMachine.Id
 
    local dPocketHeight = 0
    if Proc.Topology == 'Tunnel' then
@@ -5951,15 +6001,15 @@ function SawPlusChain.Saw.CalculateMachiningParameters( Proc, FaceToMachine, Edg
       Cutting.Faceuse = BL.GetNearestOrthoOpposite( -EdgeToMachine.ToolDirection)
    end
    Cutting.nEdgeFaceUse = EdgeToMachine.Id
-   -- SCC
-   Cutting.SCC = SawPlusChain.Saw.GetSCC( EdgeToMachine.ToolDirection)
    -- asse bloccato
    Cutting.BlockedAxis = {}
    Cutting.BlockedAxis.Orientation = 'perpendicular'
    Cutting.BlockedAxis.VtN = FaceToMachine.VtN
    Cutting.BlockedAxis.VtOut = EgtIf( FaceToMachine.VtN:getX() > 0, X_AX(), -X_AX())
    -- approccio e retrazione
-   Cutting.LeadIn, Cutting.LeadOut = SawPlusChain.CalculateLeadInOut( Cutting, EdgeToMachine)
+   Cutting.LeadIn, Cutting.LeadOut = SawPlusChain.CalculateLeadInOut( Cutting, EdgeToMachine, FaceToMachine, b3Raw)
+   -- SCC
+   Cutting.SCC = SawPlusChain.Saw.GetSCC( EdgeToMachine.ToolDirection, FaceToMachine.VtN, Cutting.vtTg)
    -- eventuale step orizzontale
    Cutting.HorizontalSteps = {}
    if Cutting.Tool.SideStep then
@@ -5993,10 +6043,10 @@ function SawPlusChain.Saw.ApplyAllSteps( Cutting, b3Raw)
    local bIsCuttingOk = false
    local sCuttingOriginalMessage = Cutting.Message or ''
    local sCuttingApplyMessage = ''
-
    local dOriginalRadialOffset = Cutting.RadialOffset
    local dOriginalLeadInPerpDistance = Cutting.LeadIn.PerpDistance
    local dOriginalLeadOutPerpDistance = Cutting.LeadOut.PerpDistance
+   
    for i = Cutting.HorizontalSteps.Count, 1, -1 do
       Cutting.RadialOffset = dOriginalRadialOffset + Cutting.HorizontalSteps.StepLength * ( i - 1)
       -- update distanza perpendicolare attacco per contemplare l'offset applicato
@@ -6243,9 +6293,9 @@ function SawPlusChain.Make( bOnlySaw, Proc, nRawId)
    -- lavorazione di lama - fondo della tasca o fino a massimo materiale se tunnel
    local Cutting = {}
    if Proc.Topology == 'Tunnel' then
-      Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.OppositeEdges[1])
+      Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.OppositeEdges[1], b3Raw)
    else
-      Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.BottomEdge)
+      Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.BottomEdge, b3Raw)
    end
    local bIsCuttingOk = false
    if Cutting.CanApply then
@@ -6257,7 +6307,7 @@ function SawPlusChain.Make( bOnlySaw, Proc, nRawId)
    local dBottomDepthToMachine = Cutting.RadialOffset
    -- lato opposto del tunnel
    if Proc.Topology == 'Tunnel' then
-      Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.OppositeEdges[2])
+      Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.OppositeEdges[2], b3Raw)
       bIsCuttingOk = false
       if Cutting.CanApply then
          bIsCuttingOk, Cutting.Message = SawPlusChain.Saw.ApplyAllSteps( Cutting, b3Raw)
@@ -6270,7 +6320,7 @@ function SawPlusChain.Make( bOnlySaw, Proc, nRawId)
       if Cutting.CanApply and Cutting.RadialOffset > 10 * GEO.EPS_SMALL then
          -- eventuale lavorazione di lama - lato della tasca da cui inizia la lavorazione
          if Proc.MainFaces.LongFace.Edges.BottomEdge.IsStartOpen then
-            Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.SideEdges.StartEdge)
+            Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.SideEdges.StartEdge, b3Raw)
             bIsCuttingOk = false
             if Cutting.CanApply then
                bIsCuttingOk, Cutting.Message = SawPlusChain.Saw.ApplyAllSteps( Cutting, b3Raw)
@@ -6281,7 +6331,7 @@ function SawPlusChain.Make( bOnlySaw, Proc, nRawId)
          end
          -- eventuale lavorazione di lama - lato della tasca in cui finisce la lavorazione
          if Proc.MainFaces.LongFace.Edges.BottomEdge.IsEndOpen then
-            Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.SideEdges.EndEdge)
+            Cutting = SawPlusChain.Saw.CalculateMachiningParameters( Proc, Proc.MainFaces.LongFace, Proc.MainFaces.LongFace.Edges.SideEdges.EndEdge, b3Raw)
             bIsCuttingOk = false
             if Cutting.CanApply then
                bIsCuttingOk, Cutting.Message = SawPlusChain.Saw.ApplyAllSteps( Cutting, b3Raw)
@@ -6710,60 +6760,74 @@ local function AddMillCorner( vFace, Proc, dToolDiam, nAddGrpId, nMasterNewProc,
          -- aggiungo geometria
          local j = EgtIf( i < #vFace, i + 1, EgtIf( bClosed, 1, nil))
          if not j then return true end
-         local nFace2 = vFace[j].Fac
-         -- punto in comune tra le due facce (punto precedente della faccia [j])
-         ptLoc1 = vFace[j].PPrev
-         -- punto precedente (punto precedente della faccia [i])
-         if vFace[i].PPrev then
-            ptLoc3 = vFace[i].PPrev
-         else
-            if abs( vtN:getZ()) > abs( vtN:getY()) then
-               ptLoc3 = Point3d( vFace[i].Cen:getX(), vFace[i].Cen:getY(), ptLoc1:getZ())
+         if vFace[j].PPrev then
+            local nFace2 = vFace[j].Fac
+            -- punto in comune tra le due facce (punto precedente della faccia [j])
+            ptLoc1 = vFace[j].PPrev
+            -- punto precedente (punto precedente della faccia [i])
+            if vFace[i].PPrev then
+               ptLoc3 = vFace[i].PPrev
+            elseif vFace[i].PNoPrev then
+               ptLoc3 = vFace[i].PNoPrev
             else
-               ptLoc3 = Point3d( vFace[i].Cen:getX(), ptLoc1:getY(), vFace[i].Cen:getZ())
+               if abs( vtN:getZ()) > abs( vtN:getY()) then
+                  ptLoc3 = Point3d( vFace[i].Cen:getX(), vFace[i].Cen:getY(), ptLoc1:getZ())
+               else
+                  ptLoc3 = Point3d( vFace[i].Cen:getX(), ptLoc1:getY(), vFace[i].Cen:getZ())
+               end
             end
-         end
-         -- punto successivo ( precedente della faccia successiva)
-         local k = EgtIf( j < #vFace, j + 1, EgtIf( bClosed, 1, nil))
-         -- se è un percorso aperto prendo il punto medio della seconda faccia come punto locale 2
-         if not k then
-            if abs( vtN:getZ()) > abs( vtN:getY()) then
-               ptLoc2 = Point3d( vFace[j].Cen:getX(), vFace[j].Cen:getY(), ptLoc1:getZ())
+            -- punto successivo ( precedente della faccia successiva)
+            local k = EgtIf( j < #vFace, j + 1, EgtIf( bClosed, 1, nil))
+            -- se è un percorso aperto prendo il punto medio della seconda faccia come punto locale 2
+            if not k then
+               if vFace[j].PNoSucc then
+                  ptLoc2 = vFace[j].PNoSucc
+               elseif abs( vtN:getZ()) > abs( vtN:getY()) then
+                  ptLoc2 = Point3d( vFace[j].Cen:getX(), vFace[j].Cen:getY(), ptLoc1:getZ())
+               else
+                  ptLoc2 = Point3d( vFace[j].Cen:getX(), ptLoc1:getY(), vFace[j].Cen:getZ())
+               end
             else
-               ptLoc2 = Point3d( vFace[j].Cen:getX(), ptLoc1:getY(), vFace[j].Cen:getZ())
+               if vFace[j].PNoSucc then
+                  ptLoc2 = vFace[j].PNoSucc
+               elseif vFace[k].PPrev then
+                  ptLoc2 = vFace[k].PPrev
+               elseif abs( vtN:getZ()) > abs( vtN:getY()) then
+                  ptLoc2 = Point3d( vFace[j].Cen:getX(), vFace[j].Cen:getY(), ptLoc1:getZ())
+               else
+                  ptLoc2 = Point3d( vFace[j].Cen:getX(), ptLoc1:getY(), vFace[j].Cen:getZ())
+               end
             end
-         else
-            ptLoc2 = vFace[k].PPrev
-         end
-         -- ricavo i punti e l'angolo interno
-         local _, ptP1, ptP2, dAng = EgtSurfTmFacetsContact( nNewProc.Id, nFace1, nFace2, GDB_ID.ROOT)
-         -- se punti validi e angolo è interno e non è quasi piatto e >= 90 creo istanza
-         local tFacAdj = {}
-         if ptP1 and ptP2 and dAng < 0 and dAng < -6 and dAng > -( 90 + 10 * GEO.EPS_SMALL)  then
-            local dLen = dist( ptP1, ptP2)
-            tFacAdj = { nFace1, nFace2, dLen, ptP1, ptP2, dAng, ptLoc1, ptLoc2, ptLoc3}
-         end
-         -- se ho un elemento creo percorso o percorsi in base al tipo di cono e all'apertura dall'angolo rispetto ai 90°
-         -- con una tolleranza di 2 gradi
-         if #tFacAdj > 0 then
-            if (dAng + 90) > 2 then
-               local dAngOffs = (dAng + 90) / 2
-               -- primo taglio
-               local bOk, sErr = AddMillCornerMachining( Proc.PartId, nNewProc, nFacInd, tFacAdj, nAddGrpId, 
-                                                         dToolDiam, sMilling, -dAngOffs,
-                                                         ToolData, bMakeLocSurf, vFace, vtN)
-               if not bOk then return bOk, sErr end
-               -- secondo taglio
-               bOk, sErr = AddMillCornerMachining( Proc.PartId, nNewProc, nFacInd, tFacAdj, nAddGrpId, 
-                                                   dToolDiam, sMilling, dAngOffs,
-                                                   ToolData, bMakeLocSurf, vFace, vtN)
-               if not bOk then return bOk, sErr end
-            -- altrimenti ho un solo percorso
-            else
-               local bOk, sErr = AddMillCornerMachining( Proc.PartId, nNewProc, nFacInd, tFacAdj, nAddGrpId, 
-                                                         dToolDiam, sMilling, 0,
-                                                         ToolData, bMakeLocSurf, vFace, vtN)
-               if not bOk then return bOk, sErr end
+            -- ricavo i punti e l'angolo interno
+            local _, ptP1, ptP2, dAng = EgtSurfTmFacetsContact( nNewProc.Id, nFace1, nFace2, GDB_ID.ROOT)
+            -- se punti validi e angolo è interno e non è quasi piatto e >= 90 creo istanza
+            local tFacAdj = {}
+            if ptP1 and ptP2 and dAng < 0 and dAng < -6 and dAng > -( 90 + 10 * GEO.EPS_SMALL)  then
+               local dLen = dist( ptP1, ptP2)
+               tFacAdj = { nFace1, nFace2, dLen, ptP1, ptP2, dAng, ptLoc1, ptLoc2, ptLoc3}
+            end
+            -- se ho un elemento creo percorso o percorsi in base al tipo di cono e all'apertura dall'angolo rispetto ai 90°
+            -- con una tolleranza di 2 gradi
+            if #tFacAdj > 0 then
+               if (dAng + 90) > 2 then
+                  local dAngOffs = (dAng + 90) / 2
+                  -- primo taglio
+                  local bOk, sErr = AddMillCornerMachining( Proc.PartId, nNewProc, nFacInd, tFacAdj, nAddGrpId, 
+                                                            dToolDiam, sMilling, -dAngOffs,
+                                                            ToolData, bMakeLocSurf, vFace, vtN)
+                  if not bOk then return bOk, sErr end
+                  -- secondo taglio
+                  bOk, sErr = AddMillCornerMachining( Proc.PartId, nNewProc, nFacInd, tFacAdj, nAddGrpId, 
+                                                      dToolDiam, sMilling, dAngOffs,
+                                                      ToolData, bMakeLocSurf, vFace, vtN)
+                  if not bOk then return bOk, sErr end
+               -- altrimenti ho un solo percorso
+               else
+                  local bOk, sErr = AddMillCornerMachining( Proc.PartId, nNewProc, nFacInd, tFacAdj, nAddGrpId, 
+                                                            dToolDiam, sMilling, 0,
+                                                            ToolData, bMakeLocSurf, vFace, vtN)
+                  if not bOk then return bOk, sErr end
+               end
             end
          end
       end
@@ -6799,7 +6863,60 @@ local function GetOtherRegions( nPartId)
 end
 
 ---------------------------------------------------------------------
-local function GetFacesData( nNewProc, dToolDiam, dToolMaxDepth, dToolThick, nAddGrpId, nPartId, vtNBottom)
+local function GetCleanCornerFacesData( nNewProc, dToolDiam, dToolMaxDepth, dToolThick, nAddGrpId, nPartId, vtNBottom, Proc)
+
+   local function GetCleanCornerPointIfNoAdj( nNewProc, Proc, nFac, vFace, ptAdjP1, ptAdjP2)
+      local ptPNoPrev
+      local bAdj, ptLocP1, ptLocP2, dAng
+      if not ptAdjP1 and not ptAdjP2 then
+         bAdj, ptLocP1, ptLocP2, dAng = EgtSurfTmFacetsContact( nNewProc, nFac+1, nFac, GDB_ID.ROOT)
+      else
+         bAdj = true
+         ptLocP1 = ptAdjP1
+         ptLocP2 = ptAdjP2
+      end
+      if bAdj then
+         local vEdges = BL.GetEdgesInfo( nNewProc, nFac)
+         for j = 1, #vEdges do
+            if #vEdges == 4 and ( not AreSamePointApprox( vEdges[j].ptStart, ptLocP1) and not AreSamePointApprox( vEdges[j].ptStart, ptLocP2)) and
+               ( not AreSamePointApprox( vEdges[j].ptEnd, ptLocP1) and not AreSamePointApprox( vEdges[j].ptEnd, ptLocP2)) then
+               -- se rivolto verso Z
+               if abs( vtNBottom:getZ()) > abs( vtNBottom:getY()) then
+                  if vEdges[j].ptStart:getZ() < vEdges[j].ptEnd:getZ() then
+                     ptPNoPrev = vEdges[j].ptStart
+                     break
+                  else
+                     ptPNoPrev = vEdges[j].ptEnd
+                     break
+                  end
+               else
+                  if vtNBottom:getY() > 0 then
+                     ptPNoPrev = EgtIf( vEdges[j].ptStart:getY() < vEdges[j].ptEnd:getY(), vEdges[j].ptStart, vEdges[j].ptEnd)
+                     break
+                  else
+                     ptPNoPrev = EgtIf( vEdges[j].ptStart:getY() > vEdges[j].ptEnd:getY(), vEdges[j].ptStart, vEdges[j].ptEnd)
+                     break
+                  end
+               end
+            elseif #vEdges == 3 then
+               if not AreSamePointApprox( vEdges[j].ptStart, ptLocP1) then
+                  ptPNoPrev = vEdges[j].ptStart
+                  break
+               elseif not AreSamePointApprox( vEdges[j].ptStart, ptLocP2) then
+                  ptPNoPrev = vEdges[j].ptStart
+                  break
+               elseif not AreSamePointApprox( vEdges[j].ptEnd, ptLocP1) then
+                  ptPNoPrev = vEdges[j].ptEnd
+                  break
+               elseif not AreSamePointApprox( vEdges[j].ptEnd, ptLocP2) then
+                  ptPNoPrev = vEdges[j].ptEnd
+                  break
+               end
+            end
+         end
+      end
+      return ptPNoPrev
+   end
 
    local nNumFacet = EgtSurfTmFacetCount( nNewProc)
    local vFace = {}
@@ -6816,14 +6933,17 @@ local function GetFacesData( nNewProc, dToolDiam, dToolMaxDepth, dToolThick, nAd
       local _, dLen, dWidth = BL.GetFaceHvRefDim( nNewProc, nFac)
       -- recupero l'angolo con la faccia precedente
       local bAdj, ptLocP1, ptLocP2, dAng =  EgtSurfTmFacetsContact( nNewProc, nPrecFac, nFac, GDB_ID.ROOT)
+      -- salvo i dati
+      vFace[i] = { Fac = nFac, Cen = ptCen, Norm = vtN, Len = dLen, Width = dWidth, AngPrev = EgtIf( bAdj, dAng, 0)}
+      if not bAdj and Proc.Fct > 3 then
+         vFace[i].PNoPrev = GetCleanCornerPointIfNoAdj( nNewProc, Proc, nFac, vFace[i], nil, nil)
+      end
       -- verifico che l'adiacenza sia veramente con il precedente (percorro con normale a destra)
       if bAdj then
          if ( vtN ^ ( ptLocP1 - ptCen)) * vtNBottom > 0 then
             bAdj = false
          end
       end
-      -- salvo i dati
-      vFace[i] = { Fac = nFac, Cen = ptCen, Norm = vtN, Len = dLen, Width = dWidth, AngPrev = EgtIf( bAdj, dAng, 0)}
       if bAdj then
          -- se rivolto verso Z
          if abs( vtNBottom:getZ()) > abs( vtNBottom:getY()) then
@@ -6839,6 +6959,10 @@ local function GetFacesData( nNewProc, dToolDiam, dToolMaxDepth, dToolThick, nAd
                vFace[i].PPrev = EgtIf( ptLocP1:getY() > ptLocP2:getY(), ptLocP1, ptLocP2)
             end
          end
+         local bAdj_2, ptLocP1_2, ptLocP2_2, dAng_2 = EgtSurfTmFacetsContact( nNewProc, nFac, nFac+1, GDB_ID.ROOT)
+         if not bAdj_2 and Proc.Fct > 3 then
+            vFace[i].PNoSucc = GetCleanCornerPointIfNoAdj( nNewProc, Proc, nFac, vFace[i], ptLocP1, ptLocP2)
+         end
       end
    end
    -- analizzo le facce
@@ -7545,7 +7669,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   if sPocketing then
                      nChoosenFacInd = nFacInd
                      dChoosenFacElev = dFacElev
-                     local Edges = BL.GetEdgesInfo( Proc, Proc.Face[nFacInd+1])
+                     local Edges = BL.GetEdgesInfo( Proc, Proc.Face[nFacInd+1].Id)
                      local nSideInd
                      for i = 1, #Edges do 
                         if Edges[i].AdjacentFaceId == nFacInd2 then
@@ -8185,7 +8309,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                                        -- normale della lavorazione clean corner
                                        vtN = vtSpec
                                     end
-                                    local vFace, dDepth = GetFacesData( nNewProc, dDiamTool, dMaxToolMaterial, ( dDiamTool/2), nAddGrpId, Proc.PartId, vtN)
+                                    local vFace, dDepth = GetCleanCornerFacesData( nNewProc, dDiamTool, dMaxToolMaterial, ( dDiamTool/2), nAddGrpId, Proc.PartId, vtN, Proc)
                                     local bCleanCornerOk, sCleanCornerWarn = AddMillCorner( vFace, Proc, dDiamTool, nAddGrpId, nNewProc, vtN)
                                     if not bCleanCornerOk then return false, sCleanCornerWarn end
                                     if sCleanCornerWarn then
@@ -8428,7 +8552,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                      -- normale della lavorazione clean corner
                      vtN = vtSpec
                   end
-                  local vFace, dDepth = GetFacesData( nNewProc, dToolDiameter, dMaxToolMaterial, ( dToolDiameter/2), nAddGrpId, Proc.PartId, vtN)
+                  local vFace, dDepth = GetCleanCornerFacesData( nNewProc, dToolDiameter, dMaxToolMaterial, ( dToolDiameter/2), nAddGrpId, Proc.PartId, vtN, Proc)
                   local bCleanCornerOk, sCleanCornerWarn = AddMillCorner( vFace, Proc, dToolDiameter, nAddGrpId, nNewProc, vtN)
                   if not bCleanCornerOk then return false, sCleanCornerWarn end
                   if sCleanCornerWarn then

LuaLibs/ProcessProfCamb.lua

@@ -33,6 +33,7 @@ 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
@@ -301,13 +302,14 @@ 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') == 1
    local vtStart = EgtSV( AuxId, GDB_ID.ROOT)
    if nSide == 0 then
-      if abs(vtStart:getY()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs(dMakeAntiSplintOnHead) > 0 then
+      if abs( vtStart:getY()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs( dMakeAntiSplintOnHead) > 0 and not bDeleteAntiSplint then
          bMakeAs = true
       end
    else
-      if abs(vtStart:getZ()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs(dMakeAntiSplintOnHead) > 0 then
+      if abs( vtStart:getZ()) >= dActivateCompoAng and dMakeAntiSplintOnHead and abs( dMakeAntiSplintOnHead) > 0 and not bDeleteAntiSplint then
          bMakeAs = true
       end
    end
@@ -531,7 +533,7 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
       if bDouble then
          -- inserisco la lavorazione
          local sName
-         if bMakeAs then
+         if bMakeAs and not bDeleteAntiSplint then
             sName = 'ProfB_As_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
          else
             sName = 'ProfB_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
@@ -583,7 +585,7 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
             ModifySideAndInvert( Proc, bHead)
          end
          -- se devo fare l'antischeggia in testa
-         if bMakeAs then
+         if bMakeAs and not bDeleteAntiSplint then
             local sNewName = 'ProfB_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
             -- copio lavorazione per ingresso antischeggia (la copia è la lavorazione finale)
             local nMch2Id = EgtCopyMachining( sNewName, EgtGetName( nMchId)) 
@@ -621,7 +623,7 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
       end
       -- inserisco la prima lavorazione
       local sName
-      if bMakeAs then
+      if bMakeAs and not bDeleteAntiSplint then
          sName = 'Prof_As_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
       else
          sName = 'Prof_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
@@ -698,7 +700,7 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
          ModifySideAndInvert( Proc, bHead)
       end
       -- se devo fare l'antischeggia in testa
-      if bMakeAs then
+      if bMakeAs and not bDeleteAntiSplint then
          local sNewName = 'Prof_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
          -- copio lavorazione per ingresso antischeggia (la copia è la lavorazione finale)
          local nMch2Id = EgtCopyMachining( sNewName, EgtGetName( nMchId)) 

UpdateLog.txt

@@ -1,4 +1,23 @@
            ==== Beam Update Log ====
+Versione 3.1g4 (30/07/2026)
+- Fixed : in RoundCleanContour per tasche a 3 facce a U MillDown
+- Modif : in ProfCamb aggiunta Q19, se = 1 disabilita lavorazione AntiSplint
+
+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

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '3.1f2'
+VERSION = '3.1g4'
 MIN_EXE = '3.1b1'