From da66780a569712c23ae4f2996cfb4608a9f9d69d Mon Sep 17 00:00:00 2001
From: Vanessa Ezekowitz <vanessaezekowitz@gmail.com>
Date: Fri, 1 Apr 2016 20:02:19 -0400
Subject: copy all standard Dreambuilder mods in from the old subgame (exactly
 as last supplied there, updates to these mods will follow later)

---
 spawn/init.lua | 67 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 67 insertions(+)
 create mode 100644 spawn/init.lua

(limited to 'spawn')

diff --git a/spawn/init.lua b/spawn/init.lua
new file mode 100644
index 0000000..09eec7b
--- /dev/null
+++ b/spawn/init.lua
@@ -0,0 +1,67 @@
+
+-- Some modified from: Minetest: builtin/static_spawn.lua
+
+local function check_spawnpoint(config_setting)
+	if not minetest.setting_get(config_setting) then
+		minetest.log('error', "The \"" .. config_setting .. "\" setting is not set")
+		return false
+	end
+
+	if not minetest.setting_get_pos(config_setting) then
+		minetest.log('error', "The " .. config_setting .. " setting is invalid: \""..
+				core.setting_get(config_setting).."\"")
+		return false
+	end
+	return true
+end
+
+
+local function put_player_at_spawn(obj)
+
+	local config_setting
+
+	-- players with interact spawn at the location specified by
+	-- "alt_spawnpoint" in the .conf file. Those *without* interact go to
+	-- "static_spawnpoint".
+
+	if not minetest.get_player_privs(obj:get_player_name()).interact then
+		config_setting  = "static_spawnpoint"
+	else
+		config_setting  = "alt_spawnpoint"
+	end
+
+	if not check_spawnpoint(config_setting) then
+		return false
+	end
+
+	local spawnpoint = minetest.setting_get_pos(config_setting)
+
+	minetest.log('action', "Moving " .. obj:get_player_name() ..
+			" to " .. config_setting .. " at "..
+			minetest.pos_to_string(spawnpoint))
+
+	obj:setpos(spawnpoint)
+
+	return true
+end
+
+
+minetest.register_chatcommand("spawn", {
+	description = "Teleport to the spawn location",
+	func = function(name, _)
+		local ok = put_player_at_spawn(minetest.get_player_by_name(name))
+		if ok then
+			return true, "Teleporting to spawn..."
+		end
+		return false, "Teleport failed"
+	end
+})
+
+
+minetest.register_on_newplayer(function(obj)
+	return put_player_at_spawn(obj)
+end)
+
+minetest.register_on_respawnplayer(function(obj)
+	return put_player_at_spawn(obj)
+end)
-- 
cgit v1.2.3