/* Make changes to a text object based on the parameters passed
* in the table in the LUA parameter 2.
*/
void Lua_V1::ChangeTextObject() {
const char *line;
lua_Object textObj = lua_getparam(1);
int paramId = 2;
if (lua_isuserdata(textObj) && lua_tag(textObj) == MKTAG('T', 'E', 'X', 'T')) {
TextObject *textObject = gettextobject(textObj);
for (;;) {
lua_Object paramObj = lua_getparam(paramId++);
if (!paramObj)
break;
if (!lua_isstring(paramObj)) {
if (!lua_istable(paramObj))
break;
setTextObjectParams(textObject, paramObj);
textObject->reposition();
textObject->destroy();
} else {
line = lua_getstring(paramObj);
textObject->setText(line);
lua_getstring(paramObj);
}
lua_pushnumber(textObject->getBitmapWidth());
lua_pushnumber(textObject->getBitmapHeight());
}
}
}
void Lua_V1::BlastText() {
lua_Object textObj = lua_getparam(1);
if (!lua_isstring(textObj)) {
return;
}
const char *line = lua_getstring(textObj);
if (!line || line[0] == 0)
return;
TextObject *textObject = new TextObject(true);
textObject->setDefaults(&g_grim->_blastTextDefaults);
lua_Object tableObj = lua_getparam(2);
if (lua_istable(tableObj))
setTextObjectParams(textObject, tableObj);
textObject->setText(line);
textObject->draw();
delete textObject;
}
void Lua_V1::PrintLine() {
int vol = 127, buffer = 64, /*paramId = 1, */x = -1, y = -1;
bool background = true;
char msgId[50];
Common::String msg;
lua_Object param1Obj = lua_getparam(0);
lua_Object param2Obj = lua_getparam(1);
if ((lua_isstring(param1Obj) || lua_isnil(param1Obj)) && (lua_istable(param2Obj) || lua_isnil(param2Obj))) {
if (lua_istable(param2Obj)) {
setTextObjectParams(&g_grim->_printLineDefaults, param2Obj);
parseSayLineTable(param2Obj, &background, &vol, &buffer, &x, &y);
}
if (lua_isstring(param1Obj)) {
const char *tmpstr = lua_getstring(param1Obj);
msg = parseMsgText(tmpstr, msgId);
}
if (!msg.empty()) {
// actor->sayLine(msg.c_str(), msgId); //background, vol, pan, x, y
}
}
}
void Lua_V1::MakeTextObject() {
lua_Object textObj = lua_getparam(1);
if (!lua_isstring(textObj)) {
return;
}
TextObject *textObject = new TextObject(false);
const char *line = lua_getstring(textObj);
Common::String text = line;
textObject->setDefaults(&g_grim->_blastTextDefaults);
lua_Object tableObj = lua_getparam(2);
if (lua_istable(tableObj))
setTextObjectParams(textObject, tableObj);
textObject->setText(text.c_str());
lua_pushusertag(textObject->getId(), MKTAG('T', 'E', 'X', 'T'));
if (!(g_grim->getGameFlags() & ADGF_DEMO)) {
lua_pushnumber(textObject->getBitmapWidth());
lua_pushnumber(textObject->getBitmapHeight());
}
}
void Lua_V1::SetSayLineDefaults() {
lua_Object tableObj = lua_getparam(1);
if (tableObj && lua_istable(tableObj))
setTextObjectParams(&g_grim->_sayLineDefaults, tableObj);
}
