- Aggiunta funzione GetSetupInfo a BeamData per nuovo automatismo

- Aggiunte variabili MinJoin(xx) per gestione MIN_JOIN_(xx)

Beam/BeamData.lua

@@ -117,6 +117,15 @@ if EgtExistsFile( sData) then
       end
    end
 end
+---------------------------------------------------------------------
+local function GetMaxLenRidgeLapFromBottom( dHRaw)
+   if dHRaw < BeamData.MIN_DIM_HBEAM then
+      return BeamData.MAX_LEN_RIDGELAP_FROM_BOTTOM + 0.01
+   else
+      return BeamData.MAX_LEN_RIDGELAP_FROM_BOTTOM_HBEAM + 0.01
+   end
+end
+BeamData.GetMaxLenRidgeLapFromBottom = GetMaxLenRidgeLapFromBottom
 
 ---------------------------------------------------------------------
 local function GetBlockedAxis( sHead, nToolType, sBlockedAxis)
@@ -147,14 +156,50 @@ end
 BeamData.GetBlockedAxis = GetBlockedAxis
 
 ---------------------------------------------------------------------
-local function GetMaxLenRidgeLapFromBottom( dHRaw)
-   if dHRaw < BeamData.MIN_DIM_HBEAM then
-      return BeamData.MAX_LEN_RIDGELAP_FROM_BOTTOM + 0.01
+local function GetChainSawInitAngs( vtN, vtO)
+   if vtN:getY() > 0 and vtO:getX() > 0 then
+      return 'C=0'
    else
-      return BeamData.MAX_LEN_RIDGELAP_FROM_BOTTOM_HBEAM + 0.01
+      return ''
    end
 end
-BeamData.GetMaxLenRidgeLapFromBottom = GetMaxLenRidgeLapFromBottom
+BeamData.GetChainSawInitAngs = GetChainSawInitAngs
+
+---------------------------------------------------------------------
+local function GetSetupInfo( sHead)
+   local SetupInfo = {}
+
+   -- dati comuni
+   SetupInfo.bIsCSymmetric = false
+   SetupInfo.dCAxisEncumbrance = 180
+   SetupInfo.bToolOnAggregate = false
+
+   -- testa 5 assi da sopra
+   if sHead == 'H1' then
+      SetupInfo.bIsTopHead = true
+      SetupInfo.bIsBottomHead = not SetupInfo.bIsTopHead
+      SetupInfo.dMaxNegativeAngle = sin( -45)
+   -- lama su testa 5 assi da sopra
+   elseif sHead == 'H2' then
+      SetupInfo.bIsTopHead = true
+      SetupInfo.bIsBottomHead = not SetupInfo.bIsTopHead
+      SetupInfo.dMaxNegativeAngle = sin( -45)
+   -- motosega
+   elseif sHead == 'H3' then
+      SetupInfo.bIsTopHead = true
+      SetupInfo.bIsBottomHead = not SetupInfo.bIsTopHead
+      SetupInfo.dMaxNegativeAngle = 0
+   -- rinvio angolare 90° (considerato come fosse una testa da sotto)
+   elseif sHead == 'H5' then
+      SetupInfo.bToolOnAggregate = true
+      SetupInfo.bIsBottomHead = true
+      SetupInfo.bIsTopHead = not SetupInfo.bIsBottomHead
+      SetupInfo.dMaxPositiveAngle = 0
+   end
+
+   return SetupInfo
+end
+BeamData.GetSetupInfo = GetSetupInfo
 
 ---------------------------------------------------------------------
 return BeamData

Common-FAST.mlse

@@ -32,11 +32,11 @@ local DELTA_TOL_FIXED = 50
 local DeltaTol = DELTA_TOL_S
 local DELTA_SIC = 1
 local AGG_LOAD = 50
-local MIN_JOIN_VV = 75
-local MIN_JOIN_SS = 100
-local MIN_JOIN_LS = 290
-local MIN_JOIN_SL = 100
-local MIN_JOIN_LL = 400
+local MIN_JOIN_VV = EgtClamp( MinJoinVV or 75, 60, 150)
+local MIN_JOIN_SS = EgtClamp( MinJoinSS or 100, 80, 200)
+local MIN_JOIN_LS = EgtClamp( MinJoinLS or 290, 250, 400)
+local MIN_JOIN_SL = EgtClamp( MinJoinSL or 100, 80, 200)
+local MIN_JOIN_LL = EgtClamp( MinJoinLL or 400, 300, 600)
 local MinJoin = MIN_JOIN_SS
 local MinOther = abs( MinY) + abs( MaxV) + MinJoin
 
@@ -908,7 +908,7 @@ function SpecCalcEncumbrance( vtTool, vtArm, ptMin, ptMax, bSaw, bChain, dTLen,
       elseif abs( vtTool:getZ()) < 0.93 then
          if vtTool:getX() > 0 and abs( vtTool:getY()) < 0.2 and ptMax:getZ() > EMC.ZMIN + BD.VICE_MINH then
             dHeadBack = 180
-         elseif vtTool:getX() > -0.05 then
+         elseif vtTool:getX() > -0.06 then
             dHeadBack = 50 + 0.5 * dTDiam * sqrt( 1 - vtTool:getX() * vtTool:getX())
          elseif vtTool:getX() > -0.3 then
             dHeadBack = 250
@@ -999,7 +999,7 @@ function SpecCalcEncumbrance( vtTool, vtArm, ptMin, ptMax, bSaw, bChain, dTLen,
       elseif abs( vtTool:getZ()) < 0.93 then
          if vtTool:getX() < 0 and abs( vtTool:getY()) < 0.2 and ptMax:getZ() > EMC.ZMIN + BD.VICE_MINH then
             dHeadFront = 180
-         elseif vtTool:getX() < 0.05 then
+         elseif vtTool:getX() < 0.06 then
             dHeadFront = 50 + 0.5 * dTDiam * sqrt( 1 - vtTool:getX() * vtTool:getX())
          elseif vtTool:getX() < 0.3 then
             dHeadFront = 250

Essetre-FAST.mlde

@@ -51,11 +51,15 @@
 -- 2024/04/18 AV ver 2.6d3 Allineamento con common ver. 2.6d2
 -- 2024/04/30 AV ver 2.6e1 Allineamento con common ver. 2.6e1
 --                         Aggiunta variabile WoodDensity per gestione WOOD_DENSITY
+-- 2024/05/06 AV ver 2.6e2 Allineamento con common ver. 2.6e2
+-- 2024/05/06 AV ver 2.6e3 Allineamento con common ver. 2.6e3
+--                         Aggiunte variabili MinJoin(xx) per gestione MIN_JOIN_(xx) 
+-- 2024/06/03 AV ver 2.6f1 Aggiunta funzione GetSetupInfo a BeamData per nuovo automatismo
 
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.6e1'
+PP_VER = '2.6f1'
 MIN_MACH_VER = '2.5k1'
 MACH_NAME = 'Essetre-FAST'
 
@@ -177,6 +181,11 @@ if EgtExistsFile( sData) then
          if Machine.Offsets.NOULOAD then MaxUnloadLen = Machine.Offsets.NOULOAD end
          if Machine.Offsets.DEFTCPOS then DefTcPos = ( 'T' .. Machine.Offsets.DEFTCPOS) end
          if Machine.Offsets.WOOD_DENSITY then WoodDensity = Machine.Offsets.WOOD_DENSITY end
+         if Machine.Offsets.MIN_JOIN_VV then MinJoinVV = Machine.Offsets.MIN_JOIN_VV end
+         if Machine.Offsets.MIN_JOIN_SS then MinJoinSS = Machine.Offsets.MIN_JOIN_SS end
+         if Machine.Offsets.MIN_JOIN_LS then MinJoinLS = Machine.Offsets.MIN_JOIN_LS end
+         if Machine.Offsets.MIN_JOIN_SL then MinJoinSL = Machine.Offsets.MIN_JOIN_SL end
+         if Machine.Offsets.MIN_JOIN_LL then MinJoinLL = Machine.Offsets.MIN_JOIN_LL end
       end
    end
 end

UpdateLog.txt

@@ -1,5 +1,11 @@
            ==== Common_FAST Update Log ====
 
+Versione 2.6e3 (06/05/2024)
+- (MLDE-SIM-GEN) Gestione facoltativa parametri MIN_JOIN_xx settabili in Ts3. Ticket#1794
+
+Versione 2.6e2 (06/05/2024)
+- (SIM-GEN) Modificata tolleranza calcolo ingombri lavorazioni per posizionamento pinze. Ticket#1790
+
 Versione 2.6e1 (30/04/2024)
 - (MLDE-GEN) Gestione facoltativa parametro WOOD_DENSITY settabile in Ts3. In MLDE, mettere il valore di WOOD_DENSITY nella nostra variabile 'WoodDensity'.
 

Version.lua

@@ -3,7 +3,7 @@
 
 local InfoCommon_STD_PP = {
    NAME = 'Common-FAST',            -- nome script PP standard
-   VERSION = '2.6e1',                 -- versione script
+   VERSION = '2.6e3',                 -- versione script
    MIN_MACH_VER_PP_COMMON = '2.5k1'   -- versione minima kernel
 }