Modificato limite dimensione tasca per utilizzo lama come SideGroove

release

BatchProcess.lua

@@ -511,7 +511,7 @@ else
    -- Passo in modalità lavora
    EgtSetCurrMachGroup( EgtGetLastMachGroup())
    -- Se necessario eseguo aggiornamento con ricalcolo delle lavorazioni
-   if bToRecalc then
+   if bToRecalc or WALL.FLAG == 3 or WALL.FLAG == 4 then
       EgtOutLog( ' +++ Recalculating all dispositions and machinings >>>')
       EgtImportSetup()
       EgtApplyAllMachinings()
@@ -575,7 +575,8 @@ if  ( WALL.FLAG == 0 and ( bToProcess or bToRecalc)) or WALL.FLAG == 3 or WALL.F
 end
 
 -- *** Genero programma CN *** ( se richiesto)
-if WALL.FLAG == 0 or WALL.FLAG == 4 then
+local bIsGenerationEnabled = ( EgtVerifyKeyOption( 110) == false)
+if bIsGenerationEnabled and ( WALL.FLAG == 0 or WALL.FLAG == 4) then
    EgtOutLog( ' +++ Generating NC part program >>>')
    local sInfo = 'EgtCAM5' .. EgtIf( EgtIs64bit(), ' 64bit', '')
    if EgtGetExeVersion then

BatchProcessNew.lua

@@ -549,7 +549,7 @@ else
    -- Passo in modalità lavora
    EgtSetCurrMachGroup( EgtGetLastMachGroup())
    -- Se necessario eseguo aggiornamento con setup corrente e ricalcolo delle lavorazioni
-   if bToRecalc then
+   if bToRecalc or WALL.FLAG == 3 or WALL.FLAG == 4  then
       EgtOutLog( ' +++ Recalculating all dispositions and machinings >>>')
       EgtImportSetup()
       EgtApplyAllMachinings()
@@ -613,7 +613,7 @@ if  ( WALL.FLAG == 0 and ( bToProcess or bToRecalc)) or WALL.FLAG == 3 or WALL.F
 end
 
 -- *** Genero programma CN *** ( se richiesto)
-local bIsGenerationEnabled = ( EgtGetNumberFromIni( 'Mach', 'NoPartProgram', 0, EgtGetIniFile()) == 0)
+local bIsGenerationEnabled = ( EgtVerifyKeyOption( 110) == false)
 if bIsGenerationEnabled and ( WALL.FLAG == 0 or WALL.FLAG == 4) then
    EgtOutLog( ' +++ Generating NC part program >>>')
    local sInfo = 'EgtCAM5' .. EgtIf( EgtIs64bit(), ' 64bit', '')

LuaLibs/WProcessFreeContour.lua

@@ -1486,9 +1486,11 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw, nConeCut, nAdd
          end
          --scrivo nell'operazione il vettore somma delle normali alle superfici che servirà per il doppio
          local vtNSum = Vector3d( 0, 0, 0)
-         for iGeom = 1, #vGeom do
-            local nFace = vGeom[iGeom][2]
-            vtNSum = vtNSum + Proc.Face[ nFace + 1].VtN
+         if Proc.Face and #Proc.Face > 0 then
+            for iGeom = 1, #vGeom do
+               local nFace = vGeom[iGeom][2]
+               vtNSum = vtNSum + Proc.Face[ nFace + 1].VtN
+            end
          end
          EgtSetInfo( nMchId or GDB_ID.NULL, 'NORM_SUM', vtNSum)
          -- eseguo

LuaLibs/WProcessLapJoint.lua

@@ -34,6 +34,7 @@
 --            Miglioramenti sostanziali nella gestione delle tasche.
 -- 2023/11/16 Fresature a salire estese a groove cieche.
 -- 2024/02/20 Piccola correzione ai casi in cui si utilizza il SIDESTEP.
+-- 2024/08/09 In MakeByMill, se fresa Side trovata ma non applicabile, si considera come se non trovata
 
 -- Tabella per definizione modulo
 local WPL = {}
@@ -1218,7 +1219,7 @@ local function MakeByChainSaw( Proc, nFacet, nRawId, b3Raw, dElev, dH, dV)
    local sStartAngs
    if WD.GetChainSawStartAngs then
       local vtN2 = EgtSurfTmFacetNormVersor( Proc.Id, nFacAdj, GDB_ID.ROOT)
-      sStartAngs = WD.GetChainSawStartAngs( vtN2)
+      sStartAngs = WD.GetChainSawStartAngs( vtN2, vtN, ptC)
    end
    -- Lati chiusi
    local bOpenStart = false
@@ -1372,13 +1373,13 @@ local function MakeByMill( Proc, nFacet, nOthFac, nRawId, b3Raw, dSideDist)
    if dMillDiam < dDiam or dMaxDepth < dElev then
       local sErr = 'Error : Side Elevation too big'
       EgtOutLog( sErr)
-      return false, sErr
+      return false, sErr, true
    end
    local dMillExtra = dMillTotLen - dMillLen
    if Proc.Box:getMin():getZ() - dMillExtra < b3Raw:getMin():getZ() - 10 * GEO.EPS_SMALL then
       local sErr = 'Error : Tool collide with table'
       EgtOutLog( sErr)
-      return false, sErr
+      return false, sErr, true
    end
    -- inserisco la lavorazione di contornatura
    local sName = 'Mill_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
@@ -2862,7 +2863,7 @@ local function MakeMoreFaces( Proc, nRawId, b3Raw)
       end
       local vtN = EgtSurfTmFacetNormVersor( Proc.Id, nFacInd, GDB_ID.ROOT)
       local _, dH, dV = EgtSurfTmFacetMinAreaRectangle( Proc.Id, nFacInd, GDB_ID.ROOT)
-      local dMaxSlotThicknessForBlade = 25
+      local dMaxSlotThicknessForBlade = 19
       local bIsSmallSlot = ( Proc.Fct == 3 and ( min( dH, dV) < dMaxSlotThicknessForBlade - 10 * GEO.EPS_SMALL) and vtN:getZ() > -0.01)
       -- se di fianco
       if not bPckt and Proc.Fct >= 3 and ( ( vtN:getZ() < WD.NZ_MINA) or bIsSmallSlot) then

LuaLibs/WallExec.lua

@@ -9,6 +9,7 @@
 --            In Collect aggiunto il recupero preliminare di varie informazioni sulla feature.
 -- 2023/12/11 In ClassifyTopology si passa ora anche l'Id del grezzo (allineamento Topology con Beam).
 -- 2024/02/20 Aggiunta gestione DeltaX/Y/Z del pannello dall'origine da BTL.
+-- 2024/08/30 Aggiunta nota altezza sottopezzo, per pareti a layer
 
 -- Tabella per definizione modulo
 local WallExec = {}
@@ -165,6 +166,7 @@ function WallExec.ProcessWalls( dRawL, dRawW, dRawH, vWall, bMachGroupOk, bNewPr
          end
       else
          local dPosH = EgtIf( vWall[i].PosY < 0.1, ( dRawH - PartHeight) / 2, vWall[i].PosY)
+         EgtSetInfo( nRaw, 'SUBPIECE', dPosH)
          ptPos = Point3d( dRawL - vWall[i].PosX - PartLen, vWall[i].PosZ, dPosH) + vtOffs
       end
       EgtAddPartToRawPart( Pz, ptPos, nRaw)
@@ -216,8 +218,10 @@ function WallExec.CollectFeatures( PartId, b3Raw)
                   Proc.DistanceToRawPart = WL.GetProcessDistanceToRawPart( Proc, b3Raw)
                   -- recupero informazioni sulle facce della feature
                   Proc.Face = {}
-                  for i = 1, Proc.Fct do
-                     Proc.Face[i] = { Id = i - 1, VtN = EgtSurfTmFacetNormVersor( Proc.Id, i - 1, GDB_ID.ROOT ), Elevation = WL.GetFaceElevation( Proc.Id, i - 1, PartId)}
+                  if Proc.Fct < 50 then
+                     for i = 1, Proc.Fct do
+                        Proc.Face[i] = { Id = i - 1, VtN = EgtSurfTmFacetNormVersor( Proc.Id, i - 1, GDB_ID.ROOT ), Elevation = WL.GetFaceElevation( Proc.Id, i - 1, PartId)}
+                     end
                   end
                end
                if Proc.Box and not Proc.Box:isEmpty() then

NestFlipAndRotate.lua

@@ -157,9 +157,9 @@ local bManualRot = EgtGetInfo( NFAR.PARTID, "MANUALROT", 'b')
 
 -- FLIP
 local FlipFeatureStates, bLapJoints = ClassifyFlip( vPartProc, b3Part)
+local bFlip
 
 if not bManualFlip then
-   local bFlip
    -- analizzo stati flip delle feature
    local nFlip0Min = 100
    local nFlip0Cnt = 0
@@ -440,7 +440,7 @@ if not bManualRot then
    -- setto info nel pezzo
    if nRotate > 0 then
       local nPartRot = EgtGetInfo( NFAR.PARTID, "ROTATED", 'i') or 0
-      local nTotRot = nPartRot - nRotate
+      local nTotRot = nPartRot - EgtIf( bFlip, -nRotate, nRotate)
       nTotRot = EgtIf( nTotRot < 0, nTotRot + 360, nTotRot)
       EgtSetInfo( NFAR.PARTID, "ROTATED", nTotRot)
       EgtSetInfo( NFAR.PARTID, "FLIPROTMODIFIED", 1)

NestProcess.lua

@@ -19,7 +19,7 @@ NEST.MACH_AREA_OTHER_DIAM = 200
 NEST.MACH_AREA_IGNORE_3rdFACE = 1  -- 0
 
 
-local sLog = 'NestProcess : ' .. NEST.FILE .. ', ' .. NEST.MACHINE .. ', ' .. LEN["1"] .. ', ' .. WIDTH["1"]
+local sLog = 'NestProcess : ' .. NEST.FILE .. ', ' .. NEST.MACHINE .. ', ' .. LEN[1] .. ', ' .. WIDTH[1]
 EgtOutLog( sLog)
 
 -- Cancello file di log specifico
@@ -1128,9 +1128,10 @@ local function ClassifyAngles( nPartId, RawPart, sRefOrig, bLockedRot, dMinSheet
    if nRotate >= 360 then
       nRotate = nRotate - 360
    end   
-   if nRotate > 0 then 
+   if nRotate > 0 then
+      local bPartFlip = ( ( EgtGetInfo( nPartId, "INVERTED", 'i') or 0) == 180)
       local nPartRot = EgtGetInfo( nPartId, "ROTATED", 'i') or 0
-      local nTotRot = nPartRot - nRotate
+      local nTotRot = nPartRot - EgtIf( bPartFlip, -nRotate, nRotate)
       nTotRot = EgtIf( nTotRot < 0, nTotRot + 360, nTotRot)  
       EgtSetInfo( nPartId, "ROTATED", nTotRot)
       EgtSetInfo( nPartId, "MODIFIEDFORNEST", 1)
@@ -1325,8 +1326,9 @@ local function ComputeRestrictedZones( RawParts)
                            bOnOppositeSide = true 
                            -- aggiorno le info di rotazione
                            if res.nRotate > 0 then
+                              local bPartFlip = ( ( EgtGetInfo( AngleClassification[nInd].PartId, "INVERTED", 'i') or 0) == 180)
                               local nPartRot = EgtGetInfo( AngleClassification[nInd].PartId, "ROTATED", 'i') or 0
-                              local nTotRot = nPartRot - res.nRotate
+                              local nTotRot = nPartRot - EgtIf( bPartFlip, -res.nRotate, res.nRotate)
                               nTotRot = EgtIf( nTotRot < 0, nTotRot + 360, nTotRot)    
                               EgtSetInfo( AngleClassification[nInd].PartId, "ROTATED", nTotRot)
                               EgtSetInfo( AngleClassification[nInd].PartId, "MODIFIEDFORNEST", 1)
@@ -1507,7 +1509,6 @@ local function AddParts(RawParts, vPartsDoneManually)
          bRotNest = false
       elseif EgtExistsInfo( nPartId, "NestRot") then 
          nStepRotNest = EgtGetInfo( nPartId, "NestStepRot", 'i')
-         nRotate = EgtGetInfo( nPartId, "NestRot", 'i')
          bRotNest = EgtGetInfo( nPartId, "NestAllowRot", 'b')
          -- verifico se rotazione è valida (pezzo è contenuto nel grezzo)
          local bValidRotationInRaw = b3Part:getDimX() < RawParts[1].Len - 2 * NEST.KERF + GEO.EPS_SMALL and b3Part:getDimY() < dRawMaxWidth - 2 * NEST.KERF + GEO.EPS_SMALL
@@ -1884,15 +1885,21 @@ if bNestingOk then
                EgtSetInfo( nPartDuploId, "POSX", ptPos:getX() + dXCorr)
                EgtSetInfo( nPartDuploId, "POSY", ptPos:getY() + dYCorr)
                
-               local nPartRot = EgtGetInfo( nId, "ROTATED", 'i') or 0
-               local nTotRot = dAngRot - nPartRot
-               nTotRot = EgtIf( nTotRot < 0, nTotRot + 360, nTotRot)
-               EgtSetInfo( nPartDuploId, "ROT", nTotRot)
-               
-               local nPartFlip = EgtGetInfo( nId, "INVERTED", 'i')
+               local nPartFlip = EgtGetInfo( nId, "INVERTED", 'i') or 0
                nPartFlip = EgtIf( nPartFlip == 180, 1, 0)
                local nTotFlip = EgtIf( nPartFlip ~= nFlag, 180, 0)
                EgtSetInfo( nPartDuploId, "FLIP", nTotFlip)
+               
+               local bPartFlip = ( nTotFlip == 180)
+               local nPartRot = EgtGetInfo( nId, "ROTATED", 'i') or 0
+               local nTotRot = nPartRot - EgtIf( bPartFlip, -dAngRot, dAngRot)
+               if nTotRot < 0 then
+                  nTotRot = nTotRot + 360
+               elseif nTotRot >= 360 then
+                  nTotRot = nTotRot - 360
+               end
+               EgtSetInfo( nPartDuploId, "ROT", nTotRot)
+            
             end
          end
       end

UpdateLog.txt

@@ -1,5 +1,26 @@
            ==== Wall Update Log ====
 
+Versione 2.6j1 (29/10/2024)
+- Fixed : in Nesting e Flip/Rot corretto problema in rotazione pezzi che causava ribaltamenti non voluti nella copia grezzo
+
+Versione 2.6i2 (30/09/2024)
+- Modif : aggiunta nota altezza sottopezzo, per pareti a layer
+
+Versione 2.6i1 (25/09/2024)
+- Fixed : in NestProcess correzione in lettura array per cambio dll di lettura
+
+Versione 2.6h2 (28/08/2024)
+- Modif : Aggiunto controllo licenza/chiave per abilitazione generazione PartProgram
+- Fixed : in FreeContour corretto caso in cui si chiedevano informazioni sulla faccia non presenti.
+
+Versione 2.6h1 (20/08/2024)
+- Modif : in LapJoint, se fresa Side trovata ma non applicabile, si considera come se non trovata
+- Modif : in Collect analisi facce limitata a feature che ne hanno meno di 50
+- Modif : aggiunti nuovi parametri alla chiamata della funzione GetChainSawStartAngs da WallData della macchina
+
+Versione 2.6g2 (19/07/2024)
+- Modif : in BatchProcess e BatchProcessNew si forza ricalcolo ogni volta che si è in situazione di CHECK o CHECK + GENERATE
+
 Versione 2.6g1 (17/07/2024)
 - Modif : in ProcessDrill, se foro verticale passante e diametro inferiore a 100 mm, riduzione affondamento di 5 mm sostituito con tab
 - Fixed : correzioni a utilizzo DEFAULT_RAW_NO_EXTRA_WIDTH

Version.lua

@@ -1,6 +1,6 @@
--- Version.lua by Egalware s.r.l. 2024/03/24
+-- Version.lua by Egalware s.r.l. 2024/08/20
 -- Gestione della versione di Wall
 
 NAME = 'Wall'
-VERSION = '2.6g1'
-MIN_EXE = '2.6g1'
+VERSION = '2.6j1'
+MIN_EXE = '2.6h1'