From 69f97362b9beeac04d3ebeddfa52ece4a603533b Mon Sep 17 00:00:00 2001 From: "andrea.villa" Date: Wed, 22 May 2024 09:26:33 +0200 Subject: [PATCH] - MachiningLib scrittura parametri di sistema - Piccola correzione STR0002 per uniformare a nuovi nomi parametri --- LuaLibs/BeamExec.lua | 2 +- LuaLibs/MachiningLib.lua | 11 ++++++++++- Strategies/STR0002/STR0002.lua | 17 ++++++++--------- 3 files changed, 19 insertions(+), 11 deletions(-) diff --git a/LuaLibs/BeamExec.lua b/LuaLibs/BeamExec.lua index e956ad0..20ae93b 100644 --- a/LuaLibs/BeamExec.lua +++ b/LuaLibs/BeamExec.lua @@ -874,7 +874,7 @@ end -- ordino le features -- OrderFeatures( vProc, Part) - -- TODO PROVVISORIO in atesa di scelta lavorazione in fase opportuna + -- TODO PROVVISORIO in attesa di scelta lavorazione in fase opportuna vProc = vProcRot[1] -- TODO da fare diff --git a/LuaLibs/MachiningLib.lua b/LuaLibs/MachiningLib.lua index 4b94909..0bd80c2 100644 --- a/LuaLibs/MachiningLib.lua +++ b/LuaLibs/MachiningLib.lua @@ -298,7 +298,16 @@ function MachiningLib.AddNewMachining( Machining) if Machining.dThrouAddLen then EgtSetMachiningParam( MCH_MP.THROUADDLEN, Machining.dThrouAddLen) end - -- parametri da settare nelle note + + -- parametri da settare nelle note di sistema + -- TODO da decidere quali sono le note da salvare qui. Probabilmente tutte quelle relative all'ordine delle lavorazioni + local sSystemNotes = EgtGetMachiningParam( MCH_MP.SYSNOTES) + --if Machining.nMachiningOrder then + -- sSystemNotes = EgtSetValInNotes( sSystemNotes, 'MachiningOrder', Machining.nMachiningOrder) + --end + EgtSetMachiningParam( MCH_MP.SYSNOTES, sSystemNotes) + + -- parametri da settare nelle note utente local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) if Machining.dMaxElev then sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', Machining.dMaxElev) diff --git a/Strategies/STR0002/STR0002.lua b/Strategies/STR0002/STR0002.lua index 20a320a..c20d32e 100644 --- a/Strategies/STR0002/STR0002.lua +++ b/Strategies/STR0002/STR0002.lua @@ -46,7 +46,7 @@ function STR0002.Make( AddMachining, Proc, Part, CustomParameters) EgtOutLog( sErr) return false, sErr end - + local ToolInfo = {} local Pocketing = {} Pocketing.Steps = {} @@ -147,14 +147,14 @@ function STR0002.Make( AddMachining, Proc, Part, CustomParameters) for i = 1, #vAddId do Pocketing.nToolIndex = ToolInfo.nToolIndex Pocketing.nType = MCH_OY.POCKETING - Pocketing.sOperationName = 'Svuotatura' Pocketing.Steps.dStep = TOOLS[ToolInfo.nToolIndex].dStep - Pocketing.dDepth = ToolInfo.dMaxMatReduction + Pocketing.dDepth = min( 0, -ToolInfo.dResidualDepth) Pocketing.Steps.dSideStep = TOOLS[ToolInfo.nToolIndex].dSideStep Pocketing.nSubType = MCH_POCK_SUB.SPIRALOUT Pocketing.LeadIn.nType = MCH_POCK_LI.ZIGZAG - Pocketing.LeadIn.TangentDistance = TOOLS[ToolInfo.nToolIndex].dDiameter/2 - Pocketing.LeadIn.Elevation = TOOLS[ToolInfo.nToolIndex].dDiameter/2 + Pocketing.LeadIn.dTangentDistance = TOOLS[ToolInfo.nToolIndex].dDiameter/2 + Pocketing.LeadIn.dElevation = TOOLS[ToolInfo.nToolIndex].dDiameter/2 + -- TODO settare parametro per indicare qual รจ lo spezzone che deve essere fatto dopo il taglio di separazione for j=1, Proc.nFct do local vtNSplitFace _, vtNSplitFace = EgtSurfTmFacetCenter( vAddId[i], j - 1, GDB_ID.ROOT) @@ -169,14 +169,13 @@ function STR0002.Make( AddMachining, Proc, Part, CustomParameters) else Pocketing.nToolIndex = ToolInfo.nToolIndex Pocketing.nType = MCH_OY.POCKETING - Pocketing.sOperationName = 'Svuotatura' Pocketing.Steps.dStep = TOOLS[ToolInfo.nToolIndex].dStep - Pocketing.dDepth = ToolInfo.dMaxMatReduction + Pocketing.dDepth = min( 0, -ToolInfo.dResidualDepth) Pocketing.Steps.dSideStep = TOOLS[ToolInfo.nToolIndex].dSideStep Pocketing.nSubType = MCH_POCK_SUB.SPIRALOUT Pocketing.LeadIn.nType = MCH_POCK_LI.ZIGZAG - Pocketing.LeadIn.TangentDistance = TOOLS[ToolInfo.nToolIndex].dDiameter/2 - Pocketing.LeadIn.Elevation = TOOLS[ToolInfo.nToolIndex].dDiameter/2 + Pocketing.LeadIn.dTangentDistance = TOOLS[ToolInfo.nToolIndex].dDiameter/2 + Pocketing.LeadIn.dElevation = TOOLS[ToolInfo.nToolIndex].dDiameter/2 Pocketing.idFaceToMachine = Proc.MainFaces.BottomFace.id Pocketing.idProc = Proc.id MachiningLib.AddNewMachining( Pocketing)