2VAIMVOC3GPYJKN5ICAS4LHNS6IAQAZGWJRTR2WVBEJAOHEGRJEQC
4M74X4IZASOUM2UUNEIAW4UN3ZKCBAB2YZSBDG7YOHDD4KSTDRLAC
TS6NYGI2HUBABESNISESLSSOVIQ3MB4YWPLRCPBQKQHI72ARZ7QQC
K73AS36BODJSSKMT2LRFDKS7BAMETNFLWHZEPQEZFM6KQB6KRA4AC
C25ULNTKMNOXT72ERWSFQZQW5E2OIM3TOGAAA33Z7EZQMZHRS2MAC
XUPMPYQWJITYIE3G2CCYVQMHYBGGXS32EIQJG42GNZS6BLE4NFAAC
4NRM3KWVHQ46WAIF2OF33JUDVTR67ADIDXCOV2AB2R3QVUMWAG5AC
HGRNDCERM2W2A325DKKWPWP7ZJVBS4IPY6QIR4A4QA7KIZ7NHSSAC
D6A2MLKI7UQPZ4A4D6QSM6STFVDY77IY5APXCBT3LNH6CDVKT67QC
LE5U6CTXEIETQN5GOVYF2K2VCISRXR3ULORXDKIKWYDVBG5GS3WAC
MQ62OAMLGJVRW2QIL4PAZRAU6PC52ZVGY2FCOBIY6IWGQIHMU5CAC
3A5FX3Y4RPKWQEHKKXZKXZJ7RKV6RKWT7GTR4WFE5UBWKV2HT4RQC
ED62QWGKBPORWVKDFOQRKJXEIWZVNGR3O4KWQBDSRNPT36AYOQYAC
RN242L3YZK35BFY7JRTCSYWD6FWDCRFUFDI7PKYFUCA2UPX6ZEAQC
AUXHSGS4EFOPZ6TVZYWNVOUDO7NYKUKE3HBKGQQWTALSVFOE3HAAC
UBQTNLYGD3SNWMUNGWUPX7EXEGQXOXCFCPWIVWBFE7ID7DJLPFWAC
QAXFREFPBXN7YIBORITM2TAGA4QYF43XMSCLWW2BHONZFGEGMRUQC
55PFDYPVE6JVGDYPCFUE4XS2523PVSV4CSIFRW6A2GGX4I6VWRWQC
7IERR3KESLBDHEMGSFRYGA66PZBPGKPUGMFDCSFR3WDX7RXD5OTAC
UXAYLVZCSKTOC23AZORWJBQWYXKWC6QD2FPV2DRG7G6J5S7U2QLAC
UL7XFKMUX3WIU4O2LZANK4ECJ654UZPDBFGNXUEYZYOLKBYBCG6AC
A2JHMM2QW2Q5OZ4DY4N3VIT53SOPTI434NJB72XBMJD67YJRI4CQC
RXYHE3C7R3EGCRZEJT2ZO4ALLRDR3HF66VHZZNF7TT3DFWZ6BJCQC
}
// WARNING: This is a very low-level call.
LUAFN(dgn_dbg_goto_place)
{
try
{
const level_id id = level_id::parse_level_id(luaL_checkstring(ls, 1));
you.level_type = id.level_type;
if (id.level_type == LEVEL_DUNGEON)
{
you.where_are_you = static_cast<branch_type>(id.branch);
you.your_level = absdungeon_depth(id.branch, id.depth);
}
}
catch (const std::string &err)
{
luaL_error(ls, err.c_str());
}
return (0);
}
LUAFN(dgn_dbg_flush_map_memory)
{
dgn_flush_map_memory();
init_level_connectivity();
return (0);
}
LUAFN(dgn_dbg_generate_level)
{
no_messages mx;
env.show.init(0);
env.map.init(map_cell());
#ifdef USE_TILE
tile_init_default_flavour();
tile_clear_flavour();
TileNewLevel(true);
#endif
builder(you.your_level, you.level_type);
return (0);
LUAFN(dgn_dbg_dump_map)
{
const int pos = lua_isuserdata(ls, 1) ? 2 : 1;
if (lua_isstring(ls, pos))
dump_map(lua_tostring(ls, pos), true);
return (0);
}
LUAFN(dgn_dbg_test_explore)
{
#ifdef WIZARD
debug_test_explore();
#endif
return (0);
}
{ "dbg_goto_place", dgn_dbg_goto_place },
{ "dbg_flush_map_memory", dgn_dbg_flush_map_memory },
{ "dbg_generate_level", dgn_dbg_generate_level },
{ "dbg_dump_map", dgn_dbg_dump_map },
{ "dbg_test_explore", dgn_dbg_test_explore },
/*
* File: l_debug.cc
* Summary: Various debugging bindings.
*/
#include "AppHdr.h"
#include "dlua.h"
#include "l_libs.h"
#include "chardump.h"
#include "dungeon.h"
#include "message.h"
#include "place.h"
// WARNING: This is a very low-level call.
LUAFN(debug_goto_place)
{
try
{
const level_id id = level_id::parse_level_id(luaL_checkstring(ls, 1));
you.level_type = id.level_type;
if (id.level_type == LEVEL_DUNGEON)
{
you.where_are_you = static_cast<branch_type>(id.branch);
you.your_level = absdungeon_depth(id.branch, id.depth);
}
}
catch (const std::string &err)
{
luaL_error(ls, err.c_str());
}
return (0);
}
LUAFN(debug_flush_map_memory)
{
dgn_flush_map_memory();
init_level_connectivity();
return (0);
}
LUAFN(debug_generate_level)
{
no_messages mx;
env.show.init(0);
env.map.init(map_cell());
#ifdef USE_TILE
tile_init_default_flavour();
tile_clear_flavour();
TileNewLevel(true);
#endif
builder(you.your_level, you.level_type);
return (0);
}
LUAFN(debug_dump_map)
{
const int pos = lua_isuserdata(ls, 1) ? 2 : 1;
if (lua_isstring(ls, pos))
dump_map(lua_tostring(ls, pos), true);
return (0);
}
LUAFN(_debug_test_explore)
{
#ifdef WIZARD
debug_test_explore();
#endif
return (0);
}
const struct luaL_reg debug_lib[] =
{
{ "goto_place", debug_goto_place },
{ "flush_map_memory", debug_flush_map_memory },
{ "generate_level", debug_generate_level },
{ "dump_map", debug_dump_map },
{ "test_explore", _debug_test_explore },
{ NULL, NULL }
};