DataBeam :

- in DtTenon aggiunto nuovo step di altezza trave per consentire lavorazione con faccia diretta verso il basso
- in LapJoint introdotto uso svuotature ZigZag ottimizzate.

LuaLibs/ProcessLapJoint.lua

@@ -1,4 +1,4 @@
--- ProcessLapJoint.lua by Egaltech s.r.l. 2022/02/07
+-- ProcessLapJoint.lua by Egaltech s.r.l. 2022/02/14
 -- Gestione calcolo mezzo-legno per Travi
 -- 2019/10/08 Agg. gestione OpenPocket.
 -- 2021/01/24 Con sega a catena ora sempre impostato asse A.
@@ -35,6 +35,7 @@
 -- 2022/01/19 Cambiata % lunghezza pezzo per spezzatura. Tolta correzione spessore fresa a disco con superficie da lavorare verso Z-.
 -- 2022/01/26 Migliorato controllo uso testa da sotto nel caso due facce con lama.
 -- 2022/02/07 Corretto caso con due facce che non è un LongDoubleCut ma che veniva identificato come tale.
+-- 2022/02/14 Introdotto uso svuotature ZigZag ottimizzate.
 
 -- Tabella per definizione modulo
 local ProcessLapJoint = {}
@@ -1849,11 +1850,11 @@ local function MakeRoundCleanContour( Proc, nPhase, nRawId, nPartId, b3Raw,
          EgtSetMachiningParam( MCH_MP.STARTADDLEN, 0)
          EgtSetMachiningParam( MCH_MP.ENDADDLEN, 0)
       else
-         -- nessun attacco e uscita, allungo inizio e fine di 3/4 del diametro utensile
+         -- nessun attacco e uscita, allungo inizio e fine di raggio utensile + 5mm (per evitare controllo collisioni)
          EgtSetMachiningParam( MCH_MP.LEADINTYPE, MCH_MILL_LI.NONE)
          EgtSetMachiningParam( MCH_MP.LEADOUTTYPE, MCH_MILL_LO.AS_LI)
-         EgtSetMachiningParam( MCH_MP.STARTADDLEN, 0.75 * dTDiam)
-         EgtSetMachiningParam( MCH_MP.ENDADDLEN, 0.75 * dTDiam)
+         EgtSetMachiningParam( MCH_MP.STARTADDLEN, dTDiam / 2 + 5)
+         EgtSetMachiningParam( MCH_MP.ENDADDLEN, dTDiam / 2 + 5)
       end
       -- setto massimo affondamento possibile
       local dMachDepth = 0
@@ -3314,6 +3315,15 @@ local function MakePocket( Proc, nPartId, ptPs, tvtN, nFaceRef, sMchFind, nUseRo
    if sMchFind == 'OpenPocket' and nUseRoughTool == 0 then
       EgtSetMachiningParam( MCH_MP.SUBTYPE, MCH_POCK_SUB.SPIRALIN)
    end
+   if sMchFind == 'OpenPocket' and dDiamTool < 90 then
+      local _, dH, dV = EgtSurfTmFacetMinAreaRectangle( Proc.Id, nFaceRef, GDB_ID.ROOT)
+      if min( dH, dV) < 1.5 * dDiamTool then
+         EgtSetMachiningParam( MCH_MP.SUBTYPE, MCH_POCK_SUB.ZIGZAG)
+         EgtSetMachiningParam( MCH_MP.LEADINTYPE, MCH_POCK_LI.HELIX)
+         EgtSetMachiningParam( MCH_MP.LITANG, dDiamTool)
+         EgtSetMachiningParam( MCH_MP.LIELEV, 2)
+      end
+   end
    -- se elevazione superiore a massimo affondamento della fresa, riduco opportunamente
    local sWarn
    if dElev > dMaxDepth + 10 * GEO.EPS_SMALL then