In LapJoint, se bUseBHSideMill, si considera feature di coda a patto che il pezzo sia più lungo di VERY_SHORT

2.7g4

LuaLibs/FacesBySaw.lua

@@ -83,8 +83,8 @@ function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimD
    if BD.KIOTP then Ktp = BD.KIOTP end
    if ( sLeadInOutType == 'PerpendicularOutraw') then
       bLioTang = false
-      dLiCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ) + dCutExtra
-      dLoCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ) + dCutExtra
+      dLiCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)
+      dLoCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ)
       dLiTang = 1
       dLoTang = 1
       dLiPerp = 0

LuaLibs/ProcessLapJoint.lua

@@ -145,6 +145,7 @@ local Q_BLADE_ON_ALONG_FACE = '' -- i
 local Q_MAX_ELEVATION       = '' -- d
 local Q_SAW_PLUS_CHAIN      = '' -- i
 local Q_FORCE_CHAINSAW      = '' -- i
+local Q_CHAINSAW_FROM_SIDE  = '' -- i
 
 
 -- variabile smussi
@@ -793,7 +794,7 @@ function ProcessLapJoint.IsTailFeature( Proc, b3Raw)
    -- verifico se è in coda
    local dEndDist = Proc.Box:getMin():getX() - b3Solid:getMin():getX()
    if ( dEndDist > BD.MAX_DIST_HTFEA) or bUseBHSideMill then
-      if not( BD.BH_MACHINE) and bUseBHSideMill and ( Proc.Box:getMax():getX() - b3Solid:getMin():getX()) < 400 then
+      if not( BD.BH_MACHINE) and bUseBHSideMill and ( Proc.Box:getMax():getX() - b3Solid:getMin():getX()) < 400 and b3Solid:getDimX() > BD.LEN_VERY_SHORT_PART then
          return true
       else
          return false
@@ -3212,7 +3213,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
          if vtRef and ( vtRef:getY() > 0.5 or vtRef:getZ() < -0.1) then
             vtRef = -vtRef
          end
-         if not ( Proc.Topology == 'Tunnel') then
+         if bAttackFromSide then
             dDimMin = min( Proc.Face[ nFacInd + 1].Width, Proc.Face[ nFacInd + 1].Height)
             dDimMax = min( Proc.Face[ nFacAdj + 1].Width, Proc.Face[ nFacAdj + 1].Height)
             nLundIdFace = nFacAdj
@@ -3262,7 +3263,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
                local dOffs = ( i - 1) * dStep
                EgtSetMachiningParam( MCH_MP.OFFSR, dOffs)
                local dMachiningDepth = dDepth
-               if Proc.Topology == 'Tunnel' then
+               if not bAttackFromSide then
                   -- se possibile aumento l'affondamento pari al raggio corner + 1
                   if dMaxMat2 > ( dDepth + dSawCornerRad2 + 1) then
                      dMachiningDepth = ( dDepth + dSawCornerRad2 + 1)
@@ -3307,7 +3308,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
                end
                -- in caso di attacco esterno si setta in modo da fare un primo step adeguato per evitare finecorsa
                -- si riduce la feed opportunamente
-               if not ( Proc.Topology == 'Tunnel') then
+               if bAttackFromSide then
                   local dMachiningStep = EgtGetMachiningParam( MCH_MP.STEP) or 0
                   -- TODO qui sostituire con valore preciso da GetSetupInfo
                   if BD.C_SIMM then
@@ -3328,7 +3329,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd,
                   EgtSetMachiningParam( MCH_MP.FEED, dFeed)
                end
                local sNotes = 'MaxElev=' .. EgtNumToString( dElev, 1) .. ';'
-               if not ( Proc.Topology == 'Tunnel') then
+               if bAttackFromSide then
                   sNotes = EgtSetValInNotes( sNotes, 'Plunge', 10)
                end
                EgtSetMachiningParam( MCH_MP.USERNOTES, sNotes)
@@ -3397,6 +3398,10 @@ local function MakeAntiSplintBySaw( Proc, nFacet, vtN, b3Raw, nFacInd, bReduceDe
       end
    end
    local dExtraOffs = 0
+   -- se il taglio è praticamente verticale, riduto massimo materiale lama
+   if BD.DECR_VERT_CUT and vtN:getZ() > 0.985 then
+      dMaxDepth = dMaxDepth - BD.DECR_VERT_CUT - BD.COLL_SIC
+   end
    -- se profondità superiore al massimo lama modifico elevazione
    if dDepth > dMaxDepth then
       dExtraOffs = dMaxDepth - dDepth
@@ -7196,9 +7201,11 @@ local function TestTwoFacesDownHead( Proc)
       if not ( Proc.Face[1].IsTooDownwardForTopBlade or Proc.Face[2].IsTooDownwardForTopBlade) then
          bDownHeadBlade = false
       else
-         if ( Proc.Face[1].IsTooDownwardForTopBlade and Proc.Face[2].IsTooWideForTopBlade) or
-            ( Proc.Face[2].IsTooDownwardForTopBlade and Proc.Face[1].IsTooWideForTopBlade) then
-            bDownHeadBlade = true
+         for i = 1, Proc.Fct do
+            if Proc.Face[i].IsTooDownwardForTopBlade and ( not Proc.IsTopDownRabbet or Proc.Face[i].IsTooWideForTopBlade) then
+               bDownHeadBlade = true
+               break
+            end
          end
       end
    end

LuaLibs/ProcessLongDoubleCut.lua

@@ -1432,7 +1432,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
             end
          end
       end
-      if not Proc.bMoveAfterSplit and not bEndFixed and not bConvex then
+      if not Proc.bMoveAfterSplit and not bConvex and Proc.AffectedFaces.Left then
          -- recupero gruppo per geometria addizionale
          local nAddGrpId = BL.GetAddGroup( nPartId)
          if not nAddGrpId then

LuaLibs/ProcessRidgeLap.lua

@@ -176,15 +176,15 @@ function ProcessRidgeLap.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       local vtRef2 = Vector3d( vtN[vFaceOrd[2]])
       -- eseguo
       for i = 1, #vCuts do
-         local nOrthoOpposite
+         local vtOrtho
          if i % 2 == 1 then
-            nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef)
+            vtOrtho = vtRef
          else
-            nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef2)
+            vtOrtho = vtRef2
          end
          -- lavoro la faccia
          for j = 1, #vCuts[i] do
-            local bOk, sErr = Fbs.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
+            local bOk, sErr = Fbs.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, vtOrtho, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
             if not bOk then
                return bOk, sErr
             end

UpdateLog.txt

@@ -1,5 +1,17 @@
            ==== Beam Update Log ====
 
+Versione 2.7g5 (14/07/2025)
+- Fixed : in tagli di testa e coda corretti attacchi
+
+Versione 2.7g4 (11/07/2025)
+- Fixed : in LapJoint 2 facce correzione nella scelta lama da sotto
+
+Versione 2.7g3 (11/07/2025)
+- Fixed : in RidgeLap corretta scelta del lato da lavorare
+
+Versione 2.7g2 (10/07/2025)
+- Fixed : in LapJoint correzione per caso in cui la sega a catena lavorava la tasca in modo errato
+
 Versione 2.7g1 (08/07/2025)
 - Added : in LapJoint, aggiunti smussi anche se lavorazione con truciolatore
 - Added : per profilo caudato aggiunta finitura con fresa piccola
@@ -8,6 +20,7 @@ Versione 2.7g1 (08/07/2025)
 - Modif : in LongDoubleCut migliorie varie
 - Modif : in RidgeLap migliorie varie
 - Modif : nelle forature che attraversano un taglio ora si considera la profondità già lavorata
+- Fixed : in LongDoubleCut corretta lavorazione aggiunta erroneamente dopo separazione
 
 Versione 2.7f3 (19/06/2025)
 - Modif : in StepJointNotch corretta distanza attacco in/out

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '2.7g1'
+VERSION = '2.7g5'
 MIN_EXE = '2.7f2'