From ab7971e5f99bf57c760ae887b62f8e2c6c279f3b Mon Sep 17 00:00:00 2001 From: "andrea.villa" Date: Fri, 11 Apr 2025 13:29:37 +0200 Subject: [PATCH] - Aggiunto lettura Q03 su scanalatura epr forzare fresa - In BeamLib, si considerano simili due facce che hanno elevazione oltre l'85% --- LuaLibs/BeamLib.lua | 2 +- LuaLibs/ProcessLapJoint.lua | 18 +++++++++++++++--- 2 files changed, 16 insertions(+), 4 deletions(-) diff --git a/LuaLibs/BeamLib.lua b/LuaLibs/BeamLib.lua index e968fca..1d66881 100644 --- a/LuaLibs/BeamLib.lua +++ b/LuaLibs/BeamLib.lua @@ -642,7 +642,7 @@ function BeamLib.GetFaceWithMostAdj( Proc, nPartId, bCompare3Fc, dCosSideAng) -- premio quella che non รจ sottosquadra e che ha la X minore local bDiffSmall = true for i = 1, #dtElev do - if dtElev[i] > dMinElev + 5 or dtElev[i] > 80 then + if ( dtElev[i] > dMinElev + 5 or dtElev[i] > 80) and dMinElev < 0.85 * dtElev[i] then bDiffSmall = false end end diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua index 524f1b7..994c06f 100644 --- a/LuaLibs/ProcessLapJoint.lua +++ b/LuaLibs/ProcessLapJoint.lua @@ -200,6 +200,7 @@ local function AssignQIdent( Proc) elseif ( Proc.Grp == 3 or Proc.Grp == 4) and Proc.Prc == 17 then Q_DEPTH_CHAMFER = 'Q01' -- d Q_ONLY_CHAMFER = 'Q02' -- i + Q_USE_MILL = 'Q03' -- i elseif ( Proc.Grp == 3 or Proc.Grp == 4) and Proc.Prc == 20 then Q_DEPTH_CHAMFER = 'Q01' -- d Q_USE_MILL = 'Q02' -- i @@ -6152,9 +6153,20 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa vtN, vtN2 = vtN2, vtN sPocketing = ML.FindPocketing( sMchFind, dDiam2, dFacElev2 + dCollSic2) if not sPocketing then - local sErr = 'Error : '..sMchFind..' not found in library' - EgtOutLog( sErr) - return false, sErr + dDiam, dDiam2 = dDiam2, dDiam + dCollSic, dCollSic2 = dCollSic2, dCollSic + nFacInd, nFacInd2 = nFacInd2, nFacInd + dH, dH2 = dH2, dH + dV, dV2 = dV2, dV + dFacElev, dFacElev2 = dFacElev2, dFacElev + rfFac, rfFac2 = rfFac2, rfFac + vtN, vtN2 = vtN2, vtN + sPocketing = ML.FindPocketing( sMchFind, dDiam2, nil, nil, nil, nil, nil, nil, 'Longest') + if not sPocketing then + local sErr = 'Error : '..sMchFind..' not found in library' + EgtOutLog( sErr) + return false, sErr + end end end -- provo con contornatura