DefineNewRaceNames function

[Andre Novellino Gouvêa]

I have made a "DefineNewRaceNames" function - it works just like "DefineRaceNames", but without wiping out the already-defined races. Useful for modding support.

/**
** Define new race names
**
** @param l Lua state.
*/
static int CclDefineNewRaceNames(lua_State *l)
{
 int args = lua_gettop(l);
 for (int j = 0; j < args; ++j) {
  const char *value = LuaToString(l, j + 1);
  if (!strcmp(value, "race")) {
   ++j;
   if (!lua_istable(l, j + 1)) {
    LuaError(l, "incorrect argument");
   }
   int subargs = lua_rawlen(l, j + 1);
   int i = PlayerRaces.Count++;
   for (int k = 0; k < subargs; ++k) {
    value = LuaToString(l, j + 1, k + 1);
    if (!strcmp(value, "name")) {
     ++k;
     PlayerRaces.Name[i] = LuaToString(l, j + 1, k + 1);
    } else if (!strcmp(value, "display")) {
     ++k;
     PlayerRaces.Display[i] = LuaToString(l, j + 1, k + 1);
    } else if (!strcmp(value, "visible")) {
     PlayerRaces.Visible[i] = 1;
    } else {
     LuaError(l, "Unsupported tag: %s" _C_ value);
    }
   }
  } else {
   LuaError(l, "Unsupported tag: %s" _C_ value);
  }
 }

 return 0;
}

[timfelgentreff (timfelgentreff)]

This project was moved to https://github.com/Wargus/stratagus. All issues were migrated there.