236 lines
8.4 KiB
Lua
236 lines
8.4 KiB
Lua
local sound_mod
|
|
if mcl_sounds then
|
|
sound_mod = mcl_sounds
|
|
else
|
|
sound_mod = default
|
|
end
|
|
|
|
local function get_element_constructor_formspec()
|
|
if not exchangeclone.mcl then
|
|
local formspec = {
|
|
"size[8,9]",
|
|
"label[2,1;Orb]",
|
|
"list[context;fuel;2,2;1,1;]",
|
|
"label[3,1;Source]",
|
|
"list[context;src;3,2;1,1;]",
|
|
"label[5,1;Output]",
|
|
"list[context;dst;5,2;1,1;]",
|
|
"list[current_player;main;0,5;8,4;]",
|
|
"listring[current_player;main]",
|
|
"listring[context;src]",
|
|
"listring[current_player;main]",
|
|
"listring[context;fuel]",
|
|
"listring[current_player;main]",
|
|
"listring[context;dst]",
|
|
}
|
|
return table.concat(formspec, "")
|
|
else
|
|
local formspec = {
|
|
"size[9,10]",
|
|
"label[2,1;Orb]",
|
|
"list[context;fuel;2,2;1,1;]",
|
|
mcl_formspec.get_itemslot_bg(2,2,1,1),
|
|
"label[3,1;Source]",
|
|
"list[context;src;3,2;1,1;]",
|
|
mcl_formspec.get_itemslot_bg(3,2,1,1),
|
|
"label[5,1;Output]",
|
|
"list[context;dst;5,2;1,1;]",
|
|
mcl_formspec.get_itemslot_bg(5,2,1,1),
|
|
"list[current_player;main;0,5;9,3;9]",
|
|
mcl_formspec.get_itemslot_bg(0,5,9,3),
|
|
"list[current_player;main;0,8.5;9,1;]",
|
|
mcl_formspec.get_itemslot_bg(0,8.5,9,1),
|
|
"listring[current_player;main]",
|
|
"listring[context;src]",
|
|
"listring[current_player;main]",
|
|
"listring[context;fuel]",
|
|
"listring[current_player;main]",
|
|
"listring[context;dst]",
|
|
}
|
|
return table.concat(formspec, "")
|
|
end
|
|
end
|
|
|
|
local function can_dig(pos, player)
|
|
if exchangeclone.mcl then return true end
|
|
local meta = minetest.get_meta(pos);
|
|
local inv = meta:get_inventory()
|
|
return inv:is_empty("fuel") and inv:is_empty("src") and inv:is_empty("dst")
|
|
end
|
|
|
|
local function on_timer(pos, elapsed)
|
|
local inv = minetest.get_meta(pos):get_inventory()
|
|
local update = true
|
|
while elapsed > 0 and update do
|
|
update = false
|
|
local src_stack = inv:get_stack("src", 1)
|
|
local dst_stack = inv:get_stack("dst", 1)
|
|
|
|
if not inv:is_empty("fuel") and not inv:is_empty("src") then
|
|
-- make sure the stack at dst is same as the src
|
|
if not inv:is_empty("dst") then
|
|
if not(src_stack:get_name() == dst_stack:get_name()) then
|
|
if exchangeclone.mcl then
|
|
if not(string.sub(src_stack:get_name(), -10, -1) == "_enchanted"
|
|
and string.sub(src_stack:get_name(), 1, -11) == dst_stack:get_name()
|
|
and src_stack:get_name() ~= "mcl_core:apple_gold_enchanted") then
|
|
break
|
|
end
|
|
else
|
|
break
|
|
end
|
|
end
|
|
end
|
|
-- make sure orb has enough charge
|
|
local orb_charge = exchangeclone.get_orb_energy(inv, "fuel", 1)
|
|
local energy_cost = exchangeclone.get_item_energy(src_stack:get_name())
|
|
if energy_cost > 0 then
|
|
orb_charge = orb_charge - energy_cost
|
|
if orb_charge < 0 then
|
|
break
|
|
end
|
|
-- give orb new charge value
|
|
exchangeclone.set_orb_energy(inv, "fuel", 1, orb_charge)
|
|
-- "convert" charge into a node at dst
|
|
if dst_stack:is_empty() then
|
|
-- create a new stack
|
|
if exchangeclone.mcl
|
|
and string.sub(src_stack:get_name(), -10, -1) == "_enchanted"
|
|
and src_stack:get_name() ~= "mcl_core:apple_gold_enchanted" then
|
|
dst_stack = ItemStack(string.sub(src_stack:get_name(), 1, -11))
|
|
else
|
|
dst_stack = ItemStack(src_stack:get_name())
|
|
end
|
|
elseif not dst_stack:item_fits(src_stack:get_name()) then
|
|
break
|
|
else
|
|
-- add one node into stack
|
|
dst_stack:set_count(dst_stack:get_count() + 1)
|
|
end
|
|
inv:set_stack("dst", 1, dst_stack)
|
|
update = true
|
|
end
|
|
end
|
|
end
|
|
minetest.get_node_timer(pos):stop()
|
|
return false
|
|
end
|
|
|
|
local function on_construct(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("fuel", 1)
|
|
inv:set_size("src", 1)
|
|
inv:set_size("dst", 1)
|
|
meta:set_string("formspec", get_element_constructor_formspec())
|
|
meta:set_string("infotext", "Element Constructor")
|
|
on_timer(pos, 0)
|
|
end
|
|
|
|
local function allow_metadata_inventory_put(pos, listname, index, stack, player)
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
if listname == "fuel" then
|
|
if stack:get_name() == "exchangeclone:exchange_orb" then
|
|
return stack:get_count()
|
|
else
|
|
return 0
|
|
end
|
|
elseif listname == "src" then
|
|
return stack:get_count()
|
|
|
|
elseif listname == "dst" then
|
|
return 0
|
|
end
|
|
end
|
|
|
|
local function allow_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
local stack = inv:get_stack(from_list, from_index)
|
|
return allow_metadata_inventory_put(pos, to_list, to_index, stack, player)
|
|
end
|
|
|
|
local function allow_metadata_inventory_take(pos, listname, index, stack, player)
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
return stack:get_count()
|
|
end
|
|
|
|
local function on_blast(pos)
|
|
local drops = {}
|
|
exchangeclone.get_inventory_drops(pos, "fuel", drops)
|
|
exchangeclone.get_inventory_drops(pos, "src", drops)
|
|
exchangeclone.get_inventory_drops(pos, "dst", drops)
|
|
drops[#drops+1] = "exchangeclone:element_constructor"
|
|
minetest.remove_node(pos)
|
|
return drops
|
|
end
|
|
|
|
minetest.register_node("exchangeclone:element_constructor", {
|
|
description = "Element Constructor",
|
|
tiles = {
|
|
"exchangeclone_constructor_up.png",
|
|
"exchangeclone_constructor_down.png",
|
|
"exchangeclone_constructor_right.png",
|
|
"exchangeclone_constructor_right.png",
|
|
"exchangeclone_constructor_right.png",
|
|
"exchangeclone_constructor_right.png"
|
|
},
|
|
groups = {cracky = 2, container = 4, pickaxey = 2},
|
|
_mcl_hardness = 3,
|
|
_mcl_blast_resistance = 6,
|
|
sounds = sound_mod.node_sound_metal_defaults(),
|
|
is_ground_content = false,
|
|
can_dig = can_dig,
|
|
after_dig_node = function(pos, oldnode, oldmetadata, player)
|
|
if exchangeclone.mcl then
|
|
local meta = minetest.get_meta(pos)
|
|
local meta2 = meta:to_table()
|
|
meta:from_table(oldmetadata)
|
|
local inv = meta:get_inventory()
|
|
for _, listname in ipairs({"src", "dst", "fuel"}) do
|
|
local stack = inv:get_stack(listname, 1)
|
|
if not stack:is_empty() then
|
|
local p = {x=pos.x+math.random(0, 10)/10-0.5, y=pos.y, z=pos.z+math.random(0, 10)/10-0.5}
|
|
minetest.add_item(p, stack)
|
|
end
|
|
end
|
|
meta:from_table(meta2)
|
|
end
|
|
end,
|
|
on_timer = on_timer,
|
|
on_construct = on_construct,
|
|
on_metadata_inventory_move = function(pos)
|
|
minetest.get_node_timer(pos):start(1.0)
|
|
end,
|
|
on_metadata_inventory_put = function(pos)
|
|
minetest.get_node_timer(pos):start(1.0)
|
|
end,
|
|
on_metadata_inventory_take = function(pos)
|
|
minetest.get_node_timer(pos):start(1.0)
|
|
end,
|
|
on_blast = on_blast,
|
|
allow_metadata_inventory_put = allow_metadata_inventory_put,
|
|
allow_metadata_inventory_move = allow_metadata_inventory_move,
|
|
allow_metadata_inventory_take = allow_metadata_inventory_take,
|
|
})
|
|
|
|
local recipe_ingredient = "default:pick_diamond"
|
|
|
|
if exchangeclone.mcl then
|
|
recipe_ingredient = "mcl_tools:pick_diamond"
|
|
end
|
|
minetest.register_craft({
|
|
type = "shaped",
|
|
output = "exchangeclone:element_constructor",
|
|
recipe = {
|
|
{"", "exchangeclone:exchange_orb",""},
|
|
{"", recipe_ingredient, ""},
|
|
{"", "exchangeclone:exchange_orb", ""}
|
|
}
|
|
}) |