Cambio nome versione

Common_ONE-PF.NUM.mlpe

@@ -1140,21 +1140,23 @@ 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 succesivo
-            if not HeadIsChainSaw( EMT.HEAD) and nHSet == nPrevHSet then
-               if nHSet == 1 then
-                  local HomeX1 = EgtGetAxisHomePos( 'X1')
-                  EmitMoveDataHead( 1, { X=-HomeX1, Z=MaxZ1, B=ParkB1, C=ParkC1})
-                  EmitMoveStartHead( 1, 'EA1')
-                  EmitMoveWaitHead( 1)
-               else
-                  local HomeX2 = EgtGetAxisHomePos( 'X2')
-                  EmitMoveDataHead( 2, { X=-HomeX2, Z=MaxZ2, B=ParkB2, C=ParkC2})
-                  EmitMoveStartHead( 2, 'EA1')
-                  EmitMoveWaitHead( 2)
-               end
-            else
-               if not HeadIsChainSaw( EMT.PREVHEAD) then
+            -- se successivo non è sega a catena e la testa è la stessa, vado in home con utensile successivo
+         --   if not HeadIsChainSaw( EMT.HEAD) and nHSet == nPrevHSet then
+         --      if nHSet == 1 then
+         --         local HomeX1 = EgtGetAxisHomePos( 'X1')
+         --         EmitMoveDataHead( 1, { X=-HomeX1, Z=MaxZ1, B=ParkB1, C=ParkC1})
+         --         EmitMoveStartHead( 1, 'EA1')
+         --         EmitMoveWaitHead( 1)
+         --      else
+         --         local HomeX2 = EgtGetAxisHomePos( 'X2')
+         --         EmitMoveDataHead( 2, { X=-HomeX2, Z=MaxZ2, B=ParkB2, C=ParkC2})
+         --         EmitMoveStartHead( 2, 'EA1')
+         --         EmitMoveWaitHead( 2)
+         --      end
+         --   else
+               -- vado in parcheggio sempre con utensile precedente
+         --      if not HeadIsChainSaw( EMT.PREVHEAD) then
+               if EMT.PREVHEAD == 'H12' or EMT.PREVHEAD == 'H22' then
                   if nPrevHSet == 1 then
                      local HomeX1 = EgtGetAxisHomePos( 'X1')
                      EmitMoveDataHead( 1, { X=-EMT.PREVHOMEX_H1, Z=MaxZ1, B=ParkB1, C=ParkC1, TPos=AdjustTcPos( false, EMT.PREVTCPOS_H1)})
@@ -1166,17 +1168,17 @@ function OnRapid()
                      EmitMoveStartHead( 2, 'EA1')
                      EmitMoveWaitHead( 2)
                   end
-               else
-                  if GetHeadTCSet( EMT.PREVHEAD, EMT.PREVTCPOS) == 'Head1_TC1' or GetHeadTCSet( EMT.PREVHEAD, EMT.PREVTCPOS) == 'Head1_TC2' then
-                     EmitMoveDataHead( 1, { X=-ParkCSawX1S, Z=MaxZ1, B=HomeR2, C=HomeR1, TPos='50'})
-                     EmitMoveStartHead( 1, 'EA1')
-                     EmitMoveWaitHead( 1)
-                  else
-                     EmitMoveDataHead( 2, { X=-ParkCSawX2S, Z=MaxZ2, B=HomeR2, C=HomeR1, TPos='50'})
-                     EmitMoveStartHead( 2, 'EA1')
-                     EmitMoveWaitHead( 2)
-                  end
-               end
+          --     else
+          --        if GetHeadTCSet( EMT.PREVHEAD, EMT.PREVTCPOS) == 'Head1_TC1' or GetHeadTCSet( EMT.PREVHEAD, EMT.PREVTCPOS) == 'Head1_TC2' then
+          --           EmitMoveDataHead( 1, { X=-ParkCSawX1S, Z=MaxZ1, B=HomeR2, C=HomeR1, TPos='50'})
+          --           EmitMoveStartHead( 1, 'EA1')
+          --           --EmitMoveWaitHead( 1)
+          --        else
+          --           EmitMoveDataHead( 2, { X=-ParkCSawX2S, Z=MaxZ2, B=HomeR2, C=HomeR1, TPos='50'})
+          --           EmitMoveStartHead( 2, 'EA1')
+          --           --EmitMoveWaitHead( 2)
+          --        end
+          --     end
             end
 
             EMT.TO_XHOME = nil

Essetre-ONE.mlde

@@ -76,7 +76,7 @@
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.6i4_DEV'
+PP_VER = '2.6i4_DEV2'
 PP_NVER = '2.6.9.4'
 MIN_MACH_VER = '2.5k1'
 MACH_NAME = 'Essetre-ONE'