In Drill - Diminuito LastStep forature in doppio (distanza alla quale smette foratura speculare e inizia alternata).

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

@@ -6780,9 +6780,9 @@ local function AddMillCorner( vFace, Proc, dToolDiam, nAddGrpId, nMasterNewProc,
                end
             end
             -- punto successivo ( precedente della faccia successiva)
-            local k = EgtIf( j < #vFace, j + 1, 1)
+            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 bClosed then
+            if not k then
                if vFace[j].PNoSucc then
                   ptLoc2 = vFace[j].PNoSucc
                elseif abs( vtN:getZ()) > abs( vtN:getY()) then
@@ -6791,7 +6791,15 @@ local function AddMillCorner( vFace, Proc, dToolDiam, nAddGrpId, nMasterNewProc,
                   ptLoc2 = Point3d( vFace[j].Cen:getX(), ptLoc1:getY(), vFace[j].Cen:getZ())
                end
             else
-               ptLoc2 = vFace[k].PPrev
+               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
             -- ricavo i punti e l'angolo interno
             local _, ptP1, ptP2, dAng = EgtSurfTmFacetsContact( nNewProc.Id, nFace1, nFace2, GDB_ID.ROOT)
@@ -6930,7 +6938,7 @@ local function GetCleanCornerFacesData( nNewProc, dToolDiam, dToolMaxDepth, dToo
       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 then
+      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)
@@ -6955,7 +6963,7 @@ local function GetCleanCornerFacesData( nNewProc, dToolDiam, dToolMaxDepth, dToo
             end
          end
          local bAdj_2, ptLocP1_2, ptLocP2_2, dAng_2 = EgtSurfTmFacetsContact( nNewProc, nFac, nFac+1, GDB_ID.ROOT)
-         if not bAdj_2 then
+         if not bAdj_2 and Proc.Fct > 3 then
             vFace[i].PNoSucc = GetCleanCornerPointIfNoAdj( nNewProc, Proc, nFac, vFace[i], ptLocP1, ptLocP2)
          end
       end

UpdateLog.txt

@@ -1,5 +1,9 @@
            ==== Beam Update Log ====
 
+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

Version.lua

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