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)

---
 pipeworks/vacuum_tubes.lua | 122 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 122 insertions(+)
 create mode 100644 pipeworks/vacuum_tubes.lua

(limited to 'pipeworks/vacuum_tubes.lua')

diff --git a/pipeworks/vacuum_tubes.lua b/pipeworks/vacuum_tubes.lua
new file mode 100644
index 0000000..51f6f81
--- /dev/null
+++ b/pipeworks/vacuum_tubes.lua
@@ -0,0 +1,122 @@
+if pipeworks.enable_sand_tube then
+	pipeworks.register_tube("pipeworks:sand_tube", {
+			description = "Vacuuming Pneumatic Tube Segment",
+			inventory_image = "pipeworks_sand_tube_inv.png",
+			short = "pipeworks_sand_tube_short.png",
+			noctr = { "pipeworks_sand_tube_noctr.png" },
+			plain = { "pipeworks_sand_tube_plain.png" },
+			ends = { "pipeworks_sand_tube_end.png" },
+			node_def = { groups = {vacuum_tube = 1}},
+	})
+
+	minetest.register_craft( {
+		output = "pipeworks:sand_tube_1 2",
+		recipe = {
+			{ "homedecor:plastic_sheeting", "homedecor:plastic_sheeting", "homedecor:plastic_sheeting" },
+			{ "group:sand", "group:sand", "group:sand" },
+			{ "homedecor:plastic_sheeting", "homedecor:plastic_sheeting", "homedecor:plastic_sheeting" }
+		},
+	})
+
+	minetest.register_craft( {
+		output = "pipeworks:sand_tube_1",
+		recipe = {
+			{ "group:sand", "pipeworks:tube_1", "group:sand" },
+		},
+	})
+end
+
+if pipeworks.enable_mese_sand_tube then
+	pipeworks.register_tube("pipeworks:mese_sand_tube", {
+			description = "Adjustable Vacuuming Pneumatic Tube Segment",
+			inventory_image = "pipeworks_mese_sand_tube_inv.png",
+			short = "pipeworks_mese_sand_tube_short.png",
+			noctr = { "pipeworks_mese_sand_tube_noctr.png" },
+			plain = { "pipeworks_mese_sand_tube_plain.png" },
+			ends = { "pipeworks_mese_sand_tube_end.png" },
+			node_def = {
+				groups = {vacuum_tube = 1},
+				on_construct = function(pos)
+					local meta = minetest.get_meta(pos)
+					meta:set_int("dist", 0)
+					meta:set_string("formspec", "size[2.1,0.8]"..
+							"image[0,0;1,1;pipeworks_mese_sand_tube_inv.png]"..
+							"field[1.3,0.4;1,1;dist;radius;${dist}]"..
+							default.gui_bg..
+							default.gui_bg_img)
+					meta:set_string("infotext", "Adjustable Vacuuming Pneumatic Tube Segment")
+				end,
+				on_receive_fields = function(pos,formname,fields,sender)
+					if not pipeworks.may_configure(pos, sender) then return end
+					local meta = minetest.get_meta(pos)
+					local dist = tonumber(fields.dist)
+					if dist then
+						dist = math.max(0, dist)
+						dist = math.min(8, dist)
+						meta:set_int("dist", dist)
+						meta:set_string("infotext", ("Adjustable Vacuuming Pneumatic Tube Segment (%dm)"):format(dist))
+					end
+				end,
+			},
+	})
+
+	minetest.register_craft( {
+		output = "pipeworks:mese_sand_tube_1 2",
+		recipe = {
+			{ "homedecor:plastic_sheeting", "homedecor:plastic_sheeting", "homedecor:plastic_sheeting" },
+			{ "group:sand", "default:mese_crystal", "group:sand" },
+			{ "homedecor:plastic_sheeting", "homedecor:plastic_sheeting", "homedecor:plastic_sheeting" }
+		},
+	})
+
+	minetest.register_craft( {
+		type = "shapeless",
+		output = "pipeworks:mese_sand_tube_1",
+		recipe = {
+			"pipeworks:sand_tube_1",
+			"default:mese_crystal_fragment",
+			"default:mese_crystal_fragment",
+			"default:mese_crystal_fragment",
+			"default:mese_crystal_fragment"
+		},
+	})
+end
+
+local sqrt_3 = math.sqrt(3)
+local tube_inject_item = pipeworks.tube_inject_item
+local get_objects_inside_radius = minetest.get_objects_inside_radius
+local function vacuum(pos, radius)
+	radius = radius + 0.5
+	for _, object in pairs(get_objects_inside_radius(pos, sqrt_3 * radius)) do
+		local lua_entity = object:get_luaentity()
+		if not object:is_player() and lua_entity and lua_entity.name == "__builtin:item" then
+			local obj_pos = object:getpos()
+			local x1, y1, z1 = pos.x, pos.y, pos.z
+			local x2, y2, z2 = obj_pos.x, obj_pos.y, obj_pos.z
+
+			if  x1 - radius <= x2 and x2 <= x1 + radius
+			and y1 - radius <= y2 and y2 <= y1 + radius
+			and z1 - radius <= z2 and z2 <= z1 + radius then
+				if lua_entity.itemstring ~= "" then
+					tube_inject_item(pos, pos, vector.new(0, 0, 0), lua_entity.itemstring)
+					lua_entity.itemstring = ""
+				end
+				object:remove()
+			end
+		end
+	end
+end
+
+minetest.register_abm({nodenames = {"group:vacuum_tube"},
+			interval = 1,
+			chance = 1,
+			label = "Vacuum tubes",
+			action = function(pos, node, active_object_count, active_object_count_wider)
+				if node.name:find("pipeworks:sand_tube") then
+					vacuum(pos, 2)
+				else
+					local radius = minetest.get_meta(pos):get_int("dist")
+					vacuum(pos, radius)
+				end
+			end
+})
-- 
cgit v1.2.3