248 lines
8.9 KiB
Lua
248 lines
8.9 KiB
Lua
-- apart from the history, the formspec also handles mode switches
|
|
|
|
-- how many patterns are stored in the history? those don't take up much space,
|
|
-- but a too long list might not be overly helpful for the players either
|
|
replacer_setter.max_hist_size = 30
|
|
|
|
|
|
-- turn stored pattern string (<node_name> <param1> <param2>) into something readable by human beeings
|
|
replacer_setter.human_readable_pattern = function(pattern)
|
|
if(not(pattern)) then
|
|
return "(nothing)"
|
|
end
|
|
-- data is stored in the form "<nodename> <param1> <param2>"
|
|
local parts = string.split(pattern, " ")
|
|
if(not(parts) or #parts < 3) then
|
|
return "(corrupted data)"
|
|
end
|
|
local node_name = parts[1]
|
|
local param2 = parts[3]
|
|
|
|
local def = minetest.registered_nodes[ node_name ]
|
|
if(not(def)) then
|
|
return "(unknown node)"
|
|
end
|
|
local text = "'"..tostring(def.description or "- no description -").."'"
|
|
if(not(def.description) or def.description == "") then
|
|
text = "- no description -"
|
|
end
|
|
-- facedir is probably the most commonly used rotation variant
|
|
if( def.paramtype2 == "facedir"
|
|
or def.paramtype2 == "colorfacedir") then
|
|
local axis_names = {"y+ (Ground)", "z+ (North)", "z- (South)",
|
|
"x+ (East)", "x- (West)", "y- (Sky)"}
|
|
text = text.." Rotated: "..tostring(param2 % 4)..
|
|
" around axis: "..tostring( axis_names[ math.floor( (param2%24) / 4 ) + 1 ])
|
|
-- wallmounted is diffrent
|
|
elseif( def.paramtype2 == "wallmounted"
|
|
or def.paramtype2 == "colorwallmounted") then
|
|
local axis_names = {"y+ (Ground)", "y- (Sky)",
|
|
"z+ (North)", "z- (South)",
|
|
"x+ (East)", "x- (West)"}
|
|
text = text.." Mounted at wall: "..tostring( axis_names[ (param2 % 6)+ 1 ])
|
|
end
|
|
return text
|
|
end
|
|
|
|
|
|
-- set the replacer to a new pattern
|
|
replacer_setter.set_to = function(player_name, pattern, player, itemstack)
|
|
if(not(player_name) or not(player) or not(itemstack)) then
|
|
return itemstack
|
|
end
|
|
-- fallback if nothing is given
|
|
if(not(pattern)) then
|
|
pattern = "default:dirt 0 0"
|
|
end
|
|
|
|
local set_to = replacer_setter.human_readable_pattern(pattern)
|
|
-- change the description of the tool so that it's easier to see which replacer (if you
|
|
-- have more than one in your inv) is set to which node
|
|
local meta = itemstack:get_meta()
|
|
-- actually store the new pattern
|
|
meta:set_string("pattern", pattern )
|
|
|
|
meta:set_string("description", "Node replacement tool set to:\n"..set_to..
|
|
"\n["..tostring(pattern).."]")
|
|
|
|
minetest.chat_send_player(player_name, "Node replacement tool set to: "..set_to..
|
|
"["..tostring(pattern).."].")
|
|
|
|
replacer_setter.add_to_hist(player_name, pattern)
|
|
return itemstack -- nothing consumed but data changed
|
|
end
|
|
|
|
|
|
replacer_setter.set_to_for_swissalps_fork = function(player, row)
|
|
if(not(player) or not(row)) then
|
|
return
|
|
end
|
|
local player_name = player:get_player_name()
|
|
if(not(replacer_setter.history[ player_name ])
|
|
or not(replacer_setter.history[ player_name ][ row ])) then
|
|
return
|
|
end
|
|
local pattern = replacer_setter.history[ player_name ][ row ]
|
|
|
|
local wield_index = player:get_wield_index()
|
|
local replacer_stack = nil
|
|
local inv = player:get_inventory()
|
|
if(wield_index > 1) then
|
|
replacer_stack = inv:get_stack("main", wield_index - 1)
|
|
end
|
|
if(replacer_stack and replacer_stack:get_name() == "replacer:replacer") then
|
|
-- for Swissalps' fork
|
|
local parts = pattern:split(" ")
|
|
local node = {name=parts[1], param1=0, param2=parts[3]}
|
|
local mode = "single"
|
|
replacer.set_data(replacer_stack, node, mode)
|
|
inv:set_stack("main", wield_index - 1, replacer_stack)
|
|
end
|
|
end
|
|
|
|
|
|
-- keep a history of stored patterns for each player (not for each replacer);
|
|
-- this history is not saved over server shutdown
|
|
replacer_setter.add_to_hist = function(player_name, pattern)
|
|
if(not(player_name) or not(pattern) or pattern == "") then
|
|
return
|
|
end
|
|
if(not(replacer_setter.history)) then
|
|
replacer_setter.history = {}
|
|
end
|
|
if(not(replacer_setter.history[ player_name ])) then
|
|
replacer_setter.history[ player_name ] = {}
|
|
end
|
|
local index = table.indexof(replacer_setter.history[ player_name ], pattern)
|
|
-- only add new entries; do not store duplicates
|
|
if(index and index > -1) then
|
|
return
|
|
end
|
|
-- remove the oldest entry
|
|
if(#replacer_setter.history[ player_name ] >= replacer_setter.max_hist_size) then
|
|
table.remove(replacer_setter.history[ player_name ], 1)
|
|
end
|
|
-- insert at the beginning of the list
|
|
table.insert(replacer_setter.history[ player_name ], 1, pattern)
|
|
end
|
|
|
|
|
|
-- show a formspec with a history of stored patterns to select from
|
|
replacer_setter.get_formspec = function(player_name, current_pattern, player)
|
|
local wield_index = player:get_wield_index()
|
|
local replacer_stack = nil
|
|
if(wield_index > 1) then
|
|
local inv = player:get_inventory()
|
|
replacer_stack = inv:get_stack("main", wield_index - 1)
|
|
end
|
|
if(not(replacer_stack) or replacer_stack:get_name() ~= "replacer:replacer") then
|
|
return "formspec_version[1]"..
|
|
"size[8,3]"..
|
|
"label[0.5,0.5;Please place your replacer in the slot *to the right*\n"..
|
|
"of this tool in your inventory! Else the replacer setter\n"..
|
|
"cannot know whichreplacer to set.]"..
|
|
"button_exit[3.5,2;1,1;exit;Exit]"
|
|
end
|
|
|
|
-- is the player in creative mode?
|
|
local in_creative_mode = (minetest.settings:get_bool("creative_mode")
|
|
or minetest.check_player_privs(player_name, {creative=true}))
|
|
-- make sure all variables exist and the current entry is stored
|
|
replacer_setter.add_to_hist(player_name, current_pattern)
|
|
-- set the replacer to the currently selected value
|
|
local idx = table.indexof(replacer_setter.history[ player_name ], current_pattern)
|
|
replacer_setter.set_to_for_swissalps_fork(player, idx)
|
|
-- count how many blocks of each type the player has in his inventory
|
|
local counted_inv = {}
|
|
if(not(in_creative_mode)) then
|
|
local inv_main = player:get_inventory():get_list("main")
|
|
for i, v in ipairs(inv_main) do
|
|
local stack_name = v:get_name()
|
|
if(not(counted_inv[ stack_name ])) then
|
|
counted_inv[ stack_name ] = 0
|
|
end
|
|
counted_inv[ stack_name ] = counted_inv[ stack_name ] + v:get_count()
|
|
end
|
|
end
|
|
|
|
-- find out which mode the player has currently selected
|
|
local current_mode = 1
|
|
if(replacer_setter.user_mode and replacer_setter.user_mode[ player_name ]) then
|
|
current_mode = table.indexof(replacer_setter.mode_names, replacer_setter.user_mode[ player_name ])
|
|
if(current_mode == -1) then
|
|
current_mode = 1
|
|
end
|
|
end
|
|
|
|
local formspec = "size[18,10]"..
|
|
"label[6,0;Node Replacement Tool Setup and History]"..
|
|
"button_exit[10,9.4;2,0.8;quit;Exit]"..
|
|
"label[0.2,8.5;Note: Selected mode and history are reset on server restart.\n"..
|
|
"Note: This selection is valid only for the replacer to the "..
|
|
"*left* of this tool here in your inventory.]"..
|
|
"label[0.2,0.6;Select mode: When replacing (punching, left-click) or "..
|
|
"placing (right-click) a block, ..]"..
|
|
"dropdown[0.2,1.0;17;select_mode;"..
|
|
table.concat(replacer_setter.mode_descriptions, ",")..
|
|
";"..tostring(current_mode)..";]"..
|
|
"label[0.2,2.1;Click here to set the replacer to a pattern you have stored before:]"..
|
|
"tablecolumns[color;"..
|
|
"text,align=right,tooltip=Amount of nodes of this type left in your inventory:"..
|
|
";color;text,align=left,tooltip=Stored pattern:]"..
|
|
"table[0.2,2.5;17,6;replacer_history;"
|
|
local hist_entries = {}
|
|
local selected = 1
|
|
for i, v in ipairs(replacer_setter.history[ player_name ]) do
|
|
if(v == current_pattern) then
|
|
selected = i
|
|
end
|
|
local amount_left = "#00FF00,infinite supply:,#00FF00"
|
|
if(not(in_creative_mode)) then
|
|
-- which item are we looking for?
|
|
local parts = v:split(" ")
|
|
if(not(parts) or #parts<1) then
|
|
parts = {"does not exist"}
|
|
-- TODO: handle this in a more general way
|
|
elseif(parts[1] == "default:dirt_with_grass") then
|
|
parts[1] = "default:dirt"
|
|
end
|
|
if(counted_inv[ parts[1] ]) then
|
|
amount_left = "#00FF00,"..tostring(counted_inv[ parts[1] ]).." available:"..
|
|
",#00FF00"
|
|
else
|
|
amount_left = "#FF0000,none left!,#CFCFCF"
|
|
end
|
|
end
|
|
hist_entries[ i ] = tostring(amount_left)..","..
|
|
minetest.formspec_escape(replacer_setter.human_readable_pattern(v).." ["..v.."]")
|
|
end
|
|
return formspec..table.concat(hist_entries, ",")..";"..tostring(selected).."]"..
|
|
"field[20,20;0,0;current_field;;"..tostring(selected).."]"..
|
|
"button_exit[6,9.4;2,0.8;set;Set]"
|
|
end
|
|
|
|
|
|
|
|
|
|
-- the player has interacted with our formspec
|
|
minetest.register_on_player_receive_fields( function(player, formname, fields)
|
|
if(not(formname) or formname ~= "replacer:menu") then
|
|
return false
|
|
end
|
|
local player_name = player:get_player_name()
|
|
local row = -1
|
|
-- the player clicked on an entry in the history
|
|
if(fields and fields.replacer_history
|
|
and replacer_setter.history and replacer_setter.history[ player_name ]) then
|
|
-- find out which line it was
|
|
local selected = minetest.explode_table_event(fields.replacer_history)
|
|
if(selected and (selected.type == "CHG" or selected.type == "DLC")
|
|
and selected.row <= #replacer_setter.history[ player_name ]) then
|
|
row = selected.row
|
|
end
|
|
replacer_setter.set_to_for_swissalps_fork(player, row)
|
|
return true
|
|
end
|
|
return true
|
|
end)
|