Merge branch 'Test/Q_OnlyDrillContour' into develop

- Piccole modifiche alla gestione
- Step diventa il 75% del teorico o se più piccolo, il diametro utensile

LuaLibs/BeamExec.lua

@@ -1508,7 +1508,7 @@ local function AddFeatureMachining( Proc, nPhase, nRawId, nPartId, dCurrOvmH, bN
    -- se foratura ( 3/4-040-X)
    elseif Drill.Identify( Proc) then
       -- esecuzione foratura
-      bOk, sErr = Drill.Make( Proc, nPhase, nRawId, nPartId)
+      bOk, sErr = Drill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
    -- se giunzione francese ( 1/2-035-X)
    elseif FrenchRidgeLap.Identify( Proc) then
       -- esecuzione giunzione francese

LuaLibs/ProcessDrill.lua

@@ -134,7 +134,8 @@ function ProcessDrill.Split( Proc, b3Raw)
    local bOpen = ( Proc.Fce ~= 0) and ( Proc.Fce ~= Proc.Fcs)
    -- recupero flag abilitazione split (0=auto,1=no)
    local bTrySplit = ( EgtGetInfo( Proc.Id, 'Q02', 'i') ~= 1)
-   if not bTrySplit then
+   local bOnlyContour = ( EgtGetInfo( Proc.Id, 'Q04', 'i') == 1)
+   if ( not bTrySplit) or bOnlyContour then
       return false
    end
    -- restituisco se va fatto in doppio (solo fori orizzontali)
@@ -341,7 +342,13 @@ end
 
 ---------------------------------------------------------------------
 -- Applicazione della lavorazione
-function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
+function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
+   -- Se forzato contorno foro forzo richiamo a FreeContour e uscita dalla funzione
+   if EgtGetInfo( Proc.Id, 'Q04', 'i') == 1 then
+      _G.package.loaded.ProcessFreeContour = nil
+      local FreeContour = require( 'ProcessFreeContour')
+      return FreeContour.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
+   end
    -- default per costanti
    BD.DRILL_VX_MAX_ANGLEDRILL = ( BD.DRILL_VX_MAX_ANGLEDRILL or 0.928)
    -- ingombro del pezzo

LuaLibs/ProcessDtMortise.lua

@@ -638,20 +638,44 @@ function ProcessDtMortise.Make( Proc, nPhase, nRawId, nPartId, dCurrOvmH)
       -- sistemo il lato e la direzione di lavoro
       EgtSetMachiningParam( MCH_MP.WORKSIDE, EgtIf( bCW, MCH_MILL_WS.LEFT, MCH_MILL_WS.RIGHT))
       EgtSetMachiningParam( MCH_MP.INVERT, EgtIf( bCW, false, true))
+      local ptS = EgtSP( AuxId, GDB_ID.ROOT)
+      local ptE = EgtEP( AuxId, GDB_ID.ROOT)
       -- in presenza di pocket imposto dati ingresso e uscita
       if bPocket then
+         -- recupero il contorno della tasca (seconda curva ausiliaria)
+         local vAuxId = EgtGetInfo( Proc.Id, 'AUXID', 'vi')
+         -- si prende il centro del percorso da svuotare ( non si controlla che sia presente perchè già verificata in precedenza)
+         local ptPocketCenter = EgtGP( Proc.Id + vAuxId[2], GDB_ID.ROOT)
+         -- calcolo componente tangente e lineare di ingresso
+         local vtS = EgtSV( Proc.Id + vAuxId[1], GDB_ID.ROOT)                                   -- vettore entrante percorso
+         local vtOffS = EgtSV( Proc.Id + vAuxId[1], GDB_ID.ROOT) ;  vtOffS:rotate( vtExtr, 90)  -- vettore da punto iniziale a centro utensile
+         local vtStartToCenter = ptPocketCenter - ( ptS + ( vtOffS * ( dToolDiam/2)))           -- vettore da centro utensilenel punto iniziale e centro del percorso da svuotare
+         local dLenStartToCenter = vtStartToCenter:len()                                        -- distanza da centro utensile a centro del percorso da svuotare
+         local dStartTangComp = abs( vtStartToCenter * vtS)                                     -- prodotto scalare tra vettore entrante e vettore tra centro utensilee percordo da svuotare (componente tangente)
+         local dStartPerpComp = sqrt( dLenStartToCenter^2 - dStartTangComp^2)                   -- pitagora tra componente tangente e la lunghezza tra i due centri
+         -- calcolo componente tangente e lineare di uscita
+         local vtE = EgtEV( Proc.Id + vAuxId[1], GDB_ID.ROOT)
+         local vtOffE = EgtEV( Proc.Id + vAuxId[1], GDB_ID.ROOT) ;  vtOffE:rotate( vtExtr, 90)
+         local vtEndToCenter = ptPocketCenter - ( ptE + ( vtOffE * ( dToolDiam/2)))
+         local dLenEndToCenter = vtEndToCenter:len()
+         local dEndTangComp = abs( vtEndToCenter * vtE)
+         local dEndPerpComp = sqrt( dLenEndToCenter^2 - dEndTangComp^2)
+
          EgtSetMachiningParam( MCH_MP.STARTPOS, 5)
          EgtSetMachiningParam( MCH_MP.LEADINTYPE, MCH_MILL_LI.TANGENT)
-         EgtSetMachiningParam( MCH_MP.LEADOUTTYPE, MCH_MILL_LO.AS_LI)
-         EgtSetMachiningParam( MCH_MP.STARTADDLEN, 5)
-         EgtSetMachiningParam( MCH_MP.ENDADDLEN, 0)
-         EgtSetMachiningParam( MCH_MP.LITANG, dToolDiam / 2)
-         EgtSetMachiningParam( MCH_MP.LIPERP, 5)
+         EgtSetMachiningParam( MCH_MP.LITANG, dStartTangComp)
+         EgtSetMachiningParam( MCH_MP.LIPERP, dStartPerpComp)
          EgtSetMachiningParam( MCH_MP.LIELEV, 0)
+
+         EgtSetMachiningParam( MCH_MP.LEADOUTTYPE, MCH_MILL_LI.TANGENT)
+         EgtSetMachiningParam( MCH_MP.LOTANG, dEndTangComp)
+         EgtSetMachiningParam( MCH_MP.LOPERP, dEndPerpComp)
+         EgtSetMachiningParam( MCH_MP.LOELEV, 0)
+
+         EgtSetMachiningParam( MCH_MP.STARTADDLEN, 0)
+         EgtSetMachiningParam( MCH_MP.ENDADDLEN, 0)
       -- altrimenti verifico se sono bilanciati ingresso e uscita, per evitare inizio o fine nel legno
       else
-         local ptS = EgtSP( AuxId, GDB_ID.ROOT)
-         local ptE = EgtEP( AuxId, GDB_ID.ROOT)
          local dDistS = abs( ( ptS - rfDtMrt:getOrigin()) * rfDtMrt:getVersX())
          local dDistE = abs( ( ptE - rfDtMrt:getOrigin()) * rfDtMrt:getVersX())
          local dIni, dFin = EgtCurveDomain( AuxId)

LuaLibs/ProcessFreeContour.lua

@@ -29,11 +29,13 @@ local ML = require( 'MachiningLib')
 local Q_DIM_STRIP = 'Q01'  -- d
 local Q_DEPTH_CHAMFER = 'Q02' -- d
 local Q_OVERMAT_FOR_FINISH = 'Q03' -- d
+local Q_ONLY_CONTOUR = 'Q04' -- i, valido solo per drill
 local Q_ONLY_CHAMFER = 'Q00' -- i
 local Q_RADIAL_OFFSET = 'Q06' -- d, valido solo per pocket
 local Q_IGNORE_LASER_PROBLEMS = 'Q07'
 local Q_FORCE_CLAMPABLE_AREA = 'Q08'
 local Q_INVERT_LAST_PATH = 'Q09'
+local Q_MAX_ELEVATION = 'Q10' -- d
 
 ---------------------------------------------------------------------
 -- Riconoscimento della feature
@@ -184,6 +186,8 @@ local function VerifyChamfer( Proc, AuxId, nRawId, bMakeVertCham, bDownHead)
          EgtOutLog( sErr)
          return -1, 0, sErr
       end
+   else
+      sMilling = ''
    end
 
    return nChamfer, dDepth, sMilling
@@ -235,6 +239,7 @@ end
 local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
    -- recupero l'ingombro del grezzo di appartenenza
    local b3Raw = EgtGetRawPartBBox( nRawId)
+   local bContourFromDrill = EgtGetInfo( Proc.Id, Q_ONLY_CONTOUR, 'i') == 1
    -- ingombro del pezzo
    local Ls = EgtGetFirstNameInGroup( nPartId, 'Box')
    local b3Solid = EgtGetBBoxGlob( Ls or GDB_ID.NULL, GDB_BB.STANDARD)
@@ -259,7 +264,7 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
    -- verifico se in testa o coda
    local bHead = Proc.Head
    -- verifico i parametri Q per profondità smusso e per eseguirlo in esclusiva
-   local nChamfer, dDepthCham, sChamfer = VerifyChamfer( Proc, AuxId, nRawId, true)
+   local nChamfer, dDepthCham, sChamfer = VerifyChamfer( Proc, AuxId, nRawId, true, nil)
    -- recupero la lavorazione
    local bTopHead = ( BD.DOWN_HEAD and vtExtr:getZ() > -0.1)
    local bDownHead = ( BD.DOWN_HEAD and vtExtr:getZ() < 0.1)
@@ -631,6 +636,14 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
                EgtOutLog( sErr)
                return false, sErr
             end
+            -- eventuale elevazione forzata
+            local dCustomMaxElev = EgtGetInfo( Proc.Id, Q_MAX_ELEVATION, 'd')
+            if dCustomMaxElev and dCustomMaxElev < 1 then dCustomMaxElev = nil end
+            if dCustomMaxElev then
+               local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
+               sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dCustomMaxElev, 1))
+               EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes)
+            end
             -- assegno affondamento
             EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)
          end
@@ -663,7 +676,9 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
          end
          
          -- assegno lato di lavoro
-         if Proc.Grp == 0 then
+         if bContourFromDrill then
+            dWorkSide = MCH_MILL_WS.LEFT
+         elseif Proc.Grp == 0 then
             dWorkSide = MCH_MILL_WS.CENTER
          elseif ( Proc.Grp == 3 and not bToolInv) or ( Proc.Grp == 4 and bToolInv) or ( Proc.Grp == 1 and bToolInv) or ( Proc.Grp == 2 and bToolInv) then
             dWorkSide = MCH_MILL_WS.LEFT
@@ -695,6 +710,14 @@ local function MakeByMill( Proc, nPhase, nRawId, nPartId, dOvmHead)
          EgtSetMachiningParam( MCH_MP.TOOLINVERT, bToolInvert)
          EgtSetMachiningParam( MCH_MP.INVERT, bInvert)
          EgtSetMachiningParam( MCH_MP.WORKSIDE, dWorkSide)
+         -- setto valori specifici se lavorazione nel pieno del solo contorno di un foro
+         if bContourFromDrill then
+            local dWorkStep = max( ( EgtGetMachiningParam( MCH_MP.STEP) or 0) * 0.75, dToolDiam)
+            EgtSetMachiningParam( MCH_MP.STEP, dWorkStep)
+            EgtSetMachiningParam( MCH_MP.LEADINTYPE, MCH_MILL_LI.GLIDE)
+            EgtSetMachiningParam( MCH_MP.LIELEV, dWorkStep)
+            EgtSetMachiningParam( MCH_MP.LITANG, dWorkStep)
+         end
 
 
          -- posizione braccio porta testa
@@ -995,6 +1018,10 @@ function ProcessFreeContour.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       Q_DEPTH_CHAMFER = 'Q01'
       Q_DIM_STRIP = 'Q02'
    end
+   if Proc.Prc == 40 then
+      Q_DIM_STRIP = ''
+      Q_OVERMAT_FOR_FINISH = ''
+   end
    -- recupero la tipologia
    local bPocket = ( EgtGetInfo( Proc.Id, 'PCKT', 'i') == 1)
    -- se svuotatura

LuaLibs/ProcessLapJoint.lua

@@ -3536,8 +3536,12 @@ local function MakePocket( Proc, nPartId, b3Solid, ptPs, tvtN, nFaceRef, sMchFin
       EgtOutLog( sErr)
       return false, sErr
    end
-   -- aggiungo geometria
-   EgtSetMachiningGeometry( {{ Proc.Id, (nFaceRef)}})
+   -- aggiungo geometria (se presente curva si lavora quella)
+   if Proc.LoopIdFacInd then
+      EgtSetMachiningGeometry( { Proc.LoopIdFacInd})
+   else
+      EgtSetMachiningGeometry( {{ Proc.Id, (nFaceRef)}})
+   end
    -- imposto uso faccia
    EgtSetMachiningParam( MCH_MP.FACEUSE, MCH_MILL_FU.ORTHO_CONT)
    -- imposto posizione braccio porta testa
@@ -3564,15 +3568,13 @@ local function MakePocket( Proc, nPartId, b3Solid, ptPs, tvtN, nFaceRef, sMchFin
    end
    EgtSetMachiningParam( MCH_MP.SCC, nSCC)
    -- se tasca aperta e non lavorata col truciolatore, imposto opportuno attacco
-   if sMchFind == 'OpenPocket' and nUseRoughTool == 0 then
+   if ( sMchFind == 'OpenPocket' or sMchFind == 'OpenPocket_H2') and nUseRoughTool == 0 then
       EgtSetMachiningParam( MCH_MP.SUBTYPE, MCH_POCK_SUB.SPIRALIN)
    end
    if sMchFind == 'OpenPocket' and dDiamTool < 90 then
       local _, dH, dV = EgtSurfTmFacetMinAreaRectangle( Proc.Id, nFaceRef, GDB_ID.ROOT)
       local bL = ( Proc.Fct < 4 or TestElleShape4( Proc) == 2)
       if bL and min( dH, dV) < 1.5 * dDiamTool then
-         EgtSetMachiningParam( MCH_MP.SUBTYPE, MCH_POCK_SUB.ZIGZAG)
-         EgtSetMachiningParam( MCH_MP.INVERT, false)
          if not bTipMill then
             EgtSetMachiningParam( MCH_MP.LEADINTYPE, MCH_POCK_LI.HELIX)
             EgtSetMachiningParam( MCH_MP.LITANG, dDiamTool)
@@ -3597,7 +3599,7 @@ local function MakePocket( Proc, nPartId, b3Solid, ptPs, tvtN, nFaceRef, sMchFin
    local sUserNotes = EgtGetMachiningParam( MCH_MP.USERNOTES) or ''
    sUserNotes = EgtSetValInNotes( sUserNotes, 'MaxElev', EgtNumToString( dElev, 1))
    sUserNotes = EgtSetValInNotes( sUserNotes, 'VMRS', 0)
-   if bOpenOutRaw then
+   if bOpenOutRaw or ( Proc.LoopIdFacInd and ( EgtGetInfo( Proc.LoopIdFacInd, 'OPEN', 'i') or -1) > -1) then
       sUserNotes = EgtSetValInNotes( sUserNotes, 'OpenOutRaw', 1)
    end
    EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes)
@@ -6651,7 +6653,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
    end
    -- eventuale forzatura sega a catena
    local bForceChainsaw = ( EgtGetInfo( Proc.Id, Q_FORCE_CHAINSAW, 'i') or 0) > 0
-   -- se è un tunnel provo a vedere se è possibile lavorarlo con la svuotatura o con la sega catena
+
+   -- TUNNEL: svuotatura o sega a catena
    if bClosedOrthoFaces then
       local bTryWithBlades = true
       local dDimMin, dDimMax, dDepth, vtOrtho, nLundIdFace
@@ -6741,7 +6744,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
             end
          end
       end
-   -- altrimenti non è una fessura
+
+   -- NO TUNNEL: tutti gli altri casi
    else
       -- dati della faccia
       local ptC, vtN = EgtSurfTmFacetCenter( Proc.Id, nFacInd, GDB_ID.ROOT)
@@ -6777,6 +6781,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
       if bPrevBhSideMill == nil then
          bPrevBhSideMill = bMakeBySideMill
       end
+
+      -- SIDEMILL (tipo BLOCKHAUS)
       if bMakeBySideMill then
          -- se smusso non è esclusivo
          if nChamfer < 2 then
@@ -6911,7 +6917,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                end
             end
          end
-      -- altrimenti lavoro con svuotatura
+
+      -- TASCA GENERICA: si cerca il modo migliore di lavorare in base alla forma
       else
          local bSpecial3faces = false
          -- verifico se lavorando la faccia principale rimane esclusa molta sezione trasversale complessiva della feature (da box)
@@ -6941,7 +6948,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
             end
          end
          
-         -- se posso in effetti fare fresatura con aggregato flottante
+         -- FRESATURA SPECIALE CON AGGREGATO FLOTTANTE 
          if bPocketFloatingAggregate then
             -- inserisco la lavorazione di svuotatura
             local sName = 'Float_Mill_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
@@ -6964,7 +6971,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
             -- imposto uso faccia
             local nFaceUse = BL.GetNearestParalOpposite( vtN)
             EgtSetMachiningParam( MCH_MP.FACEUSE, nFaceUse)
-            -- piccolo offser radiale per essere sicuri di lavorare anche con tasca larga come diametro fresa
+            -- piccolo offset radiale per essere sicuri di lavorare anche con tasca larga come diametro fresa
             EgtSetMachiningParam( MCH_MP.OFFSR, -0.01)
 
             -- imposto posizione braccio porta testa
@@ -6989,7 +6996,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                return false, sErr
             end
 
-         -- se riconosciuta gestione 3 facce (limitatamente per ora alla feature 20)
+         -- CASO SPECIALE 3 FACCE (se rimane esclusa molta sezione trasversale complessiva della feature, solo per feature 20)
          elseif bSpecial3faces and Proc.Prc == 20 then
             -- se smusso non è esclusivo
             if nChamfer < 2 then
@@ -7115,7 +7122,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   if not bOk then return false, sWarn end
                end
             end
-         -- altrimenti lavorazione di svuotatura o contornatura
+
+         -- SVUOTATURA O FRESATURA: si valuta se si può fare svuotatura o se provare altro
          else
             local bUseOtherFace
             local bLapJointAngTrasm = false
@@ -7229,6 +7237,11 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   nUseRoughTool = 1
                end
             end
+            -- se presente curva da lavorare con lato aperto
+            if Proc.LoopIdFacInd and ( EgtGetInfo( Proc.LoopIdFacInd, 'OPEN', 'i') or -1) > -1 then
+               sMchFind = 'OpenPocket'
+               nUseRoughTool = 0
+            end
             -- se abilitato rinvio da sotto
             if bLapJointAngTrasm then
                if not EgtEndsWith( sMchFind, '_AT') then
@@ -7273,7 +7286,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   EgtErase( nSurfPartId)
                end
             end
-            -- ricerca lavorazione
+            
+            -- ricerca lavorazione di svuotatura
             local sPocketing
             local _, sMyPocketing, dMyTMaxDepth, dMyTDiam = VerifyPocket( Proc, dDiam, dFacElev + dCollSic, dMaxTotLen, sMchFind, bMillUp, bMillDown)
             if not sMyPocketing and bMillUp then
@@ -7320,7 +7334,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
             local nQAntisplintResult = EgtGetInfo( Proc.Id, Q_ANTISPLINT_TYPE, 'i') or 0
             -- se lavorazione fresa come lama disabilito eventuale antischeggia
             if bSpecialMillOnSide then nQAntisplintResult = 0 end
-            -- se non trovata una svuotatura adatta
+
+            -- NO SVUOTATURA (si deve provare altro)
             if not sPocketing then
                -- se forma a L provo con contornatura
                if bIsL and not bSpecialMillOnSide and not bForceSideMill then
@@ -7666,6 +7681,8 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                      end
                   end
                end
+
+            -- SVUOTATURA OK
             else
                -- se devo inserire il chamfer
                if ( ( Proc.Fct == 3 and bIsU) or (Proc.Fct == 2 and bIsL)) and nChamfer > 0 then
@@ -8000,6 +8017,21 @@ local function MakeLongMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead)
       local nFct = EgtSurfTmFacetCount( vAddId[i])
       local AddProc = { Id = vAddId[i], Grp = Proc.Grp, Prc = Proc.Prc, Box = b3Box, TotBox = Proc.Box, Fct = nFct, Flg = Proc.Flg, PartId = Proc.PartId, TaskId = Proc.TaskId, FeatureId = Proc.FeatureId, IsSplittedLapJoint = true, AffectedFaces = Proc.AffectedFaces, OkFromBottom = Proc.OkFromBottom}
       Topology.Classify( AddProc, b3Raw)
+      -- con specifiche topologie si lavora la curva e si forza il lato aperto dove finisce la lavorazione precedente
+      if i > 1 and
+         ( ( Proc.Topology == 'Groove' and  Proc.IsThrough and Proc.Fct == 3 and Proc.AffectedFaces.Left and Proc.AffectedFaces.Right)
+         or ( Proc.Topology == 'Groove' and Proc.Fct == 4 and ( Proc.AffectedFaces.Left or Proc.AffectedFaces.Right))
+         or Proc.Topology == 'Pocket') then
+         local nFacInd = BL.GetFaceWithMostAdj( AddProc, nPartId)
+         if type( nFacInd) == "number" and nFacInd >= 0 then
+            local nLoopId, nLoopCnt = EgtExtractSurfTmFacetLoops( vAddId[i], nFacInd, nAddGrpId)
+            if nLoopId and nLoopCnt == 1 then
+               local nEdgeId = BL.GetEdgeToMachineFromVector( vAddId[i], nFacInd, -X_AX())
+               EgtSetInfo( nLoopId, 'OPEN', nEdgeId)
+               AddProc.LoopIdFacInd = nLoopId
+            end
+         end
+      end
       -- lasciare il false nel sesto parametro (perchè internamente viene verificato se diverso da nil)
       local bOk, sMyWarn
       bOk, sMyWarn, bPrevBhSideMill = MakeMoreFaces( AddProc, nPhase, nRawId, nPartId, dOvmHead, bAllWithEndCap, bPrevBhSideMill, bAllWithEndCap)

Version.lua

@@ -3,4 +3,4 @@
 
 NAME = 'Beam'
 VERSION = '3.1a1'
-MIN_EXE = '2.7f2'
+MIN_EXE = '3.1a4'