From 90da397afb192bb68196e794fa601293a33e6c11 Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.s@egaltech.com>
Date: Thu, 15 Oct 2020 07:43:34 +0000
Subject: [PATCH] EgtExecutor 2.2j2 : - aggiunta funzione Exe/Lua
 TdbGetCurrToolThLength.

---
 EXE_MachMgr.cpp |  10 ++++++++++
 EgtExecutor.rc  | Bin 16184 -> 16184 bytes
 LUA_MachMgr.cpp |  17 +++++++++++++++++
 3 files changed, 27 insertions(+)

diff --git a/EXE_MachMgr.cpp b/EXE_MachMgr.cpp
index cb80578..02c16f9 100644
--- a/EXE_MachMgr.cpp
+++ b/EXE_MachMgr.cpp
@@ -1408,6 +1408,16 @@ ExeTdbGetCurrToolThDiam( double& dThDiam)
    return pMachMgr->TdbGetCurrToolThDiam( dThDiam) ;
 }
 
+//-----------------------------------------------------------------------------
+bool
+ExeTdbGetCurrToolThLength( double& dThLen)
+{
+   IMachMgr* pMachMgr = GetCurrMachMgr() ;
+   VERIFY_MACHMGR( pMachMgr, false)
+  // recupero la lunghezza del portautensili
+   return pMachMgr->TdbGetCurrToolThLength( dThLen) ;
+}
+
 //-----------------------------------------------------------------------------
 int
 ExeTdbCurrToolDraw( int nGenCtx, int nToolCtx)
diff --git a/EgtExecutor.rc b/EgtExecutor.rc
index b52f0a05a12922b9f172b24609194fee2ccaa6ca..449e116bf3b29addc61c794ddf6020f20015c50a 100644
GIT binary patch
delta 105
zcmdl{x1(;uA2vp#%@@V4Gflq2nKwB}L}GFQr`YBKt{N7g_(8eLOp^}?BE$`p+!!}6
e64qk|YjR~q(%{Fqd6G0(;-H)(Lc&0aLlyuI7b5}y

delta 97
zcmdl{x1(;uA2vqA%@@V4Gflq2na5~2Ignd-a{*Tk3sCf++-0W82LxfF21;&>n->Y|
cF@rU@0x76sKgP|Iq`|@m<s4zc21*>V0JaGqDgXcg

diff --git a/LUA_MachMgr.cpp b/LUA_MachMgr.cpp
index 9d296e4..19741c0 100644
--- a/LUA_MachMgr.cpp
+++ b/LUA_MachMgr.cpp
@@ -1558,6 +1558,22 @@ LuaTdbGetCurrToolThDiam( lua_State* L)
    return 1 ;
 }
 
+//-------------------------------------------------------------------------------
+static int
+LuaTdbGetCurrToolThLength( lua_State* L)
+{
+  // nessun parametro
+   LuaClearStack( L) ;
+  // recupero la lunghezza del portautensili
+   double dVal ;
+   bool bOk = ExeTdbGetCurrToolThLength( dVal) ;
+   if ( bOk)
+      LuaSetParam( L, dVal) ;
+   else
+      LuaSetParam( L) ;
+   return 1 ;
+}
+
 //-------------------------------------------------------------------------------
 static int
 LuaTdbGetCurrToolDraw( lua_State* L)
@@ -3977,6 +3993,7 @@ LuaInstallMachMgr( LuaMgr& luaMgr)
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolValInNotes", LuaTdbGetCurrToolValInNotes) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolMaxDepth", LuaTdbGetCurrToolMaxDepth) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolThDiam", LuaTdbGetCurrToolThDiam) ;
+   bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolThLength", LuaTdbGetCurrToolThLength) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbGetCurrToolDraw", LuaTdbGetCurrToolDraw) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbReload", LuaTdbReload) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtTdbSave", LuaTdbSave) ;