DataBeam :

- piccole correzioni e migliorie.
This commit is contained in:
Dario Sassi
2019-08-29 09:11:27 +00:00
parent a4bbc3767c
commit fcdc31ae09
3 changed files with 12 additions and 14 deletions
+1 -1
View File
@@ -359,7 +359,7 @@ function DiceCut.GetDice( nParent, BBoxRawPart, ptCPlanes, vtNPlanes, bGetOrtoPl
end
-- calcolo la direzione dei piani ortogonali
local vtO = VectorFromUprightOrtho( vtNInner)
if vtNInner:getZ() > -0.05 or vtNInner:getZ() < -0.5 then
if vtNInner:getZ() > 0.05 or vtNInner:getZ() < -0.5 then
vtO:rotate( vtNInner, 90)
-- se diretto troppo ortogonalmente all'asse trave e taglio non da sotto, lo ruoto ulteriormente
if abs( vtO:getY()) > abs( vtO:getX()) and vtNInner:getZ() > -0.5 then
+7 -3
View File
@@ -1,4 +1,4 @@
-- ProcessLongDoubleCut.lua by Egaltech s.r.l. 2019/07/17
-- ProcessLongDoubleCut.lua by Egaltech s.r.l. 2019/08/27
-- Gestione calcolo doppio taglio longitudinale per Travi
-- Tabella per definizione modulo
@@ -201,6 +201,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId)
-- altrimenti è sotto : lavorazione Long2CutDown
else
local sWarn
-- recupero la lavorazione
local sMilling = ML.FindMilling( 'Long2CutDown')
if not sMilling then
@@ -261,7 +262,10 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId)
-- imposto lato di lavoro e inversione
EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
EgtSetMachiningParam( MCH_MP.INVERT, true)
local dDepth = min( dMaxDepth, vWidth[vOrd[i]] + dAgg)
if vWidth[vOrd[i]] + dAgg > dMaxDepth - BD.COLL_SIC then
sWarn = 'Warning in double cut : depth (' .. EgtNumToString( vWidth[vOrd[i]] + dAgg, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepth - BD.COLL_SIC, 1) .. ')'
end
local dDepth = min( dMaxDepth - BD.COLL_SIC, vWidth[vOrd[i]] + dAgg)
EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)
-- eseguo
if not EgtApplyMachining( true, false) then
@@ -273,7 +277,7 @@ function ProcessLong2Cut.Make( Proc, nPhase, nRawId, nPartId)
end
end
return true
return true, sWarn
end
---------------------------------------------------------------------
+4 -10
View File
@@ -1,4 +1,4 @@
-- ProcessMortise.lua by Egaltech s.r.l. 2019/08/08
-- ProcessMortise.lua by Egaltech s.r.l. 2019/08/27
-- Gestione calcolo mortase per Travi
-- Tabella per definizione modulo
@@ -49,15 +49,9 @@ function ProcessMortise.Make( Proc, nPhase, nRawId, nPartId)
end
-- se curva aperta la allungo e chiudo
if not EgtCurveIsClosed( AuxId) then
local EXTRA_LEN = 30
local dGap = dist( EgtSP( AuxId), EgtEP( AuxId))
if dGap <= 2 * EXTRA_LEN then
EgtAddCurveCompoArcTg( AuxId, EgtSP( AuxId))
else
EgtExtendCurveStartByLen( AuxId, EXTRA_LEN)
EgtExtendCurveEndByLen( AuxId, EXTRA_LEN)
EgtCloseCurveCompo( AuxId)
end
local _, nCount = EgtCurveDomain( AuxId)
EgtCloseCurveCompo( AuxId)
EgtSetInfo( AuxId, 'OPEN', nCount)
end
-- recupero i dati del bottom
local ptC, vtN = EgtSurfTmFacetCenter( Proc.Id, 0, GDB_ID.ROOT)