In LongDoubleCut, se la faccia scelta non è completa, si lavora l'altra faccia (se completa)

In Drill, se foro in testa che attraversa un taglio, si setta sempre la MaxElev. Serve in caso ci sia un grande sovramateriale di testa
In RidgeLap, si utilizza direzione reale della faccia. Prima era solo verso X
2025-06-25 11:43:27 +02:00 · 2025-06-24 14:50:20 +02:00 · 2025-06-24 12:34:12 +02:00 · 2025-06-24 10:33:35 +02:00 · 2025-06-24 10:32:37 +02:00 · 2025-06-23 17:05:29 +02:00
24 changed files with 583 additions and 174 deletions
@@ -526,6 +526,12 @@ else
   end
   -- Aggiorno eventuali dati ausiliari
   UpdateAuxData( sBtmFile)
+
+   -- Anche se non è da riprocessare, imposto nome file CN.
+   -- Se file TS7 importato da altro PC, 'BEAM.FILE' è cambiato da un PC all'altro. Di conseguenza si deve aggiornare nome file che si andrà a generare.
+   local _, sName, _ = EgtSplitPath( BEAM.FILE)
+   EgtSetInfo( EgtGetLastMachGroup(), 'NcName', sName .. '.cnc')
+
   -- Passo in modalità lavora
   EgtSetCurrMachGroup( EgtGetLastMachGroup())
   -- Se necessario eseguo aggiornamento con setup corrente e ricalcolo delle lavorazioni
@@ -45,6 +45,7 @@ REM Compilazione 32 e 64 bit
 \EgtProg\Dll32\luac54 -o bin\LuaLibs\ProcessText.lua                   -s LuaLibs\ProcessText.lua
 \EgtProg\Dll32\luac54 -o bin\LuaLibs\ProcessTyroleanDovetail.lua       -s LuaLibs\ProcessTyroleanDovetail.lua
 \EgtProg\Dll32\luac54 -o bin\LuaLibs\ProcessVariant.lua                -s LuaLibs\ProcessVariant.lua
+\EgtProg\Dll32\luac54 -o bin\LuaLibs\ProcessProbing.lua                -s LuaLibs\ProcessProbing.lua
 \EgtProg\Dll32\luac54 -o bin\BatchProcess.lua                          -s BatchProcess.lua
 \EgtProg\Dll32\luac54 -o bin\BatchProcessNew.lua                       -s BatchProcessNew.lua
 \EgtProg\Dll32\luac54 -o bin\GetBeamData.lua                           -s GetBeamData.lua
@@ -108,6 +108,7 @@ _G.package.loaded.ProcessScarfJoint = nil
 _G.package.loaded.ProcessSimpleScarf = nil
 _G.package.loaded.ProcessStepJoint = nil
 _G.package.loaded.ProcessStepJointNotch = nil
+_G.package.loaded.ProcessProbing = nil
 _G.package.loaded.ProcessProfFront = nil
 _G.package.loaded.ProcessProfConcave = nil
 _G.package.loaded.ProcessProfConvex = nil
@@ -642,7 +642,7 @@ function BeamLib.GetFaceWithMostAdj( Proc, nPartId, bCompare3Fc, dCosSideAng)
   -- premio quella che non è sottosquadra e che ha la X minore
   local bDiffSmall = true
   for i = 1, #dtElev do
-      if dtElev[i] > dMinElev + 5 or dtElev[i] > 80 then
+      if ( dtElev[i] > dMinElev + 5 or dtElev[i] > 80) and dMinElev < 0.85 * dtElev[i] then
         bDiffSmall = false
      end
   end
@@ -566,7 +566,7 @@ function DiceCut.GetDice( nParent, BBoxRawPart, ptCPlanes, vtNPlanes, bGetOrtoPl
      end
   end

-   return UltimateTable
+   return UltimateTable, OffsetP, OffsetO
 end

 ----------------------------------------------------------------------------------------------------------------------------------------------------
@@ -46,7 +46,7 @@ local BD = require( 'BeamData')
 local ML = require( 'MachiningLib')

 ---------------------------------------------------------------------
-function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, dAccStart, dAccEnd, sNotes, b3Raw, bForceInvert, bForceTangentLeadInOut)
+function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, dAccStart, dAccEnd, sNotes, b3Raw, bForceInvert, sLeadInOutType, dActualElevation)
   EgtOutLog( 'FacesBySaw.MakeParallelOne', 3)
   -- dati della faccia
   local ptC, vtN = EgtSurfTmFacetCenter( nSurfId, nFacet, GDB_ID.ROOT)
@@ -68,16 +68,28 @@ function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimD
   local dLiPerp = dDistX + dCutExtra + dCutSic
   local dLoTang = dLiTang
   local dLoPerp = dLiPerp
+   local dLiCompLength = 0
+   local dLoCompLength = 0
   -- lunghezza attacco/uscita tangenti
   local dLi2Tang = dSawDiam / 2 + dCutSic
   local dLi2Perp = 0
   local dLo2Tang = dLi2Tang
   local dLo2Perp = dLi2Perp
+   local dLi2CompLength = 0
+   local dLo2CompLength = 0
   -- scelgo l'attacco più conveniente
   local bLioTang
   local Ktp = 1.1
   if BD.KIOTP then Ktp = BD.KIOTP end
-   if bForceTangentLeadInOut or ( Ktp * dLi2Tang < dLiPerp) then
+   if ( sLeadInOutType == 'PerpendicularOutraw') then
+      bLioTang = false
+      dLiCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ) + dCutExtra
+      dLoCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ) + dCutExtra
+      dLiTang = 1
+      dLoTang = 1
+      dLiPerp = 0
+      dLoPerp = 0
+   elseif ( sLeadInOutType ~= 'Perpendicular') and ( ( sLeadInOutType == 'Tangent') or ( Ktp * dLi2Tang < dLiPerp)) then
      bLioTang = true
      dLiTang, dLiPerp, dLoTang, dLoPerp = dLi2Tang, dLi2Perp, dLo2Tang, dLo2Perp
      if BD.TURN then
@@ -136,9 +148,11 @@ function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimD
   -- imposto attacco/uscita
   EgtSetMachiningParam( MCH_MP.LITANG, dLiTang)
   EgtSetMachiningParam( MCH_MP.LIPERP, dLiPerp)
+   EgtSetMachiningParam( MCH_MP.LICOMPLEN, dLiCompLength)
   if BD.TURN and bLioTang then EgtSetMachiningParam( MCH_MP.LEADOUTTYPE, MCH_MILL_LO.PERP_TG) end
   EgtSetMachiningParam( MCH_MP.LOTANG, dLoTang)
   EgtSetMachiningParam( MCH_MP.LOPERP, dLoPerp)
+   EgtSetMachiningParam( MCH_MP.LOCOMPLEN, dLoCompLength)
   -- imposto allungamenti iniziale e finale
   EgtSetMachiningParam( MCH_MP.STARTADDLEN, -dAccStart)
   EgtSetMachiningParam( MCH_MP.ENDADDLEN, -dAccEnd)
@@ -157,6 +171,9 @@ function MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, nFaceUse, dVzLimD
   local vtOut = EgtIf( vtN:getX() > 0, X_AX(), -X_AX())
   EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, BL.GetBlockedAxis( sCutting, 'perpendicular', b3Raw, vtTool, vtOut))
   -- eventuali note
+   if ( sLeadInOutType == 'PerpendicularOutraw') then
+      sNotes = EgtSetValInNotes( sNotes, 'OutRaw', 3)
+   end
   if sNotes and #sNotes > 0 then EgtSetMachiningParam( MCH_MP.USERNOTES, sNotes) end
   -- eseguo
   if not ML.ApplyMachining( true, false) then
@@ -193,7 +210,28 @@ local function GetNameSolidFaceIncludingLine( b3Solid, ptP1Comp, ptP2Comp)
 end

 ---------------------------------------------------------------------
-function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, dAccStart, dAccEnd, sNotes, b3Raw, bForceInvert, bMaximizeVerticalDepth, bSpecialTangentLeadInOut, bForceTangentLeadInOut, Par5Alternative)
+local function AreSameOrOppositeDirApprox( vDir1, vDir2)
+   if abs( abs( vDir1) - abs( vDir2)) < 10 * GEO.EPS_SMALL then
+      return true
+   else
+      return false
+   end
+end
+
+---------------------------------------------------------------------
+local function GetEdgeToMachineFromVector( nSurfId, nFacet, vtOrthO)
+   local _, EdgesEgt = EgtSurfTmGetFacetOutlineInfo( nSurfId, nFacet, GDB_ID.ROOT)
+
+   for i = 1, #EdgesEgt do
+      if AreOppositeVectorApprox( EdgesEgt[i].Norm, vtOrthO) then
+         return ( i - 1)
+      end
+   end
+   return nil
+end
+
+---------------------------------------------------------------------
+function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, dAccStart, dAccEnd, sNotes, b3Raw, bForceInvert, bMaximizeVerticalDepth, bSpecialTangentLeadInOut, sLeadInOutType, Par5Alternative, dActualElevation)
   -- se lama con asse parallelo alla faccia, passo alla apposita funzione
   if ( Par5 == MCH_MILL_FU.PARAL_DOWN or
        Par5 == MCH_MILL_FU.PARAL_TOP or
@@ -201,7 +239,7 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
        Par5 == MCH_MILL_FU.PARAL_BACK or
        Par5 == MCH_MILL_FU.PARAL_LEFT or
        Par5 == MCH_MILL_FU.PARAL_RIGHT) then
-      return MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, dAccStart, dAccEnd, sNotes, b3Raw, bForceInvert, bForceTangentLeadInOut)
+      return MakeParallelOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, dAccStart, dAccEnd, sNotes, b3Raw, bForceInvert, sLeadInOutType, dActualElevation)
   end
   -- la lama ha asse perpendicolare alla faccia
   EgtOutLog( 'FacesBySaw.MakeOne', 3)
@@ -233,8 +271,9 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
   if not dVzLimDwnUp then dVzLimDwnUp = BL.GetNzLimDownUp( b3Raw, vtN, vtOrthO) end
   local bDownHead = ( dVzLimDwnUp and dVzLimDwnUp < - 1.5)
   local bDownUp = ( vtN:getZ() < dVzLimDwnUp)
-   -- linea o bilinea di lavorazione
   local ptP1, ptPm, ptP2, vtV1, vtV2, dLen, dWidth = EgtSurfTmFacetOppositeSide( nSurfId, nFacet, vtOrthO, GDB_ID.ROOT)
+   
+
   if not dLen or dLen < 1.1 or not dWidth or dWidth < 1.1 then
      local sWarn = 'Face ' .. string.format( '%d,%d', nSurfId, nFacet) .. ' skipped : too small'
      EgtOutLog( sWarn, 1)
@@ -435,7 +474,17 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
   local bLioTang
   local Ktp = 1.1
   if BD.KIOTP then Ktp = BD.KIOTP end
-   if ( bForceTangentLeadInOut or ( not bDownUp or abs( vtTg:getY()) > 0.5) and
+   if ( sLeadInOutType == 'PerpendicularOutraw') then
+      bLioTang = false
+      dLiCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ) + dCutExtra
+      dLoCompLength = dActualElevation + EgtMdbGetGeneralParam( MCH_GP.SAFEZ) + dCutExtra
+      dLiTang = 1
+      dLoTang = 1
+      dLiPerp = 0
+      dLoPerp = 0
+      dLenLi = sqrt( dLiTang * dLiTang + dLiPerp * dLiPerp)
+      dLenLo = sqrt( dLoTang * dLoTang + dLoPerp * dLoPerp)
+   elseif ( sLeadInOutType ~= 'Perpendicular') and ( ( sLeadInOutType == 'Tangent') or ( not bDownUp or abs( vtTg:getY()) > 0.5) and
      ( not bDownHead or abs( vtTg:getZ()) < 0.51) and
      abs( vtTg:getX()) < 0.9848 and
      ( ( abs( vtTg:getZ()) < 0.17 and ( vtV1:getZ() < -0.5 or vtV2:getZ() < -0.5) and not bDownHead) or
@@ -547,8 +596,18 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
   EgtSetMachiningGeometry( {{ nSurfId, nFacet}})
   -- imposto uso faccia
   EgtSetMachiningParam( MCH_MP.FACEUSE, nFaceUse)
-   local sNoteVtFaceUse = 'VtFaceUse=' .. EgtNumToString( vtOrthO:getX(),3) .. ',' .. EgtNumToString( vtOrthO:getY(),3) .. ',' .. EgtNumToString( vtOrthO:getZ(),3) .. ';'
-   EgtSetMachiningParam( MCH_MP.USERNOTES, sNoteVtFaceUse)
+   -- vtFaceUse non funziona correttaemnte in caso che il lato da lavorare sia a 45°. Potrebbe ritornare una trilinea, non gestibile. Quindi si setta l'EDGE
+   local nEdgeFaceUse = GetEdgeToMachineFromVector( nSurfId, nFacet, vtOrthO)
+   if nEdgeFaceUse and ( AreSameOrOppositeDirApprox( vtOrthO:getX(), 0.707) or AreSameOrOppositeDirApprox( vtOrthO:getY(), 0.707) or AreSameOrOppositeDirApprox( vtOrthO:getZ(), 0.707)) then
+      local sNoteEdgeFaceUse = 'EdgesFaceUse=' .. EgtNumToString( nEdgeFaceUse)  .. ';'
+      EgtSetMachiningParam( MCH_MP.USERNOTES, sNoteEdgeFaceUse)
+   else
+      local sNoteVtFaceUse = 'VtFaceUse=' .. EgtNumToString( vtOrthO:getX(),3) .. ',' .. EgtNumToString( vtOrthO:getY(),3) .. ',' .. EgtNumToString( vtOrthO:getZ(),3) .. ';'
+      EgtSetMachiningParam( MCH_MP.USERNOTES, sNoteVtFaceUse)
+      -- imposto allungamenti iniziale e finale (in caso si utilizzi EDGE, non serve prolungare o accorciare)
+      EgtSetMachiningParam( MCH_MP.STARTADDLEN, dAllStart - dAccStart)
+      EgtSetMachiningParam( MCH_MP.ENDADDLEN, dAllEnd - dAccEnd)
+   end
   -- imposto posizione braccio porta testa
   EgtSetMachiningParam( MCH_MP.SCC, nSCC)
   -- imposto inversione e lato correzione
@@ -567,13 +626,13 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
   EgtSetMachiningParam( MCH_MP.LOTANG, dLoTang)
   EgtSetMachiningParam( MCH_MP.LOPERP, dLoPerp)
   EgtSetMachiningParam( MCH_MP.LOCOMPLEN, dLoCompLength)
-   -- imposto allungamenti iniziale e finale
-   EgtSetMachiningParam( MCH_MP.STARTADDLEN, dAllStart - dAccStart)
-   EgtSetMachiningParam( MCH_MP.ENDADDLEN, dAllEnd - dAccEnd)
   -- imposto angolo 3° asse rot
   local sBlockedAxis = EgtIf( bMaximizeVerticalDepth, 'parallel', 'perpendicular')
   EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, BL.GetBlockedAxis( sCutting, sBlockedAxis, b3Raw, vtN, vtOrthO))
   -- eventuali note
+   if ( sLeadInOutType == 'PerpendicularOutraw') then
+      sNotes = EgtSetValInNotes( sNotes, 'OutRaw', 3)
+   end
   if sNotes and #sNotes > 0 then EgtSetMachiningParam( MCH_MP.USERNOTES, sNotes) end
   -- eseguo
   if not ML.ApplyMachining( true, false) then
@@ -643,7 +702,7 @@ function FacesBySaw.MakeTwo( Proc, nPhase, nRawId, nPartId, dOvmHead, sCutType,
   local bFaceOk = {}
   bFaceOk[1] = ( vtN[1]:getZ() >= ( BD.CUT_VZ_MIN or BD.NZ_MINB) or abs( vtN[1]:getY()) < 0.174 or ( Proc.AffectedFaces.Left ~= Proc.AffectedFaces.Right and Proc.Face[1].Elevation < dMaxDepth - 10 * GEO.EPS_SMALL))
   bFaceOk[2] = ( vtN[2]:getZ() >= ( BD.CUT_VZ_MIN or BD.NZ_MINB) or abs( vtN[2]:getY()) < 0.174 or ( Proc.AffectedFaces.Left ~= Proc.AffectedFaces.Right and Proc.Face[2].Elevation < dMaxDepth - 10 * GEO.EPS_SMALL))
-   if not bDownHead and ( not bFaceOk[1] or not bFaceOk[2]) then
+   if not bDownHead and not bFaceOk[1] and not bFaceOk[2] then
      local sErr = 'Error : TwoFacesBySaw from bottom impossible'
      EgtOutLog( sErr)
      return false, sErr
@@ -25,11 +25,14 @@ EgtOutLog( ' MachiningLib started', 1)

 -- Dati
 local BD = require( 'BeamData')
-local Cuttings = require( 'CutData')
-local Millings = require( 'MillingData')
-local Pocketings = require( 'PocketingData')
-local Sawings = require( 'SawingData')
-local Drillings = require( 'DrillData')
+-- librerie lavorazioni caricate con pcall perchè potrebbero non esserci
+local Cuttings, Millings, Pocketings, Sawings, Drillings, Probing
+if pcall( require, 'CutData')       then   Cuttings = require( 'CutData')         end
+if pcall( require, 'MillingData')   then   Millings = require( 'MillingData')     end
+if pcall( require, 'PocketingData') then   Pocketings = require( 'PocketingData') end
+if pcall( require, 'SawingData')    then   Sawings = require( 'SawingData')       end
+if pcall( require, 'DrillData')     then   Drillings = require( 'DrillData')      end
+if pcall( require, 'ProbingData')   then   Probing = require( 'ProbingData')      end

 -- tipo di teste macchina
 local ONE_HEAD = 1                      -- una testa (Fast, One, Turn1T)
@@ -184,18 +187,32 @@ end

 ---------------------------------------------------------------------
 function GetMachinings( MachiningType, sType)
-   local Machinings
+   local Machinings = {}
   -- leggo le lavorazioni disponibili
   if MachiningType == MCH_MY.DRILLING then
-      Machinings = Drillings
+      if Drillings and type( Drillings) == "table" then
+         Machinings = Drillings
+      end
   elseif MachiningType == MCH_MY.SAWING then
-      Machinings = Cuttings
+      if Cuttings and type( Cuttings) == "table" then
+         Machinings = Cuttings
+      end
   elseif MachiningType == MCH_MY.MILLING then
-      Machinings = Millings
+      if Millings and type( Millings) == "table" then
+         Machinings = Millings
+      end
   elseif MachiningType == MCH_MY.POCKETING then
-      Machinings = Pocketings
+      if Pocketings and type( Pocketings) == "table" then
+         Machinings = Pocketings
+      end
   elseif MachiningType == MCH_MY.MORTISING then
-      Machinings = Sawings
+      if Sawings and type( Sawings) == "table" then
+         Machinings = Sawings
+      end
+   elseif MachiningType == MCH_MY.PROBING then
+      if Probing and type( Probing) == "table" then
+         Machinings = Probing
+      end
   end
   -- scrivo i parametri utensile nella lavorazione
   local validMachinings = {}
@@ -208,27 +225,30 @@ function GetMachinings( MachiningType, sType)
         if Machining.Tool.Name then
            if EgtTdbSetCurrTool( Machining.Tool.Name) then
               table.insert( validMachinings, Machining)
-               if ( MachiningType == MCH_MY.MILLING) or ( MachiningType == MCH_MY.POCKETING) or ( MachiningType == MCH_MY.DRILLING and EgtStartsWith( sType, 'Pocket')) then
-                  Machining.Tool.MaxMat = EgtTdbGetCurrToolMaxDepth()
-               else
-                  Machining.Tool.MaxMat = EgtTdbGetCurrToolParam( MCH_TP.MAXMAT)
-               end
-               if MachiningType == MCH_MY.DRILLING then
-                  if EgtStartsWith( Machining.Type, 'Drill') then
-                     Machining.SubType = 'Drill'
-                  elseif EgtStartsWith( Machining.Type, 'AngleDrill') then
-                     Machining.SubType = 'AngleDrill'
-                  elseif EgtStartsWith( Machining.Type, 'Pocket') then
-                     Machining.SubType = 'DrillPocket'
-                  elseif EgtStartsWith( Machining.Type, 'Predrill') then
-                     Machining.SubType = 'Predrill'
+               -- se non è tastatura, recupero dati utensile
+               if MachiningType ~= MCH_MY.PROBING then
+                  if ( MachiningType == MCH_MY.MILLING) or ( MachiningType == MCH_MY.POCKETING) or ( MachiningType == MCH_MY.DRILLING and EgtStartsWith( sType, 'Pocket')) then
+                     Machining.Tool.MaxMat = EgtTdbGetCurrToolMaxDepth()
+                  else
+                     Machining.Tool.MaxMat = EgtTdbGetCurrToolParam( MCH_TP.MAXMAT)
                  end
+                  if MachiningType == MCH_MY.DRILLING then
+                     if EgtStartsWith( Machining.Type, 'Drill') then
+                        Machining.SubType = 'Drill'
+                     elseif EgtStartsWith( Machining.Type, 'AngleDrill') then
+                        Machining.SubType = 'AngleDrill'
+                     elseif EgtStartsWith( Machining.Type, 'Pocket') then
+                        Machining.SubType = 'DrillPocket'
+                     elseif EgtStartsWith( Machining.Type, 'Predrill') then
+                        Machining.SubType = 'Predrill'
+                     end
+                  end
+                  Machining.Tool.Diameter = EgtTdbGetCurrToolParam( MCH_TP.DIAM)
+                  Machining.Tool.Length = EgtTdbGetCurrToolParam( MCH_TP.LEN)
+                  Machining.Tool.TotalLength = EgtTdbGetCurrToolParam( MCH_TP.TOTLEN)
+                  Machining.Tool.ToolHolderDiameter = EgtTdbGetCurrToolThDiam()
+                  Machining.Tool.ToolHolderLength = EgtTdbGetCurrToolThLength() or 72
               end
-               Machining.Tool.Diameter = EgtTdbGetCurrToolParam( MCH_TP.DIAM)
-               Machining.Tool.Length = EgtTdbGetCurrToolParam( MCH_TP.LEN)
-               Machining.Tool.TotalLength = EgtTdbGetCurrToolParam( MCH_TP.TOTLEN)
-               Machining.Tool.ToolHolderDiameter = EgtTdbGetCurrToolThDiam()
-               Machining.Tool.ToolHolderLength = EgtTdbGetCurrToolThLength() or 72
            end
         end
      end
@@ -342,8 +362,8 @@ local function FindMachining( MachiningType, sType, Params, bTopHead, bDownHead,
   local ForStart = 1
   local ForEnd = #Machinings
   local ForStep = 1
-   -- le forature vanno scorse dal diametro maggiore al minore
-   if MachiningType == MCH_MY.DRILLING then
+   -- le forature vanno scorse dal diametro maggiore al minore, a meno che non sia stato passato un ordinamento specifico
+   if MachiningType == MCH_MY.DRILLING and ( not sSortingCriterion or sSortingCriterion == '') then
      ForStart = #Machinings
      ForEnd = 1
      ForStep = -1
@@ -455,7 +475,7 @@ function MachiningLib.FindCutting( sType, bTopHead, bDownHead, dDepth, sSortingC
 end

 ---------------------------------------------------------------------
-function MachiningLib.FindDrilling( dDiam, dDepth, bTopHead, bDownHead, bExcludeH2, bAngleTransmission, bIsPredrill)
+function MachiningLib.FindDrilling( dDiam, dDepth, bTopHead, bDownHead, bExcludeH2, bAngleTransmission, bIsPredrill, bExcludeH3, sSortingCriterion)
   local MachiningName, MachiningType, Param1, Param2, Param3, Param4, Param5, sTypeMach
   -- se il foro è un predrill, cerco solo punte abilitate al Predrill
   if bIsPredrill then
@@ -463,9 +483,9 @@ function MachiningLib.FindDrilling( dDiam, dDepth, bTopHead, bDownHead, bExclude
   else
      sTypeMach = EgtIf( bAngleTransmission, 'Drill_AT', 'Drill')
   end
-   MachiningName, MachiningType, Param1, Param2, Param3, Param4, Param5 = FindMachining( MCH_MY.DRILLING, sTypeMach, { Diam = dDiam, Depth = dDepth}, bTopHead, bDownHead, bExcludeH2)
+   MachiningName, MachiningType, Param1, Param2, Param3, Param4, Param5 = FindMachining( MCH_MY.DRILLING, sTypeMach, { Diam = dDiam, Depth = dDepth}, bTopHead, bDownHead, bExcludeH2, bExcludeH3, sSortingCriterion)
   if ( not MachiningName or MachiningName == '') then
-      MachiningName, MachiningType, Param1, Param2, Param3, Param4, Param5 = FindMachining( MCH_MY.DRILLING, EgtIf( bAngleTransmission, 'Pocket_AT', 'Pocket'), { Diam = dDiam, Depth = dDepth}, bTopHead, bDownHead)
+      MachiningName, MachiningType, Param1, Param2, Param3, Param4, Param5 = FindMachining( MCH_MY.DRILLING, EgtIf( bAngleTransmission, 'Pocket_AT', 'Pocket'), { Diam = dDiam, Depth = dDepth}, bTopHead, bDownHead, bExcludeH2, bExcludeH3, sSortingCriterion)
   end
   if MachiningName and MachiningName ~= '' then
      return MachiningName, MachiningType, Param1, Param2, Param3, Param4, Param5
@@ -92,7 +92,7 @@ function ProcessCut.Classify( Proc, b3Raw)
      -- calcolo l'ingombro orizzontale della faccia
      local _, DimH, DimV = BL.GetFaceHvRefDim( Proc.Id, 0)
      -- confronto questo ingombro con il doppio della massima dimensione del DiceCut (impossibile lavorare sotto da sopra se più di 2 tagli oppure se tipo PF, taglio inclinato in Y e non taglio singolo orizzontale)
-      if DimH > 2 * BD.MAX_DIM_DICE  or ( BD.C_SIMM and ( abs( vtN:getY()) > 0.1 or bDownCut) and dMaxMat < DimH + BD.CUT_EXTRA) then
+      if DimH > 2 * BD.MAX_DIM_DICE  or ( BD.C_SIMM and ( abs( vtN:getY()) > 0.1) and dMaxMat < DimH + BD.CUT_EXTRA) then
         return true, true
      end
   end
@@ -261,7 +261,8 @@ end

 ---------------------------------------------------------------------
 -- Applicazione della lavorazione con testa da sopra
-local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom, bCustDiceCut, bForced, b3Raw, sNotes, nLimitingSurf, bForceTangentLeadInOut)
+local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom, bCustDiceCut, bForced, b3Raw, sNotes, nLimitingSurf, sLeadInOutType)
+   local sWarn
   -- ingombro del grezzo
   b3Raw = b3Raw or EgtGetRawPartBBox( nRawId)
   -- ingombro del pezzo
@@ -373,10 +374,19 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
   end
   -- verifico se necessari tagli supplementari o se presente superficie limitante
   EgtOutLog( string.format( 'MaxDepth=%.1f MaxVertDepth=%.1f CutH=%.1f CutV=%.1f', dMaxDepth, dMaxVertDepth, dCutH, dCutV), 3)
+   -- se lungo, una faccia e rivolto sul retro verso l'alto si forzano i cubetti per evitare di rovinare il pezzo successivo
+   local bForceDicing = ( Proc.Fct == 1 and Proc.AffectedFaces.Left and bLongCut and vtN:getZ() > 10 * GEO.EPS_SMALL and vtN:getY() < 10 * GEO.EPS_SMALL)
   local vCuts = {}
-   if not Proc.AdvTail and ( dCutH > dMaxDepth - BD.CUT_EXTRA - 3 * BD.COLL_SIC or dCutV > dMaxVertDepth - BD.CUT_EXTRA - 3 * BD.COLL_SIC) then
+   local dDicingOffsetP
+   local dDicingOffsetO
+   if ( ( not Proc.AdvTail) or bForceDicing) and ( dCutH > dMaxDepth - BD.CUT_EXTRA - 3 * BD.COLL_SIC or dCutV > dMaxVertDepth - BD.CUT_EXTRA - 3 * BD.COLL_SIC) then
      local ptExtra, vtExtra
      local bAutoCalcSurf = true
+      if Proc.AdvTail then
+         -- do avviso che la lama può sbordare nel pezzo successivo
+         sWarn = 'Warning : Cut machining can damage next piece'
+         EgtOutLog( sWarn .. ' (process ' .. tostring( Proc.Id) .. ')')
+      end
      if bFillAreaPiece or bFillTail then
         local ptMiddle = ( b3Solid:getMin() + b3Solid:getMax()) / 2
         ptExtra = Point3d( b3Solid:getMin():getX() + 5*GEO.EPS_SMALL, ptMiddle:getY(), ptMiddle:getZ())
@@ -415,11 +425,11 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
         end
      end
      -- se il taglio è più spesso della lama abilito il dicing, altrimenti no
-      if dMaxElev > dSawThick then
-         vCuts = DC.GetDice( nAddGrpId, EgtIf( bForced, b3Raw, b3Solid), ptC, vtN, bAutoCalcSurf, ptExtra, vtExtra, dMaxVertDepth - BD.CUT_EXTRA, dNewDiceDim)
+      if ( dMaxElev > dSawThick) or bForceDicing then
+         vCuts, dDicingOffsetP = DC.GetDice( nAddGrpId, EgtIf( bForced, b3Raw, b3Solid), ptC, vtN, bAutoCalcSurf, ptExtra, vtExtra, dMaxVertDepth - BD.CUT_EXTRA, dNewDiceDim)
         -- se taglio sborda in coda e non è stato inserito nessun taglio a cubetti, lo rilancio con le dimensioni customizzate
         if ( bFillTail or bCustDiceCut) and #vCuts == 0 then
-            vCuts = DC.GetDice( nAddGrpId, b3Solid, ptC, vtN, bAutoCalcSurf, ptExtra, vtExtra, dMaxVertDepth - BD.CUT_EXTRA, Proc.Box:getDimY())
+            vCuts, dDicingOffsetP = DC.GetDice( nAddGrpId, b3Solid, ptC, vtN, bAutoCalcSurf, ptExtra, vtExtra, dMaxVertDepth - BD.CUT_EXTRA, Proc.Box:getDimY())
         end
      end
   end
@@ -588,8 +598,17 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
                  if ( i % 2 == 0) and ( Proc.Fct == 1) and bNoPerpCuts then
                     vtOrthoOAlternative = - vtOrthoO
                  end
-                  bForceTangentLeadInOut = bForceTangentLeadInOut and ( ( i % 2) ~= 0)
-                  local bOk, sErr = Fbs.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, vtOrthoO, dVzLimDwnUp, dExtraCut, BD.CUT_SIC, 0, 0, 0, sNotes, b3Raw, nil, nil, bSpecialTangentLeadInOut, bForceTangentLeadInOut, vtOrthoOAlternative)
+                  local sLeadInOutTypeFbs = 'Calculated'
+                  if ( ( i % 2) ~= 0) then
+                     if ( sLeadInOutType == 'Tangent') then
+                        sLeadInOutTypeFbs = 'Tangent'
+                     elseif ( sLeadInOutType == 'Perpendicular') then
+                        sLeadInOutTypeFbs = 'Perpendicular'
+                     elseif ( sLeadInOutType == 'PerpendicularOutraw') then
+                        sLeadInOutTypeFbs = 'PerpendicularOutraw'
+                     end
+                  end
+                  local bOk, sErr = Fbs.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, vtOrthoO, dVzLimDwnUp, dExtraCut, BD.CUT_SIC, 0, 0, 0, sNotes, b3Raw, nil, nil, bSpecialTangentLeadInOut, sLeadInOutTypeFbs, vtOrthoOAlternative, dDicingOffsetP)
                  if not bOk then return bOk, sErr end
               end
            end
@@ -608,7 +627,8 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
      local vtOrthoO
      if bFromBottom and dCutV < dMaxDepth - BD.CUT_EXTRA and vtN:getZ() > 0 then
         vtOrthoO = -Z_AX()
-      elseif bHorizCut and ( not bVertCutOk or b3Solid:getDimX() > BD.LEN_SHORT_PART or Proc.AdvTail or ( vtN:getX() > 0 and vtN:getZ() <= 0.708) or ( abs( vtN:getY()) < 0.1 and vtN:getZ() <= 0)) then
+      elseif ( bHorizCut or ( dCutV < dMaxDepth - BD.CUT_EXTRA and not bVertCutOk)) and 
+             ( not bVertCutOk or b3Solid:getDimX() > BD.LEN_SHORT_PART or Proc.AdvTail or ( vtN:getX() > 0 and vtN:getZ() <= 0.708) or ( abs( vtN:getY()) < 0.1 and vtN:getZ() <= 0)) then
         vtOrthoO = Z_AX()
      elseif b3Solid:getDimX() < BD.LEN_SHORT_PART and not Proc.AdvTail and abs( vtN:getY()) > 0.259 and
             vtN:getZ() > -0.174 and abs( vtN:getY()) > abs( vtN:getZ()) and dCutH < dMaxDepth + 10 * GEO.EPS_SMALL then
@@ -641,7 +661,7 @@ local function MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, b
      local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, vtOrthoO, dVzLimDwnUp, dCutExtra, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
      if not bOk then return bOk, sErr end
   end
-   return true
+   return true, sWarn
 end

 ---------------------------------------------------------------------
@@ -829,7 +849,7 @@ end

 ---------------------------------------------------------------------
 -- Applicazione della lavorazione
-function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom, bCustDiceCut, bForced, b3Raw, sNotes, dOvmTail, bUpdateIng, nLimitingSurf, bForceTangentLeadInOut)
+function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom, bCustDiceCut, bForced, b3Raw, sNotes, dOvmTail, bUpdateIng, nLimitingSurf, sLeadInOutType)
   -- sovramateriale di coda
   dOvmTail = dOvmTail or BD.OVM_MID
   -- ingombro del grezzo
@@ -866,22 +886,31 @@ function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom,
      return false, sErr
   end
   local bNoDicing = false
+   local sWarn
   -- se taglio con testa da sopra
   if not bDownHead and not bDownTurn then
-      local bOk, sErr, bNoDicing2 = MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom, bCustDiceCut, bForced, b3Raw, sNotes, nLimitingSurf, bForceTangentLeadInOut)
+      local bOk, sErr, bNoDicing2 = MakeFromTop( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom, bCustDiceCut, bForced, b3Raw, sNotes, nLimitingSurf, sLeadInOutType)
      bNoDicing = bNoDicing2
-      if not bOk then return false, sErr end
+      if not bOk then
+         return false, sErr
+      else
+         sWarn = sErr
+      end
   -- altrimenti taglio con testa da sotto
   else
      local bOk, sErr = MakeFromDown( sCutting, Proc, nPhase, nRawId, nPartId, dOvmHead)
-      if not bOk then return false, sErr end
+      if not bOk then
+         return false, sErr
+      else
+         sWarn = sErr
+      end
   end
   -- Aggiornamento ingombro (se vero taglio o richiesto)
   -- Se lascio il cordolo (bNoDicing) non aggiorno il grezzo perchè lo scarto rimane attaccato
   if ( ProcessCut.Identify( Proc) or bUpdateIng) and not bNoDicing then
      UpdateEncumbrance( Proc, vtN, dOvmHead, nRawId, b3Solid, b3Raw)
   end
-   return true
+   return true, sWarn
 end

 ---------------------------------------------------------------------
@@ -209,7 +209,8 @@ function ProcessDrill.AddPredrillFromDrillProc( Proc)
      PredrillProc.MainId = Proc.MainId
      PredrillProc.IsPredrill = true
      PredrillProc.IsPredrillOf = Proc.Id
-
+      -- recupero l'elenco delle facce della parte interessate dalla feature
+      PredrillProc.AffectedFaces = BL.GetProcessAffectedFaces( PredrillProc)
      return true, PredrillProc
   end
 end
@@ -388,6 +389,25 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
   -- primo gruppo di controlli con lunghezza utensile pari a metà foro se passante
   -- recupero la lavorazione
   local sDrilling, sType, dMaxDepth, dMaxToolLength, dToolDiam, dDiamTh, dToolFreeLen = ML.FindDrilling( dDiam, dCheckDepth, bDrillUp, bDrillDown, bExcludeH2, bDrillAngTrasm, Proc.IsPredrill)
+
+   if sDrilling then
+      -- Determino la faccia di inizio del foro e dati correlati 
+      local nFac, CosB, vFaces = GetHoleStartData( ptCen, vtExtr, b3Solid)
+      -- Calcolo acciorciamento affondamento utile per evitare collisione portautensile con faccia
+      local TgA = CosB / sqrt( 1 - CosB * CosB)
+      local dSubL = ( dDiamTh / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA
+      -- Per fori molto inclinati ( < 30 gradi) si usa la testa della macchina per l'accorciamento. Fast esclusa
+      if BD.C_SIMM and CosB > 0.866  then
+         dSubL = ( 190 / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA - 116
+      end
+      local dMaxDepthOri = dMaxDepth
+      dMaxDepth = min( dMaxDepth, max( dToolFreeLen - dSubL, 0))
+      -- se utensile scelto non arriva in fondo, cerco il più lungo
+      if dMaxDepth < GEO.EPS_SMALL * 10 then
+         sDrilling, sType, dMaxDepth, dMaxToolLength, dToolDiam, dDiamTh, dToolFreeLen = ML.FindDrilling( dDiam, dCheckDepth, bDrillUp, bDrillDown, bExcludeH2, bDrillAngTrasm, Proc.IsPredrill, nil, 'Longest')
+      end
+   end
+
   if not sDrilling and dCheckDepth then
      sDrilling, sType, dMaxDepth, dMaxToolLength, dToolDiam, dDiamTh, dToolFreeLen = ML.FindDrilling( dDiam, 0, bDrillUp, bDrillDown, bExcludeH2, bDrillAngTrasm, Proc.IsPredrill)
      if sDrilling then dCheckDepth = nil end
@@ -495,15 +515,15 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
      end
   end
   -- Determino la faccia di inizio del foro e dati correlati 
-   local nFac, CosB, vFaces = GetHoleStartData( ptCen, vtExtr, b3Solid)
+   nFac, CosB, vFaces = GetHoleStartData( ptCen, vtExtr, b3Solid)
   -- Calcolo acciorciamento affondamento utile per evitare collisione portautensile con faccia
-   local TgA = CosB / sqrt( 1 - CosB * CosB)
-   local dSubL = ( dDiamTh / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA
+   TgA = CosB / sqrt( 1 - CosB * CosB)
+   dSubL = ( dDiamTh / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA
   -- Per fori molto inclinati ( < 30 gradi) si usa la testa della macchina per l'accorciamento. Fast esclusa
   if BD.C_SIMM and CosB > 0.866  then
      dSubL = ( 190 / 2 + ( Proc.Diam - dToolDiam) / 2 + 4) * TgA - 116
   end
-   local dMaxDepthOri = dMaxDepth
+   dMaxDepthOri = dMaxDepth
   dMaxDepth = min( dMaxDepth, max( dToolFreeLen - dSubL, 0))
   -- Verifico inclinazione foro nei limiti
   local bTryDrill = EgtIf( dMaxDepth > 0, ( CosB < BD.DRILL_VX_MAX), false)
@@ -526,7 +546,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
      if bIntersectionOk then
         local dHoleToCutDistance = vDistance[1]
         -- se il taglio accorcia realmente il foro
-         if dHoleToCutDistance > 10 * GEO.EPS_SMALL and dHoleToCutDistance < dLen then
+         if ( dHoleToCutDistance > 10 * GEO.EPS_SMALL or Proc.AffectedFaces.Right) and dHoleToCutDistance < dLen then
            dMaxDepth = dMaxDepthOri
            dMaxElev = dLen - dHoleToCutDistance
            bTryDrill = true
@@ -577,6 +597,8 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
   local nSCC = MCH_SCC.NONE
   if bDrillAngTrasm then
      nSCC = MCH_SCC.ADIR_NEAR
+   elseif BD.TURN == 2 then
+      nSCC = MCH_SCC.ADIR_ZP
   elseif not BD.C_SIMM and not BD.TURN then
      nSCC = MCH_SCC.ADIR_YM 
      if AreSameVectorApprox( vtExtr, Z_AX()) then
@@ -20,6 +20,7 @@ local ProcessDtMortise = {}
 require( 'EgtBase')
 local BL = require( 'BeamLib')
 local Cut = require( 'ProcessCut')
+local Probe = require( 'ProcessProbing')

 EgtOutLog( ' ProcessDtMortise started', 1)

@@ -111,9 +112,6 @@ local function CalcTopPath( nProcId, AuxId, nAddGrpId, dAltMort, dSideAng, b3Sol
   EgtAddCurveCompoLineTg( NewAuxId, 100, false)
   EgtAddCurveCompoLineTg( NewAuxId, 100, true)
   EgtMergeCurvesInCurveCompo( NewAuxId)
-   -- eseguo traslazione e offset per portarla sul top
-   local vtMove = EgtCurveExtrusion( AuxId, GDB_RT.GLOB) * ( dAltMort - 10 * GEO.EPS_SMALL)
-   EgtMove( NewAuxId, vtMove, GDB_RT.GLOB)
   local dOffset = dAltMort * tan( dSideAng)
   if not EgtOffsetCurve( NewAuxId, dOffset) then return end
   -- la limito entro la trave
@@ -121,6 +119,9 @@ local function CalcTopPath( nProcId, AuxId, nAddGrpId, dAltMort, dSideAng, b3Sol
   local vtBoxDiag = b3Solid:getMax() - b3Solid:getMin()
   local nCount
   NewAuxId, nCount = EgtTrimFlatCurveWithBox( NewAuxId, refBox, vtBoxDiag, true, true, GDB_RT.GLOB)
+   -- eseguo traslazione e offset per portarla sul top
+   local vtMove = EgtCurveExtrusion( AuxId, GDB_RT.GLOB) * ( dAltMort - 10 * GEO.EPS_SMALL)
+   EgtMove( NewAuxId, vtMove, GDB_RT.GLOB)
   -- se divisa in più parti, le unisco congiungendole con segmenti
   if nCount > 1 then
      if EgtGetType( NewAuxId) ~= GDB_TY.CRV_COMPO then
@@ -273,7 +274,9 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
   local dToolDiam = 100
   local dMaxMat = 30
   local dSideAng = 0
+   local sHeadTool = 'H1'
   local bCW = true
+   local bMillOnAggregate = sMchExt == '_AT'
   if EgtMdbSetCurrMachining( sMilling) then
      local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
      if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid) or '') then
@@ -281,6 +284,7 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
         dToolDiam = max( dToolDiam, 10)
         dMaxMat = EgtTdbGetCurrToolParam( MCH_TP.MAXMAT) or dMaxMat
         dSideAng = EgtTdbGetCurrToolParam( MCH_TP.SIDEANG) or dSideAng
+         sHeadTool = EgtTdbGetCurrToolParam( MCH_TP.HEAD)
         local dSpeed = EgtMdbGetCurrMachiningParam( MCH_MP.SPEED) or 0
         bCW = ( dSpeed >= 0)
      end
@@ -291,6 +295,11 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
      EgtOutLog( sErr)
      return false, sErr
   end
+
+   -- tastatura se richiesta
+   local Info = { vtProbe = vtExtr, ptProbe = ptBC,  sType = 'DTMortise', sHead = sHeadTool}
+   local bProbeExecuted, sErr = Probe.Make( Proc, nPartId, Info)
+
   -- se con tasca, la lavoro (mai in doppio)
   if bPocket then
      -- recupero il contorno della tasca (seconda curva ausiliaria)
@@ -345,11 +354,20 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
   end
   -- eventuale calcolo SCC
   local nSCC
-   if BD.TURN and not bPocket then
-      if abs( vtAx:getY()) > abs( vtAx:getZ()) then
-         nSCC = EgtIf( vtAx:getY() > 0, MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
-      else
-         nSCC = EgtIf( vtAx:getZ() > 0, MCH_SCC.ADIR_ZP, MCH_SCC.ADIR_ZM)
+   if BD.TURN then
+      if not bPocket then
+         if abs( vtAx:getY()) > abs( vtAx:getZ()) then
+            nSCC = EgtIf( vtAx:getY() > 0, MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
+         else
+            nSCC = EgtIf( vtAx:getZ() > 0, MCH_SCC.ADIR_ZP, MCH_SCC.ADIR_ZM)
+         end
+      end
+   -- se aggregato e rivolto verso Z-, si accede da lato aperto
+   elseif bMillOnAggregate and AreSameVectorApprox( vtExtr, -Z_AX()) then
+      if Proc.AffectedFaces.Back then
+         nSCC = MCH_SCC.ADIR_YP
+      elseif Proc.AffectedFaces.Front then
+         nSCC = MCH_SCC.ADIR_YM
      end
   end
   -- flag di mirror precedente aggiornabile localmente
@@ -512,7 +530,7 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
         end
      end
      -- se necessario, imposto SCC
-      if nSCC then 
+      if nSCC then
         EgtSetMachiningParam( MCH_MP.SCC, nSCC)
      end
      -- dichiaro massima elevazione e assenza sfridi per VMill
@@ -529,6 +547,10 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
            sUserNotes = EgtSetValInNotes( sUserNotes, 'StartZmax', 2)
         end
      end
+      -- se c'è stata tastatura, si disattiva sull'ultima lavorazione
+      if bProbeExecuted and i == 1 then
+         sUserNotes = EgtSetValInNotes( sUserNotes, 'END-PROBE', true)
+      end
      EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes)
      -- eseguo
      if not ML.ApplyMachining( true, false) then
@@ -46,9 +46,9 @@ local function VerifyOrientation( Proc, vtN, b3Raw)
      -- se macchina Fast, pezzo stretto e inclinazione laterale non eccessiva, accetto fino a -27deg
      elseif ( not BD.C_SIMM) and abs( vtN:getY()) < 0.5 and b3Raw:getDimY() < 150.1 then
         return ( vtN:getZ() >= -0.454)
-      -- altrimenti accetto fino a -21deg
+      -- altrimenti accetto fino a -23.5deg
      else
-         return ( vtN:getZ() >= -0.359)
+         return ( vtN:getZ() >= -0.399)
      end
   -- se trave medio-bassa
   elseif b3Raw:getDimZ() < 281 then
@@ -70,8 +70,8 @@ local function VerifyOrientation( Proc, vtN, b3Raw)
      end
   -- altrimenti
   else
-      -- accetto fino a -5deg
-      return ( vtN:getZ() >= -0.088)
+      -- accetto fino a -7deg
+      return ( vtN:getZ() >= -0.122)
   end
 end

@@ -471,7 +471,9 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
         end
         -- posizione braccio porta testa
         local nSCC = MCH_SCC.NONE
-         if not BD.C_SIMM then
+         if BD.TURN == 2 then
+            nSCC = MCH_SCC.ADIR_ZP
+         elseif not BD.C_SIMM then
            if Proc.Head then
               nSCC = MCH_SCC.ADIR_XP
            elseif Proc.Tail then
@@ -539,7 +541,9 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
            end
            -- posizione braccio porta testa
            local nSCC = MCH_SCC.NONE
-            if not BD.C_SIMM then
+            if BD.TURN == 2 then
+               nSCC = MCH_SCC.ADIR_ZP
+            elseif not BD.C_SIMM then
               if Proc.Head then
                  nSCC = MCH_SCC.ADIR_XP
               elseif Proc.Tail then
@@ -695,7 +699,9 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)

         -- posizione braccio porta testa
         local nSCC = MCH_SCC.NONE
-         if not BD.C_SIMM then
+         if BD.TURN == 2 then
+            nSCC = MCH_SCC.ADIR_ZP
+         elseif not BD.C_SIMM then
            if Proc.Head then
               nSCC = MCH_SCC.ADIR_XP
            elseif Proc.Tail then
@@ -826,7 +832,9 @@ local function MakeByPocket( Proc, nPhase, nRawId, nPartId, dOvmHead)
      EgtSetMachiningParam( MCH_MP.OFFSR, dExtra)
      -- posizione braccio porta testa
      local nSCC = MCH_SCC.NONE
-      if not BD.C_SIMM then
+      if BD.TURN == 2 then
+         nSCC = MCH_SCC.ADIR_ZP
+      elseif not BD.C_SIMM then
         if Proc.Head then
            nSCC = MCH_SCC.ADIR_XP
         elseif Proc.Tail then
@@ -161,7 +161,7 @@ end

 ---------------------------------------------------------------------
 -- tagli verticali aggiuntivi
-local function AddVerticalPreCuts( Proc, sCutting, dCutXOffset, b3Raw)
+local function AddVerticalPreCuts( Proc, sCutting, dCutXOffset, b3Raw, dOffsetBetweenCuts)
   local nVerticalCuts = ceil( Proc.Face[1].WidthTrimmed / ( BD.MAX_LEN_DICE)) - 1
   local dVerticalSliceHeight = Proc.Face[1].WidthTrimmed / ( nVerticalCuts + 1)
   -- recupero il diametro dell'utensile
@@ -177,8 +177,8 @@ local function AddVerticalPreCuts( Proc, sCutting, dCutXOffset, b3Raw)
   for j = nVerticalCuts, 1, -1 do
      local nFaceUse = MCH_MILL_FU.PARAL_FRONT
      local dVerticalCutOffset = dVerticalSliceHeight * -j
-      local bForceTangentLeadInOut = BD.PRESS_ROLLER and not BD.DOWN_HEAD
-      bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, nFaceUse, nil, -0.1 -dCutXOffset, BD.CUT_SIC, dVerticalCutOffset, 0, 0, '', b3Raw, nil, nil, nil, bForceTangentLeadInOut)
+      local sLeadInOutType = 'PerpendicularOutraw'
+      bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, nFaceUse, nil, -0.1 -dCutXOffset, BD.CUT_SIC, dVerticalCutOffset, 0, 0, '', b3Raw, nil, nil, nil, sLeadInOutType, nil, dOffsetBetweenCuts)
      if not bOk then return bOk, sErr end
   end
   
@@ -240,8 +240,8 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, HeadCut
            for j = nHorizontalCuts, 1, -1 do
               local nFaceUse = MCH_MILL_FU.PARAL_DOWN
               local dHorizontalCutOffset = dHorizontalSliceHeight * -j
-               local bForceTangentLeadInOut = BD.PRESS_ROLLER
-               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, Cutting1Data.sCutting, Cutting1Data.dSawDiam, nFaceUse, nil, -0.1 -dCutXOffset, BD.CUT_SIC, dHorizontalCutOffset, 0, 0, '', b3Raw, nil, nil, nil, bForceTangentLeadInOut)
+               local sLeadInOutType = 'PerpendicularOutraw'
+               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, Cutting1Data.sCutting, Cutting1Data.dSawDiam, nFaceUse, nil, -0.1 -dCutXOffset, BD.CUT_SIC, dHorizontalCutOffset, 0, 0, '', b3Raw, nil, nil, nil, sLeadInOutType, nil, dOffsetBetweenCuts)
               if not bOk then return bOk, sErr end
            end
            -- se necessario taglio verticale doppio, eseguo l'opposto
@@ -284,7 +284,7 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, HeadCut
         local dCutOffset = ( i - 1) * dOffsetBetweenCuts
         -- se trave larga effettuo tagli verticali aggiuntivi
         if HeadCutType.bNeedVerticalAddedCuts then
-            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw)
+            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw, dOffsetBetweenCuts)
            if not bOk then return bOk, sErr end
         end
         if i == 1 and HeadCutType.sType =='Precut' then
@@ -340,7 +340,7 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, HeadCut
         end
         -- se trave larga effettuo tagli verticali aggiuntivi
         if HeadCutType.bNeedVerticalAddedCuts then
-            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw)
+            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw, dOffsetBetweenCuts)
            if not bOk then return bOk, sErr end
         end
         local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, Cutting1Data.sCutting, Cutting1Data.dSawDiam, MCH_MILL_FU.ORTHO_DOWN, dVzLimDwnUp, dCutExtra, BD.CUT_SIC, dCutOffset, dAccStart, 0, '', b3Raw)
@@ -406,10 +406,13 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
         dSawThick2 = EgtTdbGetCurrToolParam( MCH_TP.THICK) or dSawThick2
      end
   end
+   -- determino se lo spessore del materiale da rimuovere è eccessivo e quindi vanno fatti più tagli con offset
+   local nCuts = max( ceil( dOvmHead / (( BD.MAX_LEN_SCRAP_START or BD.MAX_LEN_SCRAP) + 0.5)), 1)
+   local dOffsL = dOvmHead / nCuts
   -- caratteristiche taglio
   local dDimYRef = EgtIf( b3Raw:getDimZ() < BD.MIN_DIM_HBEAM + 10 * GEO.EPS_SMALL, dMaxDepth, abs( BD.MAX_DIM_HTCUT_HBEAM))
   local bBigSectionCut = ( b3Raw:getDimY() > 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL) and
-                          ( b3Raw:getDimZ() > EgtIf( BD.TURN, 2 * dMaxVertDepth, dMaxVertDepth + dMaxDepth2) - 2 * BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
+                          ( b3Raw:getDimZ() > EgtIf( BD.TURN, 2 * dMaxVertDepth, dMaxVertDepth + dMaxDepth2) - 2 * BD.CUT_EXTRA + 10 * GEO.EPS_SMALL)
   local bHorizCut = ( ( b3Raw:getDimY() > b3Raw:getDimZ() + 10 * GEO.EPS_SMALL or BD.TURN) and b3Raw:getDimZ() < dMaxVertDepth - BD.CUT_EXTRA)
   local bDoubleHorizCut = ( ( BD.DOWN_HEAD or BD.TURN) and not bHorizCut and b3Raw:getDimY() > 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
   local bDoubleCut = ( not bHorizCut and not bDoubleHorizCut and b3Raw:getDimY() > dDimYRef - BD.CUT_EXTRA  + 10 * GEO.EPS_SMALL) and
@@ -417,7 +420,9 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
   -- verifico necessità di tagli aggiuntivi orizzontali o verticali
   local dMinOvmHeadForAddeddCuts = 10.123
   local bNeedVerticalAddedCuts = ( Proc.Face[1].WidthTrimmed > BD.MAX_LEN_DICE) and ( dOvmHead > dMinOvmHeadForAddeddCuts - 10 * GEO.EPS_SMALL)
-   local bNeedHorizontalAddedCuts = ( Proc.Face[1].HeightTrimmed > ( BD.MIN_HEIGHT_ADDED_CUTS or BD.MAX_LEN_DICE)) and not bBigSectionCut and ( dOvmHead > dMinOvmHeadForAddeddCuts - 10 * GEO.EPS_SMALL)
+   local bNeedHorizontalAddedCuts = ( Proc.Face[1].HeightTrimmed > ( BD.MIN_HEIGHT_ADDED_CUTS or BD.MAX_LEN_DICE)) and
+                                    not bBigSectionCut and ( dOvmHead > dMinOvmHeadForAddeddCuts - 10 * GEO.EPS_SMALL) and
+                                    dOffsL < BD.MAX_DIM_DICE
   -- dati lavorazioni sopra e sotto
   local Cutting1Data = { sCutting = sCutting, dSawDiam = dSawDiam, dMaxDepth = dMaxDepth, dSawThick = dSawThick, dMaxVertDepth = dMaxVertDepth}
   local Cutting2Data = { sCutting = sCutting2, dSawDiam = dSawDiam2, dMaxDepth = dMaxDepth2, dSawThick = dSawThick2}
@@ -429,9 +434,6 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
   if not bNeedHCut  and  AreSameVectorApprox( vtN, X_AX())  and  abs( ptC:getX() - b3Raw:getMax():getX()) < 10 * GEO.EPS_SMALL then
      return true
   end
-   -- determino se lo spessore del materiale da rimuovere è eccessivo e quindi vanno fatti più tagli con offset
-   local nCuts = max( ceil( dOvmHead / (( BD.MAX_LEN_SCRAP_START or BD.MAX_LEN_SCRAP) + 0.5)), 1)
-   local dOffsL = dOvmHead / nCuts
   -- se taglio per sezioni alte e larghe
   if bBigSectionCut then
      if dOvmHead > 0 then
@@ -496,18 +498,16 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
                        if AreSameVectorApprox( X_AX(), vtNLimitingSurf) then EgtInvertSurf( nLimitingSurf) end
                     end
                     -- tagli verticali
-                     bOk, sErr = AddVerticalPreCuts( AddProc, sCutting, 0, b3Raw)
+                     bOk, sErr = AddVerticalPreCuts( AddProc, sCutting, 0, b3Raw, dOffsL)
                     if not bOk then return bOk, sErr end
                     -- tagli a cubetti con eventuale superficie limitante
-                     bOk, sErr = Cut.Make( AddProc, nPhase, nRawId, nPartId, dOvmHead, nil, false, true, nil, nil, nil, nil, nLimitingSurf)
+                     local sLeadInOutType = 'PerpendicularOutraw'
+                     bOk, sErr = Cut.Make( AddProc, nPhase, nRawId, nPartId, dOvmHead, nil, false, true, nil, nil, nil, nil, nLimitingSurf, sLeadInOutType)
                  end
               -- tagli aggiuntivi non necessari
               else
-                  local bForceTangentLeadInOut = false
-                  if BD.PRESS_ROLLER then
-                     bForceTangentLeadInOut = true
-                  end
-                  bOk, sErr = Cut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, nil, false, true, nil, nil, nil, nil, nil, bForceTangentLeadInOut)
+                  local sLeadInOutType = 'PerpendicularOutraw'
+                  bOk, sErr = Cut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, nil, false, true, nil, nil, nil, nil, nil, sLeadInOutType)
               end
               return bOk, sErr
            end
@@ -200,6 +200,7 @@ local function AssignQIdent( Proc)
   elseif ( Proc.Grp == 3 or Proc.Grp == 4)  and  Proc.Prc == 17 then
      Q_DEPTH_CHAMFER       = 'Q01' -- d
      Q_ONLY_CHAMFER        = 'Q02' -- i
+      Q_USE_MILL            = 'Q03' -- i
   elseif ( Proc.Grp == 3 or Proc.Grp == 4)  and  Proc.Prc == 20 then
      Q_DEPTH_CHAMFER       = 'Q01' -- d
      Q_USE_MILL            = 'Q02' -- i
@@ -3477,7 +3478,7 @@ local function MakePocket( Proc, nPartId, b3Solid, ptPs, tvtN, nFaceRef, sMchFin
      sWarn = 'Warning on pocketing ' .. sName .. ': machining can damage next piece. Minimum distance needed : ' .. ( 1 + dDiamTool / 2) .. ' mm'
      EgtOutLog( sWarn)
   end
-   if BD.TURN then
+   if BD.TURN and BD.TURN ~= 2 then
      -- centro del pezzo
      local ptCen = ORIG()
      if b3Solid then ptCen = b3Solid:getCenter() end
@@ -5288,7 +5289,7 @@ function SawPlusChain.Saw.CalculateMachiningParameters( Proc, FaceToMachine, Edg
         EgtOutLog( Cutting.Message)
      end
   end
-   if EdgeToMachine.ToolDirection:getZ() < BD.NZ_MINA then
+   if EdgeToMachine.ToolDirection:getZ() < BD.NZ_MINA and BD.C_SIMM then
      Cutting.CanApply = false
      Cutting.Message = 'Feature '.. Proc.FeatureId .. ' : skipped sawblade from bottom'
      EgtOutLog( Cutting.Message)
@@ -5847,10 +5848,11 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
         local sMyMchFind = 'Pocket'
         local nOk, sErr
         nOk, sErr, dDimMin, dDimMax, dDepth, vtOrtho,
-            nLundIdFace = MakeByPockets( Proc, nPhase, nRawId, nPartId, nChamfer, dDepthCham, nAddGrpId, sMyMchFind, false, b3Solid, bClosedOrthoFaces)
+            nLundIdFace, sErr = MakeByPockets( Proc, nPhase, nRawId, nPartId, nChamfer, dDepthCham, nAddGrpId, sMyMchFind, false, b3Solid, bClosedOrthoFaces)
         if nOk < 0 then
            return false, sErr
         elseif nOk > 0 then
+            sWarn = sErr
            bTryWithBlades = false
         end
      end
@@ -6152,9 +6154,20 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                  vtN, vtN2 = vtN2, vtN
                  sPocketing = ML.FindPocketing( sMchFind, dDiam2, dFacElev2 + dCollSic2)
                  if not sPocketing then
-                     local sErr = 'Error : '..sMchFind..' not found in library'
-                     EgtOutLog( sErr)
-                     return false, sErr
+                     dDiam, dDiam2 = dDiam2, dDiam
+                     dCollSic, dCollSic2 = dCollSic2, dCollSic
+                     nFacInd, nFacInd2 = nFacInd2, nFacInd
+                     dH, dH2 = dH2, dH
+                     dV, dV2 = dV2, dV
+                     dFacElev, dFacElev2 = dFacElev2, dFacElev
+                     rfFac, rfFac2 = rfFac2, rfFac
+                     vtN, vtN2 = vtN2, vtN
+                     sPocketing = ML.FindPocketing( sMchFind, dDiam2, nil, nil, nil, nil, nil, nil, 'Longest')
+                     if not sPocketing then
+                        local sErr = 'Error : '..sMchFind..' not found in library'
+                        EgtOutLog( sErr)
+                        return false, sErr
+                     end
                  end
               end
               -- provo con contornatura
@@ -6953,8 +6966,10 @@ local function MakeLongMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead)
      -- superficie di fondo
      nSurfBottomId = EgtSurfTmPlaneInBBox( nAddGrpId, ptMaxBox, vtOrtho, b3SolidExtended, GDB_ID.ROOT)
      -- calcolo di quanto allargare le superfici
-      local dWidth = EgtIf( Proc.AffectedFaces.Front, Proc.Box:getDimZ(), Proc.Box:getDimY())
-      dAddLen = min( dWidth, 100) / 2
+      if dAddLen == 0 then
+         local dWidth = EgtIf( Proc.AffectedFaces.Front, Proc.Box:getDimZ(), Proc.Box:getDimY())
+         dAddLen = min( dWidth, 100) / 2
+      end
   end
   -- la divido in parti lungo X
   local vAddId = {}
@@ -7088,11 +7103,9 @@ local function TestTwoFacesDownHead( Proc)
      if not ( Proc.Face[1].IsTooDownwardForTopBlade or Proc.Face[2].IsTooDownwardForTopBlade) then
         bDownHeadBlade = false
      else
-         for i = 1, Proc.Fct do
-            if Proc.Face[i].IsTooDownwardForTopBlade and ( not Proc.IsTopDownRabbet or Proc.Face[i].IsTooWideForTopBlade) then
-               bDownHeadBlade = true
-               break
-            end
+         if ( Proc.Face[1].IsTooDownwardForTopBlade and Proc.Face[2].IsTooWideForTopBlade) or
+            ( Proc.Face[2].IsTooDownwardForTopBlade and Proc.Face[1].IsTooWideForTopBlade) then
+            bDownHeadBlade = true
         end
      end
   end
@@ -7350,7 +7363,7 @@ function ProcessLapJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
   -- se lunghezza richiede spezzatura
   if ( Proc.Box:getDimX() > BD.LONGCUT_MAXLEN) or
      ( Proc.Box:getDimX() > 0.7 * b3Solid:getDimX() and Proc.Box:getDimX() > BD.LONGCUT_ENDLEN) or
-      ( ( nForceUseBladeOnNotContinueFace and nForceUseBladeOnNotContinueFace > 0) and ( Proc.Box:getDimX() > BD.LEN_SHORT_PART or 1000)) then
+      ( ( nForceUseBladeOnNotContinueFace and nForceUseBladeOnNotContinueFace > 0) and ( Proc.Box:getDimX() > ( BD.LEN_SHORT_PART or 1000))) then
      -- una faccia
      if Proc.Fct == 1 then
         if bUseBlade then
@@ -7502,6 +7515,22 @@ function ProcessLapJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
               return MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, true)
            -- se ortogonali e non forzata lama, con fresa
            elseif not bUseBlade then
+               -- verifico se devo fare prima gli smussi
+               -- recupero gruppo per geometria addizionale
+               local nAddGrpId = BL.GetAddGroup( nPartId)
+               if not nAddGrpId then
+                  local sErr = 'Error : missing AddGroup'
+                  EgtOutLog( sErr)
+                  return false, sErr
+               end
+               -- verifiche per smusso
+               local nChamfer, dDepthCham, sErrCham = EvaluateQParam( Proc)
+               -- se smusso da fare 
+               if nChamfer > 0 then
+                  local _, _, _, vtOrtho, _, nSurfInt = BL.GetTunnelDimension( Proc, nPartId)
+                  local nOk, sErr = MakeChamfer( Proc, true, nAddGrpId, vtOrtho, b3Solid, nSurfInt, dDepthCham)
+                  if nOk < 0 then return false, sErr end
+               end
               -- se piccole
               if Proc.Box:getDimX() < MAX_MILL_LIN and ( Proc.Box:getDimZ() < MAX_MILL_LIN or Proc.Box:getDimY() < MAX_MILL_LIN) and bAdj and abs( dAng + 90) < 1 then
                  return MakeTwoFacesByMill( Proc, nPhase, nRawId, nPartId, bDownHeadMill)
@@ -286,9 +286,11 @@ local function CalcBladeUse( bUseBlade, bDown_Head, nSide, vtN1, vtN2, bConvex,
               end
            end
         else
-            if ( vtN1 and vtN1:getZ() >= EgtIf( dCustomAngle, dCustomAngle, -0.5)) and ( not vtN2 or vtN2:getZ() >= -0.5) then
-               bCanUseBlade = true
-            end
+            --if ( vtN1 and vtN1:getZ() >= EgtIf( dCustomAngle, dCustomAngle, -0.5)) and ( not vtN2 or vtN2:getZ() >= -0.5) then
+            --   bCanUseBlade = true
+            --end
+            -- viene abilitata sempre lama da sotto
+            bCanUseBlade = true
         end
      end
   end
@@ -423,12 +425,22 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
   -- analisi del taglio
   local vOrd = {}
   local vFaceUse = {}
+   local bIsMachDownUp = false
   if nSide == 1 or ( nSide == -1 and ( BD.DOWN_HEAD or BD.TURN)) then
      vOrd = EgtIf( ptC[1]:getY() < ptRef:getY(), { 1, 2}, { 2, 1})
      vFaceUse = { BL.GetNearestOrthoOpposite( ptC[1] - ptM), BL.GetNearestOrthoOpposite( ptC[2] - ptM)}
   elseif nSide == -1 then
      vOrd = EgtIf( ptC[1]:getY() < ptRef:getY(), { 1, 2}, { 2, 1})
-      vFaceUse = { BL.GetNearestParalOpposite( ptC[1] - ptM), BL.GetNearestParalOpposite( ptC[2] - ptM)}
+      local vtFaceUse1, vtFaceUse2
+      if bCanUseBlade and not BD.DOWN_HEAD then
+         bIsMachDownUp = true
+         vtFaceUse1 = BL.GetOrtupOpposite( BL.GetNearestOrthoOpposite( ptC[1] - ptM))
+         vtFaceUse2 = BL.GetOrtupOpposite( BL.GetNearestOrthoOpposite( ptC[2] - ptM))
+      else
+         vtFaceUse1 = BL.GetNearestParalOpposite( ptC[1] - ptM)
+         vtFaceUse2 = BL.GetNearestParalOpposite( ptC[2] - ptM)
+      end
+      vFaceUse = { vtFaceUse1, vtFaceUse2}
   else
      local bFront = ( ( vtN[1]:getY() + vtN[2]:getY()) < 0)
      if bFront then
@@ -442,6 +454,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
   local vWidth = {}
   _, _, vWidth[1] = BL.GetFaceHvRefDim( Proc.Id, tFaceLong[1])
   _, _, vWidth[2] = BL.GetFaceHvRefDim( Proc.Id, tFaceLong[2])
+   local vElevation = { vWidth[2], vWidth[1]}

   -- Se da sopra o ( da tutte i lati con testa da sotto) e taglio di lama e lunghezza facce maggiore del parametro lunghezza minima
   if ( bCanUseUnderBlade or bCanUseBlade) and bUseBlade and Proc.Box:getDimX() > dLimMinPiece - 1 then
@@ -850,7 +863,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
                  -- imposto la direzione di lavoro per avere scarico del truciolo ottimale
                  local nWorkSide, bInvert
                  if ( not bIsTopBladeCurrent and abs( nSide) ~= 0) or ( bCanUseBlade and bCanUseUnderBlade and nSide == -1) then
-                     if bIsCurrentBladeCCW then
+                     if bIsCurrentBladeCCW and not bIsMachDownUp then
                        nWorkSide = MCH_MILL_WS.LEFT
                        bInvert = true
                        dSal, dEal = dEal, dSal
@@ -859,7 +872,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
                        bInvert = false
                     end
                  else
-                     if bIsCurrentBladeCCW then
+                     if bIsCurrentBladeCCW and not bIsMachDownUp then
                        nWorkSide = MCH_MILL_WS.LEFT
                        bInvert = false
                     else
@@ -1066,6 +1079,11 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
               if nSide == -1 and BD.DOWN_HEAD then
                  EgtSetMachiningParam( MCH_MP.STARTADDLEN, dEal)
                  EgtSetMachiningParam( MCH_MP.ENDADDLEN, dSal)
+               elseif nSide == -1 and not BD.DOWN_HEAD and bIsMachDownUp then
+                  EgtSetMachiningParam( MCH_MP.INVERT, EgtIf( EgtGetMachiningParam( MCH_MP.INVERT), false, true))
+                  dOffset = 5
+                  EgtSetMachiningParam( MCH_MP.STARTADDLEN, dEal)
+                  EgtSetMachiningParam( MCH_MP.ENDADDLEN, dSal)
               else
                  EgtSetMachiningParam( MCH_MP.STARTADDLEN, dSal)
                  EgtSetMachiningParam( MCH_MP.ENDADDLEN, dEal)
@@ -1288,6 +1306,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
      end
      -- ciclo sulle parti
      local nM = 0
+      local bInverted = false
      for j = 1, nC do
         -- su entrambe le facce
         for i = nIni, nFin do
@@ -1311,6 +1330,9 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
                  if nSide == 1 or nSide == -1 then
                     local bFromYM = (( vtN[vOrd[i]]:getY() < 0 and bConvex) or ( vtN[vOrd[i]]:getY() > 0 and not bConvex))
                     nSCC = EgtIf( bFromYM, MCH_SCC.ADIR_YM, MCH_SCC.ADIR_YP)
+                     if BD.TURN == 2 and not bFromYM then
+                         nSCC = EgtIf( nSide == -1, MCH_SCC.ADIR_ZM, MCH_SCC.ADIR_ZP)
+                     end
                  else
                     local bFromZM = (( vtN[vOrd[i]]:getZ() < 0 and bConvex) or ( vtN[vOrd[i]]:getZ() > 0 and not bConvex))
                     nSCC = EgtIf( bFromZM, MCH_SCC.ADIR_ZM, MCH_SCC.ADIR_ZP)
@@ -1325,7 +1347,24 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
            local dStep = 0
            local dAgg = EgtIf( bConvex, 2 * BD.CUT_EXTRA, BD.CUT_EXTRA)
            local dLargh = vWidth[vOrd[i]]
-            if not bSide and dLargh > 0.8 * dToolDiam then 
+            -- controllo se lavorazione completa
+            local dMachDepth = vElevation[vOrd[i]]
+            if dMachDepth > dMaxDepth - 10 * GEO.EPS_ANG_SMALL then
+               -- verifico se posso lavorare la faccia 2
+               local nOtherFace = EgtIf( i == 1, 2, 1)
+               if j == 1 and vtN[vOrd[nOtherFace]]:getZ() > dLimitAngle and vWidth[vOrd[i]] < dMaxDepth then
+                  vOrd[1], vOrd[2] = vOrd[2], vOrd[1]
+                  dLargh = vWidth[vOrd[i]]
+                  dSal, dEal = dEal, dSal
+                  bInverted = true
+               else
+                  sWarn = 'Warning : elevation bigger than max tool depth'
+                  EgtOutLog( sWarn)
+               end
+            elseif bInverted then
+               dSal, dEal = dEal, dSal
+            end
+            if not bSide and dLargh > 0.8 * dToolDiam then
               nO = ceil( dLargh / ( 0.6 * dToolDiam))
               if nO > 1 then
                  dStep = dLargh / nO
@@ -1358,7 +1397,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
               --EgtSetMachiningParam( MCH_MP.FACEUSE, EgtIf( bSide, BL.GetParallelOpposite( vFaceUse[vOrd[i]]), vFaceUse[vOrd[i]]))
               EgtSetMachiningParam( MCH_MP.FACEUSE, EgtIf( bSide, MCH_MILL_FU.PARAL_DOWN, vFaceUse[vOrd[i]]))
               -- imposto lato di lavoro e inversione
-               EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
+               EgtSetMachiningParam( MCH_MP.WORKSIDE, EgtIf( bIsMachDownUp, MCH_MILL_WS.RIGHT, MCH_MILL_WS.LEFT))
               EgtSetMachiningParam( MCH_MP.INVERT, EgtIf( bSide, true, false))
               -- imposto offset radiale (nullo se concavo o di lato)
               local dOffsR = EgtIf( k < nO, ( nO - k) * dStep, EgtIf( bConvex, - BD.CUT_EXTRA, 0))
@@ -1402,7 +1441,8 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
            return false, sErr
         end
         local AddId = EgtCopyGlob( Proc.Id, nAddGrpId) or GDB_ID.NULL
-         local AddProc = { Id = AddId, Grp = 0, Prc = 12, Box = Proc.Box, Fct = Proc.Fct, Flg = Proc.Flg, PartId = Proc.PartId, bMoveAfterSplit = true}
+         local AddProc = { Id = AddId, Grp = 0, Prc = 12, Box = Proc.Box, Fct = Proc.Fct, Flg = Proc.Flg,
+                           PartId = Proc.PartId, TaskId = Proc.TaskId, CutId = Proc.CutId, bMoveAfterSplit = true}
         Topology.Classify( AddProc, b3Raw)
         table.insert( AddedIds, AddProc)
      end
@@ -1793,7 +1833,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId, bForcedBladeMaster
               end
            end
            -- imposto lato di lavoro e inversione
-            EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
+            EgtSetMachiningParam( MCH_MP.WORKSIDE, EgtIf( bIsMachDownUp, MCH_MILL_WS.RIGHT, MCH_MILL_WS.LEFT))
            EgtSetMachiningParam( MCH_MP.INVERT, true)
            -- calcolo la componente dNz non in base alla classificazione della feature (sopra, sotto, fianchi) ma alla componente maggiore 
 --            local dNz = EgtIf( nSide == 0, vtN[vOrd[i]]:getY(), vtN[vOrd[i]]:getZ())
@@ -0,0 +1,103 @@
+-- ProcessSplit.lua by Egaltech s.r.l. 2025/06/20
+-- Gestione tastatura
+
+-- Tabella per definizione modulo
+local ProcessProbing = {}
+
+-- Include
+require( 'EgtBase')
+local BL = require( 'BeamLib')
+
+-- Dati
+local ML = require( 'MachiningLib')
+
+---------------------------------------------------------------------
+local function GetProbingMachining( Machinings, sHead)
+   local sProbeMachining, sHeadTool
+
+   -- TODO questa associazione "testa utensile"-"testa tastatore" dovrebbe essere spostata nella macchina.
+   --      Non è detto che se testa utensile inizia con "H2" allora bisogna prendere lavorazione con "_H2"
+
+   -- se la testa utilizzata dalla lavorazione inizia con H2, dovrebbe essere la seconda testa
+   if EgtStartsWith( sHead, 'H2') then
+      sHeadTool = '_H2'
+   else
+      sHeadTool = '_H1'
+   end
+
+   for i = 1, #Machinings do
+      if EgtEndsWith( Machinings[i].Name, sHeadTool) then
+         sProbeMachining = Machinings[i]
+         return sProbeMachining
+      end
+   end
+   sProbeMachining = Machinings[1]
+   return sProbeMachining
+end
+
+---------------------------------------------------------------------
+local function MoveProbePointToRawFaces( ptProbe, vtProbe, nPartId)
+   local b3BoxPart = EgtGetBBoxGlob( EgtGetFirstNameInGroup( nPartId, 'Box') or GDB_ID.NULL, GDB_BB.STANDARD)
+   -- si porta linea di tastatura su grezzo
+   if AreSameVectorApprox( vtProbe, Z_AX()) then
+      ptProbe[3] = b3BoxPart:getMax():getZ()
+   elseif AreSameVectorApprox( vtProbe, -Z_AX()) then
+      ptProbe[3] = b3BoxPart:getMin():getZ()
+   elseif AreSameVectorApprox( vtProbe, Y_AX()) then
+      ptProbe[2] = b3BoxPart:getMax():getY()
+   elseif AreSameVectorApprox( vtProbe, -Y_AX()) then
+      ptProbe[2] = b3BoxPart:getMin():getY()
+   end
+   return ptProbe
+end
+
+---------------------------------------------------------------------
+-- Applicazione della lavorazione
+function ProcessProbing.Make( Proc, nPartId, Info)
+   local bOk, sErr
+
+   -- per eseguire tastatura servono tutti i dati, altriemnti impossibile
+   if Info.vtProbe and Info.ptProbe and Info.sType then
+      Info.ptProbe = MoveProbePointToRawFaces( Info.ptProbe, Info.vtProbe, nPartId)
+      -- recupero gruppo per geometria addizionale
+      local nAddGrpId = BL.GetAddGroup( nPartId)
+      local nIdLine = EgtLinePVL( nAddGrpId, Info.ptProbe, Info.vtProbe, 10, GDB_RT.GLOB) -- TODO lunghezza da portare fuori come parametro
+      local Machinings = GetMachinings( MCH_MY.PROBING, Info.sType)
+      -- se c'è almeno una lavorazione, allora devo fare tastatura
+      if Machinings and #Machinings > 0 then
+         local sProbing = GetProbingMachining( Machinings, Info.sHead)
+         -- se c'è la linea e la lavorazione, applico
+         if sProbing and nIdLine then
+            local sName = 'DtMtProbe_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
+            local nMchFId = EgtAddMachining( sName, sProbing.Name)
+            -- si inverte la direzione della linea, deve essere entrante, oppostaa vettore estrusione
+            EgtInvertCurve( nIdLine)
+            -- aggiungo geometria
+            EgtSetMachiningGeometry( {{ nIdLine, -1}})
+
+            -- eseguo
+            if not ML.ApplyMachining( true, false) then
+               local _, sErr = EgtGetLastMachMgrError()
+               EgtSetOperationMode( nMchFId, false)
+               return false, sErr
+            else
+               bOk = true
+            end
+         else
+            bOk = false
+            sErr = 'Error on probing'
+         end
+      -- altrimenti tastatura non richiesta, esco
+      else
+         return true
+      end
+   else
+      bOk = false
+      sErr = 'Error on probing'
+   end
+
+   return bOk, sErr
+end
+
+---------------------------------------------------------------------
+return ProcessProbing
@@ -639,7 +639,13 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
         EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)
      end
      -- posizione braccio porta testa
-      EgtSetMachiningParam( MCH_MP.SCC, EgtIf( bHead, MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM))
+      local nSCC = MCH_SCC.ADIR_NONE
+      if BD.TURN == 2 then
+         nSCC = MCH_SCC.ADIR_ZP
+      else
+         nSCC = EgtIf( bHead, MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
+      end
+      EgtSetMachiningParam( MCH_MP.SCC, nSCC)
      -- variabili per gestione direzione percorso e per gestione lavorazione di finitura opzionale
      local ptSP, ptEp
      local bFinish
@@ -173,7 +173,7 @@ function ProcessRidgeLap.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
      end
      -- calcolo riferimenti per facce inclinate
      local vtRef = Vector3d( vtN[vFaceOrd[3]])
-      local vtRef2 = EgtIf( bHead, X_AX(), -X_AX())
+      local vtRef2 = Vector3d( vtN[vFaceOrd[2]])
      -- eseguo
      for i = 1, #vCuts do
         local nOrthoOpposite
@@ -239,6 +239,8 @@ function ProcessRoundArch.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
            elseif AreSameOrOppositeVectorApprox( vtExtr, Z_AX()) then
               nSCC = MCH_SCC.ADIR_YP
            end
+         elseif BD.TURN == 2 then
+            nSCC = MCH_SCC.ADIR_ZP
         elseif BD.TURN then
            if vtN:getZ() > 0.707 then
               nSCC = MCH_SCC.ADIR_ZP
@@ -196,27 +196,33 @@ local function ApplyDiceCut( vFaceOrd, nGoodFace1, nGoodFace4, nAddGrpId, b3Soli
            end
         end

-         -- controllo per eseguire solo un taglio ottimizzato
-         local bExecJustOneCut = false
-         local dDiceFaceDim = GEO.INFINITO
-         if ( i % 2) == 0  then
-            for cont = 1, #vCuts[i] do
-               local _, dDiceFaceH, dDiceFaceV = BL.GetFaceHvRefDim( vCuts[i][cont], 0)
-               -- se feature verso Z, si ammette anche lavorazione in doppio
-               if AreSameVectorApprox( vtRef, Z_AX()) then
-                  if dMaxDepth * 2 > dDiceFaceH + BD.CUT_EXTRA then
-                     bExecJustOneCut = true
-                     dDiceFaceDim = dDiceFaceH
-                     break
-                  end
-               elseif AreSameVectorApprox( vtRef, Y_AX()) or AreSameVectorApprox( vtRef, -Y_AX()) then
-                  if dMaxDepth > dDiceFaceV + BD.CUT_EXTRA then
-                     bExecJustOneCut = true
-                     dDiceFaceDim = dDiceFaceV
-                     break
+         -- se non ho intersezione con la faccia tappo posso fare il taglio sul fianco
+         if not nGoodFace1 or nGoodFace1 == 0 then
+            -- controllo per eseguire solo un taglio ottimizzato
+            local bExecJustOneCut = false
+            local dDiceFaceDim = GEO.INFINITO
+            if ( i % 2) == 0  then
+               for cont = 1, #vCuts[i] do
+                  local _, dDiceFaceH, dDiceFaceV = BL.GetFaceHvRefDim( vCuts[i][cont], 0)
+                  -- se feature verso Z, si ammette anche lavorazione in doppio
+                  if AreSameVectorApprox( vtRef, Z_AX()) then
+                     if dMaxDepth * 2 > dDiceFaceH + BD.CUT_EXTRA then
+                        bExecJustOneCut = true
+                        dDiceFaceDim = dDiceFaceH
+                        break
+                     end
+                  elseif AreSameVectorApprox( vtRef, Y_AX()) or AreSameVectorApprox( vtRef, -Y_AX()) then
+                     if dMaxDepth > dDiceFaceV + BD.CUT_EXTRA then
+                        bExecJustOneCut = true
+                        dDiceFaceDim = dDiceFaceV
+                        break
+                     end
                  end
               end
            end
+         -- se c'è intersezione non ci deve essere ExtraCut
+         else
+            dExtraCut = 0
         end
         -- se si può fare, faccio unico taglio parallelo
         if bExecJustOneCut then
@@ -522,10 +528,20 @@ function ProcessScarfJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, dOvmTa
      else
         dDiamMax = EgtIf( abs( frMor:getVersX():getY()) < abs( frMor:getVersY():getY()), dL, dW)
      end
-      -- determino la distanza tra le due facce inclinate
+      -- determino la distanza tra le due facce inclinate per determinare elevazione
      local dDistFaces
      if vFaceOrd[4] ~= 0 then
-         dDistFaces = abs((ptC[vFaceOrd[2]]-ptC[vFaceOrd[4]])*vtN[vFaceOrd[2]])
+         local nElevationFace1 = 0
+         -- controllo estensione faccia 1
+         if vFaceOrd[1] ~= 0 then
+            frMor, dL, dW = EgtSurfTmFacetMinAreaRectangle( Proc.Id, vFaceOrd[1]-1, GDB_ID.ROOT)
+            if abs(vtRef:getY()) > 0.866 then
+               nElevationFace1 = EgtIf( abs( frMor:getVersX():getZ()) < abs( frMor:getVersY():getY()), dL, dW)
+            else
+               nElevationFace1 = EgtIf( abs( frMor:getVersX():getY()) < abs( frMor:getVersY():getY()), dL, dW)
+            end
+         end
+         dDistFaces = max( abs((ptC[vFaceOrd[2]]-ptC[vFaceOrd[4]])*vtN[vFaceOrd[2]]), nElevationFace1)
      end
      -- recupero la lavorazione. considerando l dimensione del lato e l'affondamento
      local sPocketing
@@ -336,7 +336,7 @@ end

 ---------------------------------------------------------------------
 -- tagli verticali aggiuntivi
-local function AddVerticalPreCuts( Proc, sCutting, dCutXOffset, b3Raw, sNotes)
+local function AddVerticalPreCuts( Proc, sCutting, dCutXOffset, b3Raw, sNotes, dOffsetBetweenCuts)
   local nVerticalCuts = ceil( Proc.Face[1].WidthTrimmed / ( BD.MAX_LEN_DICE)) - 1
   local dVerticalSliceHeight = Proc.Face[1].WidthTrimmed / ( nVerticalCuts + 1)
   -- recupero il diametro dell'utensile
@@ -352,8 +352,8 @@ local function AddVerticalPreCuts( Proc, sCutting, dCutXOffset, b3Raw, sNotes)
   for j = nVerticalCuts, 1, -1 do
      local nFaceUse = MCH_MILL_FU.PARAL_FRONT
      local dVerticalCutOffset = dVerticalSliceHeight * -j
-      local bForceTangentLeadInOut = BD.PRESS_ROLLER and not BD.DOWN_HEAD
-      bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, nFaceUse, nil, -0.1 -dCutXOffset, BD.CUT_SIC, dVerticalCutOffset, 0, 0, sNotes, b3Raw, nil, nil, nil, bForceTangentLeadInOut)
+      local sLeadInOutType = 'PerpendicularOutraw'
+      bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, nFaceUse, nil, -0.1 -dCutXOffset, BD.CUT_SIC, dVerticalCutOffset, 0, 0, sNotes, b3Raw, nil, nil, nil, sLeadInOutType, nil, dOffsetBetweenCuts)
      if not bOk then return bOk, sErr end
   end

@@ -374,7 +374,7 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, TailCut
      local dCutExtra = 0
      local dAccStart = 0
      local dAccEnd = 0
-      if TailCutType.bBigSectionCut and BD.C_SIMM then
+      if TailCutType.bBigSectionCut and BD.C_SIMM and b3Raw:getDimZ() > BD.MIN_DIM_HBEAM + 10 * GEO.EPS_SMALL then
         -- qui arrivano sezioni molto grandi su macchine tipo PF con materiale da asportare inferiore allo spessore lama
         local dSawRad = Cutting1Data.dSawDiam / 2
         dCutExtra = - ( b3Raw:getDimY() - dSawRad)
@@ -422,8 +422,8 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, TailCut
            for j = nHorizontalCuts, 1, -1 do
               local nFaceUse = MCH_MILL_FU.PARAL_DOWN
               local dHorizontalCutOffset = dHorizontalSliceHeight * -j
-               local bForceTangentLeadInOut = BD.PRESS_ROLLER
-               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0 , Cutting1Data.sCutting, Cutting1Data.dSawDiam, nFaceUse, nil, -0.1 - dCutXOffset, BD.CUT_SIC, dHorizontalCutOffset, 0, 0, 'Precut;', b3Raw, nil, nil, nil, bForceTangentLeadInOut)
+               local sLeadInOutType = 'PerpendicularOutraw'
+               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0 , Cutting1Data.sCutting, Cutting1Data.dSawDiam, nFaceUse, nil, -0.1 - dCutXOffset, BD.CUT_SIC, dHorizontalCutOffset, 0, 0, 'Precut;', b3Raw, nil, nil, nil, sLeadInOutType, nil, dOffsetBetweenCuts)
               if not bOk then return false, sErr end
            end
            -- se necessario taglio verticale doppio, eseguo l'opposto
@@ -472,7 +472,7 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, TailCut
         -- se trave larga effettuo tagli verticali aggiuntivi
         if TailCutType.bNeedVerticalAddedCuts then
            local sSpecNotes = EgtIf( TailCutType.bSplit, 'Presplit;', 'Precut;')
-            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw, sSpecNotes)
+            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw, sSpecNotes, dOffsetBetweenCuts)
            if not bOk then return bOk, sErr end
         end
         if i == 1 and TailCutType.sType =='Precut' then
@@ -541,7 +541,7 @@ local function MakeStandardCuts( Proc, b3Raw, nCuts, dOffsetBetweenCuts, TailCut
         -- se trave larga effettuo tagli verticali aggiuntivi
         if TailCutType.bNeedVerticalAddedCuts then
            local sSpecNotes = EgtIf( TailCutType.bSplit, 'Presplit;', 'Precut;')
-            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw, sSpecNotes)
+            local bOk, sErr = AddVerticalPreCuts( Proc, Cutting1Data.sCutting, dCutOffset, b3Raw, sSpecNotes, dOffsetBetweenCuts)
            if not bOk then return bOk, sErr end
         end
         local sNotes
@@ -631,7 +631,7 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId, nOrd, sDownOrSideOrSt
   -- caratteristiche taglio
   local dDimYRef = EgtIf( b3Raw:getDimZ() < BD.MIN_DIM_HBEAM + 10 * GEO.EPS_SMALL, dSawMaxDepth, abs( BD.MAX_DIM_HTCUT_HBEAM))
   local bBigSectionCut = ( b3Raw:getDimY() > 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL) and
-                          ( b3Raw:getDimZ() > EgtIf( BD.TURN, 2 * dMaxVertDepth,  dMaxVertDepth + dSawMaxDepth2) - 2 * BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
+                          ( b3Raw:getDimZ() > EgtIf( BD.TURN, 2 * dMaxVertDepth,  dMaxVertDepth + dSawMaxDepth2) - 2 * BD.CUT_EXTRA + 10 * GEO.EPS_SMALL)
   local bHorizCut = ( ( b3Raw:getDimY() > b3Raw:getDimZ() + 10 * GEO.EPS_SMALL or BD.TURN) and ( b3Raw:getDimZ() < dMaxVertDepth - BD.CUT_EXTRA))
   local bDoubleHorizCut = ( ( BD.DOWN_HEAD or BD.TURN) and not bHorizCut and b3Raw:getDimY() > 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
   local bDoubleCut = ( not bHorizCut and not bDoubleHorizCut and b3Raw:getDimY() > dDimYRef - BD.CUT_EXTRA  + 10 * GEO.EPS_SMALL) and
@@ -661,7 +661,10 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId, nOrd, sDownOrSideOrSt
   -- determino la necessità di tagli aggiuntivi
   local dMinTailScrapForAdditionalCuts = 10.123
   local bNeedVerticalAddedCuts = not bSplit and ( Proc.Face[1].WidthTrimmed > BD.MAX_LEN_DICE) and ( dLenEndRaw > dMinTailScrapForAdditionalCuts - 10 * GEO.EPS_SMALL)
-   local bNeedHorizontalAddedCuts = not bSplit and ( Proc.Face[1].HeightTrimmed > ( BD.MIN_HEIGHT_ADDED_CUTS or BD.MAX_LEN_DICE)) and not bBigSectionCut and ( dLenEndRaw > dMinTailScrapForAdditionalCuts - 10 * GEO.EPS_SMALL)
+   local bNeedHorizontalAddedCuts = not bSplit and not bBigSectionCut and
+                                    ( Proc.Face[1].HeightTrimmed > ( BD.MIN_HEIGHT_ADDED_CUTS or BD.MAX_LEN_DICE)) and
+                                    ( dLenEndRaw > dMinTailScrapForAdditionalCuts - 10 * GEO.EPS_SMALL) and
+                                    dOffsL < BD.MAX_DIM_DICE
   -- dati lavorazioni sopra e sotto
   local Cutting1Data = { sCutting = sCutting, dSawDiam = dSawDiam, dMaxDepth = dSawMaxDepth, dSawThick = dSawThick, dMaxVertDepth = dMaxVertDepth}
   local Cutting2Data = { sCutting = sCutting2, dSawDiam = dSawDiam2, dMaxDepth = dSawMaxDepth2, dSawThick = dSawThick2}
@@ -768,18 +771,16 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId, nOrd, sDownOrSideOrSt
                        if AreOppositeVectorApprox( X_AX(), vtNLimitingSurf) then EgtInvertSurf( nLimitingSurf) end
                     end
                     -- tagli verticali
-                     bOk, sErr = AddVerticalPreCuts( AddProc, sCutting, 0, b3Raw, sNotes)
+                     bOk, sErr = AddVerticalPreCuts( AddProc, sCutting, 0, b3Raw, sNotes, dOffsL)
                     if not bOk then return bOk, sErr end
                     -- tagli a cubetti con eventuale superficie limitante
-                     bOk, sErr = Cut.Make( AddProc, nNewPhase, nRawId, nPartId, dMaxElev, nil, false, true, b3Raw, sNotes, dCurrOvmT, nil, nLimitingSurf)
+                     local sLeadInOutType = 'PerpendicularOutraw'
+                     bOk, sErr = Cut.Make( AddProc, nNewPhase, nRawId, nPartId, dMaxElev, nil, false, true, b3Raw, sNotes, dCurrOvmT, nil, nLimitingSurf, sLeadInOutType)
                  end
               -- tagli aggiuntivi non necessari
               else
-                  local bForceTangentLeadInOut = false
-                  if BD.PRESS_ROLLER then
-                     bForceTangentLeadInOut = true
-                  end
-                  bOk, sErr = Cut.Make( Proc, nNewPhase, nRawId, nPartId, dMaxElev, nil, false, true, b3Raw, sNotes, dCurrOvmT, nil, nil, bForceTangentLeadInOut)
+                  local sLeadInOutType = 'PerpendicularOutraw'
+                  bOk, sErr = Cut.Make( Proc, nNewPhase, nRawId, nPartId, dMaxElev, nil, false, true, b3Raw, sNotes, dCurrOvmT, nil, nil, sLeadInOutType)
               end
               if sNotesFinal then
                  EgtSetMachiningParam( MCH_MP.USERNOTES, sNotesFinal)
@@ -132,7 +132,12 @@ local function MakePocket( Proc, nPartId, ptPs, vtN, nFaceRef, nDiffWidth, sMchF
   -- calcolo il diametro utensile
   local dDiamTool
   if nUseRoughTool == 1 then
-      dDiamTool = max( 80, min( tBHx[nFaceRef][1], tBHx[nFaceRef][2]))
+      -- se feature passante prendo utensile più grande possibile
+      if ( Proc.AffectedFaces.Top and Proc.AffectedFaces.Bottom) or ( Proc.AffectedFaces.Front and Proc.AffectedFaces.Back) then
+         dDiamTool = nil
+      else
+         dDiamTool = max( 80, min( tBHx[nFaceRef][1], tBHx[nFaceRef][2]))
+      end
   else
      -- se non uso truciolatore prendo il valore dalle dimensioni minime delle facce
      dDiamTool = min( tBHx[nFaceRef][1], tBHx[nFaceRef][2])
@@ -283,8 +288,8 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, ptC, vtN,
         -- setto a 0 eventuali offset
         EgtSetMachiningParam( MCH_MP.OFFSR, 0)
         -- applico gli allungamenti o accorciamenti considerando che la lavorazione è invertita
-         EgtSetMachiningParam( MCH_MP.STARTADDLEN, EgtIf( bOpenStart, dTDiam / 2, - dTDiam / 2))
-         EgtSetMachiningParam( MCH_MP.ENDADDLEN, EgtIf( bOpenEnd, dTDiam / 2, - dTDiam / 2))
+         EgtSetMachiningParam( MCH_MP.STARTADDLEN, EgtIf( bOpenStart, dTDiam / 2 + 10, - dTDiam / 2))
+         EgtSetMachiningParam( MCH_MP.ENDADDLEN, EgtIf( bOpenEnd, dTDiam / 2 + 10, - dTDiam / 2))
         -- attacchi e uscite lineari con parte tg nulla
         EgtSetMachiningParam( MCH_MP.LEADINTYPE, MCH_MILL_LI.LINEAR)
         EgtSetMachiningParam( MCH_MP.LITANG, 0)
@@ -1,5 +1,44 @@
           ==== Beam Update Log ====

+Versione 2.7f3 (19/06/2025)
+- Modifx : in StepJointNotch corretta distanza attacco in/out
+
+Versione 2.7f2 (18/06/2025)
+- Modif : in LongDoubleCut aggiunto messaggio feature non completa se utensile non arriva sul fondo
+- Modif : in StepJointNotch, se si forza truciolatore, si prende utensile più grande
+- Fixed : in LapJoint, piccola correzione calcolo sovrapposizione trimesh per smuotatura
+- Fixed : in LapJoint, per sovrapposizione in spezzatura, corretto caso tipo Tunnel
+
+Versione 2.7f1 (03/06/2025)
+- Modif : in tenone coda di rondine modificato angolo limite tenone per lavorazione in sottosquadro
+- Modif : migliorie per lavorazioni su aggregato
+
+Versione 2.7e2 (23/05/2025)
+- Modif : in tagli di lama migliorie alla scelta del lato da lavorare
+- Modif : in mortasa coda di rondine migliorati i percorsi
+- Modif : in tenone coda di rondine migliorate le lavorazioni da sotto
+- Fixed : in Scarf Joint correzione alla scelta faccia da lavorare
+
+Versione 2.7e1 (05/05/2025)
+- Fixed : in taglio di separazione si riduce percorso di taglio solo se il pezzo è effettivamente alto
+- Fixed : in foratura corretto caso in cui non si sceglieva l'utensile più lungo disponibile
+- Fixed : In BatchProcess (Ts7) corretta generazione in caso di progetto senza ricalcolo
+- Modif : in LapJoint se tunnel verticale lavorato solo da sopra e l'utensile non arriva, si restituisce warning
+
+Versione 2.7d3 (22/04/2025)
+- Fixed : in LapJoint corretta gestione errata Q04
+
+Versione 2.7d2 (17/04/2025)
+- Added : in scanalatura aggiunta Q03 per forzare fresa
+- Modif : in slot con lama + sega a catena abilitata lavorazione da sotto per macchine con testa sopra
+- Modif : nei tagli modifche in caso di tagli di coda anticipati
+- Modif : in lavorazioni tipo tacca ma 3 facce migliorata la scelta faccia
+
+Versione 2.7d1 (04/04/2025)
+- Fixed : in PreDrill piccola correzione
+- Fixed : nei tagli varie correzioni
+- Fixed : in HeadCut e Split corretto calcolo lunghezza extra di taglio
+
 Versione 2.7c2 (24/03/2025)
 - Fixed : in BatchProcess (Ts7) riabilitata modifica barra erroneamente rimossa

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam

 NAME = 'Beam'
-VERSION = '2.7c2'
-MIN_EXE = '2.6e5'
+VERSION = '2.7f3'
+MIN_EXE = '2.7f2'
Author	SHA1	Message	Date
andrea.villa	c0156a4a97	In LongDoubleCut, se la faccia scelta non è completa, si lavora l'altra faccia (se completa)	2025-06-25 11:43:27 +02:00
andrea.villa	b08710451a	In Drill, se foro in testa che attraversa un taglio, si setta sempre la MaxElev. Serve in caso ci sia un grande sovramateriale di testa	2025-06-24 14:50:20 +02:00
andrea.villa	4adf62069f	In RidgeLap, si utilizza direzione reale della faccia. Prima era solo verso X	2025-06-24 12:34:12 +02:00
andrea.villa	118b9a88d2	Merge branch 'Probing' into develop	2025-06-24 10:33:35 +02:00
andrea.villa	73c86bd35f	In MAchiningLib, le librerie di lavorazioni chiamate con pcall perchè non è detto che siano tutte presenti	2025-06-24 10:32:37 +02:00
luca.mazzoleni	5de62b9563	update versione minima	2025-06-23 17:05:29 +02:00
luca.mazzoleni	a7a9a23cf3	Merge branch 'feature/OutrawBladeHeadCutSplit' into develop	2025-06-23 16:59:56 +02:00
luca.mazzoleni	21fe8ca47d	- in FacesBySaw piccola correzione alla distanza tangente in caso di attacco perpendicolare con OutRaw	2025-06-23 16:58:49 +02:00
andrea.villa	0f536b07c4	Aggiornato Compile	2025-06-23 16:26:39 +02:00
andrea.villa	3e01fb36b0	Si sceglie lavorazione che utilizza la stessa testa della lavorazione	2025-06-23 15:36:20 +02:00
luca.mazzoleni	3c4af3c335	Merge branch 'develop' into feature/OutrawBladeHeadCutSplit	2025-06-23 15:35:48 +02:00
andrea.villa	9480453e57	Disattivazione finale e altre modifiche	2025-06-23 14:53:33 +02:00
luca.mazzoleni	e98f924630	- in FacesBySaw piccola correzione alla distanza di compensazione in caso di attacco perpendicolare con OutRaw	2025-06-23 14:41:57 +02:00
luca.mazzoleni	eabbc883e4	- in DiceCut.GetDice si ritornano anche gli OffsetP e OffsetO utilizzati - in ProcessCut si usano gli offset reali dei cubetti per il calcolo della lunghezza di compensazione per gli attacchi perpendicolari OutRaw	2025-06-23 12:38:04 +02:00
andrea.villa	8e19e87d3f	Prima versiomne funzionante tastatura. Manca disattivazione finale	2025-06-23 12:15:45 +02:00
luca.mazzoleni	0c4f57a90b	- in ProcessSplit si fa attacco perpendicolare OutRaw anche per tutti i tagli con Cut.Make - in tagli testa e coda sistemata lunghezza compensazione per caso con OutRaw	2025-06-23 11:59:42 +02:00
andrea.villa	77310576bd	In LongDoubleCut, se taglio concavo rivolto verso il basso, gestione lavorazione con lama DownUp se macchina senza testa sotto	2025-06-23 09:09:50 +02:00
luca.mazzoleni	1e2f559937	- in HeadCut e Split i tagli aggiuntivi di spezzatura sono ora con attacco perpendicolare e OutRaw=3 (non tornano ogni volta indietro fino al grezzo ipotetico); risolto, presumibilmente, il caso dei rulli che si chiudono - modificate di conseguenza Cut e FacesBySaw	2025-06-20 17:59:14 +02:00
andrea.villa	6a6dc27560	Primo commit gestione tastatura	2025-06-20 17:30:08 +02:00
luca.mazzoleni	ab6ed79a0e	Merge branch 'develop' into feature/OutrawBladeHeadCutSplit	2025-06-19 17:57:54 +02:00
luca.mazzoleni	7bb237f7d2	- nei tagli bForceTangentLeadInOut sostituita da sLeadInOutType per forzare il tipo di attacco	2025-06-19 17:54:50 +02:00
andrea.villa	67bb55537e	In LapJoint, aggiunti smussi anche se lavorazione con truciolatore	2025-06-19 15:42:07 +02:00
luca.mazzoleni	777179d1b2	Merge branch 'develop' into feature/OutrawBladeHeadCutSplit	2025-06-19 12:08:15 +02:00
luca.mazzoleni	06adbb0b5d	Merge branch 'master' into develop	2025-06-19 12:07:46 +02:00
luca.mazzoleni	872a3ec899	update version e log	2025-06-19 12:07:23 +02:00
luca.mazzoleni	5dae07e2aa	Merge branch 'hotfix/StepJointNotchMilingLeadInOut'	2025-06-19 12:04:08 +02:00
luca.mazzoleni	fc26a8ad4a	- in StepJointNotch corretta distanza attacco in/out	2025-06-19 12:03:15 +02:00
luca.mazzoleni	04046787e3	Merge tag '2.7f2' into develop 2.7f2	2025-06-18 12:40:44 +02:00
luca.mazzoleni	a12aaf86bc	Merge branch 'release/2.7f2'	2025-06-18 12:40:35 +02:00
luca.mazzoleni	70d16909f5	update version e log	2025-06-18 12:40:16 +02:00
andrea.villa	5007cda21f	- In StepJointNotch, se si forza truciolatore, si prende utensile più grande - Per sovrapposizione in spezzatura LapJooint, corretto caso tipo Tunnel	2025-06-09 17:50:19 +02:00
andrea.villa	76d03160c5	In LapJoint, piccola correzione calcolo sovrapposizione trimesh per smuotatura	2025-06-09 15:35:03 +02:00
andrea.villa	534302f48e	In Long2Cut, messaggio feature non completa se utensile non arriva sul fondo	2025-06-09 13:27:10 +02:00
luca.mazzoleni	60d73199e4	Merge tag '2.7f1' into develop 2.7f1	2025-06-03 14:56:29 +02:00
luca.mazzoleni	71a51e56e1	Merge branch 'release/2.7f1'	2025-06-03 14:56:11 +02:00
luca.mazzoleni	bf9791ca9c	update version e log	2025-06-03 14:56:03 +02:00
andrea.villa	249cb4eea5	Se fresa su aggregato e lavorazione rivolta verso Z-, si accede da lato aperto	2025-06-03 10:53:45 +02:00
andrea.villa	46cda4d472	Modificato angolo limite tenone per lavorazione sottosquadra	2025-05-28 15:02:59 +02:00
Dario Sassi	72b0e7f4a4	DataBeam : - modifiche per sola macchina Scm-Oikos.	2025-05-27 19:56:51 +02:00
luca.mazzoleni	0e02959467	Merge tag '2.7e2' into develop 2.7e2	2025-05-23 18:30:13 +02:00
luca.mazzoleni	b7837fe95c	Merge branch 'release/2.7e2'	2025-05-23 18:29:59 +02:00
luca.mazzoleni	d66eaf5322	- update version e log	2025-05-23 17:38:25 +02:00
andrea.villa	05ecf76312	In DTMortise, si fa trim quando il percorso è in basso.	2025-05-16 17:10:05 +02:00
andrea.villa	6e3a1ddc7a	In FBS ripristinato calcolo vtFaceUse, risolto casi ambigui a 45° con nuovo comando EdgesFaceUse.	2025-05-09 12:31:11 +02:00
andrea.villa	df47691da1	In ScarfJoint corretto caso in cui faccia di fondo sia più alta rispetto a faccia verticale centrale	2025-05-09 10:05:04 +02:00
andrea.villa	8a2200e0de	Aumentato angolo limite per lavorazioni verso il basso, da 5° a 7°	2025-05-08 14:51:19 +02:00
luca.mazzoleni	0136ccac19	Merge tag '2.7e1' into develop 2.7e1	2025-05-05 16:58:07 +02:00
luca.mazzoleni	7ee683aeb8	Merge branch 'release/2.7e1'	2025-05-05 16:57:56 +02:00
luca.mazzoleni	e81d1aef66	update log e version	2025-05-05 16:57:35 +02:00
andrea.villa	5331466c4f	In BatchProcess, anche se non è da riprocessare, si setta come nota sul MachGroup il nome del codice CNC da utilizzare	2025-04-30 16:15:21 +02:00
luca.mazzoleni	7a972cccc8	- in LapJoint se tunnel verticale lavorato solo da sopra e l'utensile non arriva, si restituisce warning	2025-04-28 19:07:22 +02:00
andrea.villa	2ed5af9661	In Drill, dopo che l'utensile è stato scelto si verifica compatibilità considerando angolo foro. Se non arriva in fondo, si cerca utensile più lungo.	2025-04-28 15:08:16 +02:00
andrea.villa	e25c24a33a	Merge branch 'develop' of https://gitlab.steamware.net/egalware-cadcam/lua/DataBeam into develop	2025-04-23 15:21:16 +02:00
andrea.villa	aeca298feb	In SplitCut, si riduce percorso di taglio solo se il pezzo è effettivamente alto	2025-04-23 15:21:13 +02:00
luca.mazzoleni	a09565cfb7	Merge branch 'master' into develop	2025-04-22 11:24:33 +02:00
luca.mazzoleni	862b375ee5	update log e version	2025-04-22 11:24:22 +02:00
luca.mazzoleni	a34147ce15	- #CRITICAL# in LapJoint correzione parentesi che causavano la chiamata di LongCut in casi errati	2025-04-22 11:22:13 +02:00
luca.mazzoleni	cb3ad1d24c	Merge tag '2.7d2' into develop 2.7d2	2025-04-17 12:24:08 +02:00
luca.mazzoleni	06e266226a	Merge branch 'release/2.7d2'	2025-04-17 12:24:00 +02:00
luca.mazzoleni	74b40a6ad7	update log e version	2025-04-17 12:23:40 +02:00
andrea.villa	ab7971e5f9	- Aggiunto lettura Q03 su scanalatura epr forzare fresa - In BeamLib, si considerano simili due facce che hanno elevazione oltre l'85%	2025-04-11 13:29:37 +02:00
luca.mazzoleni	e188753f49	- in Cut se lungo, una faccia e rivolto sul retro verso l'alto si forzano i cubetti per evitare di rovinare il pezzo successivo - in Cut, se taglio di coda anticipato, aggiunto messaggio che avvisa del possibile danneggiamento del pezzo successivo	2025-04-10 17:08:02 +02:00
andrea.villa	9b12a74591	In LapJoint, per abilitare lama da sotto non si verifica se esiste testa sotto, ma se è una FAST	2025-04-10 08:49:18 +02:00
andrea.villa	e17e8189f7	In LapJoint, funzione SawPlusChain lavorazione di lama da sotto abilitata se la macchina ha solo la testa sopra	2025-04-10 08:29:38 +02:00
luca.mazzoleni	a5d4503180	Merge tag '2.7d1' into develop 2.7d1	2025-04-04 12:15:59 +02:00
luca.mazzoleni	41f92e9dd4	Merge branch 'release/2.7d1'	2025-04-04 12:15:52 +02:00
luca.mazzoleni	c5a6300d15	update log	2025-04-04 10:39:15 +02:00
andrea.villa	bf5c12ec8a	In FBS non si utilizza il vtFaceUse perchè in caso di edge a 45° sbaglia a concatenare edge da lavorare. Si è tornati alla gestione vecchia	2025-04-03 16:06:11 +02:00
andrea.villa	777ba74e4d	- In FBS errore 'TwoFacesBySaw from bottom impossible' solo se entrambe le facce non sono ok - In LapJoint, si controlla direzione faccia 1 e larghezza faccia 2 (e reciproci) per capire se si può lavorare con lama testa sotto	2025-04-03 15:28:31 +02:00
luca.mazzoleni	268e578125	- in Cut.Classify correzione	2025-04-03 12:04:28 +02:00
andrea.villa	13f0545ebe	In HeadCut e Split, si aggiungono tagli extra orizzontali solo se il materiale da tagliare è meno di un cubetto. Altrimenti ci sarebbe collisione.	2025-04-02 11:01:04 +02:00
luca.mazzoleni	445a76f543	Merge tag '2.7d1' into develop 2.7d1	2025-04-01 09:09:36 +02:00
luca.mazzoleni	4b52653a2e	Merge branch 'release/2.7d1'	2025-04-01 09:09:25 +02:00
luca.mazzoleni	ced290604a	update log e version	2025-04-01 09:09:16 +02:00
andrea.villa	2c68515b93	In HeadCut e Split, per decidere se BigSection, si somma CUT_EXTRA ( prima si utilizzava CUT_EXTRA_MIN)	2025-03-31 15:15:15 +02:00
luca.mazzoleni	b26ad523ab	Merge branch 'master' into develop	2025-03-24 18:00:43 +01:00
luca.mazzoleni	2853731c4c	Merge branch 'master' into develop	2025-03-24 16:06:06 +01:00
andrea.villa	e1702d1263	Corretto calcolo direzione di lavorazione in caso verticale e orizzontale entrambi a false. Se altezza faccia minore di massimo materiale, si fa orizzontale	2025-03-24 14:47:05 +01:00
andrea.villa	236254fed6	In Drill, calcolo AffectedFaces anche su Predrill	2025-03-20 11:59:55 +01:00
luca.mazzoleni	82f20f3c87	- correzione in log	2025-03-18 11:51:31 +01:00
luca.mazzoleni	adc75c0504	Merge tag '2.7c1' into develop 2.7c1	2025-03-17 17:47:39 +01:00