modifiche a FacesBySaw del commit precedente estese anche a Fast

- In LapJoint, se si utilizza fresa per BlockHaus, si considera sempre di coda

LuaLibs/FacesBySaw.lua

@@ -467,9 +467,19 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
       if BD.C_SIMM and bMaximizeVerticalDepth then
          nSCC = MCH_SCC.ADIR_ZM
       elseif abs( vtAux:getX()) > abs( vtAux:getY()) - GEO.EPS_SMALL then
-         nSCC = EgtIf( ( vtAux:getX() > -GEO.EPS_SMALL), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
+         -- se il taglio è orizzontale, si gira aggregato lama per facilitare caduta del legno
+         if abs( vtTg:getZ()) < GEO.EPS_SMALL and abs( vtOrthO:getZ()) > GEO.EPS_SMALL then
+            nSCC = EgtIf( ( vtAux:getX() > -GEO.EPS_SMALL), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
+         else
+            nSCC = EgtIf( ( vtAux:getX() > -GEO.EPS_SMALL), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
+         end
       else
-         nSCC = EgtIf( ( vtAux:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
+         -- se il taglio è orizzontale, si gira aggregato lama per facilitare caduta del legno
+         if abs( vtTg:getZ()) < GEO.EPS_SMALL and abs( vtOrthO:getZ()) > GEO.EPS_SMALL then
+            nSCC = EgtIf( ( vtAux:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YM, MCH_SCC.ADIR_YP)
+         else
+            nSCC = EgtIf( ( vtAux:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
+         end
       end
    else
       if BD.TURN == 2 then

LuaLibs/ProcessDrill.lua

@@ -250,10 +250,8 @@ function ProcessDrill.Classify( Proc, b3Raw, sDownOrSideOrStd)
    -- se ci sono delle dipendenze da altre feature da rispettare
    if sDownOrSideOrStd then
       if sDownOrSideOrStd == 'DOWN' then
-         -- se foro fatto in doppio entrambe le forature (valore assoluto) devono essere sopra al valore limite, se foro singolo deve essere sopra al valore limite se ribaltato
-         if ( abs( Proc.Flg) == 2 and ( abs( vtExtr:getZ()) < - BD.DRILL_VZ_MIN) or ( abs( Proc.Flg) ~= 2 and vtExtr:getZ() < - BD.DRILL_VZ_MIN)) then
+         if vtExtr:getZ() < - BD.DRILL_VZ_MIN then
             Proc.Down = true
-            Proc.Side = false
             return true
          end
       end

LuaLibs/ProcessLapJoint.lua

@@ -783,14 +783,16 @@ function ProcessLapJoint.IsTailFeature( Proc, b3Raw)
    local nPartId = EgtGetParent( EgtGetParent( Proc.Id) or GDB_ID.NULL)
    local b3Solid = EgtGetBBoxGlob( EgtGetFirstNameInGroup( nPartId, 'Box') or GDB_ID.NULL, GDB_BB.STANDARD)
    -- verifico se è in coda
+   
    local dEndDist = Proc.Box:getMin():getX() - b3Solid:getMin():getX()
-   if dEndDist > BD.MAX_DIST_HTFEA then
+   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
          return true
       else
          return false
       end
    end
+
    -- se lunga come trave, oppure non è trave corta e la sua lunghezza supera il massimo o il 80% della lunghezza della trave
    if Proc.Box:getDimX() > b3Solid:getDimX() - 1 or
       ( b3Solid:getDimX() > BD.LEN_SHORT_PART and Proc.Box:getDimX() > min( BD.MAX_LEN_HTFEA, 0.8 * b3Solid:getDimX())) then

UpdateLog.txt

@@ -1,8 +1,5 @@
            ==== Beam Update Log ====
 
-Versione 2.6j2 (17/10/2024)
-- Fixed : in forature corretto caso in cui il foro viene ripetuto in più rotazioni
-
 Versione 2.6j1 (10/10/2024)
 - Modif : se la macchina è tipo BlockHaus, i LapJoint vengono fatti prima del taglio di separazione
 - Modif : se tenone di coda è attraversato da foro allora anche il foro sarà di coda

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '2.6j2'
+VERSION = '2.6j1'
 MIN_EXE = '2.6e5'