init.lua

-- randomize player position within the spawn plot
local function go_spawn(player)
	if core.setting_get('static_spawnpoint') then
		local pos = core.setting_get_pos('static_spawnpoint')
		if core.setting_get('variable_spawnpoint') then
			local range = tonumber(core.setting_get('variable_spawnpoint'))
			if range > 0 then
				pos.x = pos.x + math.random(-(range), range)
				pos.z = pos.z + math.random(-(range), range)
			end
		end
		local name = player:get_player_name()
		core.log("action", '[Spawn Plus] Moving '..name..' to '..
			string.format("(%0.1f, %0.1f, %0.1f)", pos.x, pos.y, pos.z)
		)
		core.sound_play("teleport", {
			to_player=name,
			gain = 0.1
		})
		player:setpos( pos )
	end
end

core.register_chatcommand('spawn', {
	description = "Teleports you to spawn",
	privs = {
		shout = true
	},
	func = function(name)
		local player = core.get_player_by_name(name)
		go_spawn(player)
	end
})

core.register_chatcommand('arena', {
	description = "Teleports you to PVP arena",
	privs = {
		shout = true,
		interact = true
	},
	func = function(name)
		local player = core.get_player_by_name(name)
		core.sound_play( "teleport", {
			to_player=player:get_player_name(),
			gain = 0.1
		})
		player:setpos( { x=595, y=6, z=405 } )
	end
})

local function find_free(pos)
	for _, d in ipairs(tries) do
		local p = {x = pos.x+d.x, y = pos.y+d.y, z = pos.z+d.z}
		local n = core.get_node(p)
		if not core.registered_nodes[n.name].walkable then
			return p, true
		end
	end
end

local INTERVAL=3
local WARN_LIMIT=4500
local LIMIT=4528
local function check_pos_range()
	for _,p in ipairs(core.get_connected_players()) do
		local name = p:get_player_name()
		local pos = p:getpos()
		-- map limit
		local max = math.max(math.abs(pos.x),math.abs(pos.z))
		if max > WARN_LIMIT then
			core.sound_play("spawnplus_sucker_punch", {
				to_player=name,
				gain = 0.2
			})
			p:set_hp( p:get_hp() - 2 )
			core.chat_send_player(
				name,
				'Sorry, but you should not go beyond '..tostring(WARN_LIMIT)..'.'
			)
			minetest.log(
				"action",
				'[Spawn Plus] '..name..' out of bounds at '..
				string.format("(%0.1f, %0.1f, %0.1f)", pos.x, pos.y, pos.z)..
				', hp reduced to '..p:get_hp()
			)
		end
		if max > LIMIT then
			go_spawn(p)
		end
	end
	core.after(INTERVAL, check_pos_range)
end

core.after(INTERVAL, check_pos_range)