From 8660ae3742e4bde29ae8441a7cce9ef66d31575a Mon Sep 17 00:00:00 2001
From: "andrea.villa" <andrea.villa@egalware.com>
Date: Wed, 28 Feb 2024 14:26:51 +0100
Subject: [PATCH] =?UTF-8?q?Forzata=20In=20Mortise.Make,=20SPIRAL=5FIN=20se?=
 =?UTF-8?q?=20c'=C3=A8=20anche=20un=20solo=20lato=20aperto?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 LuaLibs/ProcessMortise.lua | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/LuaLibs/ProcessMortise.lua b/LuaLibs/ProcessMortise.lua
index fcb2478..5cfa542 100644
--- a/LuaLibs/ProcessMortise.lua
+++ b/LuaLibs/ProcessMortise.lua
@@ -14,6 +14,7 @@
 -- 2023/07/21 Correzioni per mortise passanti con curva Aux che guarda in basso.
 -- 2023/08/10 Modificata scelta SCC per tasche in Y+/- in coda o quasi.
 -- 2024/01/18 Implementata GetBlockedAxis che gestisce gli assi bloccati per tutti i tipi di utensile.
+-- 2024/02/28 Forzata SPIRAL_IN se c'è anche un solo lato aperto
 
 -- Tabella per definizione modulo
 local ProcessMortise = {}
@@ -463,6 +464,13 @@ function ProcessMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    if bRevertSide then
       EgtSetMachiningParam( MCH_MP.TOOLINVERT, true)
    end
+
+   -- se ho anche solo un lato aperto, forzo SPIRAL-IN
+   local vOpen = EgtGetInfo( AuxId, 'OPEN', 'vi')
+   if vOpen and #vOpen > 0 then
+      EgtSetMachiningParam( MCH_MP.SUBTYPE, MCH_POCK_SUB.SPIRALIN)
+   end
+
    -- aggiungo geometria
    EgtSetMachiningGeometry( {{ AuxId, -1}})
    -- sistemo la direzione di lavoro