In MakeTwo rimossa gestione calcolo differente su ultima passata in caso di macchina FAST

- correzione in Mortise per utilizzo variabili non definite.

LuaLibs/FacesBySaw.lua

@@ -27,6 +27,7 @@
 -- 2024/01/18 Gestita lama con aggregato con asse bloccato per massimizzare capacità di taglio verticale, se da sotto.
 --            Implementata GetBlockedAxis che gestisce gli assi bloccati per tutti i tipi di utensile.
 -- 2024/02/22 Migliorato calcolo area non pinzabile in testa HCING e coda TCING
+-- 2024/03/27 In MakeTwo rimossa gestione calcolo differente su ultima passata in caso di macchina FAST
 
 -- Tabella per definizione modulo
 local FacesBySaw = {}
@@ -618,12 +619,7 @@ function FacesBySaw.MakeTwo( Proc, nPhase, nRawId, nPartId, dOvmHead, sCutType,
             local vtOrthO = EgtIf( ( i % 2) == 1, vtRef[nOtInd], vtRef[nUpInd])
             -- lavoro la faccia
             for j = 1, #vCuts[i] do
-               -- se FAST, pezzo alto e ultimo taglio verticale -> allungo uscita per consentire eventuale rotazione B sul posto
-               local dAccEnd = 0
-               if not BD.C_SIMM and BD.MAX_HEIGHT_ROT_B_ABOVE and b3Raw:getDimZ() > BD.MAX_HEIGHT_ROT_B_ABOVE and vtOrthO:getZ() > 0.866 and j == #vCuts[i] then
-                  dAccEnd = - ( dSawDiam / 2 + BD.CUT_SIC)
-               end
-               local bOk, sErr = FacesBySaw.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, vtOrthO, dNzLimDwnUp, dCutExtra, BD.CUT_SIC, 0, 0, dAccEnd, nil, b3Raw)
+               local bOk, sErr = FacesBySaw.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, vtOrthO, dNzLimDwnUp, dCutExtra, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
                if not bOk then
                   return bOk, sErr
                end

LuaLibs/ProcessDrill.lua

@@ -21,6 +21,7 @@
 -- 2023/09/26 Se errore in applicazione lavorazione si inverte e riprova solo se foratura singola su foro aperto.
 -- 2023/11/06 Migliorata gestione dei fori con AngularTransmission.
 -- 2024/03/13 Aggiunta gestione Predrill
+-- 2024/03/18 Per Predrill corretta direzione estrusione per fori con direzione verso il basso
 
 -- Tabella per definizione modulo
 local ProcessDrill = {}
@@ -176,23 +177,21 @@ function ProcessDrill.AddPredrillFromDrillProc( Proc)
       local nPreHoleId = EgtCopyGlob( Proc.Id, nAddGrpId)
       local nPreHoleAux = EgtCopyGlob( Proc.Id + AuxId, nAddGrpId)
 
-      -- se foro invertito sposto geometria dall'altro lato del foro
+      -- se foro invertito sposto geometria dall'altro lato del foro e inverto direzione estrusione
       if Proc.Flg == -2 then
-         local vsExtr = vtExtr * Proc.Len
-         EgtMove( nPreHoleAux, vsExtr)
-         EgtModifyCurveThickness( nPreHoleAux, dDepthPredrill)
-      -- altrimenti creo il foro direttamente
-      else
-         EgtModifyCurveThickness( nPreHoleAux, -dDepthPredrill)
+         local vsExtr = -vtExtr * Proc.Len
+         EgtMove( nPreHoleAux, vsExtr, GDB_RT.GLOB)
+         EgtModifyCurveExtrusion( nPreHoleAux, -vtExtr, GDB_RT.GLOB)
       end
+      EgtModifyCurveThickness( nPreHoleAux, -dDepthPredrill)
 
-      -- definisco dati seconda parte
       local PredrillProc = {}
+      -- definisco dati seconda parte
       PredrillProc.PartId = Proc.PartId
       PredrillProc.Id = nPreHoleId
       PredrillProc.Grp = Proc.Grp
       PredrillProc.Prc = Proc.Prc
-      PredrillProc.Flg = Proc.Flg
+      PredrillProc.Flg = 1
       PredrillProc.Box = Proc.Box
       PredrillProc.Fct = Proc.Fct
       PredrillProc.Diam = Proc.Diam
@@ -200,7 +199,7 @@ function ProcessDrill.AddPredrillFromDrillProc( Proc)
       PredrillProc.Head = Proc.Head
       PredrillProc.Tail = Proc.Tail
       PredrillProc.Fcs = Proc.Fcs
-      PredrillProc.Fce = Proc.Fce
+      PredrillProc.Fce = 0 -- il preforo è sempre chiuso, non ha faccia di uscita
       PredrillProc.CutId = Proc.CutId
       PredrillProc.TaskId = Proc.TaskId
       PredrillProc.AdjId = Proc.AdjId
@@ -527,7 +526,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       dMaxElev = dMaxDepth
    end
    -- inserisco la lavorazione
-   local sName = EgtIf( sType == 'Predrill', 'Predrill_', 'Drill_') .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
+   local sName = EgtIf( EgtStartsWith( sType, 'Predrill'), 'Predrill_', 'Drill_') .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
    local nMchId = EgtAddMachining( sName, sDrilling)
    if not nMchId then
       local sErr = 'Error adding machining ' .. sName .. '-' .. sDrilling

LuaLibs/ProcessLongDoubleCut.lua

@@ -23,6 +23,7 @@
 -- 2023/11/24 Aggiunta Q05 per utilizzo lama anche in feature cieche conme per LongCut.
 -- 2023/11/30 Calcolo elevazione velocizzato e centralizzato tramite la funzione GetFaceElevation.
 -- 2024/01/18 Implementata GetBlockedAxis che gestisce gli assi bloccati per tutti i tipi di utensile.
+-- 2024/03/21 Corretto parametro passato a funzione BL.GetBlockedAxis. Ora tiene in considerazione anche testa sotto
 
 -- Tabella per definizione modulo
 local ProcessLong2Cut = {}
@@ -833,11 +834,13 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
 
                   -- recupero alcune informazioni utili dalla lavorazione attuale
                   local bIsCurrentBladeCCW
+                  local sCuttingNameMach
                   if bIsTopBladeCurrent then
-                     EgtMdbSetCurrMachining( sCutting)
+                     sCuttingNameMach = sCutting
                   else
-                     EgtMdbSetCurrMachining( sCuttingDn)
+                     sCuttingNameMach = sCuttingDn
                   end
+                  EgtMdbSetCurrMachining( sCuttingNameMach)
                   bIsCurrentBladeCCW = EgtMdbGetCurrMachiningParam( MCH_MP.SPEED) < 0
 
                   -- imposto la direzione di lavoro per avere scarico del truciolo ottimale
@@ -880,7 +883,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
                   EgtSetMachiningParam( MCH_MP.SCC, nSCC)
                   -- imposto angolo 3° asse rot
                   local vtOut = EgtIf( vtN[vOrd[j]]:getX() > 0, X_AX(), -X_AX())
-                  EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, BL.GetBlockedAxis( sCutting, 'perpendicular', b3Raw, vtN, vtOut))
+                  EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, BL.GetBlockedAxis( sCuttingNameMach, 'perpendicular', b3Raw, vtN, vtOut))
                   -- eseguo
                   if not ML.ApplyMachining( true, false) then
                      local _, sErr = EgtGetLastMachMgrError()
@@ -1777,7 +1780,6 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
                   sWarn = 'Warning in LongDoubleCut : depth (' .. EgtNumToString( vWidth[vOrd[i]] + dAgg, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepthDn - dCollSic, 1) .. ')'
                end
                dDepth  = min( dMaxDepthDn - dCollSic, vWidth[vOrd[i]] + dAgg)
-               dDepth2 = vWidth[vOrd[i]] + dAgg - dDepth
                EgtSetMachiningParam( MCH_MP.DEPTH, dDepth - dExtraElev)
             else
                dCollSic    = max( BD.COLL_SIC, ( dThDiam - dToolDiam) / 2 * EgtIf(  abs(dNz) < GEO.EPS_SMALL, 1, abs( EgtIf( abs(vtN[vOrd[i]]:getY()) >= abs(vtN[vOrd[i]]:getZ()), vtN[vOrd[i]]:getZ(), vtN[vOrd[i]]:getY()) / dNz)))
@@ -1785,7 +1787,6 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
                   sWarn = 'Warning in LongDoubleCut : depth (' .. EgtNumToString( vWidth[vOrd[i]] + dAgg, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepth - dCollSic, 1) .. ')'
                end
                dDepth = min( dMaxDepth - dCollSic, vWidth[vOrd[i]] + dAgg)
-               dDepth2 = vWidth[vOrd[i]] + dAgg - dDepth
                EgtSetMachiningParam( MCH_MP.DEPTH, dDepth - dExtraElev)
             end
             -- eseguo

LuaLibs/ProcessMortise.lua

@@ -442,7 +442,7 @@ function ProcessMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    -- recupero i dati della curva e del profilo
    local dDepth = dMorH
    local bDownHead = ( BD.DOWN_HEAD and vtExtr:getZ() < 0.1)
-   local bToolInv = ( not bDownHead and vtExtr:getZ() < -0.1 and b3Aux:getDimZ() > b3Raw:getDimZ() - 5)
+   local bToolInv = ( not bDownHead and vtExtr:getZ() < -0.1 and Proc.Box:getDimZ() > b3Solid:getDimZ() - 5)
    local dExtra = 2
 
    -- verifico se servono gli smussi. Se lavorazione principale di svuotatura significa che è solo da un lato

UpdateLog.txt

@@ -1,7 +1,11 @@
            ==== Beam Update Log ====
 
+Versione 2.6c4 (18/03/2024)
+- Fixed : correzioni a gestione prefori.
+
 Versione 2.6c3 (15/03/2024)
 - Added : Aggiunta gestione prefori
+- Fixed : in LapJoint correzione a calcolo ingombro per feature basse e lunghe dalla testa.
 
 Versione 2.6c2 (12/03/2024)
 - Added : in Mortase Aggiunta possibilità di inserire lavorazione di smusso

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '2.6c3'
+VERSION = '2.6c4'
 MIN_EXE = '2.6a1'