diff options
Diffstat (limited to 'crawl-ref/source/dat/clua')
-rw-r--r-- | crawl-ref/source/dat/clua/debug.lua | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/crawl-ref/source/dat/clua/debug.lua b/crawl-ref/source/dat/clua/debug.lua new file mode 100644 index 0000000000..e5de91d930 --- /dev/null +++ b/crawl-ref/source/dat/clua/debug.lua @@ -0,0 +1,29 @@ +------------------------------------------------------------------------------ +-- debug.lua +-- Debugging functions to call from the wizard lua interpreter. +------------------------------------------------------------------------------ + +require('clua/userbase.lua') + +function debug_wrath() + debug.never_die(true) + + while crawl.kbhit() == 0 do + -- Remove non-near monsters if menv[] full. + debug.cull_monsters() + + -- Dismiss adjacent monsters to make room for wrath sending in + -- more monsters. + debug.dismiss_adjacent() + + -- Draw the wrath card + crawl.process_keys("&cwrath\r") + + -- Redraw screen. + crawl.redraw_view() + crawl.redraw_stats() + end + + crawl.flush_input() + debug.never_die(false) +end |