Merge remote-tracking branch 'origin/develop' into STR0003_BladePlusChainsaw

This commit is contained in:
luca.mazzoleni
2024-05-22 08:40:19 +02:00
4 changed files with 217 additions and 22 deletions
+180
View File
@@ -276,6 +276,186 @@ end
-- funzione per aggiungere una nuova lavorazione
-- TODO da fare
function MachiningLib.AddNewMachining( Machining)
local nErr
local sErr
-- Controllo parametri obbligatori
if not Machining.nType or not Machining.nToolIndex or not Machining.idProc or not Machining.idFaceToMachine then
return false
end
-- Drilling
if Machining.nType == MCH_MY.DRILLING then
Machining.sTypeName = 'Drill_'
-- Milling
elseif Machining.nType == MCH_MY.MILLING then
-- se utensile lama
if TOOLS[Machining.nToolIndex].sFamily == 'SAWBLADE' then
Machining.sTypeName = 'Cut'
else
Machining.sTypeName = 'Milling'
end
-- Pocketing
elseif Machining.nType == MCH_MY.POCKETING then
Machining.sTypeName = 'Pocketing'
-- Mortising
elseif Machining.nType == MCH_MY.MORTISING then
Machining.sTypeName = 'Mortising'
end
-- se nome non definito, assegno alla lavorazioen un nome standard
if not Machining.sOperationName then
Machining.sOperationName = Machining.sTypeName .. ( EgtGetName( Machining.idProc) or tostring( Machining.idProc)) .. '_' .. tostring( Machining.idFaceToMachine)
end
if not Machining.sToolName then
Machining.sToolName = TOOLS[Machining.nToolIndex].sName
end
-- creazione lavorazione
local nOperationId = EgtCreateMachining( Machining.sOperationName, Machining.nType, Machining.sToolName)
if nOperationId then
-- impostazione geometria
EgtSetMachiningGeometry( {{ Machining.idProc, Machining.idFaceToMachine}})
-- impostazione parametri lavorazione
if Machining.dDepth then
EgtSetMachiningParam( MCH_MP.DEPTH, Machining.dDepth)
end
if Machining.bInvert then
EgtSetMachiningParam( MCH_MP.INVERT, Machining.bInvert)
end
if Machining.nWorkside then
EgtSetMachiningParam( MCH_MP.WORKSIDE, Machining.nWorkside)
end
if Machining.nFaceuse then
EgtSetMachiningParam( MCH_MP.FACEUSE, Machining.nFaceuse)
end
if Machining.nSCC then
EgtSetMachiningParam( MCH_MP.SCC, Machining.nSCC)
end
if Machining.bToolInvert then
EgtSetMachiningParam( MCH_MP.TOOLINVERT, Machining.bToolInvert)
end
if Machining.sBlockedAxis then
EgtSetMachiningParam( MCH_MP.BLOCKEDAXIS, Machining.sBlockedAxis)
end
if Machining.sInitialAngles then
EgtSetMachiningParam( MCH_MP.INITANGS, Machining.sInitialAngles)
end
if Machining.nHeadSide then
EgtSetMachiningParam( MCH_MP.HEADSIDE, Machining.nHeadSide)
end
if Machining.nSubType then
EgtSetMachiningParam( MCH_MP.SUBTYPE, Machining.nSubType)
end
if Machining.dOverlap then
EgtSetMachiningParam( MCH_MP.OVERL, Machining.dOverlap)
end
-- step
if Machining.Steps then
if Machining.Steps.dStepType then
EgtSetMachiningParam( MCH_MP.STEPTYPE, Machining.Steps.dStepType)
end
if Machining.Steps.dStep then
EgtSetMachiningParam( MCH_MP.STEP, Machining.Steps.dStep)
end
if Machining.Steps.dSideStep then
EgtSetMachiningParam( MCH_MP.SIDESTEP, Machining.Steps.dSideStep)
end
end
if Machining.dStartPos then
EgtSetMachiningParam( MCH_MP.STARTPOS, Machining.dStartPos)
end
if Machining.dReturnPos then
EgtSetMachiningParam( MCH_MP.RETURNPOS, Machining.dReturnPos)
end
if Machining.dRadialOffset then
EgtSetMachiningParam( MCH_MP.OFFSR, Machining.dRadialOffset)
end
if Machining.dLongitudinalOffset then
EgtSetMachiningParam( MCH_MP.OFFSL, Machining.dLongitudinalOffset)
end
-- paraemtri attacco
if Machining.LeadIn then
if Machining.LeadIn.nType then
EgtSetMachiningParam( MCH_MP.LEADINTYPE, Machining.LeadIn.nType)
end
if Machining.LeadIn.dStartAddLength then
EgtSetMachiningParam( MCH_MP.STARTADDLEN, Machining.LeadIn.dStartAddLength)
end
if Machining.LeadIn.dTangentDistance then
EgtSetMachiningParam( MCH_MP.LITANG, Machining.LeadIn.dTangentDistance)
end
if Machining.LeadIn.dPerpDistance then
EgtSetMachiningParam( MCH_MP.LIPERP, Machining.LeadIn.dPerpDistance)
end
if Machining.LeadIn.dElevation then
EgtSetMachiningParam( MCH_MP.LIELEV, Machining.LeadIn.dElevation)
end
if Machining.LeadIn.dCompLength then
EgtSetMachiningParam( MCH_MP.LICOMPLEN, Machining.LeadIn.dCompLength)
end
end
-- parametri uscita
if Machining.LeadOut then
if Machining.LeadOut.nType then
EgtSetMachiningParam( MCH_MP.LEADOUTTYPE, Machining.LeadOut.nType)
end
if Machining.LeadOut.dEndAddLength then
EgtSetMachiningParam( MCH_MP.ENDADDLEN, Machining.LeadOut.dEndAddLength)
end
if Machining.LeadOut.dTangentDistance then
EgtSetMachiningParam( MCH_MP.LOTANG, Machining.LeadOut.dTangentDistance)
end
if Machining.LeadOut.dPerpDistance then
EgtSetMachiningParam( MCH_MP.LOPERP, Machining.LeadOut.dPerpDistance)
end
if Machining.LeadOut.dElevation then
EgtSetMachiningParam( MCH_MP.LOELEV, Machining.LeadOut.dElevation)
end
if Machining.LeadOut.dCompLength then
EgtSetMachiningParam( MCH_MP.LOCOMPLEN, Machining.LeadOut.dCompLength)
end
end
if Machining.dStartSlowLen then
EgtSetMachiningParam( MCH_MP.STARTSLOWLEN, Machining.dStartSlowLen)
end
if Machining.dEndSlowLen then
EgtSetMachiningParam( MCH_MP.ENDSLOWLEN, Machining.dEndSlowLen)
end
if Machining.dThrouAddLen then
EgtSetMachiningParam( MCH_MP.THROUADDLEN, Machining.dThrouAddLen)
end
-- parametri da settare nelle note
local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES)
if Machining.dMaxElev then
sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', Machining.dMaxElev)
end
EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes)
local bIsApplyOk = MachiningLib.ApplyMachining( true, false)
if not bIsApplyOk then
nErr, sErr = EgtGetLastMachMgrError()
EgtSetOperationMode( nOperationId, false)
return false
end
else
return false
end
return true, sErr
end
-------------------------------------------------------------------------------------------------------------
function MachiningLib.ApplyMachining( bRecalc, bApplyPost)
local bResult = EgtApplyMachining( bRecalc, bApplyPost)
return bResult
end
-------------------------------------------------------------------------------------------------------------