diff --git a/LuaLibs/AddManData.lua b/LuaLibs/AddManData.lua
index 07ace81..2b96f3b 100644
--- a/LuaLibs/AddManData.lua
+++ b/LuaLibs/AddManData.lua
@@ -24,6 +24,7 @@ COASTING_CRV = "Coasting"
 WIPE_CRV = "Wipe"
 LEAD_IN_CRV = "LeadIn"
 LEAD_OUT_CRV = "LeadOut"
+LINK_CRV = "Link"
 FRAME_PART = "FramePart"
 START_GEOM = "Start"
 TOT_SHELL_TRIM_SURF = "TotalShellSurfForTrim"
diff --git a/LuaLibs/CalcToolPath.lua b/LuaLibs/CalcToolPath.lua
index 02f1714..0d202e3 100644
--- a/LuaLibs/CalcToolPath.lua
+++ b/LuaLibs/CalcToolPath.lua
@@ -1,4 +1,4 @@
--- CalcToolPath.lua by Egaltech s.r.l. 2022/09/21
+-- CalcToolPath.lua by Egaltech s.r.l. 2022/10/01
 -- Calcolo percorsi di lavoro per Stampa 3d
 
 -- Tabella per definizione modulo
@@ -120,6 +120,7 @@ local function AddLink( vCrv, nTpathGrpId, nLinkType, dLinkParam, dSPOffs, dStra
                   EgtRelocate( nLinkId, vCrv[i], GDB_IN.BEFORE)
                   EgtModifyCurveExtrusion( nLinkId, vtSlicing, GDB_RT.GLOB)
                   EgtSetInfo( nLinkId, KEY_TYPE, TYPE.LINK)
+                  EgtSetName( nLinkId, LINK_CRV)
                end
             end
          end
@@ -822,18 +823,18 @@ local function CalcAuxSolidsToolPath( nAuxSolidsGrp, nAuxSolidsPathGrp, nTpathGr
             local dCoastingLen = EgtGetInfo( nSolidId, KEY_AUX_SOLIDS_COASTING_LEN, 'd')
             local dWipeLen = EgtGetInfo( nSolidId, KEY_AUX_SOLIDS_WIPE_LEN, 'd')
             local dWipeDir = EgtGetInfo( nSolidId, KEY_AUX_SOLIDS_WIPE_DIR, 'd')
-            
+
             -- copio i percorsi nel gruppo toolpath        
             local nPrev = EgtGetLastInGroup( nTpathGrpId)
             for i = 1, #vEntIds do
                local nNewEnt = EgtCopyGlob( vEntIds[i], nPrev, EgtIf( i == 1 or nOrder == PRINT_ORDER.EXT_INT_INF, GDB_IN.AFTER, GDB_IN.BEFORE))
-            
+
                -- correggo posizione
                EgtMove( nNewEnt, dCorrZ * Z_AX(), GDB_RT.GLOB)
                EgtMove( nNewEnt, LayerParams.dLayHeight * LayerParams.vtSlicing, GDB_RT.GLOB)            
                EgtModifyCurveExtrusion( nNewEnt, LayerParams.vtSlicing, GDB_RT.GLOB)
                EgtSetInfo( nNewEnt, KEY_TYPE, TYPE.AUX_SOLID)
-               
+
                if EgtCurveIsClosed( nNewEnt) then
                   EgtSetInfo( nNewEnt, KEY_CLOSED_CRV, 1)
                   -- eventuale inversione curva
@@ -949,6 +950,7 @@ function CalcToolPath.Exec( nPartId)
             
             EgtModifyCurveExtrusion( nNewEntId, LayerParams.vtSlicing, GDB_RT.GLOB)
             EgtSetColor( nNewEntId, EgtStdColor('GRAY'))
+            EgtSetStatus( nNewEntId, GDB_ST.ON)
             nEntId = EgtGetNext( nEntId)
          end
 
@@ -967,7 +969,9 @@ function CalcToolPath.Exec( nPartId)
                local ptE = EgtSP( nCurr)
                local nLinkId = EgtCurveCompoFromPoints( nTpathGrpId, {ptS, ptE})
                EgtRelocateGlob( nLinkId, nCurr, GDB_IN.BEFORE)
+               EgtModifyCurveExtrusion( nLinkId, LayerParams.vtSlicing, GDB_RT.GLOB)
                EgtSetInfo( nLinkId, KEY_TYPE, TYPE.LINK)
+               EgtSetName( nLinkId, LINK_CRV)
             end
             sPrevName = sCurrName
             nPrev = nCurr