Пример #1
0
// Lua: data = maxval( id )
static int adc_maxval( lua_State* L )
{
  unsigned id;
  u32 res;
  
  id = luaL_checkinteger( L, 1 );
  MOD_CHECK_ID( adc, id );
  res = platform_adc_get_maxval( id );
  lua_pushinteger( L, res );
  return 1;
}
Пример #2
0
// PicoC: data = adc_maxval(id);
static void adc_maxval(pstate *p, val *r, val **param, int n)
{
  unsigned id;
  u32 res;

  id = param[0]->Val->UnsignedInteger;
  MOD_CHECK_ID(adc, id);
  res = platform_adc_get_maxval(id);
  
  r->Val->UnsignedLongInteger = res;
}
Пример #3
0
// (adc-maxval 'num) -> num
any plisp_adc_maxval(any ex) {
  unsigned id;
  u32 res;
  any x, y;

  x = cdr(ex);
  NeedNum(ex, y = EVAL(car(x)));
  id = unBox(y); // get id.
  MOD_CHECK_ID(ex, adc, id);

  res = platform_adc_get_maxval(id);
  return box(res);
}