uint32_t CreatureEvent::executeSetOpponent(Creature* creature, Creature* target)
{
//onSetOpponent(cid, monster)
if(m_interface->reserveEnv())
{
ScriptEnviroment* env = m_interface->getEnv();
if(m_scripted == EVENT_SCRIPT_BUFFER)
{
env->setRealPos(creature->getPosition());
std::stringstream scriptstream;
scriptstream << "local cid = " << env->addThing(creature) << std::endl;


scriptstream << "local target = " << env->addThing(target) << std::endl;


scriptstream << m_scriptData;
bool result = true;
if(m_interface->loadBuffer(scriptstream.str()))
{
lua_State* L = m_interface->getState();
result = m_interface->getGlobalBool(L, "_result", true);
}


m_interface->releaseEnv();
return result;
}
else
{
#ifdef __DEBUG_LUASCRIPTS__
char desc[35];
sprintf(desc, "%s", creature->getName().c_str());
env->setEventDesc(desc);
#endif


env->setScriptId(m_scriptId, m_interface);
env->setRealPos(creature->getPosition());


lua_State* L = m_interface->getState();
m_interface->pushFunction(m_scriptId);


lua_pushnumber(L, env->addThing(creature));
lua_pushnumber(L, env->addThing(target));


bool result = m_interface->callFunction(2);
m_interface->releaseEnv();


return result;
}
}
else
{
std::cout << "[Error - CreatureEvent::executePrepareDeath] Call stack overflow." << std::endl;
return 0;
}
}

Vá em creatureevent.h e procure:

CREATURE_EVENT_PREPAREDEATH,

Adicione embaixo: