From 31172238d8b438e33305c7478e7bd8d1b95cd20d Mon Sep 17 00:00:00 2001 From: "luca.mazzoleni" Date: Tue, 31 Oct 2023 16:41:10 +0100 Subject: [PATCH] - In LpJoint -> IsToolDoubleOk permessa una lunghezza inferiore di 5.5mm dell'utensile secondario rispetto al principale --- LuaLibs/WMachiningLib.lua | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/LuaLibs/WMachiningLib.lua b/LuaLibs/WMachiningLib.lua index acce115..d41caad 100644 --- a/LuaLibs/WMachiningLib.lua +++ b/LuaLibs/WMachiningLib.lua @@ -7,6 +7,7 @@ -- 2023/07/13 In FindMilling, FindPocketing aggiunta la possibilità di limitare la ricerca lavorazioni alla sola testa specificata. -- 2023/10/18 In SetCurrMachiningAndTool sostituito controllo di utensile attivo con controllo utensile nel setup corrente. -- 2023/10/30 In FindPocketing aggiunto parametro per poter escludere le frese che non lavorano di testa. +-- 2023/10/31 In IsToolDoubleOk permessa una lunghezza inferiore di 5.5mm dell'utensile secondario rispetto al principale. -- Tabella per definizione modulo local WMachiningLib = {} @@ -226,11 +227,11 @@ function WMachiningLib.IsToolDoubleOk( sToolMasterName, sToolDoubleName) local dTDiamThDouble = EgtTdbGetCurrToolThDiam() or 0 local bHasTipFeedDouble = EgtTdbGetCurrToolParam( MCH_TP.TIPFEED) ~= 0 local dTMaxDepthOnSideDouble = EgtIf( bIsBladeDouble, EgtTdbGetCurrToolParam( MCH_TP.MAXMAT), min( EgtTdbGetCurrToolValInNotes( MCH_TP.USERNOTES, 'SIDEDEPTH', 'd') or 999, 0.5 * ( dTDiamDouble - dTDiamThDouble))) - -- controllo che siano uguali + -- controllo che siano uguali ( permetto una leggera differenza di lunghezza) bIsToolDoubleOk = bIsPrimaryHead and ( bIsBlade == bIsBladeDouble) and ( dTMaxMatDouble > dTMaxMat - 100 * GEO.EPS_SMALL) and - ( dTMaxDepthDouble > dTMaxDepth - 100 * GEO.EPS_SMALL) and + ( dTMaxDepthDouble > dTMaxDepth - 5.5) and ( abs( dTDiam - dTDiamDouble) < 100 * GEO.EPS_SMALL) and ( abs( dTDiamTh - dTDiamThDouble) < 100 * GEO.EPS_SMALL) and ( bHasTipFeed == bHasTipFeedDouble) and