Aggiunta gestione prefori

LuaLibs/ProcessDrill.lua

@@ -20,7 +20,7 @@
 -- 2023/07/28 Aggiunta gestione rinvio 90deg solo per forature da sotto esattamente verticali.
 -- 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 Prima versione gestione Predrill
+-- 2024/03/13 Aggiunta gestione Predrill
 
 -- Tabella per definizione modulo
 local ProcessDrill = {}
@@ -527,7 +527,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       dMaxElev = dMaxDepth
    end
    -- inserisco la lavorazione
-   local sName = 'Drill_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
+   local sName = EgtIf( 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
@@ -537,7 +537,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    -- aggiungo geometria
    EgtSetMachiningGeometry( {{ AuxId, -1}})
    -- eventuale inversione
-   if sType == 'Drill' or sType == 'Drill_H2' or sType == 'Drill_AT' or sType == 'AngleDrill' then
+   if sType == 'Drill' or sType == 'Drill_H2' or sType == 'Drill_AT' or sType == 'AngleDrill' or sType == 'Predrill' then
       EgtSetMachiningParam( MCH_MP.INVERT, bToInvert)
    else
       EgtSetMachiningParam( MCH_MP.TOOLINVERT, bToInvert)