Cambio di versione

- Aggiunto parametro MaxBackClamp5

Beam/MachiningTypes.ini

@@ -36,6 +36,7 @@
 22=Long2CutSide
 23=SmallToolContour
 24=AntiSplintMillCut
+25=Prof_end
 
 [Pocketing]
 1=Pocket

Common_ONE-PF.NUM.mlpe

@@ -2415,6 +2415,9 @@ end
 
 ---------------------------------------------------------------------
 function GetV1ToCloseNum( UseCurrV1)
+   if EMT.MCHPRECUT or EMT.MCHCUT then
+      return false
+   end
    --EmtOutput( string.format( 'L1m=%.3f L1M=%.3f', EMT.MAXMIN[1], EMT.MAXMAX[1]))
    --EmtOutput( string.format( 'LB=%.3f LT=%.3f', EMT.LB, EMT.LT))
    local dV1Pos

Common_ONE-PF.mlpe

@@ -237,9 +237,9 @@ function OnSimulDispositionStart()
                end
             end
             -- determino la risoluzione dello Zmap
-            local dTol = 4.00
+            local dTol = 4.71
             if EmtGetVMillStep then
-               dTol = EmtGetVMillStep( b3Raw:getDimX(), b3Raw:getDimY(), b3Raw:getDimZ(), 4.00)
+               dTol = EmtGetVMillStep( b3Raw:getDimX(), b3Raw:getDimY(), b3Raw:getDimZ(), 4.71)
             else
                local dArea = b3Raw:getDimX() * b3Raw:getDimY() + b3Raw:getDimX() * b3Raw:getDimZ() + b3Raw:getDimY() * b3Raw:getDimZ()
                if dArea < 0.075e6 then
@@ -772,6 +772,7 @@ function OnSimulMachiningStart()
    EMT.VMRS = ( EMT.MCHTYPE ~= MCH_MY.DRILLING and not EMT.MCHUSERNOTES:find( 'VMRS=0;', 1, true))
    EMT.MCHSPLIT = ( EMT.MCHUSERNOTES:find( 'Split;', 1, true) ~= nil)
    EMT.MCHPRECUT = ( EMT.MCHUSERNOTES:find( 'Precut;', 1, true) ~= nil)
+   EMT.MCHCUT = ( EMT.MCHUSERNOTES:find( 'Cut;', 1, true) ~= nil)
    -- recupero TASKID della feature lavorata
    local vId = EgtGetMachiningGeometry()
    if vId and #vId > 0 and #vId[1] > 0 then
@@ -1053,9 +1054,9 @@ function OnSimulMoveStart()
             end
          -- altrimenti sega a catena
          else
+            local dPosA = GetCurrChainSawingVirtualAxis()
             -- se anche precedente con sega a catena ma depositata, devo riprenderla
             if EMT.CHSAW_OUT then
-               local dPosA = GetCurrChainSawingVirtualAxis()
                EgtSetMode( EgtGetHeadId( EMT.HEAD), GDB_MD.HIDDEN)
                OnSimulToolDeselect()
                EgtLoadTool( EMT.HEAD, 1, EMT.TOOL)
@@ -1119,9 +1120,9 @@ function OnSimulMoveStart()
                end
             -- altrimenti sega a catena (H13 o H15)
             else
+               local dPosA = GetCurrChainSawingVirtualAxis()
                -- se anche precedente con sega a catena ma depositata, devo riprenderla
                if EMT.CHSAW_OUT then
-                  local dPosA = GetCurrChainSawingVirtualAxis()
                   EgtSetMode( EgtGetHeadId( EMT.HEAD), GDB_MD.HIDDEN)
                   OnSimulToolDeselect()
                   EgtLoadTool( EMT.HEAD, 1, EMT.TOOL)
@@ -1195,9 +1196,9 @@ function OnSimulMoveStart()
                end
             -- altrimenti sega a catena
             else
+               local dPosA = GetCurrChainSawingVirtualAxis()
                -- se anche precedente con sega a catena ma depositata, devo riprenderla
                if EMT.CHSAW_OUT then
-                  local dPosA = GetCurrChainSawingVirtualAxis()
                   EgtSetMode( EgtGetHeadId( EMT.HEAD), GDB_MD.HIDDEN)
                   OnSimulToolDeselect()
                   EgtLoadTool( EMT.HEAD, 1, EMT.TOOL)
@@ -2206,6 +2207,9 @@ end
 
 ---------------------------------------------------------------------
 function GetV1ToClose()
+   if EMT.MCHPRECUT or EMT.MCHCUT then
+      return false
+   end
    --EgtOutLog( string.format( 'L1m=%.3f L1M=%.3f V2NP=%.3f LB=%.3f', EMT.MAXMIN[1], EMT.MAXMAX[1], EMT.V2NEXTPOS, EMT.LB))
    --EgtOutLog( string.format( 'LB=%.3f LT=%.3f', EMT.LB, EMT.LT or 0))
    return ( EMT.MAXMAX[1] <= EMT.V1NEXTPOS + RollCageMin and EMT.MAXMIN[1] + EMT.LB >= EMT.V1NEXTPOS + RollCageMax)

Common_ONE-PF.mlse

@@ -223,7 +223,7 @@ local MIN_BACK_ENG_V = 115       -- ingombro asse Z a sinistra
 local AGG_V = MinDeltaYV         -- ingombro rulli pressori + sicurezza
 local MIN_CLAMP_5 = 150          -- minima presa con la pinza speciale (pinza 5)
 local SIC_CLAMP_5 = 50           -- sicurezza testa da pinza speciale
-local MAX_BACK_CLAMP_5 = 320     -- massima sporgenza posteriore del pezzo da pinza speciale
+local MAX_BACK_CLAMP_5 = EgtClamp( MaxBackClamp5 or 320, 200, 380)   -- massima sporgenza posteriore del pezzo da pinza speciale
 
 ----------------------- Variabili -----------------------------------
 local Test = false

Essetre-PF.mlde

@@ -32,8 +32,8 @@
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.7g2'
-PP_NVER = '2.7.7.2'
+PP_VER = '2.7g4_DEV2'
+PP_NVER = '2.7.7.4'
 MIN_MACH_VER = '2.5k1'
 MACH_NAME = string.match( EgtGetCurrMachineDir(), "[^\\]+$")  -- si ricava il nome della macchina dal direttorio
 
@@ -163,7 +163,6 @@ SecondSaw = false
 AutomaticRotation = true
 OptimizedLoadBeam = true
 AutoRotMinLen = 0
-CoeffVM = 0.5
 EstimationRapidMultiplier = 1
 ForceToCloseRollersGate = false
 
@@ -256,6 +255,7 @@ if EgtExistsFile( sData) then
          if Machine.Offsets.COEFF_STIMATEMPI and Machine.Offsets.COEFF_STIMATEMPI > 0 then EstimationRapidMultiplier = Machine.Offsets.COEFF_STIMATEMPI end
          if Machine.Offsets.CHIUDI_PINZE_2_3_SCAMBIO then ForceToCloseRollersGate = Machine.Offsets.CHIUDI_PINZE_2_3_SCAMBIO == 1 end
          if Machine.Offsets.WOOD_DENSITY then WoodDensity = Machine.Offsets.WOOD_DENSITY end
+         if Machine.Offsets.MAX_BACK_CLAMP_5 then MaxBackClamp5 = Machine.Offsets.MAX_BACK_CLAMP_5 end
          -- aggiustamenti
          MinY1 = MinV1 + MinDeltaYV
          MaxY1 = MaxMchY1

UpdateLog.txt

@@ -1,5 +1,11 @@
            ==== Common_ONE-PF Update Log ====
 
+Versione 2.7g4 (23/07/2025)
+- (SIM-GEN) Aggiunto parametro configurabile da TS3 per massima sporgenza trave in coda per pinza 5. Ticket#2538
+
+Versione 2.7g3 (22/07/2025)
+- (SIM) Corretto lettura angolo di presa della motosega
+
 Versione 2.7g2 (08/07/2025)
  - (SIM) Corretto movimento a parcheggio sega a catena. Ticket#2517
 

Version.lua

@@ -3,7 +3,7 @@
 
 local InfoCommon_STD_PP = {
    NAME = 'Common_ONE-PF',            -- nome script PP standard
-   VERSION = '2.7g2',                 -- versione script
+   VERSION = '2.7g4',                 -- versione script
    MIN_MACH_VER_PP_COMMON = '2.5k1'   -- versione minima kernel
 }