287 lines
9.2 KiB
Lua
287 lines
9.2 KiB
Lua
-- Minetest 0.4 mod: bones
|
|
-- See README.txt for licensing and other information.
|
|
|
|
local function is_owner(pos, name)
|
|
local owner = minetest.get_meta(pos):get_string("owner")
|
|
if owner == "" or owner == name or minetest.check_player_privs(name, "protection_bypass") then
|
|
return true
|
|
end
|
|
return false
|
|
end
|
|
|
|
local bones_formspec =
|
|
"size[8,9]" ..
|
|
default.gui_bg ..
|
|
default.gui_bg_img ..
|
|
default.gui_slots ..
|
|
"list[current_name;main;0,0.3;8,4;]" ..
|
|
"list[current_player;main;0,4.85;8,1;]" ..
|
|
"list[current_player;main;0,6.08;8,3;8]" ..
|
|
"listring[current_name;main]" ..
|
|
"listring[current_player;main]" ..
|
|
default.get_hotbar_bg(0,4.85)
|
|
|
|
local share_bones_time = tonumber(minetest.settings:get("share_bones_time")) or 1200
|
|
local share_bones_time_early = tonumber(minetest.settings:get("share_bones_time_early")) or share_bones_time / 4
|
|
|
|
minetest.register_node("bones:bones", {
|
|
description = "Bones",
|
|
tiles = {
|
|
"bones_nonshade.png",
|
|
"bones_shade.png",
|
|
"bones.png",
|
|
"bones.png",
|
|
"bones.png",
|
|
"bones.png"
|
|
},
|
|
paramtype2 = "facedir",
|
|
drawtype="nodebox",
|
|
node_box= {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-0.125, -0.5, -0.1875, -0.0625, -0.25, 0.1875}, -- NodeBox16
|
|
{-0.0625, -0.5, -0.125, 0, -0.25, 0.1875}, -- NodeBox17
|
|
{0, -0.5, -0.1875, 0.0625, -0.25, 0.1875}, -- NodeBox18
|
|
{0.0625, -0.5, -0.125, 0.125, -0.25, 0.1875}, -- NodeBox19
|
|
{0.125, -0.5, -0.1875, 0.1875, -0.25, 0.1875}, -- NodeBox20
|
|
{-0.1875, -0.25, -0.1875, 0.25, -0.1875, 0.3125}, -- NodeBox22
|
|
{-0.25, -0.1875, -0.25, 0.3125, -0.125, 0.375}, -- NodeBox23
|
|
{-0.3125, -0.125, -0.25, -0.0625, 0, 0.4375}, -- NodeBox24
|
|
{-0.0625, -0.125, -0.0625, 0, 0, 0.4375}, -- NodeBox26
|
|
{0.0625, -0.125, -0.0625, 0.125, 0, 0.4375}, -- NodeBox27
|
|
{0, -0.125, -0.25, 0.0625, 0, 0.4375}, -- NodeBox28
|
|
{0.125, -0.125, -0.25, 0.375, 0, 0.4375}, -- NodeBox29
|
|
{-0.3125, 0, -0.25, 0.375, 0.0625, 0.4375}, -- NodeBox30
|
|
{-0.3125, 0.0625, -0.25, -0.1875, 0.125, 0.4375}, -- NodeBox31
|
|
{-0.0625, 0.0625, -0.25, 0.125, 0.125, 0.4375}, -- NodeBox32
|
|
{0.25, 0.0625, -0.25, 0.375, 0.125, 0.4375}, -- NodeBox33
|
|
{-0.3125, 0.125, -0.25, -0.25, 0.25, 0.4375}, -- NodeBox34
|
|
{-0.25, 0.25, -0.25, -0.1875, 0.3125, 0.4375}, -- NodeBox35
|
|
{-0.1875, 0.3125, -0.25, 0.25, 0.375, 0.4375}, -- NodeBox37
|
|
{-0.0625, 0.25, -0.25, 0.125, 0.3125, 0.4375}, -- NodeBox39
|
|
{0, 0.125, -0.25, 0.0625, 0.25, 0.4375}, -- NodeBox40
|
|
{0.3125, 0.125, -0.25, 0.375, 0.25, 0.4375}, -- NodeBox41
|
|
{0.25, 0.25, -0.25, 0.3125, 0.3125, 0.4375}, -- NodeBox42
|
|
{-0.25, 0.0625, 0.0625, 0.3125, 0.25, 0.4375}, -- NodeBox46
|
|
{-0.1875, 0.25, 0.0625, 0.25, 0.3125, 0.4375}, -- NodeBox47
|
|
{-0.25, -0.0625, 0.4375, 0.3125, 0.1875, 0.5}, -- NodeBox48
|
|
{-0.125, 0.1875, 0.4375, 0.1875, 0.25, 0.5}, -- NodeBox49
|
|
}
|
|
},
|
|
groups = {dig_immediate = 2},
|
|
sounds = default.node_sound_gravel_defaults(),
|
|
|
|
can_dig = function(pos, player)
|
|
local inv = minetest.get_meta(pos):get_inventory()
|
|
local name = ""
|
|
if player then
|
|
name = player:get_player_name()
|
|
end
|
|
return is_owner(pos, name) and inv:is_empty("main")
|
|
end,
|
|
|
|
allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
|
|
if is_owner(pos, player:get_player_name()) then
|
|
return count
|
|
end
|
|
return 0
|
|
end,
|
|
|
|
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
|
|
return 0
|
|
end,
|
|
|
|
allow_metadata_inventory_take = function(pos, listname, index, stack, player)
|
|
if is_owner(pos, player:get_player_name()) then
|
|
return stack:get_count()
|
|
end
|
|
return 0
|
|
end,
|
|
|
|
on_metadata_inventory_take = function(pos, listname, index, stack, player)
|
|
local meta = minetest.get_meta(pos)
|
|
if meta:get_inventory():is_empty("main") then
|
|
minetest.remove_node(pos)
|
|
end
|
|
end,
|
|
|
|
on_punch = function(pos, node, player)
|
|
if not is_owner(pos, player:get_player_name()) then
|
|
return
|
|
end
|
|
|
|
if minetest.get_meta(pos):get_string("infotext") == "" then
|
|
return
|
|
end
|
|
|
|
local inv = minetest.get_meta(pos):get_inventory()
|
|
local player_inv = player:get_inventory()
|
|
local has_space = true
|
|
|
|
for i = 1, inv:get_size("main") do
|
|
local stk = inv:get_stack("main", i)
|
|
if player_inv:room_for_item("main", stk) then
|
|
inv:set_stack("main", i, nil)
|
|
player_inv:add_item("main", stk)
|
|
else
|
|
has_space = false
|
|
break
|
|
end
|
|
end
|
|
|
|
-- remove bones if player emptied them
|
|
if has_space then
|
|
if player_inv:room_for_item("main", {name = "bones:bones"}) then
|
|
player_inv:add_item("main", {name = "bones:bones"})
|
|
else
|
|
minetest.add_item(pos,"bones:bones")
|
|
end
|
|
minetest.remove_node(pos)
|
|
end
|
|
end,
|
|
|
|
on_timer = function(pos, elapsed)
|
|
local meta = minetest.get_meta(pos)
|
|
local time = meta:get_int("time") + elapsed
|
|
if time >= share_bones_time then
|
|
meta:set_string("infotext", meta:get_string("owner") .. "'s old dreams")
|
|
meta:set_string("owner", "")
|
|
minetest.chat_send_all("Someone's forsaken the carcass of their dreams.")
|
|
minetest.chat_send_all("It can be found at " .. minetest.pos_to_string(pos) .. ".")
|
|
else
|
|
meta:set_int("time", time)
|
|
return true
|
|
end
|
|
end,
|
|
on_blast = function(pos)
|
|
end,
|
|
})
|
|
|
|
local function may_replace(pos, player)
|
|
local node_name = minetest.get_node(pos).name
|
|
local node_definition = minetest.registered_nodes[node_name]
|
|
|
|
-- if the node is unknown, we return false
|
|
if not node_definition then
|
|
return false
|
|
end
|
|
|
|
-- allow replacing air and liquids
|
|
if node_name == "air" or node_definition.liquidtype ~= "none" then
|
|
return true
|
|
end
|
|
|
|
-- don't replace filled chests and other nodes that don't allow it
|
|
local can_dig_func = node_definition.can_dig
|
|
if can_dig_func and not can_dig_func(pos, player) then
|
|
return false
|
|
end
|
|
|
|
-- default to each nodes buildable_to; if a placed block would replace it, why shouldn't bones?
|
|
-- flowers being squished by bones are more realistical than a squished stone, too
|
|
-- exception are of course any protected buildable_to
|
|
return node_definition.buildable_to and not minetest.is_protected(pos, player:get_player_name())
|
|
end
|
|
|
|
local drop = function(pos, itemstack)
|
|
local obj = minetest.add_item(pos, itemstack:take_item(itemstack:get_count()))
|
|
if obj then
|
|
obj:setvelocity({
|
|
x = math.random(-10, 10) / 9,
|
|
y = 5,
|
|
z = math.random(-10, 10) / 9,
|
|
})
|
|
end
|
|
end
|
|
|
|
minetest.register_on_dieplayer(function(player)
|
|
|
|
local bones_mode = minetest.settings:get("bones_mode") or "bones"
|
|
if bones_mode ~= "bones" and bones_mode ~= "drop" and bones_mode ~= "keep" then
|
|
bones_mode = "bones"
|
|
end
|
|
|
|
-- return if keep inventory set or in creative mode
|
|
if bones_mode == "keep" or (creative and creative.is_enabled_for
|
|
and creative.is_enabled_for(player:get_player_name())) then
|
|
return
|
|
end
|
|
|
|
local player_inv = player:get_inventory()
|
|
if player_inv:is_empty("main") and
|
|
player_inv:is_empty("craft") then
|
|
return
|
|
end
|
|
|
|
local pos = vector.round(player:getpos())
|
|
local player_name = player:get_player_name()
|
|
|
|
-- check if it's possible to place bones, if not find space near player
|
|
if bones_mode == "bones" and not may_replace(pos, player) then
|
|
local air = minetest.find_node_near(pos, 1, {"air"})
|
|
if air and not minetest.is_protected(air, player_name) then
|
|
pos = air
|
|
else
|
|
bones_mode = "drop"
|
|
end
|
|
end
|
|
|
|
if bones_mode == "drop" then
|
|
|
|
-- drop inventory items
|
|
for i = 1, player_inv:get_size("main") do
|
|
drop(pos, player_inv:get_stack("main", i))
|
|
end
|
|
player_inv:set_list("main", {})
|
|
|
|
-- drop crafting grid items
|
|
for i = 1, player_inv:get_size("craft") do
|
|
drop(pos, player_inv:get_stack("craft", i))
|
|
end
|
|
player_inv:set_list("craft", {})
|
|
|
|
drop(pos, ItemStack("bones:bones"))
|
|
return
|
|
end
|
|
|
|
local param2 = minetest.dir_to_facedir(player:get_look_dir())
|
|
minetest.set_node(pos, {name = "bones:bones", param2 = param2})
|
|
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("main", 8 * 4)
|
|
inv:set_list("main", player_inv:get_list("main"))
|
|
|
|
for i = 1, player_inv:get_size("craft") do
|
|
local stack = player_inv:get_stack("craft", i)
|
|
if inv:room_for_item("main", stack) then
|
|
inv:add_item("main", stack)
|
|
else
|
|
--drop if no space left
|
|
drop(pos, stack)
|
|
end
|
|
end
|
|
|
|
player_inv:set_list("main", {})
|
|
player_inv:set_list("craft", {})
|
|
|
|
meta:set_string("formspec", bones_formspec)
|
|
meta:set_string("owner", player_name)
|
|
|
|
minetest.chat_send_player(player_name, "Your dreams can be found at " .. minetest.pos_to_string(pos) .. ".")
|
|
|
|
if share_bones_time ~= 0 then
|
|
meta:set_string("infotext", player_name .. "'s fresh skull")
|
|
|
|
if share_bones_time_early == 0 or not minetest.is_protected(pos, player_name) then
|
|
meta:set_int("time", 0)
|
|
else
|
|
meta:set_int("time", (share_bones_time - share_bones_time_early))
|
|
end
|
|
|
|
minetest.get_node_timer(pos):start(10)
|
|
else
|
|
meta:set_string("infotext", player_name.."'s old dreams")
|
|
end
|
|
end)
|