DataBeam :

- piccoli aggiustamenti e affinamenti.

LuaLibs/BeamLib.lua

@@ -1,4 +1,4 @@
--- BeamLib.lua by Egaltech s.r.l. 2022/05/25
+-- BeamLib.lua by Egaltech s.r.l. 2022/06/25
 -- Libreria globale per Travi
 -- 2020/07/28 Corretto calcolo attacchi e uscite di lame per non uscire dalla faccia sotto.
 -- 2020/08/18 Aggiunto a GetNearestParalOpposite e GetNearestOrthoOpposite parametro opzionale vtNorm.
@@ -12,6 +12,7 @@
 -- 2022/04/05 Modifiche a GetNzLimDownUp per FAST.
 -- 2022/05/03 Ulteriore limitazione a GetNzLimDownUp per FAST.
 -- 2022/05/18 Correzioni e migliorie a PutStartNearestToEdge.
+-- 2022/06/25 Rese globali le funzioni GetChainSawBlockedAxis e GetChainSawInitAngs prima in ProcessLapJpoint.
 
 -- Tabella per definizione modulo
 local BeamLib = {}
@@ -735,5 +736,35 @@ function BeamLib.GetPhaseType( nPhase)
    return ( EgtGetInfo( EgtGetPhaseDisposition( nPhase) or GDB_ID.NULL, 'TYPE') or '')
 end
 
+---------------------------------------------------------------------
+function BeamLib.GetChainSawBlockedAxis( nInd)
+   if BD.GetChainSawBlockedAxis then
+      return BD.GetChainSawBlockedAxis( nInd)
+   else
+      if nInd == 1 then
+         return EgtIf( BD.C_SIMM, 'A=90', 'A=90')
+      else
+         return EgtIf( BD.C_SIMM, 'A=0', 'A=0')
+      end
+   end
+end
+
+---------------------------------------------------------------------
+function BeamLib.GetChainSawInitAngs( vtN, vtO, nInd)
+   if BD.GetChainSawInitAngs then
+      return BD.GetChainSawInitAngs( vtN, vtO, nInd)
+   else
+      if BD.C_SIMM then
+         return EgtIf( vtN:getY() > 0, 'C=180', 'C=-180')
+      else
+         if nInd == 1 then
+            return ''
+         else
+            return EgtIf( vtN:getY() > 0, 'C=180', 'C=-180')
+         end
+      end
+   end
+end
+
 -------------------------------------------------------------------------------------------------------------
 return BeamLib