From 7cfb3874a381d5923611242b4cf7756d86049def Mon Sep 17 00:00:00 2001
From: Kevin Zheng <kevinz5000@gmail.com>
Date: Wed, 06 Aug 2014 19:08:48 +0200
Subject: [PATCH] Evenly distribute charge across multiple batteries
---
technic/machines/other/injector.lua | 143 +++++++++++++++++++++++------------------------
1 files changed, 69 insertions(+), 74 deletions(-)
diff --git a/technic/machines/other/injector.lua b/technic/machines/other/injector.lua
index f59867c..11c5455 100644
--- a/technic/machines/other/injector.lua
+++ b/technic/machines/other/injector.lua
@@ -1,80 +1,7 @@
local S = technic.getter
-minetest.register_craft({
- output = 'technic:injector 1',
- recipe = {
- {'', 'technic:control_logic_unit',''},
- {'', 'default:chest',''},
- {'', 'pipeworks:tube_000000',''},
- }
-})
-
-minetest.register_node("technic: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,
- 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;"..S("Injector").."]"..
- "button[0,1;.8,.8;mode;]"..
- "label[.8,1;Mode: single items]"..
- "list[current_name;main;0,2;8,2;]"..
- "list[current_player;main;0,5;8,4;]")
- meta:set_string("infotext", S("Injector"))
- local inv = meta:get_inventory()
- inv:set_size("main", 8*4)
- meta:set_string("mode","single items")
- end,
- can_dig = function(pos,player)
- local meta = minetest.env:get_meta(pos);
- local inv = meta:get_inventory()
- return inv:is_empty("main")
- end,
- on_receive_fields = function(pos, formanme, fields, sender)
- local meta = minetest.env:get_meta(pos)
- local mode=meta:get_string("mode")
- if fields.mode then
- if mode == "single items" then
- mode = "whole stacks"
- else
- mode = "single items"
- end
- meta:set_string("mode", mode)
- end
- meta:set_string("formspec",
- "invsize[8,9;]"..
- "label[0,0;"..S("Injector").."]"..
- "button[0,1;.8,.8;mode;]"..
- "label[.8,1;Mode: "..mode.."]"..
- "list[current_name;main;0,2;8,2;]"..
- "list[current_player;main;0,5;8,4;]")
- end,
- allow_metadata_inventory_put = technic.machine_inventory_put,
- allow_metadata_inventory_take = technic.machine_inventory_take,
- allow_metadata_inventory_move = technic.machine_inventory_move,
-})
-
-minetest.register_abm({
- nodenames = {"technic:injector"},
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider)
- local pos1={}
- pos1.x = pos.x
- pos1.y = pos.y-1
- pos1.z = pos.z
- local meta=minetest.env:get_meta(pos1)
- if meta:get_int("tubelike")==1 then inject_items (pos) end
- end,
-})
-
-function inject_items (pos)
+local function inject_items (pos)
local meta=minetest.env:get_meta(pos)
local inv = meta:get_inventory()
local mode=meta:get_string("mode")
@@ -117,3 +44,71 @@
end
end
+
+minetest.register_craft({
+ output = 'technic:injector 1',
+ recipe = {
+ {'', 'technic:control_logic_unit',''},
+ {'', 'default:chest',''},
+ {'', 'pipeworks:tube_1',''},
+ }
+})
+
+local function set_injector_formspec(meta)
+ local is_stack = meta:get_string("mode") == "whole stacks"
+ meta:set_string("formspec",
+ "invsize[8,9;]"..
+ "item_image[0,0;1,1;technic:injector]"..
+ "label[1,0;"..S("Self-Contained Injector").."]"..
+ (is_stack and
+ "button[0,1;2,1;mode_item;"..S("Stackwise").."]" or
+ "button[0,1;2,1;mode_stack;"..S("Itemwise").."]")..
+ "list[current_name;main;0,2;8,2;]"..
+ "list[current_player;main;0,5;8,4;]")
+end
+
+minetest.register_node("technic:injector", {
+ description = S("Self-Contained 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 = {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("infotext", S("Self-Contained Injector"))
+ local inv = meta:get_inventory()
+ inv:set_size("main", 8*4)
+ meta:set_string("mode","single items")
+ set_injector_formspec(meta)
+ end,
+ can_dig = function(pos,player)
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ return inv:is_empty("main")
+ end,
+ on_receive_fields = function(pos, formanme, fields, sender)
+ local meta = minetest.env:get_meta(pos)
+ if fields.mode_item then meta:set_string("mode", "single items") end
+ if fields.mode_stack then meta:set_string("mode", "whole stacks") end
+ set_injector_formspec(meta)
+ end,
+ allow_metadata_inventory_put = technic.machine_inventory_put,
+ allow_metadata_inventory_take = technic.machine_inventory_take,
+ allow_metadata_inventory_move = technic.machine_inventory_move,
+})
+
+minetest.register_abm({
+ nodenames = {"technic:injector"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ local pos1={}
+ pos1.x = pos.x
+ pos1.y = pos.y-1
+ pos1.z = pos.z
+ local meta=minetest.env:get_meta(pos1)
+ if meta:get_int("tubelike")==1 then inject_items (pos) end
+ end,
+})
+
--
Gitblit v1.8.0