FixDeployAndCompile01

- Allineamento con common ver. 2.6g4

.gitlab-ci.yml

@@ -84,14 +84,17 @@ variables:
      Rename-Item -Path "$env:TEST_PATH\$env:MACH_NAME.ini" -NewName "$env:MACH_NAME_TEST.ini"
      ROBOCOPY . "$env:SRC_PATH\bin\$env:MACH_NAME\" /E /XF "*.bat" /XF "*.yml" /XF ".gitignore" /XD ".git" /XF "UpdateLog.txt" /XD ".vscode"
      echo "-----------------------"
-     echo "   Compilazione file *.lua 32/64bit"
+     echo "   Compilazione file *.lua 32/64bit di Common*"
      echo "-----------------------"
-     $FileList = Get-ChildItem("Common-*")
+     $FileList = Get-ChildItem("Common*")
      ForEach ($File in $FileList) {
        $FileName = Split-Path $File -leaf
        lua54 -o $env:SRC_PATH\bin\$env:MACH_NAME\$FileName -s $FileName
        echo "lua54 -o bin\$FileName -s $FileName"
      }
+     echo "-----------------------"
+     echo "   FINE Compilazione"
+     echo "-----------------------"
 
 # helper recupero nome macchina
 .machName-fix: &machName-fix

Beam/BeamData.lua

@@ -14,7 +14,7 @@ local BeamData = {
    MAX_HEIGHT = 800,                          -- altezza massima del grezzo
    LEN_SHORT_PART = 1200,                     -- lunghezza massima pezzo piccolo
    LEN_VERY_SHORT_PART = 400,                 -- lunghezza massima pezzo molto corto (molto probabile lo scarico a caduta)
-   MAX_RAW = 20000,                           -- massima lunghezza grezzo (deve essere minore di LenTable - RAW_OFFSET)
+   MAX_RAW = 30000,                           -- massima lunghezza grezzo (deve essere minore di LenTable - RAW_OFFSET)
    STD_RAW = 14000,                           -- lunghezza standard della barra di grezzo
    OVM_HEAD = 10,                             -- sovramateriale testa
    OVM_MID = 5.0,                             -- sovramateriale intermedio (spessore lama)

Common_ONE-PF.NUM.mlpe

@@ -608,10 +608,12 @@ function OnMachiningEnd()
       EMT.PREVTOOL_H1 = EMT.TOOL
       EMT.PREVHEAD_H1 = EMT.HEAD
       EMT.PREVTCPOS_H1 = EMT.TCPOS
+      EMT.PREVHOMEX_H1 = EgtGetAxisHomePos( 'X1')
    elseif nHSet == 2 then
       EMT.PREVTOOL_H2 = EMT.TOOL
       EMT.PREVHEAD_H2 = EMT.HEAD
       EMT.PREVTCPOS_H2 = EMT.TCPOS
+      EMT.PREVHOMEX_H2 = EgtGetAxisHomePos( 'X2')
    end
 
    if EMT.DOU_TYPE and not EMT.ZMAX then EMT.DOU_TO_ZMAX = true end
@@ -1082,7 +1084,7 @@ function OnRapid()
             local nHSet = GetHeadSet( EMT.HEAD)
             local nPrevHSet = GetHeadSet( EMT.PREVHEAD)
 
-            -- se successivo non è sega a catena e la testa è la stessa, vado in home con utensile successivo
+            -- se successivo non è sega a catena e la testa è la stessa, vado in home con utensile succesivo
             if not HeadIsChainSaw( EMT.HEAD) and nHSet == nPrevHSet then
                if nHSet == 1 then
                   local HomeX1 = EgtGetAxisHomePos( 'X1')
@@ -1097,11 +1099,11 @@ function OnRapid()
                if not HeadIsChainSaw( EMT.PREVHEAD) then
                   if nPrevHSet == 1 then
                      local HomeX1 = EgtGetAxisHomePos( 'X1')
-                     EmitMoveDataHead( 1, { X=-HomeX1, Z=MaxZ1, B=ParkB1, C=ParkC1, TPos=AdjustTcPos( false, EMT.PREVTCPOS_H1)})
+                     EmitMoveDataHead( 1, { X=-EMT.PREVHOMEX_H1, Z=MaxZ1, B=ParkB1, C=ParkC1, TPos=AdjustTcPos( false, EMT.PREVTCPOS_H1)})
                      EmitMoveStartHead( 1, 'EA1')
                   else
                      local HomeX2 = EgtGetAxisHomePos( 'X2')
-                     EmitMoveDataHead( 2, { X=-HomeX2, Z=MaxZ2, B=ParkB2, C=ParkC2, TPos=AdjustTcPos( false, EMT.PREVTCPOS_H2)})
+                     EmitMoveDataHead( 2, { X=-EMT.PREVHOMEX_H2, Z=MaxZ2, B=ParkB2, C=ParkC2, TPos=AdjustTcPos( false, EMT.PREVTCPOS_H2)})
                      EmitMoveStartHead( 2, 'EA1')
                   end
                else

Common_ONE-PF.mlse

@@ -1829,7 +1829,7 @@ local function MaxDispl( TabI, vCmd, sType)
      -- allontano (Y1+T) e (Y2)
       dY1a = MaxY1
       dY2a = MinY2
-      dTa = ( MaxY1 - TabI.dY1PosI) + dTa 
+      dTa = ( dY1a - TabI.dY1PosI) + dTa 
    -- **[M2]** = allontanamento dei trascinatori con Y2 in presa
    elseif sType == 'M2'   then
       EmitComment( vCmd, '[M2]')
@@ -1840,7 +1840,7 @@ local function MaxDispl( TabI, vCmd, sType)
       -- allontano (Y2+T) e (Y1)
       dY1a = MaxY1
       dY2a = MinY2
-      dTa = ( MinY2 - TabI.dY2PosI) + dTa 
+      dTa = ( dY2a - TabI.dY2PosI) + dTa 
    -- **[M3]** = accentramento dei trascinatori con Y1 in presa
    elseif sType == 'M3' then
       EmitComment( vCmd, '[M3]')
@@ -1850,7 +1850,7 @@ local function MaxDispl( TabI, vCmd, sType)
       -- accentro (Y1+T) e (Y2)
       dY1a = TabI.MyMinY1V1
       dY2a = TabI.MaxY2V2
-      dTa = ( TabI.MyMinY1V1 - TabI.dY1PosI) + dTa 
+      dTa = ( dY1a - TabI.dY1PosI) + dTa 
    -- **[M4]** = accentramento dei trascinatori con Y2 in presa
    elseif sType == 'M4' then
       EmitComment( vCmd, '[M4]')
@@ -1861,7 +1861,7 @@ local function MaxDispl( TabI, vCmd, sType)
       -- accentro (Y2+T) e (Y1)
       dY1a = TabI.MyMinY1V1
       dY2a = TabI.MaxY2V2
-      dTa = ( TabI.MaxY2V2 - TabI.dY2PosI) + dTa 
+      dTa = ( dY2a - TabI.dY2PosI) + dTa 
    end
    --
    table.insert( vCmd, { 3, 'Y1', dY1a,  'Y2', dY2a, 'T', dTa, EMC.CNT})
@@ -2187,7 +2187,7 @@ local function PosY1Y2B( TabI, vCmd)
          end 
       end
       nCnt = nCnt + 1
-      if nCnt > 5 then return end
+      if nCnt > 10 then return end
    until ( not bXW)
       -- chiusura/parcheggio dei trascinatori in funzioni chiamanti
    local dY1Delta = TabI.dY1PosI - TabI.dTPosI
@@ -2326,7 +2326,7 @@ local function PosY2Y1B( TabI, vCmd)
          end 
       end
       nCnt = nCnt + 1
-      if nCnt > 5 then return end
+      if nCnt > 10 then return end
    until ( not bXW)
    -- la chiusura delle morse è fatta sopra
    local dY1Delta = TabI.dY1PosI - TabI.dTPosI
@@ -2398,7 +2398,7 @@ function SpecAdjustCarrA( WorkTab)
          dY1DeltaF = PosY1Y2B( TabValI, vCmd)
       else
          --[A(1)A]  **ALLONTANAMENTO** (dall'origine) del trascinatore Y1
-         EmitComment( vCmd, '[AY1A]')
+         EmitComment( vCmd, '[A-Y1A]')
          dY1DeltaF = PosY1Y2A( TabValI, vCmd)
       end
       -- chiudo Y1

Essetre-PFrl.mlde

@@ -66,12 +66,15 @@
 --                      Allineamento con common ver. 2.6f1
 -- 2024/07/10 ver 2.6g1 Allineamento con common ver. 2.6g1
 -- 2024/07/16 ver 2.6g2 Allineamento con common ver. 2.6g2
+-- 2024/07/17 ver 2.6g3 Allineamento con common ver. 2.6g3
+-- 2024/07/22 ver 2.6g4 Gestione pezzi fino a 30 metri
+--                      Allineamento con common ver. 2.6g4
 
 -- Intestazioni
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.6g2'
+PP_VER = '2.6g4'
 MIN_MACH_VER = '2.5k1'
 MACH_NAME = 'Essetre-PFrl'
 
@@ -188,7 +191,7 @@ DeltaTabZ = -1010.0      -- per TPA la quota è dal centro di rotazione (va aggi
 DeltaRulliTraveZ = 980
 DeltaRulliTappetoZ = -485
 DimTabY = 500
-DimTabX = 24000
+DimTabX = 30000
 Delta2TabY = 1170.0
 Delta2TabZ = -1010.0     --  per TPA la quota è dal centro di rotazione (va aggiunto MillOffs)
 Head2X = 0
@@ -647,7 +650,7 @@ EmtAxis {
       Type = MCH_AT.LINEAR,
       Dir = - X_AX(),
       Pos = Point3d(0.0,2450.0,-958.0),
-      Stroke = {-20000, 20000},
+      Stroke = {-30000, 30000},
       Home = LoadT,
       Geo = 'T_AXIS/GEO'}
 EmtTable {

UpdateLog.txt

@@ -1,5 +1,11 @@
            ==== Common_ONE-PF Update Log ====
 
+Versione 2.6g4 (19/07/2024)
+- (SIM-GEN) Aumentato numero iterazioni per scambio carrelli (da 5 a 10), per pezzi lunghi 30m.
+
+Versione 2.6g3 (17/07/2024)
+- (GEN) Correzione modifica precedente (2.6g2). Con lama precedente e motosega successiva, andava a parcheggio con lama alla quota della motosega. Ticket#1880
+
 Versione 2.6g2 (16/07/2024)
 - (GEN) Per preselezione o movimenti in home, non si scrive più 'ET0' perchè non è più supportato. Ticket#1926
 

Version.lua

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