diff --git a/EXE_MachMgr.cpp b/EXE_MachMgr.cpp
index 9e97d2c..f797d45 100644
--- a/EXE_MachMgr.cpp
+++ b/EXE_MachMgr.cpp
@@ -1308,6 +1308,16 @@ ExeTdbGetCurrToolMaxDepth( double& dMaxDepth)
    return pMachMgr->TdbGetCurrToolMaxDepth( dMaxDepth) ;
 }
 
+//-----------------------------------------------------------------------------
+bool
+ExeTdbGetCurrToolThDiam( double& dThDiam)
+{
+   IMachMgr* pMachMgr = GetCurrMachMgr() ;
+   VERIFY_MACHMGR( pMachMgr, false)
+  // recupero il diametro del portautensili
+   return pMachMgr->TdbGetCurrToolThDiam( dThDiam) ;
+}
+
 //-----------------------------------------------------------------------------
 int
 ExeTdbCurrToolDraw( int nGenCtx, int nToolCtx)
@@ -1315,7 +1325,7 @@ ExeTdbCurrToolDraw( int nGenCtx, int nToolCtx)
    ExeSetCurrentContext( nGenCtx) ;
    IMachMgr* pMachMgr = GetCurrMachMgr() ;
    VERIFY_MACHMGR( pMachMgr, 999)
-  // recupero il massimo affondamento dell'utensile
+  // recupero il disegno dell'utensile
    return pMachMgr->TdbCurrToolDraw( nGenCtx, nToolCtx) ;
 }
 
diff --git a/EgtExecutor.rc b/EgtExecutor.rc
index e6b74ff..7d2c3f8 100644
Binary files a/EgtExecutor.rc and b/EgtExecutor.rc differ
diff --git a/LUA_MachMgr.cpp b/LUA_MachMgr.cpp
index 75a053b..e424949 100644
--- a/LUA_MachMgr.cpp
+++ b/LUA_MachMgr.cpp
@@ -1436,6 +1436,22 @@ LuaTdbGetCurrToolMaxDepth( lua_State* L)
    return 1 ;
 }
 
+//-------------------------------------------------------------------------------
+static int
+LuaTdbGetCurrToolThDiam( lua_State* L)
+{
+  // nessun parametro
+   LuaClearStack( L) ;
+  // recupero il diametro del portautensili
+   double dVal ;
+   bool bOk = ExeTdbGetCurrToolThDiam( dVal) ;
+   if ( bOk)
+      LuaSetParam( L, dVal) ;
+   else
+      LuaSetParam( L) ;
+   return 1 ;
+}
+
 //-------------------------------------------------------------------------------
 static int
 LuaTdbGetCurrToolDraw( lua_State* L)
@@ -3624,6 +3640,7 @@ LuaInstallMachMgr( LuaMgr& luaMgr)
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbSetCurrToolParam", LuaTdbSetCurrToolParam) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolParam", LuaTdbGetCurrToolParam) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolMaxDepth", LuaTdbGetCurrToolMaxDepth) ;
+   bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolThDiam", LuaTdbGetCurrToolThDiam) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolDraw", LuaTdbGetCurrToolDraw) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbReload", LuaTdbReload) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbSave", LuaTdbSave) ;