You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
83 lines
2.4 KiB
83 lines
2.4 KiB
2 years ago
|
#ifdef _DEBUG
|
||
|
|
#include "lua/modules/dev/level/warp.hpp"
|
||
|
|
|
||
|
|
#include <cstdint>
|
||
|
|
#include <string>
|
||
|
|
#include <string_view>
|
||
|
|
|
||
|
|
#include <sol/sol.hpp>
|
||
|
|
|
||
|
|
#include "debug.h"
|
||
|
|
#include "interfac.h"
|
||
|
|
#include "levels/setmaps.h"
|
||
|
|
#include "lua/metadoc.hpp"
|
||
|
|
#include "player.h"
|
||
|
|
#include "quests.h"
|
||
|
|
#include "utils/str_cat.hpp"
|
||
|
|
|
||
|
|
namespace devilution {
|
||
|
|
namespace {
|
||
|
|
|
||
|
|
std::string DebugCmdWarpToDungeonLevel(uint8_t level)
|
||
|
|
{
|
||
|
|
Player &myPlayer = *MyPlayer;
|
||
|
|
if (level > (gbIsHellfire ? 24 : 16))
|
||
|
|
return StrCat("Level ", level, " does not exist!");
|
||
|
|
if (!setlevel && myPlayer.isOnLevel(level))
|
||
|
|
return StrCat("You are already on level ", level, "!");
|
||
|
|
|
||
|
|
StartNewLvl(myPlayer, (level != 21) ? interface_mode::WM_DIABNEXTLVL : interface_mode::WM_DIABTOWNWARP, level);
|
||
|
|
return StrCat("Moved you to level ", level, ".");
|
||
|
|
}
|
||
|
|
|
||
|
|
std::string DebugCmdWarpToQuestLevel(uint8_t level)
|
||
|
|
{
|
||
|
|
if (level < 1)
|
||
|
|
return StrCat("Quest level number must be 1 or higher!");
|
||
|
|
if (setlevel && setlvlnum == level)
|
||
|
|
return StrCat("You are already on quest level", level, "!");
|
||
|
|
|
||
|
|
for (Quest &quest : Quests) {
|
||
|
|
if (level != quest._qslvl)
|
||
|
|
continue;
|
||
|
|
|
||
|
|
setlvltype = quest._qlvltype;
|
||
|
|
StartNewLvl(*MyPlayer, WM_DIABSETLVL, level);
|
||
|
|
|
||
|
|
return StrCat("Moved you to quest level ", QuestLevelNames[level], ".");
|
||
|
|
}
|
||
|
|
|
||
|
|
return StrCat("Quest level ", level, " does not exist!");
|
||
|
|
}
|
||
|
|
|
||
|
|
std::string DebugCmdWarpToCustomMap(std::string_view path, int dunType, int x, int y)
|
||
|
|
{
|
||
|
|
if (path.empty()) return "path is required";
|
||
|
|
if (dunType < DTYPE_CATHEDRAL || dunType > DTYPE_LAST) return "invalid dunType";
|
||
|
|
|
||
|
|
const Point spawn { x, y };
|
||
|
|
if (!InDungeonBounds(spawn)) return "spawn location is out of bounds";
|
||
|
|
|
||
|
|
TestMapPath = StrCat(path, ".dun");
|
||
|
|
setlvltype = static_cast<dungeon_type>(dunType);
|
||
|
|
ViewPosition = spawn;
|
||
|
|
|
||
|
|
StartNewLvl(*MyPlayer, WM_DIABSETLVL, SL_NONE);
|
||
|
|
|
||
|
|
return StrCat("Moved you to ", TestMapPath, ".");
|
||
|
|
}
|
||
|
|
|
||
|
|
} // namespace
|
||
|
|
|
||
|
|
sol::table LuaDevLevelWarpModule(sol::state_view &lua)
|
||
|
|
{
|
||
|
|
sol::table table = lua.create_table();
|
||
|
|
SetDocumented(table, "dungeon", "(n: number)", "Go to dungeon level (0 for town).", &DebugCmdWarpToDungeonLevel);
|
||
|
|
SetDocumented(table, "map", "(path: string, dunType: number, x: number, y: number)", "Go to custom {path}.dun level", &DebugCmdWarpToCustomMap);
|
||
|
|
SetDocumented(table, "quest", "(n: number)", "Go to quest level.", &DebugCmdWarpToQuestLevel);
|
||
|
|
return table;
|
||
|
|
}
|
||
|
|
|
||
|
|
} // namespace devilution
|
||
|
|
#endif // _DEBUG
|