DataBeam :

- in DiceCut ora si fanno i cubetti anche quando le facce superano la massima lunghezza anche se strette
- in Cut corretto orientamento testa per tagli particolari
- rifatta Classify di DoubleCut
- in Drill migliorato controllo ingombro pinza portautensile
- in Tenon e DtTenon portato a 6 il massimo numero di passi.

LuaLibs/ProcessDrill.lua

@@ -1,4 +1,4 @@
--- ProcessDrill.lua by Egaltech s.r.l. 2020/09/16
+-- ProcessDrill.lua by Egaltech s.r.l. 2020/09/24
 -- Gestione calcolo forature per Travi
 
 -- Tabella per definizione modulo
@@ -203,7 +203,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
          local sErr = 'Error : drilling not found in library'
          EgtOutLog( sErr)
          return false, sErr
-      -- altrimenti rifaccio la ricerca foratura senza passare altezza uensile
+      -- altrimenti rifaccio la ricerca foratura senza passare altezza utensile
       else
          dCheckDepth = nil
          sDrilling, nType, dMaxDepth, dMaxToolLength, dToolDiam, dDiamTh = ML.FindDrilling( dDiam)
@@ -242,12 +242,12 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    local dSubL1 = 0
    local dSubL2 = 0
    local dSubL3 = 0
-   -- se foro su testa o coda e inclinato, limito il massimo affondamento
+   -- se foro non su testa o coda e inclinato, limito il massimo affondamento
    if not ( ( Proc.Fcs == 5 or Proc.Fcs == 6) or ( bToInvert and ( Proc.Fce == 5 or Proc.Fce == 6))) then
       local CosB = abs( vtExtr:getX())
       if CosB < BD.DRILL_VX_MAX then
          local TgA = CosB / sqrt( 1 - CosB * CosB)
-         dSubL1 = ( dDiamTh - dToolDiam) / 2 * TgA
+         dSubL1 = ( dDiamTh / 2 + 2) * TgA
       else
          dMaxDepth = 0
       end
@@ -257,7 +257,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       local CosB = abs( vtExtr:getZ())
       if CosB < BD.DRILL_VX_MAX then
          local TgA = CosB / sqrt( 1 - CosB * CosB)
-         dSubL2 = ( dDiamTh - dToolDiam) / 2 * TgA
+         dSubL2 = ( dDiamTh / 2 + 2) * TgA
       else
          dMaxDepth = 0
       end
@@ -267,7 +267,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       local CosB = abs( vtExtr:getY())
       if CosB < BD.DRILL_VX_MAX then
          local TgA = CosB / sqrt( 1 - CosB * CosB)
-         dSubL3 = ( dDiamTh - dToolDiam) / 2 * TgA
+         dSubL3 = ( dDiamTh / 2 + 2) * TgA
       else
          dMaxDepth = 0
       end