From d6485ddc0da6972729036daef7a80b03a623c115 Mon Sep 17 00:00:00 2001
From: DarioS <dario.sassi@egaltech.com>
Date: Tue, 19 Apr 2022 11:31:42 +0200
Subject: [PATCH] DataBeam : - prime modifiche per TURN in tagli con lama -
 allargata inclinazione verso il basso permessa sui tenoni.

---
 LuaLibs/FacesBySaw.lua     |  6 ++++--
 LuaLibs/ProcessDtTenon.lua | 23 ++++++++++++-----------
 2 files changed, 16 insertions(+), 13 deletions(-)

diff --git a/LuaLibs/FacesBySaw.lua b/LuaLibs/FacesBySaw.lua
index 0417cb9..0678543 100644
--- a/LuaLibs/FacesBySaw.lua
+++ b/LuaLibs/FacesBySaw.lua
@@ -142,13 +142,15 @@ function FacesBySaw.MakeOne( nSurfId, nFacet, sCutting, dSawDiam, Par5, dVzLimDw
    -- posizione braccio
    EgtOutLog( 'vtN=' .. tostring( vtN) .. ' vtRef=' .. tostring( vtRef) .. ' vtOut=' .. tostring( vtOut) .. ' vtAux=' .. tostring( vtAux), 3)
    local nSCC = MCH_SCC.NONE
-   --if not BD.C_SIMM or vtRef:getZ() < 0.866 or abs( vtTg:getZ()) > 0.02 then
+   if not BD.TURN then
       if abs( vtAux:getX()) > abs( vtAux:getY()) - GEO.EPS_SMALL then
          nSCC = EgtIf( ( vtAux:getX() > -GEO.EPS_SMALL), MCH_SCC.ADIR_XP, MCH_SCC.ADIR_XM)
       else
          nSCC = EgtIf( ( vtAux:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
       end
-   --end
+   else
+      nSCC = MCH_SCC.ADIR_ZP
+   end
    -- inserisco la lavorazione di taglio
    local sName = 'Cut_' .. ( EgtGetName( nSurfId) or tostring( nSurfId)) .. '_' .. tostring( nFacet + 1)
    local nMchFId = EgtAddMachining( sName, sCutting)
diff --git a/LuaLibs/ProcessDtTenon.lua b/LuaLibs/ProcessDtTenon.lua
index 052fe30..264e90f 100644
--- a/LuaLibs/ProcessDtTenon.lua
+++ b/LuaLibs/ProcessDtTenon.lua
@@ -1,6 +1,7 @@
--- ProcessTenon.lua by Egaltech s.r.l. 2022/02/10
+-- ProcessTenon.lua by Egaltech s.r.l. 2022/04/14
 -- Gestione calcolo tenone a coda di rondine per Travi
 -- 2021/04/08 Aggiunto controllo massimo materiale lavorabile dalla fresa.
+-- 2022/04/14 Aumentati un poco i limiti di orientamento verso il basso per FAST e PF.
 
 -- Tabella per definizione modulo
 local ProcessDtTenon = {}
@@ -24,36 +25,36 @@ local function VerifyOrientation( Proc, vtN, b3Raw)
       return true
    end
    -- se trave molto bassa
-   if b3Raw:getDimZ() <= 120 then
+   if b3Raw:getDimZ() < 121 then
       -- se tenone praticamente in asse, accetto fino a -45 deg
-      if abs( vtN:getY()) < 0.04 then
+      if abs( vtN:getY()) < 0.088 then
          return ( vtN:getZ() >= -0.7072)
       -- altrimenti accetto fino a -30deg
       else
          return ( vtN:getZ() >= -0.51)
       end
    -- se trave bassa
-   elseif b3Raw:getDimZ() <= 200 then
+   elseif b3Raw:getDimZ() < 201 then
       -- se tenone praticamente in asse, accetto fino a -30 deg
-      if abs( vtN:getY()) < 0.04 then
+      if abs( vtN:getY()) < 0.088 then
          return ( vtN:getZ() >= -0.51)
-      -- altrimenti accetto fino a -20deg
+      -- altrimenti accetto fino a -21deg
       else
-         return ( vtN:getZ() >= -0.343)
+         return ( vtN:getZ() >= -0.359)
       end
    -- se trave medio-bassa
-   elseif b3Raw:getDimZ() <= 280 then
+   elseif b3Raw:getDimZ() < 281 then
       -- se tenone praticamente in asse, accetto fino a -25 deg
-      if abs( vtN:getY()) < 0.04 then
+      if abs( vtN:getY()) < 0.088 then
          return ( vtN:getZ() >= -0.422)
       -- altrimenti, accetto fino a -15 deg
       else
          return ( vtN:getZ() >= -0.259)
       end
    -- se trave media
-   elseif b3Raw:getDimZ() <= 350 then
+   elseif b3Raw:getDimZ() < 351 then
       -- se tenone praticamente in asse, accetto fino a -22 deg
-      if abs( vtN:getY()) < 0.04 then
+      if abs( vtN:getY()) < 0.088 then
          return ( vtN:getZ() >= -0.375)
       -- altrimenti, accetto fino a -10 deg
       else