EgtMachKernel :
- in simulazione aggiunta possibilità di gestire extra-corse di assi ausiliari in OnMoveStart - aggiunta funzione lua EmtSetOutstrokeInfo.
This commit is contained in:
@@ -106,6 +106,8 @@ Machine::LuaInit( const string& sMachineName)
|
||||
m_LuaMgr.RegisterFunction( "EmtGetAxesPos", Machine::LuaEmtGetAxesPos) ;
|
||||
// registro le funzioni di scrittura part program per lua
|
||||
m_LuaMgr.RegisterFunction( "EmtWrite", Machine::LuaEmtWrite) ;
|
||||
// registro la funzione per impostare informazioni di outstroke
|
||||
m_LuaMgr.RegisterFunction( "EmtSetOutstrokeInfo", Machine::LuaEmtSetOutstrokeInfo) ;
|
||||
|
||||
return true ;
|
||||
}
|
||||
@@ -935,3 +937,33 @@ Machine::LuaEmtWrite( lua_State* L)
|
||||
LuaSetParam( L, bOk) ;
|
||||
return 1 ;
|
||||
}
|
||||
|
||||
//----------------------------------------------------------------------------
|
||||
int
|
||||
Machine::LuaEmtSetOutstrokeInfo( lua_State* L)
|
||||
{
|
||||
// 5 parametri : sAxName, sAxToken, bLinear, dExtra, sAuxInfo
|
||||
string sAxName ;
|
||||
LuaCheckParam( L, 1, sAxName)
|
||||
string sAxToken ;
|
||||
LuaCheckParam( L, 2, sAxToken)
|
||||
bool bLinear ;
|
||||
LuaCheckParam( L, 3, bLinear)
|
||||
double dExtra ;
|
||||
LuaCheckParam( L, 4, dExtra)
|
||||
string sAuxInfo ;
|
||||
LuaCheckParam( L, 5, sAuxInfo)
|
||||
LuaClearStack( L) ;
|
||||
// verifico ci sia una macchina attiva
|
||||
if ( m_pMchLua == nullptr)
|
||||
return luaL_error( L, " Unknown Machine") ;
|
||||
// assegno i dati
|
||||
m_pMchLua->m_OutstrokeInfo.sAxName = sAxName ;
|
||||
m_pMchLua->m_OutstrokeInfo.sAxToken = sAxToken ;
|
||||
m_pMchLua->m_OutstrokeInfo.bLinear = bLinear ;
|
||||
m_pMchLua->m_OutstrokeInfo.dExtra = dExtra ;
|
||||
m_pMchLua->m_OutstrokeInfo.sAuxInfo = sAuxInfo ;
|
||||
// assegno risultato
|
||||
LuaSetParam( L, true) ;
|
||||
return 1 ;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user