minetest-mods/warps
1
0
Fork 2
mirror of https://github.com/minetest-mods/warps.git synced 2025-03-14 08:20:36 +01:00
Code Issues Releases Wiki Activity

Allow selecting the warp destination from a dropdown or textbox

Browse Source
This commit is contained in:
Montandalar 2021-01-26 22:28:30 +11:00
parent 9e12709ccb
commit 286454bce5
1 changed files with 47 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
init.lua
View File

@ -241,6 +241,34 @@ minetest.register_chatcommand("warp", {
end
})
local function prepare_dropdown(x,y,w,h,curr_dest)
local dd = string.format("dropdown[%f,%f;%f,%f;ddwarp;", x, y, w, h)
local sel = 0
for idx, warp in ipairs(warps) do
local warpname = warp.name
dd = dd .. warpname .. ","
if curr_dest == warpname then
sel = idx
end
end
dd = dd .. ";"..tostring(sel).."]"
return dd
end
local function prepare_formspec(dest)
local custdest
if not lookup_warp(dest) then
custdest = dest
else
custdest = ""
end
s_formspec = "size[4.5,3]label[0.7,0;Warp destination]"
s_formspec = s_formspec .. "field[1,2.2;3,0.2;destination;Future destination;"..custdest.."]"
.."button_exit[0.7,2.7;3,0.5;proceed;Proceed]"
..prepare_dropdown(0.7,0.4,3,1, dest)
return s_formspec
end
minetest.register_node("warps:warpstone", {
visual = "mesh",
mesh = "warps_warpstone.obj",
@ -259,8 +287,7 @@ minetest.register_node("warps:warpstone", {
},
on_construct = function(pos)
local meta = minetest.get_meta(pos)
meta:set_string("formspec",
"field[destination;Warp Destination;]")
meta:set_string("formspec", prepare_formspec(""))
meta:set_string("infotext", "Uninitialized Warp Stone")
end,
on_receive_fields = function(pos, formname, fields, sender)
@ -268,15 +295,27 @@ minetest.register_node("warps:warpstone", {
minetest.chat_send_player(sender:get_player_name(), "You do not have permission to modify warp stones")
return false
end
if not fields.destination then
if not (fields.destination and fields.quit) then
return
end
local ddwarp = fields.ddwarp
local is_custom_dest = false
local dest
if fields.destination == "" and fields.ddwarp then
dest = fields.ddwarp
else
dest = fields.destination
end
local meta = minetest.get_meta(pos)
meta:set_string("formspec",
"field[destination;Warp Destination;" .. fields.destination .. "]")
meta:set_string("infotext", "Warp stone to " .. fields.destination)
meta:set_string("warps_destination", fields.destination)
minetest.log("action", sender:get_player_name() .. " changed warp stone to \"" .. fields.destination .. "\"")
local s_formspec, formspec_help
meta:set_string("formspec", prepare_formspec(dest))
meta:set_string("infotext", "Warp stone to " .. dest)
meta:set_string("warps_destination", dest)
minetest.log("action", sender:get_player_name() .. " changed warp stone at "
.. minetest.pos_to_string(pos) .. " to \"" .. dest .. "\"")
end,
on_punch = function(pos, node, puncher, pointed_thingo)
if puncher:get_player_control().sneak and