DataBeam :

- in travi con scarico a caduta migliorata gestione di taglio parziale obliquo
- in travi con scarico a caduta aggiunta gestione in anticipo di profili qunado fatti con solo smusso.
This commit is contained in:
DarioS
2022-02-02 11:22:25 +01:00
parent 969f144d5c
commit 19b803044f
7 changed files with 93 additions and 29 deletions
+10 -3
View File
@@ -1,7 +1,8 @@
-- ProcessProfFront.lua by Egaltech s.r.l. 2021/06/28
-- ProcessProfFront.lua by Egaltech s.r.l. 2022/02/02
-- Gestione calcolo profilo frontale per Travi
-- 2021/05/03 Aggiunta gestione smusso da sopra e sotto per macchina con testa da sotto.
-- 2021/06/28 Per macchine con testa sotto, smussi di lato con questa testa se non c'è lav.ne da sopra.
-- 2022/02/02 Aggiunta funzione OnlyChamfer.
-- Tabella per definizione modulo
local ProcessProfFront = {}
@@ -55,6 +56,12 @@ function ProcessProfFront.Classify( Proc, b3Raw)
end
end
---------------------------------------------------------------------
-- Verifico se richiesto il solo smusso
function ProcessProfFront.OnlyChamfer( Proc)
return (( EgtGetInfo( Proc.Id, sDepthChamferMill, 'd') or 0) > 0.1 and EgtGetInfo( Proc.Id, sPreemptiveChamfer, 'i') == 1)
end
---------------------------------------------------------------------
local function GetSawCutData( AuxId, vtN)
local vtNP = Vector3d( vtN)
@@ -99,12 +106,12 @@ local function VerifyCham( Proc, AuxId, nRawId, bMakeVertCham, sDephtCham, sOnly
local b3Raw = EgtGetRawPartBBox( nRawId)
-- verifico che lo smusso sia richiesto
local dDepth = EgtGetInfo( Proc.Id, sDephtCham, 'd') or 0
if dDepth > 0 then
if dDepth > 0.1 then
nChamfer = 1
end
-- verifico se posso fare solo lo smusso
if EgtGetInfo( Proc.Id, sOnlyCham, 'i') == 1 then
if dDepth > 0 then
if nChamfer == 1 then
nChamfer = nChamfer + 1
-- altrimenti se non ho l'affondamento esco
else