DataBeam :

- modifiche per doppia passata su profili Concave e Convex
- tagli doppi di testa e split con controllo sezioni migliorate
- corretto controllo fori sdoppiati.

LuaLibs/ProcessDrill.lua

@@ -1,4 +1,4 @@
--- ProcessDrill.lua by Egaltech s.r.l. 2019/03/25
+-- ProcessDrill.lua by Egaltech s.r.l. 2019/04/01
 -- Gestione calcolo forature per Travi
 
 -- Tabella per definizione modulo
@@ -126,6 +126,8 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       EgtOutLog( sErr)
       return false, sErr
    end
+   if bToInvert then vtExtr = - vtExtr end
+   if Proc.Flg == -2 then bToInvert = true end
    -- recupero la lavorazione
    local nDri, sDrilling = FindDrilling( dDiam)
    if not sDrilling then
@@ -133,8 +135,6 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       EgtOutLog( sErr)
       return false, sErr
    end
-   -- verifico se foro da fare al contrario
-   if Proc.Flg == -2 then bToInvert = true end
    -- inserisco la lavorazione
    local sName = 'Drill_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
    local nMchId = EgtAddMachining( sName, sDrilling)
@@ -149,7 +149,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    EgtSetMachiningParam( MCH_MP.INVERT, bToInvert)
    -- imposto posizione braccio porta testa
    local nSCC = MCH_SCC.ADIR_YM
-   if abs( vtExtr:getY()) > 100 * GEO.EPS_ZERO and bToInvert ~= ( vtExtr:getY() > -GEO.EPS_ZERO) then
+   if vtExtr:getY() > 100 * GEO.EPS_ZERO then
       nSCC = MCH_SCC.ADIR_YP
    end
    EgtSetMachiningParam( MCH_MP.SCC, nSCC)