Ejemplo n.º 1
0
static int toluaI_get_array (lua_State* L)
{
 void* self = tolua_getuserdata(L,1,0);
 const char* field = tolua_getstring(L,2,0);

 if (!field)
  tolua_error(L,"invalid 'field' in accessing array");
 if (!self)
 {
  static char msg[BUFSIZ];
  sprintf(msg,"invalid 'self' in accessing array '%s'",field);
  tolua_error(L,msg);
 }
 toluaI_getregistry(L,"tolua_tbl_itype");
 lua_pushnumber(L,lua_tag(L,1));
 lua_gettable(L,-2);
 lua_getglobal(L,lua_tostring(L,-1));
 lua_pushstring(L,".array");
 lua_gettable(L,-2);             
 lua_pushvalue(L,2);    /* field */
 lua_gettable(L,-2);
 lua_pushstring(L,".self");
 lua_pushvalue(L,1);    /* self */
 lua_rawset(L,-3);
 return 1;
}
Ejemplo n.º 2
0
/* function: add_new_quest */
static int toluaI_quest_new_quest00(lua_State* tolua_S)
{
 if (
 !tolua_istype(tolua_S,1,LUA_TSTRING,0) ||
 !tolua_isnoobj(tolua_S,2)
 )
 goto tolua_lerror;
 else
 {
  char* name = ((char*)  tolua_getstring(tolua_S,1,0));
 {
  s16b toluaI_ret = (s16b)  add_new_quest(name);
 tolua_pushnumber(tolua_S,(long)toluaI_ret);
 }
 }
 return 1;
tolua_lerror:
 tolua_error(tolua_S,"#ferror in function 'new_quest'.");
 return 0;
}
Ejemplo n.º 3
0
/* function: music_load_music */
static int toluaI_sound_sound___load_music00(lua_State* tolua_S)
{
 if (
 !tolua_istype(tolua_S,1,LUA_TSTRING,0) ||
 !tolua_isnoobj(tolua_S,2)
 )
 goto tolua_lerror;
 else
 {
  cptr file = ((cptr)  tolua_getstring(tolua_S,1,0));
 {
  Mix_Music* toluaI_ret = (Mix_Music*)  music_load_music(file);
 tolua_pushusertype(tolua_S,(void*)toluaI_ret,tolua_tag(tolua_S,"Mix_Music"));
 }
 }
 return 1;
tolua_lerror:
 tolua_error(tolua_S,"#ferror in function '__load_music'.");
 return 0;
}
Ejemplo n.º 4
0
/* function: tolua_cast */
static int toluaI_tolua_tolua_cast00(lua_State* tolua_S)
{
 if (
     !tolua_istype(tolua_S,2,LUA_TSTRING,0) ||
     !tolua_isnoobj(tolua_S,3)
 )
  goto tolua_lerror;
 else
 {
  LUA_VALUE lo = ((LUA_VALUE)  tolua_getvalue(tolua_S,1,0));
  const char* type = (const char*) tolua_getstring(tolua_S,2,0);
  {
   LUA_VALUE toluaI_ret = (LUA_VALUE)  tolua_cast(lo,type);
   tolua_pushvalue(tolua_S,toluaI_ret);
  }
 }
 return 1;
tolua_lerror:
 tolua_error(tolua_S,"#ferror in function 'cast'.");
 return 0;
}
Ejemplo n.º 5
0
/* function: quest_set_desc */
static int toluaI_quest_quest_set_desc00(lua_State* tolua_S)
{
 if (
 !tolua_istype(tolua_S,1,LUA_TNUMBER,0) ||
 !tolua_istype(tolua_S,2,LUA_TNUMBER,0) ||
 !tolua_istype(tolua_S,3,LUA_TSTRING,0) ||
 !tolua_isnoobj(tolua_S,4)
 )
 goto tolua_lerror;
 else
 {
  s32b q_idx = ((s32b)  tolua_getnumber(tolua_S,1,0));
  s32b d = ((s32b)  tolua_getnumber(tolua_S,2,0));
  char* desc = ((char*)  tolua_getstring(tolua_S,3,0));
 {
  quest_set_desc(q_idx,d,desc);
 }
 }
 return 0;
tolua_lerror:
 tolua_error(tolua_S,"#ferror in function 'quest_set_desc'.");
 return 0;
}