diff --git a/Beam/BeamData.lua b/Beam/BeamData.lua index e172138..e3a5208 100644 --- a/Beam/BeamData.lua +++ b/Beam/BeamData.lua @@ -115,14 +115,32 @@ if EgtExistsFile( sData) then end --------------------------------------------------------------------- -local function GetChainSawBlockedAxis( nInd) - if nInd == 1 then - return 'A=90' +local function GetBlockedAxis( sHead, nToolType, sBlockedAxis) + -- lama + if nToolType == MCH_TY.SAW_STD or nToolType == MCH_TY.SAW_FLAT then + return '' + -- sega a catena + elseif nToolType == MCH_TY.MORTISE_STD then + if sHead == 'H3' then + if sBlockedAxis == 'parallel' then + return 'A=0' + elseif sBlockedAxis == 'perpendicular' then + return 'A=90' + end + else + return '' + end + -- fresa + elseif nToolType == MCH_TY.MILL_STD or nToolType == MCH_TY.MILL_NOTIP then + return '' + -- punta + elseif nToolType == MCH_TY.DRILL_STD or nToolType == MCH_TY.DRILL_LONG then + return '' else - return 'A=0' + return '' end end -BeamData.GetChainSawBlockedAxis = GetChainSawBlockedAxis +BeamData.GetBlockedAxis = GetBlockedAxis --------------------------------------------------------------------- local function GetMaxLenRidgeLapFromBottom( dHRaw) diff --git a/Essetre-FAST.mlde b/Essetre-FAST.mlde index 953479f..af65c7f 100644 --- a/Essetre-FAST.mlde +++ b/Essetre-FAST.mlde @@ -33,11 +33,12 @@ -- 2023/12/15 AV ver.2.5l2 Migliorato calcolo stima tempi di lavorazione -- 2024/01/19 DS ver 2.6a1 Piccola modifica per direzione preferenziale rinvio da sotto (per evitare di accedere dal lato della barra). -- 2024/01/29 DS ver 2.6a2 In portautensili per mortasa e sega a catena aggiunti ingombri dello stesso. +-- 2024/02/09 LM ver 2.6b1 In BeamData aggiunta funzione GetBlockedAxis che sostituisce la GetChainSawBlockedAxis. require( 'EmtGenerator') EgtEnableDebug( false) -PP_VER = '2.6a2' +PP_VER = '2.6b1' MIN_MACH_VER = '2.5k1' -- Parametri macchina