EgtExecutor/LUA_Scene.cpp

//----------------------------------------------------------------------------
//  EgalTech 2014-2014
//----------------------------------------------------------------------------
// File : LUA_Scene.cpp       Data : 29.09.14        Versione : 1.5i5
// Contenuto : Funzioni di visualizzazione per LUA.
//
//
//
// Modifiche : 29.09.14 DS Creazione modulo.
//
//
//----------------------------------------------------------------------------

//--------------------------- Include ----------------------------------------
#include "stdafx.h"
#include "LUA.h"
#include "/EgtDev/Include/EXeExecutor.h"
#include "/EgtDev/Include/EGkLuaAux.h"

using namespace std ;

//-------------------------------------------------------------------------------
static int
LuaSetBackground( lua_State* L)
{
  // 2 o 3 parametri : colore top, colore bottom [, flag ridisegna]
   Color colTop ;
   LuaCheckParam( L, 1, colTop)
   Color colBot ;
   LuaCheckParam( L, 2, colBot)
   bool bRedraw ;
   LuaGetParam( L, 3, bRedraw) ;
   LuaClearStack( L) ;
  // imposto lo sfondo
   bool bOk = ExeSetBackground( colTop, colBot, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaDraw( lua_State* L)
{
  // nessun parametro
   LuaClearStack( L) ;
  // eseguo ridisegno
   bool bOk = ExeDraw() ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaSetShowMode( lua_State* L)
{
  // 1 o 2 parametri : nShowMode [, flag ridisegna]
   int nShowMode ;
   LuaCheckParam( L, 1, nShowMode)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ;
   LuaClearStack( L) ;
  // imposto il modo di visualizzazione
   bool bOk = ExeSetShowMode( nShowMode, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaSetShowCurveDirection( lua_State* L)
{
  // 1 o 2 parametri : bool bShowCrvDir [, flag ridisegna]
   bool bShowCrvDir ;
   LuaCheckParam( L, 1, bShowCrvDir)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ;
   LuaClearStack( L) ;
  // imposto visualizzazione direzione curve
   bool bOk = ExeSetShowCurveDirection( bShowCrvDir, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaSetShowTriaAdv( lua_State* L)
{
  // 1 o 2 parametri : flag bAdvanced [, flag ridisegna]
   bool bAdvanced ;
   LuaCheckParam( L, 1, bAdvanced)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ,
   LuaClearStack( L) ;
  // imposto visualizzazione direzione curve
   bool bOk = ExeSetShowTriaAdv( bAdvanced, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaZoomRadius( lua_State* L)
{
  // 1 o 2 parametri : dRadius [, flag ridisegna]
   double dRadius ;
   LuaCheckParam( L, 1, dRadius)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ;
   LuaClearStack( L) ;
  // imposto zoom
   bool bOk = ExeZoomRadius( dRadius, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaZoom( lua_State* L)
{
  // 1 o 2 parametri : nZoomType [, flag ridisegna]
   int nZoomType ;
   LuaCheckParam( L, 1, nZoomType)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ;
   LuaClearStack( L) ;
  // imposto zoom
   bool bOk = ExeZoom( nZoomType, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaSetView( lua_State* L)
{
  // 1 o 2 parametri : nViewDir [, flag ridisegna]
   int nViewDir ;
   LuaCheckParam( L, 1, nViewDir)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ;
   LuaClearStack( L) ;
  // imposto direzione di vista
   bool bOk = ExeSetView( nViewDir, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaSetGenericView( lua_State* L)
{
  // 2 o 3 parametri : dAngVertDeg, dAngHorizDeg [, flag ridisegna]
   double dAngVertDeg ;
   LuaCheckParam( L, 1, dAngVertDeg)
   double dAngHorizDeg ;
   LuaCheckParam( L, 2, dAngHorizDeg)
   bool bRedraw = true ;
   LuaGetParam( L, 3, bRedraw) ;
   LuaClearStack( L) ;
  // imposto direzione di vista
   bool bOk = ExeSetGenericView( dAngVertDeg, dAngHorizDeg, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
static int
LuaSetViewCenter( lua_State* L)
{
  // 1 o 2 parametri : ptCen [, flag ridisegna]
   Point3d ptCen ;
   LuaCheckParam( L, 1, ptCen)
   bool bRedraw = true ;
   LuaGetParam( L, 2, bRedraw) ;
   LuaClearStack( L) ;
  // imposto centro di vista
   bool bOk = ExeSetViewCenter( ptCen, bRedraw) ;
  // restituisco il risultato
   LuaSetReturn( L, bOk) ;
   return 1 ;
}

//-------------------------------------------------------------------------------
bool
LuaInstallScene( LuaMgr& luaMgr)
{
   bool bOk = ( &luaMgr != nullptr) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetBackground", LuaSetBackground) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtDraw", LuaDraw) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetShowMode", LuaSetShowMode) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetShowCurveDirection", LuaSetShowCurveDirection) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetShowTriaAdv", LuaSetShowTriaAdv) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtZoomRadius", LuaZoomRadius) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtZoom", LuaZoom) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetView", LuaSetView) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetGenericView", LuaSetGenericView) ;
   bOk = bOk && luaMgr.RegisterFunction( "EgtSetViewCenter", LuaSetViewCenter) ;
   return bOk ;
}