diff --git a/Beam/BeamData.lua b/Beam/BeamData.lua index 1a350fa..f3b6829 100644 --- a/Beam/BeamData.lua +++ b/Beam/BeamData.lua @@ -206,5 +206,40 @@ local function GetChainSawInitAngs( vtN, vtO, nInd) end BeamData.GetChainSawInitAngs = GetChainSawInitAngs +--------------------------------------------------------------------- +local function GetSetupInfo( sHead) + local SetupInfo = {} + + -- dati comuni + SetupInfo.bIsCSymmetric = true + SetupInfo.dCAxisEncumbrance = 180 + SetupInfo.bToolOnAggregate = false + + -- testa 5 assi da sopra + if sHead == 'H11' or sHead == 'H21' then + SetupInfo.bIsTopHead = true + SetupInfo.bIsBottomHead = not SetupInfo.bIsTopHead + SetupInfo.dMaxNegativeAngle = sin( -45) + -- lama su testa 5 assi da sopra + elseif sHead == 'H12' or sHead == 'H22' then + SetupInfo.bIsTopHead = true + SetupInfo.bIsBottomHead = not SetupInfo.bIsTopHead + SetupInfo.dMaxNegativeAngle = sin( -45) + -- motosega 1 + elseif sHead == 'H13' or sHead == 'H23' then + SetupInfo.bIsTopHead = true + SetupInfo.bIsBottomHead = not SetupInfo.bIsTopHead + SetupInfo.dMaxNegativeAngle = 0 + -- motosega 2 + elseif sHead == 'H15' then + SetupInfo.bIsBottomHead = true + SetupInfo.bIsTopHead = not SetupInfo.bIsBottomHead + SetupInfo.dMaxPositiveAngle = 0 + end + + return SetupInfo +end +BeamData.GetSetupInfo = GetSetupInfo + --------------------------------------------------------------------- return BeamData diff --git a/Common_ONE-PF.NUM.mlpe b/Common_ONE-PF.NUM.mlpe index 24f3ef4..83a5652 100644 --- a/Common_ONE-PF.NUM.mlpe +++ b/Common_ONE-PF.NUM.mlpe @@ -439,7 +439,7 @@ function OnMachiningStart() -- gestione eventuale lavorazione in doppio local nDouType = EgtGetValInNotes( EMT.MCHUSERNOTES, 'DOUBLE', 'i') if nDouType == 2 or nDouType == 3 then - local sDouTool = EgtGetValInNotes( EMT.TUSERNOTES, 'DOUBLE', 's') or '' + local sDouTool = EgtGetValInNotes( EMT.MCHUSERNOTES, 'TOOLDOUBLE', 's') or EgtGetValInNotes( EMT.TUSERNOTES, 'DOUBLE', 's') or '' local sOldTool = EgtTdbGetCurrToolParam( MCH_TP.NAME) if EgtTdbSetCurrTool( sDouTool) and EgtTdbGetCurrToolParam( MCH_TP.ACTIVE) then -- salvo dati diff --git a/Essetre-PF.mlde b/Essetre-PF.mlde index b1bd0f0..c9181e8 100644 --- a/Essetre-PF.mlde +++ b/Essetre-PF.mlde @@ -57,12 +57,14 @@ -- Aggiunto parametro ForceToCloseRollersGate -- 2024/04/30 ver 2.6e1 Allineamento con common ver. 2.6e1 -- Aggiunta variabile WoodDensity per gestione WOOD_DENSITY +-- 2024/06/03 ver 2.6f1 Aggiunta funzione GetSetupInfo a BeamData per nuovo automatismo +-- Allineamento con common ver. 2.6f1 -- Intestazioni require( 'EmtGenerator') EgtEnableDebug( false) -PP_VER = '2.6e1' +PP_VER = '2.6f1' MIN_MACH_VER = '2.5k1' MACH_NAME = 'Essetre-PF' diff --git a/UpdateLog.txt b/UpdateLog.txt index 97dd0ce..77d3009 100644 --- a/UpdateLog.txt +++ b/UpdateLog.txt @@ -1,5 +1,8 @@ ==== Common_ONE-PF Update Log ==== +Versione 2.6f1 (03/06/2024) +- (GEN) Aggiunta possibilità di scrivere nome utensile doppio anche in lavorazione con parametro "TOOLDOUBLE". Note sulla lavorazione hanno precedenza su note utensile. + Versione 2.6e1 (30/04/2024) - (GEN) Chiamando la macchina con un nome che termini con '.TEST' si abilita come macchina per test interni, equivalente a settare 'IS_TEST_MACHINE' (che comunque rimane) - (SIM) In log collisioni, si scrive anche ID del gruppo per facilitare riconoscimento in caso di collisione diff --git a/Version.lua b/Version.lua index 037a82d..beebc53 100644 --- a/Version.lua +++ b/Version.lua @@ -3,7 +3,7 @@ local InfoCommon_STD_PP = { NAME = 'Common_ONE-PF', -- nome script PP standard - VERSION = '2.6e1', -- versione script + VERSION = '2.6f1', -- versione script MIN_MACH_VER_PP_COMMON = '2.5k1' -- versione minima kernel }