- in LapJoint esteso lo step negativo agli angoli ottusi
This commit is contained in:
luca.mazzoleni
2022-12-22 17:53:40 +01:00
parent de14fb91ce
commit 577362c6d2
+10 -2
View File
@@ -1805,6 +1805,12 @@ local function MakeSideGrooveByMill( Proc, nFacet, nRawId, b3Raw, sCustomMach, d
end
end
-- se la groove è rivolta verso il basso (-85°) lavoro a salire con step negativo
local bUpwardMilling = false
if Proc.Fct == 2 and vtN2:getZ() < -0.996 then
bUpwardMilling = true
end
local dStepOri
if not bExcludeSideMill then
-- inserisco la lavorazione di ribasso o gola
@@ -1845,8 +1851,7 @@ local function MakeSideGrooveByMill( Proc, nFacet, nRawId, b3Raw, sCustomMach, d
EgtSetMachiningParam( MCH_MP.DEPTH, dMaxMat)
end
end
-- se la groove è rivolta verso il basso (-85°) lavoro a salire con step negativo
if Proc.Fct == 2 and vtN2:getZ() < -0.996 then
if bUpwardMilling then
dStep = -dStep
end
EgtSetMachiningParam( MCH_MP.STEP, dStep)
@@ -1961,6 +1966,9 @@ local function MakeSideGrooveByMill( Proc, nFacet, nRawId, b3Raw, sCustomMach, d
dMaxElev = max( ( nStepOtherFace + 1) * dStepOtherFace - GEO.EPS_SMALL, 0)
dDepthOtherFace = dElevOtherFacet
end
if bUpwardMilling then
dStepOtherFace = -dStepOtherFace
end
EgtSetMachiningParam( MCH_MP.STEP, dStepOtherFace)
EgtSetMachiningParam( MCH_MP.USERNOTES, 'MaxElev=' .. EgtNumToString( dMaxElev, 3) .. ';')
if bMachFromDn then