EgtExecutor 2.1e1 :
- aggiunto a funzione exe e lua CreateSurfTmRuled parametro tipo di costruzione.
This commit is contained in:
@@ -590,19 +590,23 @@ LuaCreateSurfTmSwept( lua_State* L)
|
||||
static int
|
||||
LuaCreateSurfTmRuled( lua_State* L)
|
||||
{
|
||||
// 3 o 4 parametri : ParentId, PtOrCrvId1, PtOrCrvId2, [, dTol]
|
||||
// 3 o 4 o 5 parametri : ParentId, PtOrCrvId1, PtOrCrvId2 [, sType] [, dTol]
|
||||
int nParentId ;
|
||||
LuaCheckParam( L, 1, nParentId)
|
||||
int nPtOrCrvId1 ;
|
||||
LuaCheckParam( L, 2, nPtOrCrvId1)
|
||||
int nPtOrCrvId2 ;
|
||||
LuaCheckParam( L, 3, nPtOrCrvId2)
|
||||
string sType = "IP" ;
|
||||
double dLinTol = LIN_TOL_DEF ;
|
||||
if ( lua_gettop( L) >= 4)
|
||||
LuaCheckParam( L, 4, dLinTol) ;
|
||||
if ( LuaGetParam( L, 4, sType))
|
||||
LuaGetParam( L, 5, dLinTol) ;
|
||||
else
|
||||
LuaGetParam( L, 4, dLinTol) ;
|
||||
LuaClearStack( L) ;
|
||||
// creo STM riempiendo un contorno piano
|
||||
int nId = ExeCreateSurfTmRuled( nParentId, nPtOrCrvId1, nPtOrCrvId2, dLinTol) ;
|
||||
int nType = ( sType == "MD" ? RUL_TYPE_MINDIST : RUL_TYPE_ISOPAR) ;
|
||||
int nId = ExeCreateSurfTmRuled( nParentId, nPtOrCrvId1, nPtOrCrvId2, nType, dLinTol) ;
|
||||
// restituisco il risultato
|
||||
if ( nId != GDB_ID_NULL)
|
||||
LuaSetParam( L, nId) ;
|
||||
|
||||
Reference in New Issue
Block a user