EgtMachKernel 1.6r6 :

- corretto errore di mancata scrittura di m_dExtSawArcMinRad in dati generali DB lavorazioni
- aggiunte funzioni per conoscere utensile caricato su testa/uscita dati e per scaricarlo
- corretta impostazione assi e verifica corse per Rise di lavorazione precedente
- su inizio fine movimento si richiamano sempre i relativi script indipendentemente dal valore del flag.

MachineHeads.cpp

@@ -73,6 +73,51 @@ Machine::LoadTool( const string& sHead, int nExit, const string& sTool)
    return EnableHeadInSet( sHead) ;
 }
 
+//----------------------------------------------------------------------------
+bool
+Machine::GetLoadedTool( const string& sHead, int nExit, string& sTool)
+{
+  // controllo GeomDB
+   if ( m_pGeomDB == nullptr)
+      return false ;
+  // recupero il gruppo della testa
+   int nHdGrp = GetGroup( sHead) ;
+   if ( ! IsHeadGroup( nHdGrp))
+      return false ;
+  // cerco il gruppo dell'uscita in quello della testa
+   string sExit = MCH_EXIT + ToString( nExit) ;
+   int nExGrp = m_pGeomDB->GetFirstNameInGroup( nHdGrp, sExit) ;
+   Exit* pExit = GetExit( nExGrp) ;
+   if ( pExit == nullptr)
+      return false ;
+  // recupero nome utensile montato
+   sTool = pExit->GetTool() ;
+   return ( ! sTool.empty()) ;
+}
+
+//----------------------------------------------------------------------------
+bool
+Machine::UnloadTool( const string& sHead, int nExit)
+{
+  // controllo GeomDB
+   if ( m_pGeomDB == nullptr)
+      return false ;
+  // recupero il gruppo della testa
+   int nHdGrp = GetGroup( sHead) ;
+   if ( ! IsHeadGroup( nHdGrp))
+      return false ;
+  // cerco il gruppo dell'uscita in quello della testa
+   string sExit = MCH_EXIT + ToString( nExit) ;
+   int nExGrp = m_pGeomDB->GetFirstNameInGroup( nHdGrp, sExit) ;
+   Exit* pExit = GetExit( nExGrp) ;
+   if ( pExit == nullptr)
+      return false ;
+  // pulisco il gruppo dell'uscita
+   m_pGeomDB->EmptyGroup( nExGrp) ;
+   pExit->SetTool( "") ;
+   return true ;
+}
+
 //----------------------------------------------------------------------------
 bool
 Machine::ResetHeadSet( const string& sHead)