|
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 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
|
