commit | author | age
|
82cba9
|
1 |
|
354ee6
|
2 |
local S = technic.getter |
S |
3 |
|
f3bba0
|
4 |
local function inject_items (pos) |
VE |
5 |
local meta=minetest.env:get_meta(pos) |
|
6 |
local inv = meta:get_inventory() |
|
7 |
local mode=meta:get_string("mode") |
|
8 |
if mode=="single items" then |
|
9 |
local i=0 |
|
10 |
for _,stack in ipairs(inv:get_list("main")) do |
|
11 |
i=i+1 |
|
12 |
if stack then |
|
13 |
local item0=stack:to_table() |
|
14 |
if item0 then |
|
15 |
item0["count"]="1" |
|
16 |
local item1=pipeworks.tube_item({x=pos.x,y=pos.y,z=pos.z},item0) |
|
17 |
item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z} |
|
18 |
item1:setvelocity({x=0, y=-1, z=0}) |
|
19 |
item1:setacceleration({x=0, y=0, z=0}) |
|
20 |
stack:take_item(1); |
|
21 |
inv:set_stack("main", i, stack) |
|
22 |
return |
|
23 |
end |
|
24 |
end |
|
25 |
end |
|
26 |
end |
|
27 |
if mode=="whole stacks" then |
|
28 |
local i=0 |
|
29 |
for _,stack in ipairs(inv:get_list("main")) do |
|
30 |
i=i+1 |
|
31 |
if stack then |
|
32 |
local item0=stack:to_table() |
|
33 |
if item0 then |
|
34 |
local item1=pipeworks.tube_item({x=pos.x,y=pos.y,z=pos.z},item0) |
|
35 |
item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z} |
|
36 |
item1:setvelocity({x=0, y=-1, z=0}) |
|
37 |
item1:setacceleration({x=0, y=0, z=0}) |
|
38 |
stack:clear() |
|
39 |
inv:set_stack("main", i, stack) |
|
40 |
return |
|
41 |
end |
|
42 |
end |
|
43 |
end |
|
44 |
end |
|
45 |
|
|
46 |
end |
|
47 |
|
91cdd1
|
48 |
minetest.register_craft({ |
R |
49 |
output = 'technic:injector 1', |
|
50 |
recipe = { |
|
51 |
{'', 'technic:control_logic_unit',''}, |
|
52 |
{'', 'default:chest',''}, |
749df3
|
53 |
{'', 'pipeworks:tube_1',''}, |
91cdd1
|
54 |
} |
R |
55 |
}) |
|
56 |
|
827509
|
57 |
local function set_injector_formspec(meta) |
Z |
58 |
local is_stack = meta:get_string("mode") == "whole stacks" |
|
59 |
meta:set_string("formspec", |
|
60 |
"invsize[8,9;]".. |
|
61 |
"item_image[0,0;1,1;technic:injector]".. |
|
62 |
"label[1,0;"..S("Self-Contained Injector").."]".. |
|
63 |
(is_stack and |
|
64 |
"button[0,1;2,1;mode_item;"..S("Stackwise").."]" or |
|
65 |
"button[0,1;2,1;mode_stack;"..S("Itemwise").."]").. |
|
66 |
"list[current_name;main;0,2;8,2;]".. |
|
67 |
"list[current_player;main;0,5;8,4;]") |
|
68 |
end |
|
69 |
|
82cba9
|
70 |
minetest.register_node("technic:injector", { |
827509
|
71 |
description = S("Self-Contained Injector"), |
74cf47
|
72 |
tiles = {"technic_injector_top.png", "technic_injector_bottom.png", "technic_injector_side.png", |
R |
73 |
"technic_injector_side.png", "technic_injector_side.png", "technic_injector_side.png"}, |
1a94fd
|
74 |
groups = {snappy=2, choppy=2, oddly_breakable_by_hand=2, tubedevice=1}, |
ca6947
|
75 |
tube = {connect_sides={bottom=1}}, |
82cba9
|
76 |
sounds = default.node_sound_wood_defaults(), |
R |
77 |
on_construct = function(pos) |
|
78 |
local meta = minetest.env:get_meta(pos) |
827509
|
79 |
meta:set_string("infotext", S("Self-Contained Injector")) |
82cba9
|
80 |
local inv = meta:get_inventory() |
R |
81 |
inv:set_size("main", 8*4) |
fd26a8
|
82 |
meta:set_string("mode","single items") |
827509
|
83 |
set_injector_formspec(meta) |
82cba9
|
84 |
end, |
R |
85 |
can_dig = function(pos,player) |
|
86 |
local meta = minetest.env:get_meta(pos); |
|
87 |
local inv = meta:get_inventory() |
|
88 |
return inv:is_empty("main") |
fd26a8
|
89 |
end, |
R |
90 |
on_receive_fields = function(pos, formanme, fields, sender) |
0809dd
|
91 |
local meta = minetest.env:get_meta(pos) |
827509
|
92 |
if fields.mode_item then meta:set_string("mode", "single items") end |
Z |
93 |
if fields.mode_stack then meta:set_string("mode", "whole stacks") end |
|
94 |
set_injector_formspec(meta) |
82cba9
|
95 |
end, |
0809dd
|
96 |
allow_metadata_inventory_put = technic.machine_inventory_put, |
S |
97 |
allow_metadata_inventory_take = technic.machine_inventory_take, |
|
98 |
allow_metadata_inventory_move = technic.machine_inventory_move, |
82cba9
|
99 |
}) |
R |
100 |
|
74cf47
|
101 |
minetest.register_abm({ |
R |
102 |
nodenames = {"technic:injector"}, |
|
103 |
interval = 1, |
|
104 |
chance = 1, |
|
105 |
action = function(pos, node, active_object_count, active_object_count_wider) |
|
106 |
local pos1={} |
|
107 |
pos1.x = pos.x |
|
108 |
pos1.y = pos.y-1 |
|
109 |
pos1.z = pos.z |
|
110 |
local meta=minetest.env:get_meta(pos1) |
|
111 |
if meta:get_int("tubelike")==1 then inject_items (pos) end |
82cba9
|
112 |
end, |
R |
113 |
}) |
|
114 |
|