forked from metin2/server
252 lines
6.8 KiB
C++
252 lines
6.8 KiB
C++
#include "stdafx.h"
|
||
|
||
#include "questlua.h"
|
||
#include "questmanager.h"
|
||
|
||
#undef sys_err
|
||
#ifndef __WIN32__
|
||
#define sys_err(fmt, args...) quest::CQuestManager::instance().QuestError(__FUNCTION__, __LINE__, fmt, ##args)
|
||
#else
|
||
#define sys_err(fmt, ...) quest::CQuestManager::instance().QuestError(__FUNCTION__, __LINE__, fmt, __VA_ARGS__)
|
||
#endif
|
||
|
||
namespace quest
|
||
{
|
||
//
|
||
// "quest" Lua functions
|
||
//
|
||
int quest_start(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestStartFlag();
|
||
q.GetCurrentPC()->SetCurrentQuestStartFlag();
|
||
return 0;
|
||
}
|
||
|
||
int quest_done(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
q.GetCurrentPC()->SetCurrentQuestDoneFlag();
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestDoneFlag();
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_title(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestTitle(lua_tostring(L,-1));
|
||
if (lua_isstring(L,-1))
|
||
q.GetCurrentPC()->SetCurrentQuestTitle(lua_tostring(L,-1));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_another_title(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
if (lua_isstring(L,1) && lua_isstring(L,2))
|
||
q.GetCurrentPC()->SetQuestTitle(lua_tostring(L,1),lua_tostring(L,2));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_clock_name(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestClockName(lua_tostring(L,-1));
|
||
if (lua_isstring(L,-1))
|
||
q.GetCurrentPC()->SetCurrentQuestClockName(lua_tostring(L,-1));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_clock_value(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestClockValue((int)rint(lua_tonumber(L,-1)));
|
||
if (lua_isnumber(L,-1))
|
||
q.GetCurrentPC()->SetCurrentQuestClockValue((int)rint(lua_tonumber(L,-1)));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_counter_name(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestCounterName(lua_tostring(L,-1));
|
||
if (lua_isstring(L,-1))
|
||
q.GetCurrentPC()->SetCurrentQuestCounterName(lua_tostring(L,-1));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_counter_value(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestCounterValue((int)rint(lua_tonumber(L,-1)));
|
||
if (lua_isnumber(L,-1))
|
||
q.GetCurrentPC()->SetCurrentQuestCounterValue((int)rint(lua_tonumber(L,-1)));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_set_icon_file(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
|
||
//q.GetPC(q.GetCurrentCharacterPtr()->GetPlayerID())->SetCurrentQuestCounterValue((int)rint(lua_tonumber(L,-1)));
|
||
if (lua_isstring(L,-1))
|
||
q.GetCurrentPC()->SetCurrentQuestIconFile(lua_tostring(L,-1));
|
||
|
||
return 0;
|
||
}
|
||
|
||
int quest_setstate(lua_State* L)
|
||
{
|
||
if (lua_tostring(L, -1)==NULL)
|
||
{
|
||
sys_err("state name is empty");
|
||
return 0;
|
||
}
|
||
|
||
CQuestManager& q = CQuestManager::instance();
|
||
QuestState * pqs = q.GetCurrentState();
|
||
PC* pPC = q.GetCurrentPC();
|
||
//assert(L == pqs->co);
|
||
|
||
if (L!=pqs->co)
|
||
{
|
||
luaL_error(L, "running thread != current thread???");
|
||
if ( test_server )
|
||
sys_log(0 ,"running thread != current thread???");
|
||
return 0;
|
||
}
|
||
|
||
if (pPC)
|
||
{
|
||
//pqs->st = lua_tostring(L, -1);
|
||
//cerr << "QUEST new state" << pPC->GetCurrentQuestName(); << ":"
|
||
//cerr << lua_tostring(L,-1);
|
||
//cerr << endl;
|
||
//
|
||
std::string stCurrentState = lua_tostring(L,-1);
|
||
if ( test_server )
|
||
sys_log ( 0 ,"questlua->setstate( %s, %s )", pPC->GetCurrentQuestName().c_str(), stCurrentState.c_str() );
|
||
pqs->st = q.GetQuestStateIndex(pPC->GetCurrentQuestName(), stCurrentState);
|
||
pPC->SetCurrentQuestStateName(stCurrentState );
|
||
}
|
||
return 0;
|
||
}
|
||
|
||
int quest_coroutine_yield(lua_State * L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
// other_pc_block <20><><EFBFBD>ο<EFBFBD><CEBF><EFBFBD><EFBFBD><EFBFBD> yield<6C><64> <20>Ͼ<CFBE><EEB3AA><EFBFBD><EFBFBD> <20>ȵȴ<C8B5>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
|
||
if (q.IsInOtherPCBlock())
|
||
{
|
||
sys_err("FATAL ERROR! Yield occur in other_pc_block.");
|
||
PC* pPC = q.GetOtherPCBlockRootPC();
|
||
if (NULL == pPC)
|
||
{
|
||
sys_err(" ... FFFAAATTTAAALLL Error. RootPC is NULL");
|
||
return 0;
|
||
}
|
||
QuestState* pQS = pPC->GetRunningQuestState();
|
||
if (NULL == pQS || NULL == q.GetQuestStateName(pPC->GetCurrentQuestName(), pQS->st))
|
||
{
|
||
sys_err(" ... WHO AM I? WHERE AM I? I only know QuestName(%s)...", pPC->GetCurrentQuestName().c_str());
|
||
}
|
||
else
|
||
{
|
||
sys_err(" Current Quest(%s). State(%s)", pPC->GetCurrentQuestName().c_str(), q.GetQuestStateName(pPC->GetCurrentQuestName(), pQS->st));
|
||
}
|
||
return 0;
|
||
}
|
||
return lua_yield(L, lua_gettop(L));
|
||
}
|
||
|
||
int quest_no_send(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
q.SetNoSend();
|
||
return 0;
|
||
}
|
||
|
||
int quest_get_current_quest_index(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
PC* pPC = q.GetCurrentPC();
|
||
|
||
int idx = q.GetQuestIndexByName(pPC->GetCurrentQuestName());
|
||
lua_pushnumber(L, idx);
|
||
return 1;
|
||
}
|
||
|
||
int quest_begin_other_pc_block(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
DWORD pid = lua_tonumber(L, -1);
|
||
q.BeginOtherPCBlock(pid);
|
||
return 0;
|
||
}
|
||
|
||
int quest_end_other_pc_block(lua_State* L)
|
||
{
|
||
CQuestManager& q = CQuestManager::instance();
|
||
q.EndOtherPCBlock();
|
||
return 0;
|
||
}
|
||
|
||
void RegisterQuestFunctionTable()
|
||
{
|
||
luaL_reg quest_functions[] =
|
||
{
|
||
{ "setstate", quest_setstate },
|
||
{ "set_state", quest_setstate },
|
||
{ "yield", quest_coroutine_yield },
|
||
{ "set_title", quest_set_title },
|
||
{ "set_title2", quest_set_another_title },
|
||
{ "set_clock_name", quest_set_clock_name },
|
||
{ "set_clock_value", quest_set_clock_value },
|
||
{ "set_counter_name", quest_set_counter_name },
|
||
{ "set_counter_value", quest_set_counter_value },
|
||
{ "set_icon", quest_set_icon_file },
|
||
{ "start", quest_start },
|
||
{ "done", quest_done },
|
||
{ "getcurrentquestindex", quest_get_current_quest_index },
|
||
{ "no_send", quest_no_send },
|
||
// begin_other_pc_block(pid), end_other_pc_block <20><><EFBFBD≯<EFBFBD> other_pc_block<63>̶<EFBFBD><CCB6><EFBFBD> <20><><EFBFBD><EFBFBD>.
|
||
// other_pc_block<63><6B><EFBFBD><EFBFBD><EFBFBD><EFBFBD> current_pc<70><63> pid<69><64> <20><><EFBFBD><EFBFBD><EFBFBD>ȴ<EFBFBD>.
|
||
// <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ٽ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> current_pc<70><63> <20><><EFBFBD>ư<EFBFBD><C6B0><EFBFBD>.
|
||
/* <09>̷<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>.
|
||
for i, pid in next, pids, nil do
|
||
q.begin_other_pc_block(pid)
|
||
if pc.count_item(PASS_TICKET) < 1 then
|
||
table.insert(criminalNames, pc.get_name())
|
||
canPass = false
|
||
end
|
||
q.end_other_pc_block()
|
||
end
|
||
*/
|
||
// <20><><EFBFBD><EFBFBD> : other_pc_block <20><><EFBFBD>ο<EFBFBD><CEBF><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> yield<6C><64> <20>Ͼ<CFBE><EEB3AA><EFBFBD><EFBFBD> <20>ȵȴ<C8B5>.(ex. wait, select, input, ...)
|
||
{ "begin_other_pc_block", quest_begin_other_pc_block },
|
||
{ "end_other_pc_block", quest_end_other_pc_block },
|
||
{ NULL, NULL }
|
||
};
|
||
|
||
CQuestManager::instance().AddLuaFunctionTable("q", quest_functions);
|
||
}
|
||
}
|
||
|
||
|
||
|
||
|