mcl_spawn = {} local mg_name = minetest.get_mapgen_setting("mg_name") -- Returns current custom spawn position of player. -- Returns nil if player has no custom spawn position. -- If player is nil or not a player, the default spawn point is returned. -- The second return value is true if spawn point is player-chosen, -- false otherwise. mcl_spawn.get_spawn_pos = function(player) local spawn, custom_spawn = nil, false if player ~= nil and player:is_player() then local attr = player:get_meta():get_string("mcl_beds:spawn") if attr ~= nil and attr ~= "" then spawn = minetest.string_to_pos(attr) custom_spawn = true end end if not spawn or spawn == "" then spawn = minetest.setting_get_pos("static_spawnpoint") custom_spawn = false end if not spawn or spawn == "" then local attr = player:get_meta():get_string("mcl_spawn:first_spawn") if attr ~= nil and attr ~= "" then spawn = minetest.string_to_pos(attr) custom_spawn = false end end return spawn, custom_spawn end -- Sets the player's spawn position to pos. -- Set pos to nil to clear the spawn position. -- If message is set, informs the player with a chat message when the spawn position -- changed. mcl_spawn.set_spawn_pos = function(player, pos, message) local spawn_changed = false local meta = player:get_meta() if pos == nil then if meta:get_string("mcl_beds:spawn") ~= "" then spawn_changed = true if message then minetest.chat_send_player(player:get_player_name(), "Respawn position cleared!") end end meta:set_string("mcl_beds:spawn", "") else local oldpos = minetest.string_to_pos(meta:get_string("mcl_beds:spawn")) if oldpos then -- We don't bother sending a message if the new spawn pos is basically the same if vector.distance(pos, oldpos) > 0.1 then spawn_changed = true if message then minetest.chat_send_player(player:get_player_name(), "New respawn position set!") end end end meta:set_string("mcl_beds:spawn", minetest.pos_to_string(pos)) end return spawn_changed end local function get_far_node(pos) local node = minetest.get_node(pos) if node.name ~= "ignore" then return node end minetest.get_voxel_manip():read_from_map(pos, pos) return minetest.get_node(pos) end -- Respawn player at specified respawn position minetest.register_on_respawnplayer(function(player) local pos, custom_spawn = mcl_spawn.get_spawn_pos(player) if pos and custom_spawn then -- Check if bed is still there -- and the spawning position is free of solid or damaging blocks. local node_bed = get_far_node(pos) local node_up1 = get_far_node({x=pos.x,y=pos.y+1,z=pos.z}) local node_up2 = get_far_node({x=pos.x,y=pos.y+2,z=pos.z}) local bgroup = minetest.get_item_group(node_bed.name, "bed") local def1 = minetest.registered_nodes[node_up1.name] local def2 = minetest.registered_nodes[node_up2.name] if (bgroup == 1 or bgroup == 2) and (not def1.walkable) and (not def2.walkable) and (def1.damage_per_second == nil or def2.damage_per_second <= 0) and (def1.damage_per_second == nil or def2.damage_per_second <= 0) then player:set_pos(pos) return true else -- Forget spawn if bed was missing if (bgroup ~= 1 and bgroup ~= 2) then mcl_spawn.set_spawn_pos(player, nil) end minetest.chat_send_player(player:get_player_name(), "Your spawn bed was missing or blocked.") end end end) minetest.register_on_newplayer(function(player) -- Remember where the player spawned first player:get_meta():set_string("mcl_spawn:first_spawn", minetest.pos_to_string(player:get_pos())) end)