forked from VoxeLibre/VoxeLibre
302 lines
8.7 KiB
Lua
302 lines
8.7 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 creative_dig = {}
|
|
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)
|
|
|
|
-- Check creative dig flags and don't drop an item if the bed was dug by a player in
|
|
-- creative mode
|
|
local pos_hash = minetest.hash_node_position(pos)
|
|
local pos2_hash = minetest.hash_node_position(pos2)
|
|
local creative_mode = creative_dig[pos_hash] or creative_dig[pos2_hash]
|
|
|
|
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 and only if
|
|
-- it wasn't dug by a player in creative mode
|
|
local bed_node_def = minetest.registered_nodes[node.name]
|
|
if bed_node_def and bed_node_def._mcl_beds_drop and not creative_mode 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 dig_bed(pos, node, digger)
|
|
local pos_hash = minetest.hash_node_position(pos)
|
|
|
|
if digger then
|
|
local name = digger:get_player_name()
|
|
if minetest.is_protected(pos, name) then
|
|
minetest.record_protection_violation(pos, name)
|
|
return
|
|
end
|
|
|
|
-- Set creative dig flags to stop dropping items
|
|
if minetest.is_creative_enabled(name) then
|
|
creative_dig[pos_hash] = true
|
|
end
|
|
end
|
|
|
|
-- Trigger the destruct_bed function
|
|
minetest.remove_node(pos)
|
|
|
|
-- Clean up creative dig flag
|
|
creative_dig[pos_hash] = nil
|
|
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 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,
|
|
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_dig = dig_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,
|
|
on_dig = dig_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
|
|
|
|
|