Fix a bug for temporarygate and add Signalchanger

moremesecons_teleporter/depends.txt

@@ -0,0 +1 @@
+mesecons

moremesecons_teleporter/init.lua

@@ -0,0 +1,77 @@
+teleporters = {}
+
+local register = function(pos)
+	local meta = minetest.env:get_meta(pos)
+	local RID = meta:get_int("RID")
+	if teleporters[RID] == nil then
+		table.insert(teleporters, pos)
+		meta:set_int("RID", #teleporters)
+	end
+end
+
+local teleport_nearest = function(pos)
+	local MAX_DISTANCE = 8
+	
+	-- Search the nearest player
+	local nearest = nil
+	local min_distance = math.huge
+	local players = minetest.get_connected_players()
+	for index, player in pairs(players) do
+		local distance = vector.distance(pos, player:getpos())
+		if distance < min_distance then
+			min_distance = distance
+			nearest = player
+		end
+	end
+	
+	-- Search other teleporter and teleport
+	if not minetest.registered_nodes["moremesecons_teleporter:teleporter"] then return end
+	
+	for i = 1, #teleporters do
+		if minetest.get_node(teleporters[i]).name == "moremesecons_teleporter:teleporter" then
+			if teleporters[i].y == pos.y and teleporters[i].x == pos.x and teleporters[i].z ~= pos.z then
+				nearest:setpos({x=teleporters[i].x, y=teleporters[i].y+1, z=teleporters[i].z})
+				minetest.log("action", "Player "..nearest:get_player_name().." was teleport with a MoreMesecons Teleporter.")
+				return
+			elseif teleporters[i].z == pos.z and teleporters[i].x == pos.x and teleporters[i].y ~= pos.y then
+				nearest:setpos({x=teleporters[i].x, y=teleporters[i].y+1, z=teleporters[i].z})
+				minetest.log("action", "Player "..nearest:get_player_name().." was teleport with a MoreMesecons Teleporter.")
+				return
+			elseif teleporters[i].z == pos.z and teleporters[i].y == pos.y and teleporters[i].x ~= pos.x then
+				nearest:setpos({x=teleporters[i].x, y=teleporters[i].y+1, z=teleporters[i].z})
+				minetest.log("action", "Player "..nearest:get_player_name().." was teleport with a MoreMesecons Teleporter.")
+				return
+			end
+		end
+	end	
+end
+
+minetest.register_craft({
+	output = "moremesecons_teleporter:teleporter 1",
+	recipe = {{"default:mese_cristal_fragment","default:stick","default:mese_cristal_fragment"}}
+})
+minetest.register_node("moremesecons_teleporter:teleporter", {
+	tiles = {"teleporter.png"},
+	paramtype = "light",
+	walkable = true,
+	groups = {cracky=3},
+	description="Teleporter",
+	mesecons = {effector = {
+		state = mesecon.state.off,
+		action_on = teleport_nearest
+	}},
+	sounds = default.node_sound_stone_defaults(),
+	on_construct = function(pos)
+		register(pos)
+	end
+})
+
+
+minetest.register_abm({
+	nodenames = {"moremesecons_teleporter:teleporter"},
+	interval=1,
+	chance=1,
+	action = function(pos) 
+		register(pos)
+	end
+})

moremesecons_teleporter/init.lua~

@@ -0,0 +1,77 @@
+teleporters = {}
+
+local register = function(pos)
+	local meta = minetest.env:get_meta(pos)
+	local RID = meta:get_int("RID")
+	if teleporters[RID] == nil then
+		table.insert(teleporters, pos)
+		meta:set_int("RID", #teleporters)
+	end
+end
+
+local teleport_nearest = function(pos)
+	local MAX_DISTANCE = 8
+	
+	-- Search the nearest player
+	local nearest = nil
+	local min_distance = math.huge
+	local players = minetest.get_connected_players()
+	for index, player in pairs(players) do
+		local distance = vector.distance(pos, player:getpos())
+		if distance < min_distance then
+			min_distance = distance
+			nearest = player
+		end
+	end
+	
+	-- Search other teleporter and teleport
+	if not minetest.registered_nodes["moremesecons_teleporter:teleporter"] then return end
+	
+	for i = 1, #teleporters do
+		if minetest.get_node(teleporters[i]).name == "moremesecons_teleporter:teleporter" then
+			if teleporters[i].y == pos.y and teleporters[i].x == pos.x and teleporters[i].z ~= pos.z then
+				nearest:setpos({x=teleporters[i].x, y=teleporters[i].y+1, z=teleporters[i].z})
+				minetest.log("action", "Player "..nearest:get_player_name().." was teleport with a MoreMesecons Teleporter.")
+				return
+			elseif teleporters[i].z == pos.z and teleporters[i].x == pos.x and teleporters[i].y ~= pos.y then
+				nearest:setpos({x=teleporters[i].x, y=teleporters[i].y+1, z=teleporters[i].z})
+				minetest.log("action", "Player "..nearest:get_player_name().." was teleport with a MoreMesecons Teleporter.")
+				return
+			elseif teleporters[i].z == pos.z and teleporters[i].y == pos.y and teleporters[i].x ~= pos.x then
+				nearest:setpos({x=teleporters[i].x, y=teleporters[i].y+1, z=teleporters[i].z})
+				minetest.log("action", "Player "..nearest:get_player_name().." was teleport with a MoreMesecons Teleporter.")
+				return
+			end
+		end
+	end	
+end
+
+minetest.register_craft({
+	output = "moremesecons_teleporter:teleporter 1",
+	recipe = {{"default:mese_cristal_fragment","default:stick","default:mese_cristal_fragment"}}
+})
+minetest.register_node("moremesecons_teleporter:teleporter", {
+	tiles = {"default_steel_block.png", "default_steel_block.png", "jeija_object_detector_on.png", "jeija_object_detector_on.png", "jeija_object_detector_on.png", "jeija_object_detector_on.png"},
+	paramtype = "light",
+	walkable = true,
+	groups = {cracky=3},
+	description="Teleporter",
+	mesecons = {effector = {
+		state = mesecon.state.off,
+		action_on = teleport_nearest
+	}},
+	sounds = default.node_sound_stone_defaults(),
+	on_construct = function(pos)
+		register(pos)
+	end
+})
+
+
+minetest.register_abm({
+	nodenames = {"moremesecons_teleporter:teleporter"},
+	interval=1,
+	chance=1,
+	action = function(pos) 
+		register(pos)
+	end
+})