From 636b0f20df4fef3eef821c23ccc2f606828f5c6f Mon Sep 17 00:00:00 2001
From: Zefram <zefram@fysh.org>
Date: Mon, 07 Jul 2014 15:15:05 +0200
Subject: [PATCH] Handheld prospecting tool

---
 technic/machines/other/injector.lua |  107 +++++++++++++++++++++++++++--------------------------
 1 files changed, 55 insertions(+), 52 deletions(-)

diff --git a/technic/machines/other/injector.lua b/technic/machines/other/injector.lua
index 6897861..c131470 100644
--- a/technic/machines/other/injector.lua
+++ b/technic/machines/other/injector.lua
@@ -1,30 +1,76 @@
 
+local S = technic.getter
+
+local function inject_items (pos)
+		local meta=minetest.env:get_meta(pos) 
+		local inv = meta:get_inventory()
+		local mode=meta:get_string("mode")
+		if mode=="single items" then
+			local i=0
+			for _,stack in ipairs(inv:get_list("main")) do
+			i=i+1
+				if stack then
+				local item0=stack:to_table()
+				if item0 then 
+					item0["count"]="1"
+					local item1=pipeworks.tube_item({x=pos.x,y=pos.y,z=pos.z},item0)
+					item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z}
+					item1:setvelocity({x=0, y=-1, z=0})
+					item1:setacceleration({x=0, y=0, z=0})
+					stack:take_item(1);
+					inv:set_stack("main", i, stack)
+					return
+					end
+				end
+			end
+		end
+		if mode=="whole stacks" then
+			local i=0
+			for _,stack in ipairs(inv:get_list("main")) do
+			i=i+1
+				if stack then
+				local item0=stack:to_table()
+				if item0 then 
+					local item1=pipeworks.tube_item({x=pos.x,y=pos.y,z=pos.z},item0)
+					item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z}
+					item1:setvelocity({x=0, y=-1, z=0})
+					item1:setacceleration({x=0, y=0, z=0})
+					stack:clear()
+					inv:set_stack("main", i, stack)
+					return
+					end
+				end
+			end
+		end
+		
+end
+
 minetest.register_craft({
 	output = 'technic:injector 1',
 	recipe = {
 		{'', 'technic:control_logic_unit',''},
 		{'', 'default:chest',''},
-		{'', 'pipeworks:tube_000000',''},
+		{'', 'pipeworks:tube_1',''},
 	}
 })
 
 minetest.register_node("technic:injector", {
-	description = "Injector",
+	description = S("Injector"),
 	tiles = {"technic_injector_top.png", "technic_injector_bottom.png", "technic_injector_side.png",
 		"technic_injector_side.png", "technic_injector_side.png", "technic_injector_side.png"},
-	groups = chest_groups1,
-	tube = tubes_properties,
+	groups = {snappy=2, choppy=2, oddly_breakable_by_hand=2, tubedevice=1},
+	tube = {connect_sides={bottom=1}},
 	sounds = default.node_sound_wood_defaults(),
 	on_construct = function(pos)
 		local meta = minetest.env:get_meta(pos)
 		meta:set_string("formspec",
 				"invsize[8,9;]"..
-				"label[0,0;Injector]"..
+				"label[0,0;"..S("Injector").."]"..
 				"button[0,1;.8,.8;mode;]"..
-				"label[.8,1;Mode: single items]"..
+				"label[.8,1;"..S("Mode: %s"):format("single items").."]"..
 				"list[current_name;main;0,2;8,2;]"..
 				"list[current_player;main;0,5;8,4;]")
-		meta:set_string("infotext", "Injector")
+		meta:set_string("infotext", S("Injector"))
 		local inv = meta:get_inventory()
 		inv:set_size("main", 8*4)
 		meta:set_string("mode","single items")
@@ -47,9 +93,9 @@
 		end
 		meta:set_string("formspec",
 				"invsize[8,9;]"..
-				"label[0,0;Injector]"..
+				"label[0,0;"..S("Injector").."]"..
 				"button[0,1;.8,.8;mode;]"..
-				"label[.8,1;Mode: "..mode.."]"..
+				"label[.8,1;"..S("Mode: %s"):format(S(mode)).."]"..
 				"list[current_name;main;0,2;8,2;]"..
 				"list[current_player;main;0,5;8,4;]")
 	end,
@@ -72,46 +118,3 @@
 	end,
 })
 
-function inject_items (pos)
-		local meta=minetest.env:get_meta(pos) 
-		local inv = meta:get_inventory()
-		local mode=meta:get_string("mode")
-		if mode=="single items" then
-			local i=0
-			for _,stack in ipairs(inv:get_list("main")) do
-			i=i+1
-				if stack then
-				local item0=stack:to_table()
-				if item0 then 
-					item0["count"]="1"
-					local item1=tube_item({x=pos.x,y=pos.y,z=pos.z},item0)
-					item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z}
-					item1:setvelocity({x=0, y=-1, z=0})
-					item1:setacceleration({x=0, y=0, z=0})
-					stack:take_item(1);
-					inv:set_stack("main", i, stack)
-					return
-					end
-				end
-			end
-		end
-		if mode=="whole stacks" then
-			local i=0
-			for _,stack in ipairs(inv:get_list("main")) do
-			i=i+1
-				if stack then
-				local item0=stack:to_table()
-				if item0 then 
-					local item1=tube_item({x=pos.x,y=pos.y,z=pos.z},item0)
-					item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z}
-					item1:setvelocity({x=0, y=-1, z=0})
-					item1:setacceleration({x=0, y=0, z=0})
-					stack:clear()
-					inv:set_stack("main", i, stack)
-					return
-					end
-				end
-			end
-		end
-		
-end

--
Gitblit v1.8.0