v1.12 Teleporter node added

README.md

@@ -1,4 +1,4 @@
-# TechPack V1.11
+# TechPack V1.12
 
 TechPack, a Mining, Crafting, & Farming Modpack for Minetest.
 
@@ -88,3 +88,5 @@ Gravelsieve optional: moreores, hopper, pipeworks
 - 2018-06-22  V1.08  * Lua Controller and SaferLua added
 - 2018-07-22  V1.09  * Item counters for Pusher/Distributor and tubelib commands for Autocrafter added
 - 2018-08-08  V1.10  * tubelib_addon3 with high performance nodes added
+- 2018-08-13  V1.11  * Detector node added
+- 2018-08-14  V1.12  * Teleporter node added

tubelib_addons3/init.lua

@@ -14,3 +14,4 @@ dofile(minetest.get_modpath("tubelib_addons3") .. '/chest.lua')
 dofile(minetest.get_modpath("tubelib_addons3") .. '/pusher.lua')
 dofile(minetest.get_modpath("tubelib_addons3") .. '/distributor.lua')
 dofile(minetest.get_modpath("tubelib_addons3") .. '/pushing_chest.lua')
+dofile(minetest.get_modpath("tubelib_addons3") .. '/teleporter.lua')

tubelib_addons3/teleporter.lua

@@ -0,0 +1,127 @@
+--[[
+
+	Tubelib Addons 3
+	================
+
+	Copyright (C) 2017-2018 Joachim Stolberg
+
+	LGPLv2.1+
+	See LICENSE.txt for more information
+	
+	teleporter.lua
+	
+	A node, moving items to the peer teleporter node.
+
+]]--
+
+local PairingList = {}
+
+local sForm = "size[7.5,3]"..
+	"field[0.5,1;7,1;channel;Enter channel string;]" ..
+	"button_exit[2,2;3,1;exit;Save]"
+
+local function pairing(pos, channel)
+	if PairingList[channel] and pos ~= PairingList[channel] then
+		-- store peer position on both nodes
+		local meta1 = minetest.get_meta(pos)
+		local peer = minetest.pos_to_string(PairingList[channel])
+		meta1:set_string("peer", peer)
+		meta1:set_string("infotext", "Tubelib Teleporter, connected "..peer)
+		meta1:set_string("channel", nil)
+		meta1:set_string("formspec", nil)
+		
+		local meta2 = minetest.get_meta(PairingList[channel])
+		local peer = minetest.pos_to_string(pos)
+		meta2:set_string("peer", peer)
+		meta2:set_string("infotext", "Tubelib Teleporter, connected "..peer)
+		meta2:set_string("channel", nil)
+		meta2:set_string("formspec", nil)
+		
+		PairingList[channel] = nil
+		return true
+	else
+		PairingList[channel] = pos
+		minetest.get_meta(pos):set_string("channel", channel)
+		return false
+	end
+end
+
+minetest.register_node("tubelib_addons3:teleporter", {
+	description = "Tubelib Teleporter",
+	tiles = {
+		-- up, down, right, left, back, front
+		'tubelib_addons3_chest_bottom.png',
+		'tubelib_addons3_chest_bottom.png',
+		'tubelib_addons3_chest_bottom.png^tubelib_hole.png',
+		'tubelib_addons3_chest_bottom.png^tubelib_addons3_teleporter.png',
+		'tubelib_addons3_chest_bottom.png^tubelib_addons3_teleporter.png',
+		'tubelib_addons3_chest_bottom.png^tubelib_addons3_teleporter.png',
+	},
+
+	after_place_node = function(pos, placer)
+		local meta = minetest.get_meta(pos)
+		tubelib.add_node(pos, "tubelib_addons3:teleporter")
+		meta:set_string("formspec", sForm)
+		meta:set_string("infotext", "Tubelib Teleporter, unconfigured")
+	end,
+
+	on_receive_fields = function(pos, formname, fields, player)
+		local meta = minetest.get_meta(pos)
+		if fields.channel ~= nil then
+			if not pairing(pos, fields.channel) then
+				meta:set_string("formspec", "size[7.5,3]"..
+				"field[0.5,1;7,1;channel;Enter channel string;"..fields.channel.."]" ..
+				"button_exit[2,2;3,1;exit;Save]")
+			else
+				local peer_pos = minetest.string_to_pos(meta:get_string("peer"))
+				minetest.log("action", player:get_player_name()..
+					" pairs Tubelib Teleporter nodes at "..
+					minetest.pos_to_string(pos)..
+					" and at "..minetest.pos_to_string(peer_pos))
+			end
+		end
+	end,
+	
+	on_destruct = function(pos)
+		-- unpair peer node
+		local meta = minetest.get_meta(pos)
+		local peer_pos = minetest.string_to_pos(meta:get_string("peer"))
+		local peer_meta = minetest.get_meta(peer_pos)
+		peer_meta:set_string("channel", nil)
+		peer_meta:set_string("formspec", sForm)
+		peer_meta:set_string("infotext", "Tubelib Teleporter, unconfigured")
+	end,
+	
+	on_rotate = screwdriver.disallow,
+	paramtype = "light",
+	sunlight_propagates = true,
+	paramtype2 = "facedir",
+	groups = {choppy=2, cracky=2, crumbly=2},
+	is_ground_content = false,
+	sounds = default.node_sound_wood_defaults(),
+})
+
+
+minetest.register_craft({
+	output = "tubelib_addons3:teleporter 2",
+	recipe = {
+		{"default:gold_ingot", "group:wood", ""},
+		{"default:mese_crystal", "default:mese_crystal", "tubelib:tube1"},
+		{"default:gold_ingot", "group:wood", ""},
+	},
+})
+
+
+tubelib.register_node("tubelib_addons3:teleporter", {}, {
+	on_push_item = function(pos, side, item)
+		-- push on peer side
+		local meta = minetest.get_meta(pos)
+		local peer = meta:get_string("peer")
+		if peer ~= "" then
+			return tubelib.push_items(minetest.string_to_pos(peer), "R", item, nil)
+		end
+		return false
+	end,
+	is_pusher = true,
+})	
+