arena_lib/_editor/tools_settings.lua

317 lines
9.4 KiB
Lua
Executable File

local S = minetest.get_translator("arena_lib")
local FS = minetest.formspec_escape
local function get_rename_formspec() end
local function get_properties_formspec() end
local function get_timer_formspec() end
local function get_delete_formspec() end
local function value_to_string() end
local settings_tools = {
"arena_lib:settings_rename",
"arena_lib:settings_properties",
"", -- timer_off/_on
"",
"arena_lib:settings_delete",
"",
"arena_lib:editor_return",
"arena_lib:editor_quit",
}
local sel_property_attr = {} --KEY: p_name; VALUE: {id = idx, name = property_name}
minetest.register_craftitem("arena_lib:timer", {
description = S("Timer: on"),
inventory_image = "arenalib_tool_settings_timer.png",
groups = {not_in_creative_inventory = 1, oddly_breakable_by_hand = "2"},
on_place = function() end,
on_drop = function() end,
on_use = function(itemstack, user, pointed_thing)
minetest.show_formspec(user:get_player_name(), "arena_lib:settings_timer", get_timer_formspec())
end,
on_secondary_use = function(itemstack, placer, pointed_thing)
local mod = placer:get_meta():get_string("arena_lib_editor.mod")
local arena_name = placer:get_meta():get_string("arena_lib_editor.arena")
local id, arena = arena_lib.get_arena_by_name(mod, arena_name)
local inv = placer:get_inventory()
arena_lib.set_timer(placer:get_player_name(), mod, arena_name, -1, true)
minetest.after(0, function()
inv:set_stack("main", 1, "arena_lib:timer_off")
end)
end
})
minetest.register_tool("arena_lib:settings_rename", {
description = S("Rename arena"),
inventory_image = "arenalib_tool_settings_rename.png",
groups = {not_in_creative_inventory = 1, oddly_breakable_by_hand = "2"},
on_place = function() end,
on_drop = function() end,
on_use = function(itemstack, user, pointed_thing)
minetest.show_formspec(user:get_player_name(), "arena_lib:settings_rename", get_rename_formspec())
end
})
minetest.register_tool("arena_lib:settings_properties", {
description = S("Arena properties"),
inventory_image = "arenalib_tool_settings_properties.png",
groups = {not_in_creative_inventory = 1, oddly_breakable_by_hand = "2"},
on_place = function() end,
on_drop = function() end,
on_use = function(itemstack, user, pointed_thing)
local p_name = user:get_player_name()
local mod = user:get_meta():get_string("arena_lib_editor.mod")
local arena_name = user:get_meta():get_string("arena_lib_editor.arena")
local id, arena = arena_lib.get_arena_by_name(mod, arena_name)
minetest.show_formspec(p_name, "arena_lib:settings_properties", get_properties_formspec(p_name, mod, arena, 1))
end
})
minetest.register_tool("arena_lib:settings_delete", {
description = S("Delete arena"),
inventory_image = "arenalib_tool_settings_delete.png",
groups = {not_in_creative_inventory = 1, oddly_breakable_by_hand = "2"},
on_place = function() end,
on_drop = function() end,
on_use = function(itemstack, user, pointed_thing)
local p_name = user:get_player_name()
local arena_name = user:get_meta():get_string("arena_lib_editor.arena")
minetest.show_formspec(p_name, "arena_lib:settings_delete", get_delete_formspec(p_name, arena_name))
end
})
function arena_lib.give_settings_tools(user)
user:get_inventory():set_list("main", settings_tools)
local inv = user:get_inventory()
local mod = user:get_meta():get_string("arena_lib_editor.mod")
local arena_name = user:get_meta():get_string("arena_lib_editor.arena")
local id, arena = arena_lib.get_arena_by_name(mod, arena_name)
local mod_ref = arena_lib.mods[mod]
if mod_ref.time_mode == 2 then
inv:set_stack("main", 3, "arena_lib:timer")
end
end
----------------------------------------------
---------------FUNZIONI LOCALI----------------
----------------------------------------------
function get_rename_formspec()
local formspec = {
"size[5.2,0.4]",
"no_prepend[]",
"bgcolor[;neither]",
"field[0.2,0.25;4,1;rename;;]",
"button[3.8,-0.05;1.7,1;rename_confirm;" .. S("Rename arena") .. "]",
"field_close_on_enter[rename;false]"
}
return table.concat(formspec, "")
end
function get_properties_formspec(p_name, mod, arena, sel_idx)
local mod_ref = arena_lib.mods[mod]
local properties = ""
local properties_by_idx = {}
local sel_property = ""
local sel_property_value = ""
local i = 1
-- ottengo una stringa con tutte le proprietà
for property, v in pairs(mod_ref.properties) do
properties = properties .. property .. " = " .. FS(value_to_string(arena[property])) .. ","
properties_by_idx[i] = property
i = i + 1
end
-- ottengo il nome della proprietà selezionata
if not sel_idx then
sel_property = properties_by_idx[1]
else
sel_property = properties_by_idx[sel_idx]
end
-- e assegno il valore
sel_property_attr[p_name] = {id = sel_idx, name = sel_property}
sel_property_value = FS(value_to_string(arena[sel_property]))
properties = properties:sub(1,-2)
local formspec = {
"size[6.25,3.7]",
--"hypertext[0,0;6.25,1;properties_title;<global halign=center>" .. S("Arena properties") .. "]", -- 5.4.0
"hypertext[0,0;6.25,1;properties_title;<global halign=center>Arena properties]",
"textlist[0,0.5;6,2.5;arena_properties;" .. properties .. ";" .. sel_idx .. ";false]",
"field[0.3,3.3;4.7,1;sel_property_value;;" .. sel_property_value .. "]",
"button[4.72,2.983;1.5,1;property_overwrite;" .. S("Overwrite") .. "]",
"field_close_on_enter[sel_property_value;false]"
}
return table.concat(formspec, "")
end
function get_timer_formspec()
local formspec = {
"size[5.2,0.4]",
"no_prepend[]",
"bgcolor[;neither]",
"field[0.2,0.25;4,1;set_timer;;]",
"button[3.8,-0.05;1.7,1;timer_confirm;" .. S("Set timer") .. "]",
"field_close_on_enter[set_timer;false]"
}
return table.concat(formspec, "")
end
function get_delete_formspec(p_name, arena_name)
local formspec = {
"size[5,1]",
"style[delete_confirm;bgcolor=red]",
--"hypertext[0.25,-0.1;5,1;delete_msg;<global halign=center>" .. S("Are you sure you want to delete arena @1?", arena_name) .. "]", -- 5.4.0
"hypertext[0.25,-0.1;5,1;delete_msg;<global halign=center>Are you sure you want to delete arena " .. arena_name .. "?]",
"button[3,0.5;1.5,0.5;delete_confirm;" .. S("Yes") .. "]",
"button[0.5,0.5;1.5,0.5;delete_cancel;" .. S("Cancel") .. "]",
"field_close_on_enter[;false]"
}
return table.concat(formspec, "")
end
function value_to_string(property)
if type(property) == "string" then
return "\"" .. property .. "\""
elseif type(property) == "table" then
return tostring(dump(property)):gsub("\n", "")
else
return tostring(property)
end
end
----------------------------------------------
---------------GESTIONE CAMPI-----------------
----------------------------------------------
minetest.register_on_player_receive_fields(function(player, formname, fields)
if formname ~= "arena_lib:settings_timer" and formname ~= "arena_lib:settings_rename"
and formname ~= "arena_lib:settings_properties" and formname ~= "arena_lib:settings_delete" then return end
local p_name = player:get_player_name()
local mod = player:get_meta():get_string("arena_lib_editor.mod")
local arena_name = player:get_meta():get_string("arena_lib_editor.arena")
-- GUI per timer
if formname == "arena_lib:settings_timer" then
if fields.timer_confirm or fields.key_enter then
local timer = tonumber(fields.set_timer)
if timer == nil or timer < 1 then
minetest.chat_send_player(p_name, minetest.colorize("#e6482e", S("[!] Parameters don't seem right!")))
return end
arena_lib.set_timer(p_name, mod, arena_name, timer, true)
minetest.close_formspec(p_name, formname)
end
-- GUI per rinominare arena
elseif formname == "arena_lib:settings_rename" then
if fields.rename_confirm or fields.key_enter then
if arena_lib.rename_arena(p_name, mod, arena_name, fields.rename, true) then
player:get_meta():set_string("arena_lib_editor.arena", fields.rename)
minetest.close_formspec(p_name, formname)
end
end
-- GUI per modificare proprietà
elseif formname == "arena_lib:settings_properties" then
local id, arena = arena_lib.get_arena_by_name(mod, arena_name)
-- se clicco sulla lista
if fields.arena_properties then
local expl = minetest.explode_textlist_event(fields.arena_properties)
if expl.type == "DCL" or expl.type == "CHG" then
minetest.show_formspec(p_name, "arena_lib:settings_properties", get_properties_formspec(p_name, mod, arena, expl.index))
end
-- se premo per sovrascrivere
elseif fields.property_overwrite or fields.key_enter then
arena_lib.change_arena_property(p_name, mod, arena_name, sel_property_attr[p_name].name, fields.sel_property_value, true)
minetest.show_formspec(p_name, "arena_lib:settings_properties", get_properties_formspec(p_name, mod, arena, sel_property_attr[p_name].id))
end
-- GUI per cancellare arena
else
if fields.delete_confirm then
arena_lib.quit_editor(player)
minetest.close_formspec(p_name, formname)
arena_lib.remove_arena(p_name, mod, arena_name, true)
elseif fields.delete_cancel then
minetest.close_formspec(p_name, formname)
end
end
end)