Merge branch 'develop'

- aggiunti ingombri portautensili per mortase e seghe a catena.

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)

Essetre-FAST.mlde

@@ -1,4 +1,4 @@
--- Descrizione macchina Essetre-FAST by EgalTech s.r.l.   2023/11/04
+-- Descrizione macchina Essetre-FAST by EgalTech s.r.l.   2024/01/19
 -- 2021/12/29 DS ver 2.3l4 Per NUM non va considerato MillOffs negli offset in Z.
 -- 2022/01/27 DS ver 2.4a2 Modifiche per tagli testa/coda su pezzi alti.
 -- 2022/02/10 DS ver 2.4a3 Ridotto di 10mm pinzaggio con pezzi alti ma sottili.
@@ -30,11 +30,15 @@
 -- 2023/11/04 DS ver 2.5k1 Eliminata testa H4. Aggiunta visualizzazione rinvio su TC.Aggiunta gestione MIN_MACH_VER per simulazione e generazione.
 -- 2023/12/13 AV ver.2.5l1 Piccola correzione per errore digitazione variabile in calcolo riposizionamento carrelli (SpecAdjustCarrB3)
 --                         Corretto segno di una variabile in calcolo posizionamento carrelli
+-- 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.5l1'
+PP_VER = '2.6b1'
 MIN_MACH_VER = '2.5k1'
 
 -- Parametri macchina
@@ -291,7 +295,7 @@ if SecondSupport >= 3 then
    EgtSetInfo( H5Id, 'AGB_DMAX', 240)
    EgtSetInfo( H5Id, 'AGB_ENCH', 44)
    EgtSetInfo( H5Id, 'AGB_ENCV', 380)
-   EgtSetInfo( H5Id, 'AGB_MDIR', -Y_AX())
+   EgtSetInfo( H5Id, 'AGB_MDIR', X_AX())
    EgtSetInfo( H5Id, 'ZMAXONROT', '1,15')
 end
 -- Morse

Essetre-FAST.mlpe

@@ -1233,6 +1233,7 @@ end
 function OnEstimPathStart()
    EMT.AUXTYPE = nil
    EMT.MCHMOVEFIRST = true
+   EMT.CHARMOVE = nil
 end
 
 ---------------------------------------------------------------------
@@ -1260,7 +1261,11 @@ function OnEstimPathStartAux()
       end
    -- altrimenti, spostamento carrelli
    else
-      if EMT.AUXTOT > 2 and EMT.AUXIND == EMT.AUXTOT then
+      local Cmd = EgtSplitString( EMT.AUX)
+      if ( Cmd[1] == '1' and Cmd[2] ~= 'Z') or Cmd[1] == '2' or Cmd[1] == '3' then
+         EMT.CHARMOVE = true
+      end
+      if EMT.AUXIND == EMT.AUXTOT and EMT.CHARMOVE then
          local dTime = ( EMT.AUXTOT - 2) * CHAR_ONE_MOVE_T
          EMT.TOTEXTTIME = EMT.TOTEXTTIME + dTime
          EmtTleAddMachining( 'Charriots move', EmtSecToHMS( dTime), '  -  ', '  -  ')