In BeamData aggiunta funzione GetBlockedAxis che sostituisce la GetChainSawBlockedAxis.

Beam/BeamData.lua

@@ -170,14 +170,32 @@ end
 BeamData.GetMinUnloadableRaw = GetMinUnloadableRaw
 
 ---------------------------------------------------------------------
-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 == 'H23' 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 GetChainSawInitAngs( vtN, vtO, nInd)

Essetre-PFMAXrl.mlde

@@ -6,12 +6,13 @@
 -- 2024/02/07 ver 2.6b2 Allineamento con common ver 2.6a6
 --                      In BeamData, parametro VICE_MINH portato a 1000
 -- 2024/02/12 ver 2.6b3 Allineamento con common ver. 2.6a7
+-- 2024/02/19 ver 2.6b4 In BeamData aggiunta funzione GetBlockedAxis che sostituisce la GetChainSawBlockedAxis.
 
 -- Intestazioni
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.6b3'
+PP_VER = '2.6b4'
 MIN_MACH_VER = '2.5k1'
 
 local sBaseDir = EgtGetSourceDir()