EgtExecutor 2.5k4 :

- aggiunta funzione Exe e Lua Pocketing.

LUA_GdbModifyCurve.cpp

@@ -19,6 +19,7 @@
 #include "/EgtDev/Include/EXeConst.h"
 #include "/EgtDev/Include/EGkCurve.h"
 #include "/EgtDev/Include/EGkLuaAux.h"
+#include "/EgtDev/Include/EGkCalcPocketing.h"
 
 using namespace std ;
 
@@ -968,6 +969,35 @@ LuaProjectCurveOnSurfTm( lua_State* L)
    return 1 ;
 }
 
+//----------------------------------------------------------------------------
+static int
+LuaPocketing( lua_State* L) {
+  // 7 parametri : vId, dRad, dStep, dAngle, nType, bSmooth, nDestGrpId
+   INTVECTOR vId ;
+   LuaCheckParam( L, 1, vId) ;
+   double dRad ;
+   LuaCheckParam( L, 2, dRad) ;
+   double dStep ;
+   LuaCheckParam( L, 3, dStep) ;
+   double dAngle ;
+   LuaCheckParam( L, 4, dAngle) ;
+   int nType ;
+   LuaCheckParam( L, 5, nType) ;
+   bool bSmooth ;
+   LuaCheckParam( L, 6, bSmooth) ;
+   int nDestGrpId ;
+   LuaCheckParam( L, 7, nDestGrpId) ;
+   LuaClearStack( L) ;
+  // calcolo delle curve elementari di svuotatura
+   int nFirstId ;
+   int nCrvCount ;
+   bool bOk = ExePocketing( vId, dRad, dStep, dAngle, nType, bSmooth, nDestGrpId, nFirstId, nCrvCount) ;
+   LuaSetParam( L, bOk) ;
+   LuaSetParam( L, nFirstId) ;
+   LuaSetParam( L, nCrvCount) ;
+   return 3 ;
+}
+
 //-------------------------------------------------------------------------------
 bool
 LuaInstallGdbModifyCurve( LuaMgr& luaMgr)
@@ -1024,5 +1054,6 @@ LuaInstallGdbModifyCurve( LuaMgr& luaMgr)
    bOk = bOk && luaMgr.RegisterFunction( "EgtChainCurvesInGroup", LuaChainCurvesInGroup) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtReorderCurvesInGroup", LuaReorderCurvesInGroup) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtProjectCurveOnSurfTm", LuaProjectCurveOnSurfTm) ;
+   bOk = bOk && luaMgr.RegisterFunction( "EgtPocketing", LuaPocketing) ;
    return bOk ;
 }