5d659cf1f6
Adds a more general way to handle gameplay tips, and adds a boolean option "tips", which can be used to disable all tips. Adds a helpful longer message when the game goes into the "farlook" mode. Also adds a lua binding to easily show multi-line text in a menu window. Breaks save compat.
102 lines
3.7 KiB
Lua
102 lines
3.7 KiB
Lua
-- NetHack core nhcore.lua $NHDT-Date: 1652196284 2022/05/10 15:24:44 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.0 $
|
|
-- Copyright (c) 2021 by Pasi Kallinen
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
-- This file contains lua code used by NetHack core.
|
|
-- Is it loaded once, at game start, and kept in memory until game exit.
|
|
|
|
-- Data in nh_lua_variables table can be set and queried with nh.variable()
|
|
-- This table is saved and restored along with the game.
|
|
nh_lua_variables = {
|
|
};
|
|
|
|
-- wrapper to simplify calling from nethack core
|
|
function get_variables_string()
|
|
return "nh_lua_variables=" .. table_stringify(nh_lua_variables) .. ";";
|
|
end
|
|
|
|
-- This is an example of generating an external file during gameplay,
|
|
-- which is updated periodically.
|
|
-- Intended for public servers using dgamelaunch as their login manager.
|
|
local prev_dgl_extrainfo = 0;
|
|
function mk_dgl_extrainfo()
|
|
if ((prev_dgl_extrainfo == 0) or (prev_dgl_extrainfo + 50 < u.moves)) then
|
|
local filename = nh.dump_fmtstr("/tmp/nethack.%n.%d.log");
|
|
local extrai, err = io.open(filename, "w");
|
|
if extrai then
|
|
local sortval = 0;
|
|
local dname = nh.dnum_name(u.dnum);
|
|
local dstr = "";
|
|
local astr = " ";
|
|
if u.uhave_amulet == 1 then
|
|
sortval = sortval + 1024;
|
|
astr = "A";
|
|
end
|
|
if dname == "Fort Ludios" then
|
|
dstr = "Knx";
|
|
sortval = sortval + 245;
|
|
elseif dname == "The Quest" then
|
|
dstr = "Q" .. u.dlevel;
|
|
sortval = sortval + 250 + u.dlevel;
|
|
elseif dname == "The Elemental Planes" then
|
|
dstr = "End";
|
|
sortval = sortval + 256;
|
|
elseif dname == "Vlad's Tower" then
|
|
dstr = "T" .. u.dlevel;
|
|
sortval = sortval + 235 + u.depth;
|
|
elseif dname == "Sokoban" then
|
|
dstr = "S" .. u.dlevel;
|
|
sortval = sortval + 225 + u.depth;
|
|
elseif dname == "The Gnomish Mines" then
|
|
dstr = "M" .. u.dlevel;
|
|
sortval = sortval + 215 + u.dlevel;
|
|
else
|
|
dstr = "D" .. u.depth;
|
|
sortval = sortval + u.depth;
|
|
end
|
|
local str = sortval .. "|" .. astr .. " " .. dstr;
|
|
|
|
extrai:write(str);
|
|
extrai:close();
|
|
else
|
|
-- failed to open the file.
|
|
nh.pline("Failed to open dgl extrainfo file: " .. err);
|
|
end
|
|
prev_dgl_extrainfo = u.moves;
|
|
end
|
|
end
|
|
|
|
-- Show a helpful tip when player first uses getpos()
|
|
function show_getpos_tip()
|
|
nh.text([[
|
|
Tip: Farlooking or selecting a map location
|
|
|
|
You are now in a "farlook" mode - the movement keys move the cursor,
|
|
not your character. Game time does not advance. This mode is used
|
|
to look around the map, or to select a location on it.
|
|
|
|
When in this mode, you can press ESC to return to normal game mode,
|
|
and pressing ? will show the key help.
|
|
]]);
|
|
end
|
|
|
|
-- Callback functions
|
|
nhcore = {
|
|
-- start_new_game called once, when starting a new game
|
|
-- after "Welcome to NetHack" message has been given.
|
|
-- start_new_game = function() nh.pline("NEW GAME!"); end,
|
|
|
|
-- restore_old_game called once, when restoring a saved game
|
|
-- after "Welcome back to NetHack" message has been given.
|
|
-- restore_old_game = function() nh.pline("RESTORED OLD GAME!"); end,
|
|
|
|
-- moveloop_turn is called once per turn.
|
|
-- moveloop_turn = mk_dgl_extrainfo,
|
|
|
|
-- game_exit is called when the game exits (quit, saved, ...)
|
|
-- game_exit = function() end,
|
|
|
|
-- getpos_tip is called the first time the code enters getpos()
|
|
getpos_tip = show_getpos_tip,
|
|
};
|
|
|