se lavorazione precedente e attuale con lama, si alza a ZMAX

Essetre-90480031.mlde

@@ -11,8 +11,8 @@
 require( 'EmtGenerator')
 EgtEnableDebug( false)
 
-PP_VER = '2.7e5'
-PP_NVER = '2.7.5.5'
+PP_VER = '2.7e6'
+PP_NVER = '2.7.5.6'
 
 -- Parametri macchina
 NumericalControl = 'NUM'                                      -- NUM o TPA

Essetre-WALL.NUM.mlpe

@@ -290,17 +290,14 @@ function OnRapid()
          local bUserSR = ( EgtGetValInNotes( EMT.MCHUSERNOTES, 'ScrapRemove', 'i') == 1)
          if bSystemSR or bUserSR then
             if bSystemSR then EMT.SCRAPFIRST = false end
-            -- se prima avevo lama mi alzo in Z zero
-            if EMT.PREVHEAD == 'H2' then
+            -- se lavorazione precedente e attuale con lama, si alza a ZMAX
+            if EMT.PREVHEAD == 'H2' and EMT.HEAD == 'H2' then
                local sEM = ' EM'..EgtIf( EMT.S > 0, '3', '4')
                local sES = ' ES'..EgtNumToString( abs( EMT.S), 0)
                local sEL = ' EL' .. EmtLenToString( EgtIf( EMT.HEAD ~= 'H3', EMT.TLEN, ( EMT.TDIST or ChSawLen)), 3)
                local sER = ' ER' .. EmtLenToString( EgtIf( EMT.HEAD ~= 'H3', EMT.TDIAM / 2, EMT.TLEN), 3)
                local sOut = 'G101' .. EmtGetHomeAxisByName( 'Z2') .. EmtGetHomeAxisByName( 'B2') .. EmtGetHomeAxisByName( 'C2')
-               -- se lavorazione attuale non è lama, mando lama a parcheggio
-               if EMT.HEAD ~= 'H2' then
-                  sOut = sOut .. ' U' .. EmtLenToString( MinX2, 3) .. ' W0 V90 A0'
-               end
+               sOut = sOut .. ' U' .. EmtLenToString( MaxX1, 3) .. ' W0 V0 A0'
                sOut = sOut .. GetET() .. GetEE() .. GetEF() .. sEM .. sES .. sEL .. sER
                EmtOutput( sOut)
             end