Egalware/databeamnew
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- MachiningLib scrittura parametri di sistema

Browse Source 
- Piccola correzione STR0002 per uniformare a nuovi nomi parametri
This commit is contained in:
andrea.villa
2024-05-22 09:26:33 +02:00
parent 32a16f97f3
commit 69f97362b9
3 changed files with 19 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files
LuaLibs/BeamExec.lua
+1 -1
View File
@@ -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
LuaLibs/MachiningLib.lua
+10 -1
View File
@@ -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)
Strategies/STR0002/STR0002.lua
+8 -9
View File
@@ -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)