Files
egwwindowlua/CAMAuto/Strategies/Pocketing.lua
T
Annamaria Sassi b667854683 Window :
- modificato ordinamento lavorazioni profili longitudinali
- aggiunte lavorazioni di svuotatura.
2026-09-02 15:27:53 +02:00

64 lines
2.5 KiB
Lua

-- Pocketing.lua by Egalware s.r.l. 2024/06/13
-- Libreria esecuzione lavorazioni per Serramenti -> Lavorazione di svuotatura
-- Tabella per definizione modulo
local Pocketing = {}
-- Include
require( 'EgtBase')
-- Carico i dati globali
local WinData = require( 'WinData')
local MachiningLib = require( 'MachiningLib')
EgtOutLog( ' Pocketing started', 1)
EgtMdbSave()
-------------------------------------------------------------------------------------------------------------
-- funzione che decide se eseguire le forature dopo le profilature. Solo forature di testa inclinate. Altrimenti sempre prima.
local function IsPocketToMachineAfterProfile( Proc)
local bExecAfterProfile = false
if Proc.AffectedFaces.bTop then
bExecAfterProfile = true
end
return bExecAfterProfile
end
-------------------------------------------------------------------------------------------------------------
function Pocketing.Make( Proc, Part)
local Machining = { LeadIn = {}, LeadOut = {}, Steps = {}}
local AuxiliaryData = {}
local ToolSearchParameters = {}
-- cerco utensile svuotatura
ToolSearchParameters.sType = 'MILL_STD'
ToolSearchParameters.dElevation = Proc.dLength
ToolSearchParameters.vDirection = Proc.vtDir
ToolSearchParameters.bIsVerticalHead = AreSameVectorApprox( Proc.vtDir, Vector3d(0,0,1))
ToolSearchParameters.bIsHorizontalHead = not ToolSearchParameters.bIsVerticalHead
local ToolInfo = MachiningLib.FindMill( Proc, ToolSearchParameters)
-- se trovato utensile
if ToolInfo.nToolIndex then
Machining.nType = MCH_OY.POCKETING
Machining.nSubType = MCH_POCK_SUB.SPIRALOUT
Machining.LeadIn.nType = MCH_POCK_LI.HELIX
Machining.Steps.dStep = TOOLS[ToolInfo.nToolIndex].dStep
Machining.Steps.dSideStep = TOOLS[ToolInfo.nToolIndex].dSideStep
Machining.nToolIndex = ToolInfo.nToolIndex
Machining.LeadIn.dTangentDistance = TOOLS[ToolInfo.nToolIndex].dDiameter/2
Machining.LeadIn.dElevation = TOOLS[ToolInfo.nToolIndex].dDiameter/2
Machining.sDepth = Proc.dLength
Machining.Geometry = Proc.id
AuxiliaryData.nIndexMachining = 1
AuxiliaryData.nPhase = MachiningLib.GetPhaseMach( Proc)
AuxiliaryData.bExecAfterProfile = IsPocketToMachineAfterProfile( Proc)
MachiningLib.AddNewMachining( Proc, Machining, AuxiliaryData)
return true
end
-- non ha trovato un utensile valido
return false
end
-------------------------------------------------------------------------------------------------------------
return Pocketing