91 lines
2.1 KiB
C
91 lines
2.1 KiB
C
// Module for interfacing with sigma-delta hardware
|
|
|
|
#include "module.h"
|
|
#include "lauxlib.h"
|
|
#include "platform.h"
|
|
|
|
|
|
// Lua: setup( channel, pin )
|
|
static int sigma_delta_setup( lua_State *L )
|
|
{
|
|
int channel = luaL_checkinteger( L, 1 );
|
|
int pin = luaL_checkinteger( L, 2 );
|
|
|
|
MOD_CHECK_ID(sigma_delta, channel);
|
|
|
|
if (!platform_sigma_delta_setup( channel, pin ))
|
|
luaL_error( L, "command failed" );
|
|
|
|
return 0;
|
|
}
|
|
|
|
// Lua: close( channel )
|
|
static int sigma_delta_close( lua_State *L )
|
|
{
|
|
int channel = luaL_checkinteger( L, 1 );
|
|
|
|
MOD_CHECK_ID(sigma_delta, channel);
|
|
|
|
platform_sigma_delta_close( channel );
|
|
|
|
return 0;
|
|
}
|
|
|
|
#if 0
|
|
// Lua: setpwmduty( channel, duty_cycle )
|
|
static int sigma_delta_setpwmduty( lua_State *L )
|
|
{
|
|
int channel = luaL_checkinteger( L, 1 );
|
|
int duty = luaL_checkinteger( L, 2 );
|
|
|
|
MOD_CHECK_ID(sigma_delta, channel);
|
|
|
|
if (!platform_sigma_delta_set_pwmduty( channel, duty ))
|
|
luaL_error( L, "command failed" );
|
|
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
// Lua: setprescale( channel, value )
|
|
static int sigma_delta_setprescale( lua_State *L )
|
|
{
|
|
int channel = luaL_checkinteger( L, 1 );
|
|
int prescale = luaL_checkinteger( L, 2 );
|
|
|
|
MOD_CHECK_ID(sigma_delta, channel);
|
|
|
|
if (!platform_sigma_delta_set_prescale( channel, prescale ))
|
|
luaL_error( L, "command failed" );
|
|
|
|
return 0;
|
|
}
|
|
|
|
// Lua: setduty( channel, value )
|
|
static int sigma_delta_setduty( lua_State *L )
|
|
{
|
|
int channel = luaL_checkinteger( L, 1 );
|
|
int duty = luaL_checkinteger( L, 2 );
|
|
|
|
MOD_CHECK_ID(sigma_delta, channel);
|
|
|
|
if (!platform_sigma_delta_set_duty( channel, duty ))
|
|
luaL_error( L, "command failed" );
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
// Module function map
|
|
static const LUA_REG_TYPE sigma_delta_map[] =
|
|
{
|
|
{ LSTRKEY( "setup" ), LFUNCVAL( sigma_delta_setup ) },
|
|
{ LSTRKEY( "close" ), LFUNCVAL( sigma_delta_close ) },
|
|
//{ LSTRKEY( "setpwmduty" ), LFUNCVAL( sigma_delta_setpwmduty ) },
|
|
{ LSTRKEY( "setprescale" ), LFUNCVAL( sigma_delta_setprescale ) },
|
|
{ LSTRKEY( "setduty" ), LFUNCVAL( sigma_delta_setduty ) },
|
|
{ LNILKEY, LNILVAL }
|
|
};
|
|
|
|
NODEMCU_MODULE(SIGMADELTA, "sigma_delta", sigma_delta_map, NULL);
|