int NpcScriptInterface::luaCloseShop(lua_State *L)
{
//closeShopWindow(cid)
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
Player* player = env->getPlayerByUID(popNumber(L));
int32_t buyCallback;
int32_t sellCallback;
if(player == NULL) {
reportErrorFunc(getErrorDesc(LUA_ERROR_CREATURE_NOT_FOUND));
lua_pushnumber(L, LUA_ERROR);
return 1;
}
player->sendCloseShop();
player->getShopOwner(buyCallback, sellCallback);
if(buyCallback != -1)
luaL_unref(L, LUA_REGISTRYINDEX, buyCallback);
if(sellCallback != -1)
luaL_unref(L, LUA_REGISTRYINDEX, sellCallback);
player->setShopOwner(NULL, -1, -1);
return 1;
}
int NpcScriptInterface::luagetDistanceTo(lua_State *L)
{
//getDistanceTo(uid)
uint32_t uid = popNumber(L);
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
Thing* thing = env->getThingByUID(uid);
if(thing && npc){
Position thing_pos = thing->getPosition();
Position npc_pos = npc->getPosition();
if(npc_pos.z != thing_pos.z){
lua_pushnumber(L, -1);
}
else{
int32_t dist = std::max(std::abs(npc_pos.x - thing_pos.x), std::abs(npc_pos.y - thing_pos.y));
lua_pushnumber(L, dist);
}
}
else{
reportErrorFunc(getErrorDesc(LUA_ERROR_THING_NOT_FOUND));
lua_pushnil(L);
}
return 1;
}
int NpcScriptInterface::luaActionSay(lua_State* L)
{
//selfSay(words [[, target], send_to_all])
// send_to_all defaults to true if there is no target, false otherwise
uint32_t parameters = lua_gettop(L);
uint32_t target = 0;
bool send_to_all = true;
if(parameters == 3)
{
send_to_all = (popNumber(L) == LUA_TRUE);
target = popNumber(L);
}
else if(parameters == 2)
{
target = popNumber(L);
send_to_all = false;
}
std::string msg(popString(L));
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
Player* focus = env->getPlayerByUID(target);
if(npc){
npc->doSay(msg, focus, send_to_all);
}
return 0;
}
int NpcScriptInterface::luaCreatureGetPos(lua_State *L)
{
/*/
//creatureGetPosition(cid)
popNumber(L);
reportErrorFunc("Deprecated function. Use getCreaturePosition");
/*/
uint32_t uid = popNumber(L);
ScriptEnviroment* env = getScriptEnv();
Creature* creature = env->getCreatureByUID(uid);
if(creature){
Position pos = creature->getPosition();
lua_pushnumber(L, pos.x);
lua_pushnumber(L, pos.y);
lua_pushnumber(L, pos.z);
}
else{
reportErrorFunc(getErrorDesc(LUA_ERROR_CREATURE_NOT_FOUND));
lua_pushnil(L);
lua_pushnil(L);
lua_pushnil(L);
}
return 3;
}
int NpcScriptInterface::luagetDistanceTo(lua_State* L)
{
//getDistanceTo(uid)
ScriptEnvironment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (!npc) {
reportErrorFunc(getErrorDesc(LUA_ERROR_THING_NOT_FOUND));
lua_pushnil(L);
return 1;
}
uint32_t uid = getNumber<uint32_t>(L, -1);
Thing* thing = env->getThingByUID(uid);
if (!thing) {
reportErrorFunc(getErrorDesc(LUA_ERROR_THING_NOT_FOUND));
lua_pushnil(L);
return 1;
}
const Position& thingPos = thing->getPosition();
const Position& npcPos = npc->getPosition();
if (npcPos.z != thingPos.z) {
lua_pushnumber(L, -1);
} else {
int32_t dist = std::max<int32_t>(Position::getDistanceX(npcPos, thingPos), Position::getDistanceY(npcPos, thingPos));
lua_pushnumber(L, dist);
}
return 1;
}
int32_t NpcScriptInterface::luaActionSay(lua_State* L)
{
//selfSay(words [[, target], publicize])
// publicize defaults to true if there is no target, false otherwise
uint32_t parameters = lua_gettop(L);
uint32_t target = 0;
bool publicize;
if (parameters >= 3) {
publicize = popBoolean(L);
} else {
publicize = true;
}
if (parameters >= 2) {
target = popNumber(L);
if (target != 0) {
publicize = false;
}
}
std::string text = popString(L);
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
if (publicize) {
npc->doSay(text);
} else {
npc->doSayToPlayer(g_game.getPlayerByID(target), text);
}
}
return 0;
}
int32_t NpcScriptInterface::luaActionTurn(lua_State* L)
{
//selfTurn(direction)
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
npc->doTurn((Direction)popNumber(L));
}
return 0;
}
int32_t NpcScriptInterface::luaSetNpcFocus(lua_State* L)
{
//doNpcSetCreatureFocus(cid)
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
npc->setCreatureFocus(g_game.getCreatureByID(popNumber(L)));
}
return 0;
}
int NpcScriptInterface::luaActionTurn(lua_State* L)
{
//selfTurn(direction)
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
g_game.internalCreatureTurn(npc, getNumber<Direction>(L, 1));
}
return 0;
}
int NpcScriptInterface::luaSetNpcFocus(lua_State* L)
{
//doNpcSetCreatureFocus(cid)
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
npc->setCreatureFocus(getCreature(L, -1));
}
return 0;
}
int32_t NpcScriptInterface::luaActionTurn(lua_State* L)
{
//selfTurn(direction)
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
npc->doTurn(static_cast<Direction>(getNumber<uint32_t>(L, 1)));
}
return 0;
}
int NpcScriptInterface::luaActionSayCommand(lua_State* L)
{
//commandSay(words)
std::string msg(popString(L));
ScriptEnviroment* env = getScriptEnv();
Npc* mynpc = env->getNpc();
if(mynpc)
if(commands.exeCommand(mynpc, msg))
return 0;
}
int NpcScriptInterface::luaGetNpcCid(lua_State* L)
{
//getNpcCid()
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
lua_pushnumber(L, npc->getID());
} else {
lua_pushnil(L);
}
return 1;
}
int32_t NpcScriptInterface::luaGetNpcName(lua_State* L)
{
//getNpcName()
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
LuaScriptInterface::pushString(L, npc->getName());
} else {
pushBoolean(L, false);
}
return 1;
}
int32_t NpcScriptInterface::luaSelfGetPos(lua_State* L)
{
//selfGetPosition()
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
pushPosition(L, npc->getPosition(), 0);
} else {
lua_pushnil(L);
}
return 1;
}
int NpcScriptInterface::luaActionFollow(lua_State* L)
{
//selfFollow(player)
Npc* npc = getScriptEnv()->getNpc();
if (!npc) {
pushBoolean(L, false);
return 1;
}
pushBoolean(L, npc->setFollowCreature(getPlayer(L, 1)));
return 1;
}
int32_t NpcScriptInterface::luaActionMove(lua_State* L)
{
//selfMove(direction)
Direction dir = (Direction)popNumber(L);
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
npc->doMove(dir);
}
return 0;
}
int NpcScriptInterface::luaUpdateNpcIdle(lua_State *L)
{
// updateNpcIdle()
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
npc->updateIdle();
}
return 1;
}
int NpcScriptInterface::luaIsNpcIdle(lua_State *L)
{
// isNpcIdle()
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
lua_pushboolean(L, npc->isIdle());
}
return 1;
}
int NpcScriptInterface::luaGetNpcFocus(lua_State* L)
{
//getNpcFocus()
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
lua_pushnumber(L, npc->focusCreature);
}
return 1;
}
int32_t NpcScriptInterface::luaSetNpcFocus(lua_State* L)
{
//doNpcSetCreatureFocus(cid)
uint32_t cid = popNumber(L);
ScriptEnvironment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
npc->setCreatureFocus(g_game.getCreatureByID(cid));
}
return 0;
}
int32_t NpcScriptInterface::luaActionTurn(lua_State* L)
{
//selfTurn(direction)
Direction dir = (Direction)popNumber(L);
ScriptEnvironment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
npc->doTurn(dir);
}
return 0;
}
int NpcScriptInterface::luaSetNpcFocus(lua_State *L)
{
//doNpcSetCreatureFocus(cid)
uint32_t cid = popNumber(L);
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if(npc){
Creature* creature = env->getCreatureByUID(cid);
npc->setCreatureFocus(creature);
}
return 0;
}
int32_t NpcScriptInterface::luaSelfGetPos(lua_State* L)
{
//selfGetPosition()
ScriptEnvironment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
Position pos = npc->getPosition();
pushPosition(L, pos);
} else {
lua_pushnil(L);
}
return 1;
}
int32_t NpcScriptInterface::luaActionMoveTo(lua_State* L)
{
//selfMoveTo(x,y,z)
Position target;
target.z = (int32_t)popNumber(L);
target.y = (int32_t)popNumber(L);
target.x = (int32_t)popNumber(L);
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
npc->doMoveTo(target);
}
return 0;
}
int NpcScriptInterface::luaActionMoveTo(lua_State* L)
{
//selfMoveTo(x,y,z)
Npc* npc = getScriptEnv()->getNpc();
if (!npc) {
return 0;
}
npc->doMoveTo(Position(
getNumber<uint16_t>(L, 1),
getNumber<uint16_t>(L, 2),
getNumber<uint8_t>(L, 3)
));
return 0;
}
int NpcScriptInterface::luaGetNpcName(lua_State* L)
{
//getNpcName()
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if(npc){
lua_pushstring(L, npc->getName().c_str());
}
else{
lua_pushstring(L, "");
}
return 1;
}
int32_t NpcScriptInterface::luaGetNpcPos(lua_State* L)
{
//getNpcPos()
Position pos;
uint32_t stackpos = 0;
Npc* npc = getScriptEnv()->getNpc();
if (npc) {
pos = npc->getPosition();
stackpos = npc->getParent()->__getIndexOfThing(npc);
}
pushPosition(L, pos, stackpos);
return 1;
}
int NpcScriptInterface::luaGetNpcCid(lua_State* L)
{
//getNpcCid()
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if(npc){
uint32_t cid = env->addThing(npc);
lua_pushnumber(L, cid);
}
else{
lua_pushnil(L);
}
return 1;
}
int NpcScriptInterface::luaUnqueuePlayer(lua_State *L)
{
// unqueuePlayer(cid)
uint32_t cid = popNumber(L);
ScriptEnviroment* env = getScriptEnv();
Npc* npc = env->getNpc();
if (npc) {
Creature* creature = env->getCreatureByUID(cid);
if (creature) {
npc->queueList.remove(cid);
}
}
return 1;
}
