- Se unload , rimossa risalita a ZMAX

- GEOAX sempre riscritto se stato non coerente

Saomad-KAIROS-MK2.SIEMENS.mlpe

@@ -240,10 +240,6 @@ function OnDispositionEnd()
          MyEmtOutput( ';PART UNLOAD')
          MyEmtOutput( 'STOPRE')
          MyEmtOutput( 'TRANS')
-         if EMT.X1MASTER then
-            MyEmtOutput( 'GEOAX(1,X2,2,Y1,3,Z1)')
-            EMT.X1MASTER = false
-         end
       end
       for i = 1, #EMT.AUXSTR do
          MyEmtOutput( EMT.AUXSTR[i])
@@ -378,10 +374,6 @@ function OnMachiningEnd()
          MyEmtOutput( ';PART UNLOAD')
          MyEmtOutput( 'STOPRE')
          MyEmtOutput( 'TRANS')
-         if EMT.X1MASTER then
-            MyEmtOutput( 'GEOAX(1,X2,2,Y1,3,Z1)')
-            EMT.X1MASTER = false
-         end
 
       elseif EMT.AUXTYPE == 'P' then
          if EMT.PREROT then
@@ -694,12 +686,6 @@ function OnRapid()
          sOut = 'WAITP(X1)'
          MyEmtOutput( sOut)
          EMT.WAIT_SPLIT = nil
-         sOut = 'GEOAX(1,X2,2,Y1,3,Z1)'
-         if EMT.X1MASTER then
-            MyEmtOutput( sOut)
-            MyEmtOutput( 'G90 G17')
-            EMT.X1MASTER = false
-         end 
       end
 
       -- se necessario, attesa fine movimenti carrelli e presa assi relativi
@@ -722,17 +708,19 @@ function OnRapid()
       -- assegnazione assi geometrici (GEOAX)
       MyEmtOutput( 'TRANS')
 
-      -- se c'è stato un riposizionamento o un cambio utensile
-      if bMoveChar or EMT.TSELECT then
-         if EMT.X1DELTA then
+      -- se stato pinza attiva non coerente con master, si riscrivono gli assi
+      if EMT.X1DELTA or EMT.X2DELTA then
+         if EMT.X1DELTA and not EMT.X1MASTER then
             sOut = 'GEOAX(1,X1,2,Y1,3,Z1)'
             EMT.X1MASTER = true
-         else
+            MyEmtOutput( sOut)
+            MyEmtOutput( 'G90 G17')
+         elseif EMT.X2DELTA and ( EMT.X1MASTER and not EMT.X1DELTA) then
             sOut = 'GEOAX(1,X2,2,Y1,3,Z1)'
             EMT.X1MASTER = false
+            MyEmtOutput( sOut)
+            MyEmtOutput( 'G90 G17')
          end
-         MyEmtOutput( sOut)
-         MyEmtOutput( 'G90 G17')
       end
 
       -- dopo aver spostato i carrelli, lancio precarico

Saomad-KAIROS-MK2.mlde

@@ -7,9 +7,9 @@
 --                      Corretto calcolo valori per feed assi
 
 require( 'EmtGenerator')
-EgtEnableDebug(false)
+EgtEnableDebug( false)
 
-PP_VER = '3.1d1_DEV5'
+PP_VER = '3.1d1_DEV6'
 MIN_MACH_VER = '3.1c1'
 
 EgtOutLog ( '** Saomad-KAIROS '..PP_VER..' (MinMach '.. MIN_MACH_VER ..') **', 1)

Saomad-KAIROS-MK2.mlse

@@ -1597,7 +1597,7 @@ function SpecCalcUnload()
    -- Commento
    table.insert( vCmd, { 0, 'Unloading', EgtIf( bStdUl, 'Unloading', 'Manual Unloading')})
    -- risalita testa a Zmax
-   vCmd = AddZmaxMove( vCmd)
+   -- vCmd = AddZmaxMove( vCmd)
    -- Se pinza X1 chiusa, la apro
    if EMC.X1DELTA then
       table.insert( vCmd, { 11, 0})