DataBeam :

- unificate Pocket e Notch con LapJoint
- correzioni varie.

LuaLibs/ProcessFreeContour.lua

@@ -1,4 +1,4 @@
--- ProcessFreeContour.lua by Egaltech s.r.l. 2019/04/13
+-- ProcessFreeContour.lua by Egaltech s.r.l. 2019/06/13
 -- Gestione calcolo profilo libero per Travi
 
 -- Tabella per definizione modulo
@@ -60,18 +60,20 @@ end
 ---------------------------------------------------------------------
 -- Classificazione della feature
 function ProcessFreeContour.Classify( Proc)
-   -- se di testa o coda, è indifferente alla posizione
-   if Proc.Head or Proc.Tail then
+   -- verifico se di tipo pocket
+   local bPocket = ( EgtGetInfo( Proc.Id, 'PCKT', 'i') == 1)
+   -- se non è pocket, è indifferente alla posizione
+   if not bPocket then
       return true, false
    end
-   -- è intermedia, devo verificare la normale del centro
-   local nMidFacet = Proc.Fct // 2
-   local ptC, vtN = EgtSurfTmFacetCenter( Proc.Id, nMidFacet, GDB_ID.ROOT)
+   -- è pocket, devo verificare la normale del piano di svuotatura (sempre ultima faccia)
+   local nFacet = Proc.Fct - 1
+   local ptC, vtN = EgtSurfTmFacetCenter( Proc.Id, nFacet, GDB_ID.ROOT)
    -- verifico sia una superficie
    if not vtN then
       return false
    end
-   -- verifico se la feature è lavorabile solo da sotto
+   -- verifico se la feature è lavorabile solo da sotto (tasca con normale verso il basso)
    local bDown = ( vtN:getZ() < - 0.1)
    return true, bDown
 end