From 102bdc8018c1e0157356678860d9e46e4ec892cc Mon Sep 17 00:00:00 2001 From: "luca.mazzoleni" Date: Fri, 20 Feb 2026 12:00:52 +0100 Subject: [PATCH] - in FreeContoru.MakeByMill aggiunto Q10 per forzare MaxElev (come in LapJoint) --- LuaLibs/ProcessFreeContour.lua | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/LuaLibs/ProcessFreeContour.lua b/LuaLibs/ProcessFreeContour.lua index ea0a8c7..9309fc7 100644 --- a/LuaLibs/ProcessFreeContour.lua +++ b/LuaLibs/ProcessFreeContour.lua @@ -34,6 +34,7 @@ local Q_RADIAL_OFFSET = 'Q06' -- d, valido solo per pocket local Q_IGNORE_LASER_PROBLEMS = 'Q07' local Q_FORCE_CLAMPABLE_AREA = 'Q08' local Q_INVERT_LAST_PATH = 'Q09' +local Q_MAX_ELEVATION = 'Q10' -- d --------------------------------------------------------------------- -- Riconoscimento della feature @@ -631,6 +632,14 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead) EgtOutLog( sErr) return false, sErr end + -- eventuale elevazione forzata + local dCustomMaxElev = EgtGetInfo( Proc.Id, Q_MAX_ELEVATION, 'd') + if dCustomMaxElev and dCustomMaxElev < 1 then dCustomMaxElev = nil end + if dCustomMaxElev then + local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or '' + sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dCustomMaxElev, 1)) + EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes) + end -- assegno affondamento EgtSetMachiningParam( MCH_MP.DEPTH, dDepth) end