diff --git a/LuaLibs/RunSlicing.lua b/LuaLibs/RunSlicing.lua index c39d4eb..8c942d4 100644 --- a/LuaLibs/RunSlicing.lua +++ b/LuaLibs/RunSlicing.lua @@ -151,6 +151,15 @@ function RunSlicing.Exec() local sMachIni = EgtGetCurrMachineDir() .. '\\' .. EgtGetCurrMachineName() .. '.ini' local HMax = tonumber( EgtGetStringFromIni( '3dPrinting', 'HMax', 500, sMachIni)) + -- disegno lo start point + local nPntId = EgtGetFirstNameInGroup( nPartId, KEY_START_POINT) + if nPntId then EgtErase( nPntId) end + local nParamsGrp = EgtGetFirstNameInGroup( GDB_ID.ROOT, PARAMS_GRP) + local pt = EgtGetInfo( nParamsGrp, KEY_START_POINT, 'p') + nPntId = EgtPoint( nPartId, pt, GDB_RT.GLOB) + EgtSetColor( nPntId, EgtStdColor("RED")) + EgtSetName( nPntId, KEY_START_POINT) + -- Calcolo delle fette CSLICES.Exec( nPartId, nStmId, HMax) EgtDraw()