3dPrinting :

- correzioni per Extra Shell (estrusione su link e visualizzazione toolpath).

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