DataBeam :
- nelle lavorazioni dei Profili si fa il pretaglio solo se toglie abbastanza materiale (sua elevazione almeno 20mm).
This commit is contained in:
@@ -1,4 +1,4 @@
|
||||
-- ProcessProfCamb.lua by Egaltech s.r.l. 2020/05/22
|
||||
-- ProcessProfCamb.lua by Egaltech s.r.l. 2020/10/06
|
||||
-- Gestione calcolo profilo caudato per Travi
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
@@ -227,12 +227,12 @@ function ProcessProfCamb.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
|
||||
local dToolMaxDepth = 0
|
||||
local dMillDiam = 0
|
||||
local sMilling
|
||||
-- se smusso non è esclusivo
|
||||
-- se smusso non è esclusivo, aggiungo sgrossatura con taglio di lama
|
||||
if nChamfer < 2 then
|
||||
-- aggiungo taglio di lama di sgrossatura e lo lavoro
|
||||
local ptStart, vtNP = GetSawCutData( AuxId, vtNF)
|
||||
local AddId = EgtSurfTmPlaneInBBox( nAddGrpId, ptStart, vtNP, b3Solid, GDB_RT.GLOB)
|
||||
if AddId then
|
||||
if AddId and BL.GetFaceElevation( AddId, 0, nPartId) > 20.0 then
|
||||
EgtSetName( AddId, 'AddCut_' .. tostring( Proc.Id))
|
||||
EgtSetInfo( AddId, 'TASKID', Proc.TaskId)
|
||||
-- applico la lavorazione
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
-- ProcessProfConcave.lua by Egaltech s.r.l. 2020/05/22
|
||||
-- ProcessProfConcave.lua by Egaltech s.r.l. 2020/10/06
|
||||
-- Gestione calcolo profilo concavo per Travi
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
@@ -226,12 +226,12 @@ function ProcessProfConcave.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
|
||||
if nChamfer < 0 then
|
||||
return false, sChamfer
|
||||
end
|
||||
-- se smusso non è esclusivo
|
||||
-- se smusso non è esclusivo, aggiungo sgrossatura con taglio di lama
|
||||
if nChamfer < 2 then
|
||||
-- aggiungo taglio di lama di sgrossatura e lo lavoro
|
||||
local ptStart, vtNP = GetSawCutData( AuxId, vtN)
|
||||
local AddId = EgtSurfTmPlaneInBBox( nAddGrpId, ptStart, vtNP, b3Solid, GDB_RT.GLOB)
|
||||
if AddId then
|
||||
if AddId and BL.GetFaceElevation( AddId, 0, nPartId) > 20.0 then
|
||||
EgtSetName( AddId, 'AddCut_' .. tostring( Proc.Id))
|
||||
EgtSetInfo( AddId, 'TASKID', Proc.TaskId)
|
||||
-- applico la lavorazione
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
-- ProcessProfConvex.lua by Egaltech s.r.l. 2020/05/22
|
||||
-- ProcessProfConvex.lua by Egaltech s.r.l. 2020/10/06
|
||||
-- Gestione calcolo profilo convesso per Travi
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
@@ -226,12 +226,12 @@ function ProcessProfConvex.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
|
||||
if nChamfer < 0 then
|
||||
return false, sChamfer
|
||||
end
|
||||
-- se smusso non è esclusivo
|
||||
-- se smusso non è esclusivo, aggiungo sgrossatura con taglio di lama
|
||||
if nChamfer < 2 then
|
||||
-- aggiungo taglio di lama di sgrossatura e lo lavoro
|
||||
local ptStart, vtNP = GetSawCutData( AuxId, vtN)
|
||||
local AddId = EgtSurfTmPlaneInBBox( nAddGrpId, ptStart, vtNP, b3Solid, GDB_RT.GLOB)
|
||||
if AddId then
|
||||
if AddId and BL.GetFaceElevation( AddId, 0, nPartId) > 20.0 then
|
||||
EgtSetName( AddId, 'AddCut_' .. tostring( Proc.Id))
|
||||
EgtSetInfo( AddId, 'TASKID', Proc.TaskId)
|
||||
-- applico la lavorazione
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
-- ProcessProfFront.lua by Egaltech s.r.l. 2020/05/22
|
||||
-- ProcessProfFront.lua by Egaltech s.r.l. 2020/10/06
|
||||
-- Gestione calcolo profilo frontale per Travi
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
@@ -221,12 +221,12 @@ function ProcessProfFront.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
|
||||
if nChamfer < 0 then
|
||||
return false, sChamfer
|
||||
end
|
||||
-- se smusso non è esclusivo
|
||||
-- se smusso non è esclusivo, aggiungo sgrossatura con taglio di lama
|
||||
if nChamfer < 2 then
|
||||
-- aggiungo taglio di lama di sgrossatura e lo lavoro
|
||||
local ptStart, vtNP = GetSawCutData( AuxId, vtN)
|
||||
local AddId = EgtSurfTmPlaneInBBox( nAddGrpId, ptStart, vtNP, b3Solid, GDB_RT.GLOB)
|
||||
if AddId then
|
||||
if AddId and BL.GetFaceElevation( AddId, 0, nPartId) > 20.0 then
|
||||
EgtSetName( AddId, 'AddCut_' .. tostring( Proc.Id))
|
||||
EgtSetInfo( AddId, 'TASKID', Proc.TaskId)
|
||||
-- applico la lavorazione
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
-- ProcessProfHead.lua by Egaltech s.r.l. 2020/05/22
|
||||
-- ProcessProfHead.lua by Egaltech s.r.l. 2020/10/06
|
||||
-- Gestione calcolo profilo di testa per Travi
|
||||
|
||||
-- Tabella per definizione modulo
|
||||
@@ -223,12 +223,12 @@ function ProcessProfHead.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
|
||||
if nChamfer < 0 then
|
||||
return false, sChamfer
|
||||
end
|
||||
-- se smusso non è esclusivo
|
||||
-- se smusso non è esclusivo, aggiungo sgrossatura con taglio di lama
|
||||
if nChamfer < 2 then
|
||||
-- aggiungo taglio di lama di sgrossatura e lo lavoro
|
||||
local ptStart, vtNP = GetSawCutData( AuxId, vtN)
|
||||
local AddId = EgtSurfTmPlaneInBBox( nAddGrpId, ptStart, vtNP, b3Solid, GDB_RT.GLOB)
|
||||
if AddId then
|
||||
if AddId and BL.GetFaceElevation( AddId, 0, nPartId) > 20.0 then
|
||||
EgtSetName( AddId, 'AddCut_' .. tostring( Proc.Id))
|
||||
EgtSetInfo( AddId, 'TASKID', Proc.TaskId)
|
||||
-- applico la lavorazione
|
||||
|
||||
Reference in New Issue
Block a user