288 lines
9.1 KiB
Lua
288 lines
9.1 KiB
Lua
local S = minetest.get_translator(minetest.get_current_modname())
|
|
|
|
local minetest_get_node = minetest.get_node
|
|
local minetest_get_node_or_nil = minetest.get_node_or_nil
|
|
local minetest_remove_node = minetest.remove_node
|
|
local minetest_facedir_to_dir = minetest.facedir_to_dir
|
|
local vector_add = vector.add
|
|
local vector_subtract = vector.subtract
|
|
|
|
local function get_bed_next_node(pos, node)
|
|
local node = node or minetest_get_node_or_nil(pos)
|
|
if not node then return end
|
|
|
|
local dir = minetest_facedir_to_dir(node.param2)
|
|
|
|
local pos2, bottom
|
|
if string.sub(node.name, -4) == "_top" then
|
|
pos2 = vector_subtract(pos, dir)
|
|
else
|
|
pos2 = vector_add(pos, dir)
|
|
bottom = true
|
|
end
|
|
|
|
local node2 = minetest_get_node(pos2)
|
|
return pos2, node2, bottom, dir
|
|
end
|
|
|
|
local function rotate(pos, node, user, mode, new_param2)
|
|
if mode ~= screwdriver.ROTATE_FACE then
|
|
return false
|
|
end
|
|
|
|
local p, node2, bottom = get_bed_next_node(pos, node)
|
|
if not node2 then return end
|
|
|
|
local name = node2.name
|
|
if not minetest.get_item_group(name, "bed") == 2 or not node.param2 == node2.param2 then return false end
|
|
|
|
if bottom then
|
|
name = string.sub(name, 1, -5)
|
|
else
|
|
name = string.sub(name, 1, -8)
|
|
end
|
|
|
|
if minetest.is_protected(p, user:get_player_name()) then
|
|
minetest.record_protection_violation(p, user:get_player_name())
|
|
return false
|
|
end
|
|
|
|
local newp
|
|
local new_dir = minetest_facedir_to_dir(new_param2)
|
|
|
|
if bottom then
|
|
newp = vector_add(pos, new_dir)
|
|
else
|
|
newp = vector_subtract(pos, new_dir)
|
|
end
|
|
|
|
local node3 = minetest_get_node_or_nil(newp)
|
|
if not node3 then return false end
|
|
|
|
local node_def = minetest.registered_nodes[node3.name]
|
|
if not node_def or not node_def.buildable_to then return false end
|
|
|
|
if minetest.is_protected(newp, user:get_player_name()) then
|
|
minetest.record_protection_violation(newp, user:get_player_name())
|
|
return false
|
|
end
|
|
|
|
node.param2 = new_param2
|
|
-- do not remove_node here - it will trigger destroy_bed()
|
|
minetest.swap_node(p, {name = "air"})
|
|
minetest.swap_node(pos, node)
|
|
minetest.swap_node(newp, {name = name .. (bottom and "_top" or "_bottom"), param2 = new_param2})
|
|
|
|
return true
|
|
end
|
|
|
|
|
|
local function destruct_bed(pos, oldnode)
|
|
local node = oldnode or minetest_get_node_or_nil(pos)
|
|
if not node then return end
|
|
|
|
local pos2, node2, bottom = get_bed_next_node(pos, oldnode)
|
|
|
|
if bottom then
|
|
if node2 and string.sub(node2.name, -4) == "_top" then
|
|
minetest_remove_node(pos2)
|
|
end
|
|
|
|
-- Drop the bed only when removing the top to prevent duplication
|
|
local bed_node_def = minetest.registered_nodes[node.name]
|
|
if bed_node_def and bed_node_def._mcl_beds_drop then
|
|
local stack = ItemStack(bed_node_def._mcl_beds_drop)
|
|
minetest.add_item(pos2, stack)
|
|
end
|
|
else
|
|
if node2 and string.sub(node2.name, -7) == "_bottom" then
|
|
minetest_remove_node(pos2)
|
|
end
|
|
end
|
|
end
|
|
|
|
local function kick_player_after_destruct(destruct_pos)
|
|
for name, player_bed_pos in pairs(mcl_beds.bed_pos) do
|
|
if vector.distance(destruct_pos, player_bed_pos) < 0.1 then
|
|
local player = minetest.get_player_by_name(name)
|
|
if player and player:is_player() then
|
|
mcl_beds.kick_player(player)
|
|
break
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
local beddesc = S("Beds allow you to sleep at night and make the time pass faster.")
|
|
local beduse = S("To use a bed, stand close to it and right-click the bed to sleep in it. Sleeping only works when the sun sets, at night or during a thunderstorm. The bed must also be clear of any danger.")
|
|
if minetest.settings:get_bool("enable_bed_respawn") == false then
|
|
beddesc = beddesc .. "\n" .. S("You have heard of other worlds in which a bed would set the start point for your next life. But this world is not one of them.")
|
|
else
|
|
beddesc = beddesc .. "\n" .. S("By using a bed, you set the starting point for your next life. If you die, you will start your next life at this bed, unless it is obstructed or destroyed.")
|
|
end
|
|
if minetest.settings:get_bool("enable_bed_night_skip") == false then
|
|
beddesc = beddesc .. "\n" .. S("In this world, going to bed won't skip the night, but it will skip thunderstorms.")
|
|
else
|
|
beddesc = beddesc .. "\n" .. S("Sleeping allows you to skip the night. The night is skipped when all players in this world went to sleep. The night is skipped after sleeping for a few seconds. Thunderstorms can be skipped in the same manner.")
|
|
end
|
|
|
|
local default_sounds
|
|
if minetest.get_modpath("mcl_sounds") then
|
|
default_sounds = mcl_sounds.node_sound_wood_defaults({
|
|
footstep = mcl_sounds.node_sound_wool_defaults().footstep,
|
|
})
|
|
end
|
|
|
|
local function place_bed(name, placer, pos, dir)
|
|
local botpos = vector_add(pos, minetest_facedir_to_dir(dir))
|
|
|
|
if minetest.is_protected(botpos, placer:get_player_name()) and
|
|
not minetest.check_player_privs(placer, "protection_bypass") then
|
|
minetest.record_protection_violation(botpos, placer:get_player_name())
|
|
return false
|
|
end
|
|
|
|
local botdef = minetest.registered_nodes[minetest_get_node(botpos).name]
|
|
if not botdef or not botdef.buildable_to then
|
|
return false
|
|
end
|
|
|
|
minetest.set_node(pos, {name = name .. "_bottom", param2 = dir})
|
|
minetest.set_node(botpos, {name = name .. "_top", param2 = dir})
|
|
|
|
return true
|
|
end
|
|
|
|
function mcl_beds.register_bed(name, def)
|
|
local common_box = {
|
|
type = "fixed",
|
|
fixed = {-0.5, -0.5, -0.5, 0.5, 0.06, 0.5},
|
|
}
|
|
|
|
minetest.register_node(name .. "_bottom", {
|
|
description = def.description,
|
|
_tt_help = S("Allows you to sleep"),
|
|
|
|
_doc_items_longdesc = def._doc_items_longdesc or beddesc,
|
|
_doc_items_usagehelp = def._doc_items_usagehelp or beduse,
|
|
_doc_items_create_entry = def._doc_items_create_entry,
|
|
_doc_items_entry_name = def._doc_items_entry_name,
|
|
inventory_image = def.inventory_image,
|
|
wield_image = def.wield_image,
|
|
drawtype = "mesh",
|
|
mesh = "mcl_beds_bed_bottom.obj",
|
|
tiles = def.tiles,
|
|
use_texture_alpha = minetest.features.use_texture_alpha_string_modes and "opaque" or false,
|
|
paramtype = "light",
|
|
paramtype2 = "facedir",
|
|
is_ground_content = false,
|
|
stack_max = 1,
|
|
groups = {handy=1, bed = 1, dig_by_piston=1, bouncy=66, fall_damage_add_percent=-50, deco_block = 1, flammable=-1},
|
|
_mcl_hardness = 0.2,
|
|
_mcl_blast_resistance = 1,
|
|
sounds = def.sounds or default_sounds,
|
|
selection_box = common_box,
|
|
collision_box = common_box,
|
|
_mcl_beds_drop = def.recipe and name or "",
|
|
drop = "",
|
|
node_placement_prediction = "",
|
|
|
|
on_place = function(itemstack, placer, pointed_thing)
|
|
local under = pointed_thing.under
|
|
|
|
-- Use pointed node's on_rightclick function first, if present
|
|
local node = minetest_get_node(under)
|
|
if placer and not placer:get_player_control().sneak then
|
|
if minetest.registered_nodes[node.name] and minetest.registered_nodes[node.name].on_rightclick then
|
|
return minetest.registered_nodes[node.name].on_rightclick(pointed_thing.under, node, placer, itemstack) or itemstack
|
|
end
|
|
end
|
|
|
|
local pos
|
|
local undername = minetest_get_node(under).name
|
|
if minetest.registered_items[undername] and minetest.registered_items[undername].buildable_to then
|
|
pos = under
|
|
else
|
|
pos = pointed_thing.above
|
|
end
|
|
|
|
if minetest.is_protected(pos, placer:get_player_name()) and
|
|
not minetest.check_player_privs(placer, "protection_bypass") then
|
|
minetest.record_protection_violation(pos, placer:get_player_name())
|
|
return itemstack
|
|
end
|
|
|
|
local node_def = minetest.registered_nodes[minetest_get_node(pos).name]
|
|
if not node_def or not node_def.buildable_to then
|
|
return itemstack
|
|
end
|
|
|
|
-- Try to place in three directions: inline with the view and rotated to
|
|
-- the right and left
|
|
local dir = minetest.dir_to_facedir(placer:get_look_dir())
|
|
if place_bed(name, placer, pos, dir) or
|
|
place_bed(name, placer, pos, (dir+1)%4) or
|
|
place_bed(name, placer, pos, (dir+3)%4) or
|
|
place_bed(name, placer, pos, (dir+2)%4) then
|
|
-- Bed was places
|
|
if not minetest.is_creative_enabled(placer:get_player_name()) then
|
|
itemstack:take_item()
|
|
end
|
|
end
|
|
return itemstack
|
|
end,
|
|
|
|
after_destruct = destruct_bed,
|
|
|
|
on_destruct = kick_player_after_destruct,
|
|
|
|
on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
|
|
mcl_beds.on_rightclick(pos, clicker, false)
|
|
return itemstack
|
|
end,
|
|
|
|
on_rotate = rotate,
|
|
})
|
|
|
|
|
|
|
|
minetest.register_node(name .. "_top", {
|
|
drawtype = "mesh",
|
|
mesh = "mcl_beds_bed_top.obj",
|
|
tiles = def.tiles,
|
|
use_texture_alpha = minetest.features.use_texture_alpha_string_modes and "opaque" or false,
|
|
paramtype = "light",
|
|
paramtype2 = "facedir",
|
|
is_ground_content = false,
|
|
-- FIXME: Should be bouncy=66, but this would be a higher bounciness than slime blocks!
|
|
groups = {handy = 1, flammable = -1, bed = 2, dig_by_piston=1, bouncy=33, fall_damage_add_percent=-50, not_in_creative_inventory = 1},
|
|
_mcl_hardness = 0.2,
|
|
_mcl_blast_resistance = 1,
|
|
sounds = def.sounds or default_sounds,
|
|
drop = "",
|
|
selection_box = common_box,
|
|
collision_box = common_box,
|
|
|
|
on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
|
|
mcl_beds.on_rightclick(pos, clicker, true)
|
|
return itemstack
|
|
end,
|
|
|
|
on_rotate = rotate,
|
|
after_destruct = destruct_bed,
|
|
})
|
|
|
|
minetest.register_alias(name, name .. "_bottom")
|
|
|
|
if def.recipe then
|
|
minetest.register_craft({
|
|
output = name,
|
|
recipe = def.recipe
|
|
})
|
|
end
|
|
|
|
doc.add_entry_alias("nodes", name.."_bottom", "nodes", name.."_top")
|
|
end
|
|
|
|
|