DataBeam :

- aggiornamenti e correzioni varie.
This commit is contained in:
Dario Sassi
2020-03-31 15:03:09 +00:00
parent 3a7388ffe6
commit c3be703a20
6 changed files with 912 additions and 320 deletions
+6 -6
View File
@@ -1,4 +1,4 @@
-- ProcessBlockHausFront.lua by Egaltech s.r.l. 2020/02/11
-- ProcessBlockHausFront.lua by Egaltech s.r.l. 2020/03/30
-- Gestione calcolo giunzione block house in testa
-- Tabella per definizione modulo
@@ -32,7 +32,7 @@ function ProcessBlockHausFront.Classify( Proc)
-- se versore z è preponderante sulle altre componenti del vettore ed è verso il basso,
-- do errore perchè non è ancora gestita la rotazione di 90°
-- considerazioni: al momento non è possibile sapere se ci sono due rastremature o una quindi se è rivolta verso il basso
-- viene dato errore, altrimenti si porebbe imporre la rotazione di 180 (ovviamente con una sola rastrematura rivolta verso il basso)
-- viene dato errore, altrimenti si potrebbe imporre la rotazione di 180 (ovviamente con una sola rastrematura rivolta verso il basso)
if abs(vtN:getZ()) > abs(vtN:getX()) and abs(vtN:getZ()) > abs(vtN:getY()) and vtN:getZ() < -0.5 then
return false
end
@@ -117,7 +117,7 @@ function ProcessBlockHausFront.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
dToolThick = EgtTdbGetCurrToolParam(MCH_TP.THICK) or dToolThick
end
end
-- recupero la geometria opzionale
-- recupero la geometria ausiliaria
local AuxId = EgtGetInfo( Proc.Id, 'AUXID', 'i')
if AuxId then AuxId = AuxId + Proc.Id end
-- recupero gruppo per geometria addizionale
@@ -128,7 +128,7 @@ function ProcessBlockHausFront.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
return false, sErr
end
-- cerco se nelle note del layer c'è già la nota che indica che l'aux è già stato lavorato
local bAuxMachined = EgtGetInfo( nAddGrpId, 'AuxId', 'b')
local bAuxMachined = EgtGetInfo( nAddGrpId, 'AuxId.'..tostring(AuxId or 0), 'b')
-- taglio sulla faccia esterna
if AuxId and not bAuxMachined then
-- in generale va fatto
@@ -149,7 +149,7 @@ function ProcessBlockHausFront.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
-- se taglio applicato setto la nota al gruppo Mach per non doverla lavorare una seconda volta
if bOk then
bAuxMachined = true
EgtSetInfo( nAddGrpId, 'AuxId', true)
EgtSetInfo( nAddGrpId, 'AuxId.'..tostring(AuxId or 0), true)
else
return bOk, sErr
end
@@ -240,7 +240,7 @@ function ProcessBlockHausFront.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
-- se taglio applicato setto la nota al gruppo Mach per non doverla lavorare una seconda volta
if bOk then
bAuxMachined = true
EgtSetInfo( nAddGrpId, 'AuxId', true)
EgtSetInfo( nAddGrpId, 'AuxId.'..tostring(AuxId or 0), true)
else
return bOk, sErr
end