DataWall :

- modifiche, migliorie e correzioni varie.

LuaLibs/WallLib.lua

@@ -1,4 +1,4 @@
--- WallLib.lua by Egaltech s.r.l. 2020/06/24
+-- WallLib.lua by Egaltech s.r.l. 2020/07/15
 -- Libreria globale per Pareti
 
 -- Tabella per definizione modulo
@@ -222,5 +222,36 @@ function WallLib.GetFaceHvRefDim( nSurfId, nFacet)
    return frHV, b3HV:getDimX(), b3HV:getDimY()
 end
 
+---------------------------------------------------------------------
+function WallLib.GetNearestParalOpposite( vtRef)
+   -- devo confrontare la componente orizzontale con quella verticale
+   local dHorSq = vtRef:getX() * vtRef:getX() + vtRef:getY() * vtRef:getY()
+   local dVertSq =vtRef:getZ() * vtRef:getZ()
+   -- se prevalente la componente orizzontale
+   if dHorSq >= dVertSq then
+      if abs( vtRef:getX()) > abs( vtRef:getY()) then
+         if vtRef:getX() > 0 then
+            return MCH_MILL_FU.PARAL_LEFT
+         else
+            return MCH_MILL_FU.PARAL_RIGHT
+         end
+      else
+         if vtRef:getY() > 0 then
+            return MCH_MILL_FU.PARAL_FRONT
+         else
+            return MCH_MILL_FU.PARAL_BACK
+         end
+      end
+   -- altrimenti prevale la verticale
+   else
+      if vtRef:getZ() > 0 then
+         return MCH_MILL_FU.PARAL_DOWN
+      else
+         return MCH_MILL_FU.PARAL_TOP
+      end
+   end
+   return nil
+end
+
 -------------------------------------------------------------------------------------------------------------
 return WallLib