local _fldlib = minetest.get_modpath("fluid_lib") ~= nil magicalities.cauldron = { recipes = { { items = {"default:coal_lump 9"}, requirements = { earth = 5 }, output = "default:diamond" } } } local function flatten_stacks(stacks) local temp = {} for _, stack in pairs(stacks) do local name = stack:get_name() if not temp[name] then temp[name] = stack:get_count() else temp[name] = temp[name] + stack:get_count() end end local stacks_new = {} for name,count in pairs(temp) do table.insert(stacks_new, ItemStack(name .. " " .. count)) end return stacks_new end local function get_recipe(items_found, wand) local match = {} for _,r in pairs(magicalities.cauldron.recipes) do local pass = true for _,item in pairs(r.items) do local found = false for _,item2 in pairs(items_found) do local i1 = ItemStack(item) local i2 = ItemStack(item2) if i1:get_name() == i2:get_name() and i2:get_count() >= i1:get_count() then found = true break end end if not found then pass = false break end end if pass then table.insert(match,r) end end if #match == 0 then return nil end local fulfilled = {} for _,a in pairs(match) do if magicalities.wands.wand_has_contents(wand, a.requirements) then table.insert(fulfilled, a) end end if #fulfilled == 0 then return nil end return fulfilled[1] end -- Return a list of items dropped into the cauldron local function sample_items(pos, pickup) local items = {} for _,object in ipairs(minetest.env:get_objects_inside_radius(pos, 1)) do if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then if object:get_luaentity().itemstring ~= "" then table.insert(items, object:get_luaentity().itemstring) end if pickup then object:get_luaentity().itemstring = "" object:remove() end end end if #items == 0 then return nil end return items end local _clddef = { description = "Cauldron", tiles = {"magicalities_cauldron.png"}, groups = {cracky = 2, cauldron = 1}, drawtype = "nodebox", paramtype = "light", node_box = { type = "fixed", fixed = { {-0.4375, -0.4375, -0.4375, 0.4375, -0.3125, 0.4375}, {-0.375, -0.5, -0.375, -0.25, -0.4375, -0.25}, {0.25, -0.5, 0.25, 0.375, -0.4375, 0.375}, {0.25, -0.5, -0.375, 0.375, -0.4375, -0.25}, {-0.375, -0.5, 0.25, -0.25, -0.4375, 0.375}, {-0.4375, -0.3125, -0.4375, 0.4375, 0.5, -0.3125}, {-0.4375, -0.3125, 0.3125, 0.4375, 0.5, 0.4375}, {-0.4375, -0.3125, -0.3125, -0.3125, 0.5, 0.3125}, {0.3125, -0.3125, -0.3125, 0.4375, 0.5, 0.3125}, } }, on_construct = function (pos) local meta = minetest.get_meta(pos) local inv = meta:get_inventory() inv:set_size("items", 8) end, on_rightclick = function(pos, node, clicker, itemstack, pointed_thing) if node.name ~= "magicalities:cauldron" then return itemstack end if itemstack:get_name() == "bucket:bucket_water" and not _fldlib then node.name = "magicalities:cauldron_with_water" minetest.swap_node(pos, node) return ItemStack("bucket:bucket_empty") end return itemstack end, _wand_use = function (pos, node, itemstack, user, pointed_thing) if not user or user:get_player_name() == "" then return itemstack end local meta = minetest.get_meta(pos) local inv = meta:get_inventory() local stacks = flatten_stacks(inv:get_list("items")) local recipe = get_recipe(stacks, itemstack) if user:get_player_control().sneak then inv:set_list("items", {}) node.name = "magicalities:cauldron" minetest.swap_node(pos, node) return itemstack end if not recipe then return itemstack end for _,st in pairs(recipe.items) do for _,sta in pairs(stacks) do if sta:get_name() == st then sta:take_item(ItemStack(st):get_count()) end end end --inv:set_list("items", stacks) inv:set_list("items", {}) node.name = "magicalities:cauldron" minetest.swap_node(pos, node) minetest.item_drop(ItemStack(recipe.output), user, user:get_pos()) itemstack = magicalities.wands.wand_take_contents(itemstack, recipe.requirements) magicalities.wands.update_wand_desc(itemstack) return itemstack end } local _clddefw = table.copy(_clddef) _clddefw.groups.not_in_creative_inventory = 1 _clddefw.drop = "magicalities:cauldron" _clddefw.tiles = {"magicalities_cauldron_with_water.png", "magicalities_cauldron.png", "magicalities_cauldron.png", "magicalities_cauldron.png", "magicalities_cauldron.png", "magicalities_cauldron.png"} table.insert(_clddefw.node_box.fixed, {-0.3125, -0.3125, -0.3125, 0.3125, 0.375, 0.3125}) minetest.register_node("magicalities:cauldron", _clddef) minetest.register_node("magicalities:cauldron_with_water", _clddefw) minetest.register_abm({ label = "Cauldron", interval = 1, chance = 1, --name = "magicalities:cauldron_insert", nodenames = {"magicalities:cauldron_with_water"}, neighbors = {"group:igniter"}, action = function(pos, node, active_object_count, active_object_count_wider) local meta = minetest.get_meta(pos) local inv = meta:get_inventory() local pickup = sample_items(pos, true) if not pickup then return end for _,i in pairs(pickup) do local stack = ItemStack(i) if inv:room_for_item("items", stack) then inv:add_item("items", stack) else minetest.item_drop(stack, "", vector.add(pos, {x=0,y=1,z=0})) end end end })