diff --git a/LuaLibs/ProcessDrill.lua b/LuaLibs/ProcessDrill.lua index 2a58800..d79395b 100644 --- a/LuaLibs/ProcessDrill.lua +++ b/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 diff --git a/UpdateLog.txt b/UpdateLog.txt index 1e8585a..70d6380 100644 --- a/UpdateLog.txt +++ b/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 diff --git a/Version.lua b/Version.lua index 759c1b2..198380a 100644 --- a/Version.lua +++ b/Version.lua @@ -2,5 +2,5 @@ -- Gestione della versione di Beam NAME = 'Beam' -VERSION = '2.6c3' +VERSION = '2.6c4' MIN_EXE = '2.6a1'