mods/ITEMS/mcl_furnaces/README.md

@@ -6,6 +6,7 @@ License of source code
 LGPLv2.1
 Based on code from Minetest Game.
 Modified by Wuzzy.
+Smokers and Blast Furnaces added and modified by PrairieWind and j45.
 
 License of media
 ----------------

mods/ITEMS/mcl_furnaces/blast_furnace.lua

@@ -0,0 +1,548 @@
+
+local S = minetest.get_translator(minetest.get_current_modname())
+
+local LIGHT_ACTIVE_FURNACE = 13
+
+--
+-- Formspecs
+--
+
+local function active_formspec(fuel_percent, item_percent)
+	return "size[9,8.75]"..
+	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
+	"list[current_player;main;0,4.5;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
+	"list[current_player;main;0,7.74;9,1;]"..
+	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
+	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Blast Furnace"))).."]"..
+	"list[context;src;2.75,0.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
+	"list[context;fuel;2.75,2.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
+	"list[context;dst;5.75,1.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
+	"image[2.75,1.5;1,1;default_furnace_fire_bg.png^[lowpart:"..
+	(100-fuel_percent)..":default_furnace_fire_fg.png]"..
+	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[lowpart:"..
+	(item_percent)..":gui_furnace_arrow_fg.png^[transformR270]"..
+	-- Craft guide button temporarily removed due to Minetest bug.
+	-- TODO: Add it back when the Minetest bug is fixed.
+	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
+	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
+	"listring[context;dst]"..
+	"listring[current_player;main]"..
+	"listring[context;src]"..
+	"listring[current_player;main]"..
+	"listring[context;fuel]"..
+	"listring[current_player;main]"
+end
+
+local inactive_formspec = "size[9,8.75]"..
+	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
+	"list[current_player;main;0,4.5;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
+	"list[current_player;main;0,7.74;9,1;]"..
+	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
+	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Blast Furnace"))).."]"..
+	"list[context;src;2.75,0.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
+	"list[context;fuel;2.75,2.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
+	"list[context;dst;5.75,1.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
+	"image[2.75,1.5;1,1;default_furnace_fire_bg.png]"..
+	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[transformR270]"..
+	-- Craft guide button temporarily removed due to Minetest bug.
+	-- TODO: Add it back when the Minetest bug is fixed.
+	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
+	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
+	"listring[context;dst]"..
+	"listring[current_player;main]"..
+	"listring[context;src]"..
+	"listring[current_player;main]"..
+	"listring[context;fuel]"..
+	"listring[current_player;main]"
+
+local receive_fields = function(pos, formname, fields, sender)
+	if fields.craftguide then
+		mcl_craftguide.show(sender:get_player_name())
+	end
+end
+
+local function give_xp(pos, player)
+	local meta = minetest.get_meta(pos)
+	local dir = vector.divide(minetest.facedir_to_dir(minetest.get_node(pos).param2),-1.95)
+	local xp = meta:get_int("xp")
+	if xp > 0 then
+		if player then
+			mcl_experience.add_xp(player, xp)
+		else
+			mcl_experience.throw_xp(vector.add(pos, dir), xp)
+		end
+		meta:set_int("xp", 0)
+	end
+end
+
+--
+-- Node callback functions that are the same for active and inactive furnace
+--
+
+local function allow_metadata_inventory_put(pos, listname, index, stack, player)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return 0
+	end
+	local meta = minetest.get_meta(pos)
+	local inv = meta:get_inventory()
+	if listname == "fuel" then
+
+		-- Test stack with size 1 because we burn one fuel at a time
+		local teststack = ItemStack(stack)
+		teststack:set_count(1)
+		local output, decremented_input = minetest.get_craft_result({method="fuel", width=1, items={teststack}})
+		if output.time ~= 0 then
+			-- Only allow to place 1 item if fuel get replaced by recipe.
+			-- This is the case for lava buckets.
+			local replace_item = decremented_input.items[1]
+			if replace_item:is_empty() then
+				-- For most fuels, just allow to place everything
+				return stack:get_count()
+			else
+				if inv:get_stack(listname, index):get_count() == 0 then
+					return 1
+				else
+					return 0
+				end
+			end
+		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)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return 0
+	end
+	return stack:get_count()
+end
+
+local function on_metadata_inventory_take(pos, listname, index, stack, player)
+	-- Award smelting achievements
+	if listname == "dst" then
+		if stack:get_name() == "mcl_core:iron_ingot" then
+			awards.unlock(player:get_player_name(), "mcl:acquireIron")
+		end
+		give_xp(pos, player)
+	end
+end
+
+local function on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+	if from_list == "dst" then
+		give_xp(pos, player)
+	end
+end
+
+local function spawn_flames(pos, param2)
+	local minrelpos, maxrelpos
+	local dir = minetest.facedir_to_dir(param2)
+	if dir.x > 0 then
+		minrelpos = { x = -0.6, y = -0.05, z = -0.25 }
+		maxrelpos = { x = -0.55, y = -0.45, z = 0.25 }
+	elseif dir.x < 0 then
+		minrelpos = { x = 0.55, y = -0.05, z = -0.25 }
+		maxrelpos = { x = 0.6, y = -0.45, z = 0.25 }
+	elseif dir.z > 0 then
+		minrelpos = { x = -0.25, y = -0.05, z = -0.6 }
+		maxrelpos = { x = 0.25, y = -0.45, z = -0.55 }
+	elseif dir.z < 0 then
+		minrelpos = { x = -0.25, y = -0.05, z = 0.55 }
+		maxrelpos = { x = 0.25, y = -0.45, z = 0.6 }
+	else
+		return
+	end
+	mcl_particles.add_node_particlespawner(pos, {
+		amount = 4,
+		time = 0,
+		minpos = vector.add(pos, minrelpos),
+		maxpos = vector.add(pos, maxrelpos),
+		minvel = { x = -0.01, y = 0, z = -0.01 },
+		maxvel = { x = 0.01, y = 0.1, z = 0.01 },
+		minexptime = 0.3,
+		maxexptime = 0.6,
+		minsize = 0.4,
+		maxsize = 0.8,
+		texture = "mcl_particles_flame.png",
+		glow = LIGHT_ACTIVE_FURNACE,
+	}, "low")
+end
+
+local function swap_node(pos, name)
+	local node = minetest.get_node(pos)
+	if node.name == name then
+		return
+	end
+	node.name = name
+	minetest.swap_node(pos, node)
+	if name == "mcl_furnaces:blast_furnace_active" then
+		spawn_flames(pos, node.param2)
+	else
+		mcl_particles.delete_node_particlespawners(pos)
+	end
+end
+
+local function furnace_node_timer(pos, elapsed)
+	--
+	-- Inizialize metadata
+	--
+	local meta = minetest.get_meta(pos)
+	local fuel_time = meta:get_float("fuel_time") or 0
+	local src_time = meta:get_float("src_time") or 0
+	local src_item = meta:get_string("src_item") or ""
+	local fuel_totaltime = meta:get_float("fuel_totaltime") or 0
+
+	local inv = meta:get_inventory()
+	local srclist, fuellist
+
+	local cookable, cooked
+	local active = true
+	local fuel
+
+	srclist = inv:get_list("src")
+	fuellist = inv:get_list("fuel")
+
+	-- Check if src item has been changed
+	if srclist[1]:get_name() ~= src_item then
+		-- Reset cooking progress in this case
+		src_time = 0
+		src_item = srclist[1]:get_name()
+	end
+
+	local update = true
+	local elapsed_game_time = mcl_time.get_irl_seconds_passed_at_pos_or_nil(pos) or elapsed
+	while elapsed_game_time > 0.00001 and update do
+		--
+		-- Cooking
+		--
+
+		local el = elapsed_game_time
+
+		-- Check if we have cookable content: cookable
+		local aftercooked
+		cooked, aftercooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+		cookable = false
+		cookableItems = {"mcl_raw_ores:raw_iron", "mcl_raw_ores:raw_gold", "mcl_copper:raw_copper", "mcl_nether:ancient_debris"}
+		cookable = false
+			--for _, item in ipairs(cookableItems) do
+			for _,item in ipairs(cookableItems) do
+			local stack = inv:get_stack("src",1)
+				if stack:get_name() == item then
+					cookable = true
+				end
+			end 
+		if cookable then
+			-- Successful cooking requires space in dst slot and time
+			if not inv:room_for_item("dst", cooked.item) then
+				cookable = false
+			end
+		end
+
+		if cookable then -- fuel lasts long enough, adjust el to cooking duration
+			el = math.min(el, cooked.time - src_time)
+		end
+
+		-- Check if we have enough fuel to burn
+		active = fuel_time < fuel_totaltime
+		if cookable and not active then
+			-- We need to get new fuel
+			local afterfuel
+			fuel, afterfuel = minetest.get_craft_result({method = "fuel", width = 1, items = fuellist})
+
+			if fuel.time == 0 then
+				-- No valid fuel in fuel list -- stop
+				fuel_totaltime = 0
+				src_time = 0
+				update = false
+			else
+				-- Take fuel from fuel list
+				inv:set_stack("fuel", 1, afterfuel.items[1])
+				fuel_time = 0
+				fuel_totaltime = fuel.time
+				el = math.min(el, fuel_totaltime)
+				active = true
+				fuellist = inv:get_list("fuel")
+			end
+		elseif active then
+			el = math.min(el, fuel_totaltime - fuel_time)
+			-- The furnace is currently active and has enough fuel
+			fuel_time = fuel_time + el
+		end
+
+		-- If there is a cookable item then check if it is ready yet
+		if cookable and active then
+			-- in the src_time variable, the *1.5 is the multiplication that makes the blast furnace work faster than a normal furnace. I (PrairieWind) have it at 1.5 times faster, but it can be OP and 2 times faster, or 1.2 times faster. All are good numbers.
+			src_time = (src_time + el)*1.5
+			-- Place result in dst list if done
+			if src_time >= cooked.time then
+				inv:add_item("dst", cooked.item)
+				inv:set_stack("src", 1, aftercooked.items[1])
+
+				srclist = inv:get_list("src")
+				src_time = 0
+
+				meta:set_int("xp", meta:get_int("xp") + 1)		-- ToDo give each recipe an idividial XP count
+			end
+		end
+
+		elapsed_game_time = elapsed_game_time - el
+	end
+
+	if fuel and fuel_totaltime > fuel.time then
+		fuel_totaltime = fuel.time
+	end
+	if srclist and srclist[1]:is_empty() then
+		src_time = 0
+	end
+
+	--
+	-- Update formspec and node
+	--
+	local formspec = inactive_formspec
+	local item_percent = 0
+	if cookable then
+		item_percent = math.floor(src_time / cooked.time * 100)
+	end
+
+	local result = false
+
+	if active then
+		local fuel_percent = 0
+		if fuel_totaltime > 0 then
+			fuel_percent = math.floor(fuel_time / fuel_totaltime * 100)
+		end
+		formspec = active_formspec(fuel_percent, item_percent)
+		swap_node(pos, "mcl_furnaces:blast_furnace_active")
+		-- make sure timer restarts automatically
+		result = true
+	else
+		swap_node(pos, "mcl_furnaces:blast_furnace")
+		-- stop timer on the inactive furnace
+		minetest.get_node_timer(pos):stop()
+	end
+
+	--
+	-- Set meta values
+	--
+	meta:set_float("fuel_totaltime", fuel_totaltime)
+	meta:set_float("fuel_time", fuel_time)
+	meta:set_float("src_time", src_time)
+	if srclist then
+		 meta:set_string("src_item", src_item)
+	else
+		 meta:set_string("src_item", "")
+	end
+	meta:set_string("formspec", formspec)
+
+	return result
+end
+
+local on_rotate, after_rotate_active
+if minetest.get_modpath("screwdriver") then
+	on_rotate = screwdriver.rotate_simple
+	after_rotate_active = function(pos)
+		local node = minetest.get_node(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		if node.name == "mcl_furnaces:blast_furnace" then
+			return
+		end
+		spawn_flames(pos, node.param2)
+	end
+end
+
+minetest.register_node("mcl_furnaces:blast_furnace", {
+	description = S("Blast Furnace"),
+	_tt_help = S("Uses fuel to smelt or cook items"),
+	_doc_items_longdesc = S("Blast Furnaces cook or smelt several items, using a furnace fuel, into something else, but faster than a normal furnace."),
+	_doc_items_usagehelp =
+			S([[
+				Use the furnace to open the furnace menu.
+				Place a furnace fuel in the lower slot and the source material in the upper slot.
+				The furnace will slowly use its fuel to smelt the item.
+				The result will be placed into the output slot at the right side.
+			]]).."\n"..
+			S("Use the recipe book to see what you can smelt, what you can use as fuel and how long it will burn."),
+	_doc_items_hidden = false,
+	tiles = {
+		"blast_furnace_top.png", "blast_furnace_top.png",
+		"blast_furnace_side.png", "blast_furnace_side.png",
+		"blast_furnace_side.png", "blast_furnace_front.png"
+	},
+	paramtype2 = "facedir",
+	groups = {pickaxey=1, container=4, deco_block=1, material_stone=1},
+	is_ground_content = false,
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+
+	on_timer = furnace_node_timer,
+	after_dig_node = function(pos, oldnode, oldmetadata, digger)
+		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,
+
+	on_construct = function(pos)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", inactive_formspec)
+		local inv = meta:get_inventory()
+		inv:set_size("src", 1)
+		inv:set_size("fuel", 1)
+		inv:set_size("dst", 1)
+	end,
+	on_destruct = function(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		give_xp(pos)
+	end,
+
+	on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		minetest.get_node_timer(pos):start(1.0)
+
+		on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+	end,
+	on_metadata_inventory_put = function(pos)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		-- start timer function, it will sort out whether furnace can burn or not.
+		minetest.get_node_timer(pos):start(1.0)
+	end,
+	on_metadata_inventory_take = function(pos, listname, index, stack, player)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		-- start timer function, it will helpful if player clears dst slot
+		minetest.get_node_timer(pos):start(1.0)
+
+		on_metadata_inventory_take(pos, listname, index, stack, player)
+	end,
+
+	allow_metadata_inventory_put = allow_metadata_inventory_put,
+	allow_metadata_inventory_move = allow_metadata_inventory_move,
+	allow_metadata_inventory_take = allow_metadata_inventory_take,
+	on_receive_fields = receive_fields,
+	_mcl_blast_resistance = 3.5,
+	_mcl_hardness = 3.5,
+	on_rotate = on_rotate,
+})
+
+minetest.register_node("mcl_furnaces:blast_furnace_active", {
+	description = S("Active Blast Furnace"),
+	_doc_items_create_entry = false,
+	tiles = {
+		"blast_furnace_top.png", "blast_furnace_top.png",
+		"blast_furnace_side.png", "blast_furnace_side.png",
+		"blast_furnace_side.png", {name = "blast_furnace_front_on.png",
+				animation = {type = "vertical_frames", aspect_w = 16, aspect_h = 16, length = 48}},
+	},
+	paramtype2 = "facedir",
+	paramtype = "light",
+	light_source = LIGHT_ACTIVE_FURNACE,
+	drop = "mcl_furnaces:blast_furnace",
+	groups = {pickaxey=1, container=4, deco_block=1, not_in_creative_inventory=1, material_stone=1},
+	is_ground_content = false,
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+	on_timer = furnace_node_timer,
+
+	after_dig_node = function(pos, oldnode, oldmetadata, digger)
+		local meta = minetest.get_meta(pos)
+		local meta2 = meta
+		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:to_table())
+	end,
+
+	on_construct = function(pos)
+		local node = minetest.get_node(pos)
+		spawn_flames(pos, node.param2)
+	end,
+	on_destruct = function(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		give_xp(pos)
+	end,
+
+	allow_metadata_inventory_put = allow_metadata_inventory_put,
+	allow_metadata_inventory_move = allow_metadata_inventory_move,
+	allow_metadata_inventory_take = allow_metadata_inventory_take,
+	on_metadata_inventory_move = on_metadata_inventory_move,
+	on_metadata_inventory_take = on_metadata_inventory_take,
+	on_receive_fields = receive_fields,
+	_mcl_blast_resistance = 3.5,
+	_mcl_hardness = 3.5,
+	on_rotate = on_rotate,
+	after_rotate = after_rotate_active,
+})
+
+minetest.register_craft({
+	output = "mcl_furnaces:blast_furnace",
+	recipe = {
+		{ "mcl_core:iron_ingot", "mcl_core:iron_ingot", "mcl_core:iron_ingot" },
+		{ "mcl_core:iron_ingot", "mcl_furnaces:furnace", "mcl_core:iron_ingot" },
+		{ "mcl_core:stone_smooth", "mcl_core:stone_smooth", "mcl_core:stone_smooth" },
+	}
+})
+
+-- Add entry alias for the Help
+if minetest.get_modpath("doc") then
+	doc.add_entry_alias("nodes", "mcl_furnaces:blast_furnace", "nodes", "mcl_furnaces:blast_furnace_active")
+end
+
+minetest.register_lbm({
+	label = "Active furnace flame particles",
+	name = "mcl_furnaces:flames",
+	nodenames = {"mcl_furnaces:blast_furnace_active"},
+	run_at_every_load = true,
+	action = function(pos, node)
+		spawn_flames(pos, node.param2)
+	end,
+})
+
+-- Legacy
+minetest.register_lbm({
+	label = "Update furnace formspecs (0.60.0)",
+	name = "mcl_furnaces:update_formspecs_0_60_0",
+	-- Only update inactive furnaces because active ones should update themselves
+	nodenames = { "mcl_furnaces:blast_furnace" },
+	run_at_every_load = false,
+	action = function(pos, node)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", inactive_formspec)
+	end,
+})

mods/ITEMS/mcl_furnaces/furnace.lua

@@ -0,0 +1,558 @@
+local S = minetest.get_translator(minetest.get_current_modname())
+
+local LIGHT_ACTIVE_FURNACE = 13
+
+--
+-- Formspecs
+--
+
+local function active_formspec(fuel_percent, item_percent)
+	return "size[9,8.75]"..
+	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
+	"list[current_player;main;0,4.5;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
+	"list[current_player;main;0,7.74;9,1;]"..
+	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
+	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Furnace"))).."]"..
+	"list[context;src;2.75,0.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
+	"list[context;fuel;2.75,2.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
+	"list[context;dst;5.75,1.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
+	"image[2.75,1.5;1,1;default_furnace_fire_bg.png^[lowpart:"..
+	(100-fuel_percent)..":default_furnace_fire_fg.png]"..
+	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[lowpart:"..
+	(item_percent)..":gui_furnace_arrow_fg.png^[transformR270]"..
+	-- Craft guide button temporarily removed due to Minetest bug.
+	-- TODO: Add it back when the Minetest bug is fixed.
+	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
+	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
+	"listring[context;dst]"..
+	"listring[current_player;main]"..
+	"listring[context;src]"..
+	"listring[current_player;main]"..
+	"listring[context;fuel]"..
+	"listring[current_player;main]"
+end
+
+local inactive_formspec = "size[9,8.75]"..
+	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
+	"list[current_player;main;0,4.5;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
+	"list[current_player;main;0,7.74;9,1;]"..
+	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
+	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Furnace"))).."]"..
+	"list[context;src;2.75,0.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
+	"list[context;fuel;2.75,2.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
+	"list[context;dst;5.75,1.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
+	"image[2.75,1.5;1,1;default_furnace_fire_bg.png]"..
+	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[transformR270]"..
+	-- Craft guide button temporarily removed due to Minetest bug.
+	-- TODO: Add it back when the Minetest bug is fixed.
+	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
+	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
+	"listring[context;dst]"..
+	"listring[current_player;main]"..
+	"listring[context;src]"..
+	"listring[current_player;main]"..
+	"listring[context;fuel]"..
+	"listring[current_player;main]"
+
+local receive_fields = function(pos, formname, fields, sender)
+	if fields.craftguide then
+		mcl_craftguide.show(sender:get_player_name())
+	end
+end
+
+local function give_xp(pos, player)
+	local meta = minetest.get_meta(pos)
+	local dir = vector.divide(minetest.facedir_to_dir(minetest.get_node(pos).param2),-1.95)
+	local xp = meta:get_int("xp")
+	if xp > 0 then
+		if player then
+			mcl_experience.add_xp(player, xp)
+		else
+			mcl_experience.throw_xp(vector.add(pos, dir), xp)
+		end
+		meta:set_int("xp", 0)
+	end
+end
+
+--
+-- Node callback functions that are the same for active and inactive furnace
+--
+
+local function allow_metadata_inventory_put(pos, listname, index, stack, player)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return 0
+	end
+	local meta = minetest.get_meta(pos)
+	local inv = meta:get_inventory()
+	if listname == "fuel" then
+		-- Special case: empty bucket (not a fuel, but used for sponge drying)
+		if stack:get_name() == "mcl_buckets:bucket_empty" then
+			if inv:get_stack(listname, index):get_count() == 0 then
+				return 1
+			else
+				return 0
+			end
+		end
+
+		-- Test stack with size 1 because we burn one fuel at a time
+		local teststack = ItemStack(stack)
+		teststack:set_count(1)
+		local output, decremented_input = minetest.get_craft_result({method="fuel", width=1, items={teststack}})
+		if output.time ~= 0 then
+			-- Only allow to place 1 item if fuel get replaced by recipe.
+			-- This is the case for lava buckets.
+			local replace_item = decremented_input.items[1]
+			if replace_item:is_empty() then
+				-- For most fuels, just allow to place everything
+				return stack:get_count()
+			else
+				if inv:get_stack(listname, index):get_count() == 0 then
+					return 1
+				else
+					return 0
+				end
+			end
+		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)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return 0
+	end
+	return stack:get_count()
+end
+
+local function on_metadata_inventory_take(pos, listname, index, stack, player)
+	-- Award smelting achievements
+	if listname == "dst" then
+		if stack:get_name() == "mcl_core:iron_ingot" then
+			awards.unlock(player:get_player_name(), "mcl:acquireIron")
+		elseif stack:get_name() == "mcl_fishing:fish_cooked" then
+			awards.unlock(player:get_player_name(), "mcl:cookFish")
+		end
+		give_xp(pos, player)
+	end
+end
+
+local function on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+	if from_list == "dst" then
+		give_xp(pos, player)
+	end
+end
+
+local function spawn_flames(pos, param2)
+	local minrelpos, maxrelpos
+	local dir = minetest.facedir_to_dir(param2)
+	if dir.x > 0 then
+		minrelpos = { x = -0.6, y = -0.05, z = -0.25 }
+		maxrelpos = { x = -0.55, y = -0.45, z = 0.25 }
+	elseif dir.x < 0 then
+		minrelpos = { x = 0.55, y = -0.05, z = -0.25 }
+		maxrelpos = { x = 0.6, y = -0.45, z = 0.25 }
+	elseif dir.z > 0 then
+		minrelpos = { x = -0.25, y = -0.05, z = -0.6 }
+		maxrelpos = { x = 0.25, y = -0.45, z = -0.55 }
+	elseif dir.z < 0 then
+		minrelpos = { x = -0.25, y = -0.05, z = 0.55 }
+		maxrelpos = { x = 0.25, y = -0.45, z = 0.6 }
+	else
+		return
+	end
+	mcl_particles.add_node_particlespawner(pos, {
+		amount = 4,
+		time = 0,
+		minpos = vector.add(pos, minrelpos),
+		maxpos = vector.add(pos, maxrelpos),
+		minvel = { x = -0.01, y = 0, z = -0.01 },
+		maxvel = { x = 0.01, y = 0.1, z = 0.01 },
+		minexptime = 0.3,
+		maxexptime = 0.6,
+		minsize = 0.4,
+		maxsize = 0.8,
+		texture = "mcl_particles_flame.png",
+		glow = LIGHT_ACTIVE_FURNACE,
+	}, "low")
+end
+
+local function swap_node(pos, name)
+	local node = minetest.get_node(pos)
+	if node.name == name then
+		return
+	end
+	node.name = name
+	minetest.swap_node(pos, node)
+	if name == "mcl_furnaces:furnace_active" then
+		spawn_flames(pos, node.param2)
+	else
+		mcl_particles.delete_node_particlespawners(pos)
+	end
+end
+
+local function furnace_node_timer(pos, elapsed)
+	--
+	-- Inizialize metadata
+	--
+	local meta = minetest.get_meta(pos)
+	local fuel_time = meta:get_float("fuel_time") or 0
+	local src_time = meta:get_float("src_time") or 0
+	local src_item = meta:get_string("src_item") or ""
+	local fuel_totaltime = meta:get_float("fuel_totaltime") or 0
+
+	local inv = meta:get_inventory()
+	local srclist, fuellist
+
+	local cookable, cooked
+	local active = true
+	local fuel
+
+	srclist = inv:get_list("src")
+	fuellist = inv:get_list("fuel")
+
+	-- Check if src item has been changed
+	if srclist[1]:get_name() ~= src_item then
+		-- Reset cooking progress in this case
+		src_time = 0
+		src_item = srclist[1]:get_name()
+	end
+
+	local update = true
+	local elapsed_game_time = mcl_time.get_irl_seconds_passed_at_pos_or_nil(pos) or elapsed
+	while elapsed_game_time > 0.00001 and update do
+		--
+		-- Cooking
+		--
+
+		local el = elapsed_game_time
+
+		-- Check if we have cookable content: cookable
+		local aftercooked
+		cooked, aftercooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+		cookable = cooked.time ~= 0
+		if cookable then
+			-- Successful cooking requires space in dst slot and time
+			if not inv:room_for_item("dst", cooked.item) then
+				cookable = false
+			end
+		end
+
+		if cookable then -- fuel lasts long enough, adjust el to cooking duration
+			el = math.min(el, cooked.time - src_time)
+		end
+
+		-- Check if we have enough fuel to burn
+		active = fuel_time < fuel_totaltime
+		if cookable and not active then
+			-- We need to get new fuel
+			local afterfuel
+			fuel, afterfuel = minetest.get_craft_result({method = "fuel", width = 1, items = fuellist})
+
+			if fuel.time == 0 then
+				-- No valid fuel in fuel list -- stop
+				fuel_totaltime = 0
+				src_time = 0
+				update = false
+			else
+				-- Take fuel from fuel list
+				inv:set_stack("fuel", 1, afterfuel.items[1])
+				fuel_time = 0
+				fuel_totaltime = fuel.time
+				el = math.min(el, fuel_totaltime)
+				active = true
+				fuellist = inv:get_list("fuel")
+			end
+		elseif active then
+			el = math.min(el, fuel_totaltime - fuel_time)
+			-- The furnace is currently active and has enough fuel
+			fuel_time = fuel_time + el
+		end
+
+		-- If there is a cookable item then check if it is ready yet
+		if cookable and active then
+			src_time = src_time + el
+			-- Place result in dst list if done
+			if src_time >= cooked.time then
+				inv:add_item("dst", cooked.item)
+				inv:set_stack("src", 1, aftercooked.items[1])
+
+				-- Unique recipe: Pour water into empty bucket after cooking wet sponge successfully
+				if inv:get_stack("fuel", 1):get_name() == "mcl_buckets:bucket_empty" then
+					if srclist[1]:get_name() == "mcl_sponges:sponge_wet" then
+						inv:set_stack("fuel", 1, "mcl_buckets:bucket_water")
+						fuellist = inv:get_list("fuel")
+					-- Also for river water
+					elseif srclist[1]:get_name() == "mcl_sponges:sponge_wet_river_water" then
+						inv:set_stack("fuel", 1, "mcl_buckets:bucket_river_water")
+						fuellist = inv:get_list("fuel")
+					end
+				end
+
+				srclist = inv:get_list("src")
+				src_time = 0
+
+				meta:set_int("xp", meta:get_int("xp") + 1)		-- ToDo give each recipe an idividial XP count
+			end
+		end
+
+		elapsed_game_time = elapsed_game_time - el
+	end
+
+	if fuel and fuel_totaltime > fuel.time then
+		fuel_totaltime = fuel.time
+	end
+	if srclist and srclist[1]:is_empty() then
+		src_time = 0
+	end
+
+	--
+	-- Update formspec and node
+	--
+	local formspec = inactive_formspec
+	local item_percent = 0
+	if cookable then
+		item_percent = math.floor(src_time / cooked.time * 100)
+	end
+
+	local result = false
+
+	if active then
+		local fuel_percent = 0
+		if fuel_totaltime > 0 then
+			fuel_percent = math.floor(fuel_time / fuel_totaltime * 100)
+		end
+		formspec = active_formspec(fuel_percent, item_percent)
+		swap_node(pos, "mcl_furnaces:furnace_active")
+		-- make sure timer restarts automatically
+		result = true
+	else
+		swap_node(pos, "mcl_furnaces:furnace")
+		-- stop timer on the inactive furnace
+		minetest.get_node_timer(pos):stop()
+	end
+
+	--
+	-- Set meta values
+	--
+	meta:set_float("fuel_totaltime", fuel_totaltime)
+	meta:set_float("fuel_time", fuel_time)
+	meta:set_float("src_time", src_time)
+	if srclist then
+		 meta:set_string("src_item", src_item)
+	else
+		 meta:set_string("src_item", "")
+	end
+	meta:set_string("formspec", formspec)
+
+	return result
+end
+
+local on_rotate, after_rotate_active
+if minetest.get_modpath("screwdriver") then
+	on_rotate = screwdriver.rotate_simple
+	after_rotate_active = function(pos)
+		local node = minetest.get_node(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		if node.name == "mcl_furnaces:furnace" then
+			return
+		end
+		spawn_flames(pos, node.param2)
+	end
+end
+
+minetest.register_node("mcl_furnaces:furnace", {
+	description = S("Furnace"),
+	_tt_help = S("Uses fuel to smelt or cook items"),
+	_doc_items_longdesc = S("Furnaces cook or smelt several items, using a furnace fuel, into something else."),
+	_doc_items_usagehelp =
+			S([[
+				Use the furnace to open the furnace menu.
+				Place a furnace fuel in the lower slot and the source material in the upper slot.
+				The furnace will slowly use its fuel to smelt the item.
+				The result will be placed into the output slot at the right side.
+			]]).."\n"..
+			S("Use the recipe book to see what you can smelt, what you can use as fuel and how long it will burn."),
+	_doc_items_hidden = false,
+	tiles = {
+		"default_furnace_top.png", "default_furnace_bottom.png",
+		"default_furnace_side.png", "default_furnace_side.png",
+		"default_furnace_side.png", "default_furnace_front.png"
+	},
+	paramtype2 = "facedir",
+	groups = {pickaxey=1, container=4, deco_block=1, material_stone=1},
+	is_ground_content = false,
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+
+	on_timer = furnace_node_timer,
+	after_dig_node = function(pos, oldnode, oldmetadata, digger)
+		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,
+
+	on_construct = function(pos)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", inactive_formspec)
+		local inv = meta:get_inventory()
+		inv:set_size("src", 1)
+		inv:set_size("fuel", 1)
+		inv:set_size("dst", 1)
+	end,
+	on_destruct = function(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		give_xp(pos)
+	end,
+
+	on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		minetest.get_node_timer(pos):start(1.0)
+
+		on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+	end,
+	on_metadata_inventory_put = function(pos)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		-- start timer function, it will sort out whether furnace can burn or not.
+		minetest.get_node_timer(pos):start(1.0)
+	end,
+	on_metadata_inventory_take = function(pos, listname, index, stack, player)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		-- start timer function, it will helpful if player clears dst slot
+		minetest.get_node_timer(pos):start(1.0)
+
+		on_metadata_inventory_take(pos, listname, index, stack, player)
+	end,
+
+	allow_metadata_inventory_put = allow_metadata_inventory_put,
+	allow_metadata_inventory_move = allow_metadata_inventory_move,
+	allow_metadata_inventory_take = allow_metadata_inventory_take,
+	on_receive_fields = receive_fields,
+	_mcl_blast_resistance = 3.5,
+	_mcl_hardness = 3.5,
+	on_rotate = on_rotate,
+})
+
+minetest.register_node("mcl_furnaces:furnace_active", {
+	description = S("Burning Furnace"),
+	_doc_items_create_entry = false,
+	tiles = {
+		"default_furnace_top.png", "default_furnace_bottom.png",
+		"default_furnace_side.png", "default_furnace_side.png",
+		"default_furnace_side.png", "default_furnace_front_active.png",
+	},
+	paramtype2 = "facedir",
+	paramtype = "light",
+	light_source = LIGHT_ACTIVE_FURNACE,
+	drop = "mcl_furnaces:furnace",
+	groups = {pickaxey=1, container=4, deco_block=1, not_in_creative_inventory=1, material_stone=1},
+	is_ground_content = false,
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+	on_timer = furnace_node_timer,
+
+	after_dig_node = function(pos, oldnode, oldmetadata, digger)
+		local meta = minetest.get_meta(pos)
+		local meta2 = meta
+		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:to_table())
+	end,
+
+	on_construct = function(pos)
+		local node = minetest.get_node(pos)
+		spawn_flames(pos, node.param2)
+	end,
+	on_destruct = function(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		give_xp(pos)
+	end,
+
+	allow_metadata_inventory_put = allow_metadata_inventory_put,
+	allow_metadata_inventory_move = allow_metadata_inventory_move,
+	allow_metadata_inventory_take = allow_metadata_inventory_take,
+	on_metadata_inventory_move = on_metadata_inventory_move,
+	on_metadata_inventory_take = on_metadata_inventory_take,
+	on_receive_fields = receive_fields,
+	_mcl_blast_resistance = 3.5,
+	_mcl_hardness = 3.5,
+	on_rotate = on_rotate,
+	after_rotate = after_rotate_active,
+})
+
+minetest.register_craft({
+	output = "mcl_furnaces:furnace",
+	recipe = {
+		{ "mcl_core:cobble", "mcl_core:cobble", "mcl_core:cobble" },
+		{ "mcl_core:cobble", "", "mcl_core:cobble" },
+		{ "mcl_core:cobble", "mcl_core:cobble", "mcl_core:cobble" },
+	}
+})
+
+-- Add entry alias for the Help
+if minetest.get_modpath("doc") then
+	doc.add_entry_alias("nodes", "mcl_furnaces:furnace", "nodes", "mcl_furnaces:furnace_active")
+end
+
+minetest.register_lbm({
+	label = "Active furnace flame particles",
+	name = "mcl_furnaces:flames",
+	nodenames = {"mcl_furnaces:furnace_active"},
+	run_at_every_load = true,
+	action = function(pos, node)
+		spawn_flames(pos, node.param2)
+	end,
+})
+
+-- Legacy
+minetest.register_lbm({
+	label = "Update furnace formspecs (0.60.0)",
+	name = "mcl_furnaces:update_formspecs_0_60_0",
+	-- Only update inactive furnaces because active ones should update themselves
+	nodenames = { "mcl_furnaces:furnace" },
+	run_at_every_load = false,
+	action = function(pos, node)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", inactive_formspec)
+	end,
+})

mods/ITEMS/mcl_furnaces/init.lua

@@ -1,559 +1,6 @@
+-- Load files
+local modpath = minetest.get_modpath(minetest.get_current_modname())
 
-local S = minetest.get_translator(minetest.get_current_modname())
+dofile(modpath.."/blast_furnace.lua") -- Load Blast Furnaces
-
+dofile(modpath.."/furnace.lua") -- Load Furnaces
-local LIGHT_ACTIVE_FURNACE = 13
+dofile(modpath.."/smoker.lua") -- Load Smokers
-
---
--- Formspecs
---
-
-local function active_formspec(fuel_percent, item_percent)
-	return "size[9,8.75]"..
-	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
-	"list[current_player;main;0,4.5;9,3;9]"..
-	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
-	"list[current_player;main;0,7.74;9,1;]"..
-	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
-	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Furnace"))).."]"..
-	"list[context;src;2.75,0.5;1,1;]"..
-	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
-	"list[context;fuel;2.75,2.5;1,1;]"..
-	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
-	"list[context;dst;5.75,1.5;1,1;]"..
-	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
-	"image[2.75,1.5;1,1;default_furnace_fire_bg.png^[lowpart:"..
-	(100-fuel_percent)..":default_furnace_fire_fg.png]"..
-	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[lowpart:"..
-	(item_percent)..":gui_furnace_arrow_fg.png^[transformR270]"..
-	-- Craft guide button temporarily removed due to Minetest bug.
-	-- TODO: Add it back when the Minetest bug is fixed.
-	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
-	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
-	"listring[context;dst]"..
-	"listring[current_player;main]"..
-	"listring[context;src]"..
-	"listring[current_player;main]"..
-	"listring[context;fuel]"..
-	"listring[current_player;main]"
-end
-
-local inactive_formspec = "size[9,8.75]"..
-	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
-	"list[current_player;main;0,4.5;9,3;9]"..
-	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
-	"list[current_player;main;0,7.74;9,1;]"..
-	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
-	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Furnace"))).."]"..
-	"list[context;src;2.75,0.5;1,1;]"..
-	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
-	"list[context;fuel;2.75,2.5;1,1;]"..
-	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
-	"list[context;dst;5.75,1.5;1,1;]"..
-	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
-	"image[2.75,1.5;1,1;default_furnace_fire_bg.png]"..
-	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[transformR270]"..
-	-- Craft guide button temporarily removed due to Minetest bug.
-	-- TODO: Add it back when the Minetest bug is fixed.
-	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
-	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
-	"listring[context;dst]"..
-	"listring[current_player;main]"..
-	"listring[context;src]"..
-	"listring[current_player;main]"..
-	"listring[context;fuel]"..
-	"listring[current_player;main]"
-
-local receive_fields = function(pos, formname, fields, sender)
-	if fields.craftguide then
-		mcl_craftguide.show(sender:get_player_name())
-	end
-end
-
-local function give_xp(pos, player)
-	local meta = minetest.get_meta(pos)
-	local dir = vector.divide(minetest.facedir_to_dir(minetest.get_node(pos).param2),-1.95)
-	local xp = meta:get_int("xp")
-	if xp > 0 then
-		if player then
-			mcl_experience.add_xp(player, xp)
-		else
-			mcl_experience.throw_xp(vector.add(pos, dir), xp)
-		end
-		meta:set_int("xp", 0)
-	end
-end
-
---
--- Node callback functions that are the same for active and inactive furnace
---
-
-local function allow_metadata_inventory_put(pos, listname, index, stack, player)
-	local name = player:get_player_name()
-	if minetest.is_protected(pos, name) then
-		minetest.record_protection_violation(pos, name)
-		return 0
-	end
-	local meta = minetest.get_meta(pos)
-	local inv = meta:get_inventory()
-	if listname == "fuel" then
-		-- Special case: empty bucket (not a fuel, but used for sponge drying)
-		if stack:get_name() == "mcl_buckets:bucket_empty" then
-			if inv:get_stack(listname, index):get_count() == 0 then
-				return 1
-			else
-				return 0
-			end
-		end
-
-		-- Test stack with size 1 because we burn one fuel at a time
-		local teststack = ItemStack(stack)
-		teststack:set_count(1)
-		local output, decremented_input = minetest.get_craft_result({method="fuel", width=1, items={teststack}})
-		if output.time ~= 0 then
-			-- Only allow to place 1 item if fuel get replaced by recipe.
-			-- This is the case for lava buckets.
-			local replace_item = decremented_input.items[1]
-			if replace_item:is_empty() then
-				-- For most fuels, just allow to place everything
-				return stack:get_count()
-			else
-				if inv:get_stack(listname, index):get_count() == 0 then
-					return 1
-				else
-					return 0
-				end
-			end
-		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)
-	local name = player:get_player_name()
-	if minetest.is_protected(pos, name) then
-		minetest.record_protection_violation(pos, name)
-		return 0
-	end
-	return stack:get_count()
-end
-
-local function on_metadata_inventory_take(pos, listname, index, stack, player)
-	-- Award smelting achievements
-	if listname == "dst" then
-		if stack:get_name() == "mcl_core:iron_ingot" then
-			awards.unlock(player:get_player_name(), "mcl:acquireIron")
-		elseif stack:get_name() == "mcl_fishing:fish_cooked" then
-			awards.unlock(player:get_player_name(), "mcl:cookFish")
-		end
-		give_xp(pos, player)
-	end
-end
-
-local function on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
-	if from_list == "dst" then
-		give_xp(pos, player)
-	end
-end
-
-local function spawn_flames(pos, param2)
-	local minrelpos, maxrelpos
-	local dir = minetest.facedir_to_dir(param2)
-	if dir.x > 0 then
-		minrelpos = { x = -0.6, y = -0.05, z = -0.25 }
-		maxrelpos = { x = -0.55, y = -0.45, z = 0.25 }
-	elseif dir.x < 0 then
-		minrelpos = { x = 0.55, y = -0.05, z = -0.25 }
-		maxrelpos = { x = 0.6, y = -0.45, z = 0.25 }
-	elseif dir.z > 0 then
-		minrelpos = { x = -0.25, y = -0.05, z = -0.6 }
-		maxrelpos = { x = 0.25, y = -0.45, z = -0.55 }
-	elseif dir.z < 0 then
-		minrelpos = { x = -0.25, y = -0.05, z = 0.55 }
-		maxrelpos = { x = 0.25, y = -0.45, z = 0.6 }
-	else
-		return
-	end
-	mcl_particles.add_node_particlespawner(pos, {
-		amount = 4,
-		time = 0,
-		minpos = vector.add(pos, minrelpos),
-		maxpos = vector.add(pos, maxrelpos),
-		minvel = { x = -0.01, y = 0, z = -0.01 },
-		maxvel = { x = 0.01, y = 0.1, z = 0.01 },
-		minexptime = 0.3,
-		maxexptime = 0.6,
-		minsize = 0.4,
-		maxsize = 0.8,
-		texture = "mcl_particles_flame.png",
-		glow = LIGHT_ACTIVE_FURNACE,
-	}, "low")
-end
-
-local function swap_node(pos, name)
-	local node = minetest.get_node(pos)
-	if node.name == name then
-		return
-	end
-	node.name = name
-	minetest.swap_node(pos, node)
-	if name == "mcl_furnaces:furnace_active" then
-		spawn_flames(pos, node.param2)
-	else
-		mcl_particles.delete_node_particlespawners(pos)
-	end
-end
-
-local function furnace_node_timer(pos, elapsed)
-	--
-	-- Inizialize metadata
-	--
-	local meta = minetest.get_meta(pos)
-	local fuel_time = meta:get_float("fuel_time") or 0
-	local src_time = meta:get_float("src_time") or 0
-	local src_item = meta:get_string("src_item") or ""
-	local fuel_totaltime = meta:get_float("fuel_totaltime") or 0
-
-	local inv = meta:get_inventory()
-	local srclist, fuellist
-
-	local cookable, cooked
-	local active = true
-	local fuel
-
-	srclist = inv:get_list("src")
-	fuellist = inv:get_list("fuel")
-
-	-- Check if src item has been changed
-	if srclist[1]:get_name() ~= src_item then
-		-- Reset cooking progress in this case
-		src_time = 0
-		src_item = srclist[1]:get_name()
-	end
-
-	local update = true
-	local elapsed_game_time = mcl_time.get_irl_seconds_passed_at_pos_or_nil(pos) or elapsed
-	while elapsed_game_time > 0.00001 and update do
-		--
-		-- Cooking
-		--
-
-		local el = elapsed_game_time
-
-		-- Check if we have cookable content: cookable
-		local aftercooked
-		cooked, aftercooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
-		cookable = cooked.time ~= 0
-		if cookable then
-			-- Successful cooking requires space in dst slot and time
-			if not inv:room_for_item("dst", cooked.item) then
-				cookable = false
-			end
-		end
-
-		if cookable then -- fuel lasts long enough, adjust el to cooking duration
-			el = math.min(el, cooked.time - src_time)
-		end
-
-		-- Check if we have enough fuel to burn
-		active = fuel_time < fuel_totaltime
-		if cookable and not active then
-			-- We need to get new fuel
-			local afterfuel
-			fuel, afterfuel = minetest.get_craft_result({method = "fuel", width = 1, items = fuellist})
-
-			if fuel.time == 0 then
-				-- No valid fuel in fuel list -- stop
-				fuel_totaltime = 0
-				src_time = 0
-				update = false
-			else
-				-- Take fuel from fuel list
-				inv:set_stack("fuel", 1, afterfuel.items[1])
-				fuel_time = 0
-				fuel_totaltime = fuel.time
-				el = math.min(el, fuel_totaltime)
-				active = true
-				fuellist = inv:get_list("fuel")
-			end
-		elseif active then
-			el = math.min(el, fuel_totaltime - fuel_time)
-			-- The furnace is currently active and has enough fuel
-			fuel_time = fuel_time + el
-		end
-
-		-- If there is a cookable item then check if it is ready yet
-		if cookable and active then
-			src_time = src_time + el
-			-- Place result in dst list if done
-			if src_time >= cooked.time then
-				inv:add_item("dst", cooked.item)
-				inv:set_stack("src", 1, aftercooked.items[1])
-
-				-- Unique recipe: Pour water into empty bucket after cooking wet sponge successfully
-				if inv:get_stack("fuel", 1):get_name() == "mcl_buckets:bucket_empty" then
-					if srclist[1]:get_name() == "mcl_sponges:sponge_wet" then
-						inv:set_stack("fuel", 1, "mcl_buckets:bucket_water")
-						fuellist = inv:get_list("fuel")
-					-- Also for river water
-					elseif srclist[1]:get_name() == "mcl_sponges:sponge_wet_river_water" then
-						inv:set_stack("fuel", 1, "mcl_buckets:bucket_river_water")
-						fuellist = inv:get_list("fuel")
-					end
-				end
-
-				srclist = inv:get_list("src")
-				src_time = 0
-
-				meta:set_int("xp", meta:get_int("xp") + 1)		-- ToDo give each recipe an idividial XP count
-			end
-		end
-
-		elapsed_game_time = elapsed_game_time - el
-	end
-
-	if fuel and fuel_totaltime > fuel.time then
-		fuel_totaltime = fuel.time
-	end
-	if srclist and srclist[1]:is_empty() then
-		src_time = 0
-	end
-
-	--
-	-- Update formspec and node
-	--
-	local formspec = inactive_formspec
-	local item_percent = 0
-	if cookable then
-		item_percent = math.floor(src_time / cooked.time * 100)
-	end
-
-	local result = false
-
-	if active then
-		local fuel_percent = 0
-		if fuel_totaltime > 0 then
-			fuel_percent = math.floor(fuel_time / fuel_totaltime * 100)
-		end
-		formspec = active_formspec(fuel_percent, item_percent)
-		swap_node(pos, "mcl_furnaces:furnace_active")
-		-- make sure timer restarts automatically
-		result = true
-	else
-		swap_node(pos, "mcl_furnaces:furnace")
-		-- stop timer on the inactive furnace
-		minetest.get_node_timer(pos):stop()
-	end
-
-	--
-	-- Set meta values
-	--
-	meta:set_float("fuel_totaltime", fuel_totaltime)
-	meta:set_float("fuel_time", fuel_time)
-	meta:set_float("src_time", src_time)
-	if srclist then
-		 meta:set_string("src_item", src_item)
-	else
-		 meta:set_string("src_item", "")
-	end
-	meta:set_string("formspec", formspec)
-
-	return result
-end
-
-local on_rotate, after_rotate_active
-if minetest.get_modpath("screwdriver") then
-	on_rotate = screwdriver.rotate_simple
-	after_rotate_active = function(pos)
-		local node = minetest.get_node(pos)
-		mcl_particles.delete_node_particlespawners(pos)
-		if node.name == "mcl_furnaces:furnace" then
-			return
-		end
-		spawn_flames(pos, node.param2)
-	end
-end
-
-minetest.register_node("mcl_furnaces:furnace", {
-	description = S("Furnace"),
-	_tt_help = S("Uses fuel to smelt or cook items"),
-	_doc_items_longdesc = S("Furnaces cook or smelt several items, using a furnace fuel, into something else."),
-	_doc_items_usagehelp =
-			S([[
-				Use the furnace to open the furnace menu.
-				Place a furnace fuel in the lower slot and the source material in the upper slot.
-				The furnace will slowly use its fuel to smelt the item.
-				The result will be placed into the output slot at the right side.
-			]]).."\n"..
-			S("Use the recipe book to see what you can smelt, what you can use as fuel and how long it will burn."),
-	_doc_items_hidden = false,
-	tiles = {
-		"default_furnace_top.png", "default_furnace_bottom.png",
-		"default_furnace_side.png", "default_furnace_side.png",
-		"default_furnace_side.png", "default_furnace_front.png"
-	},
-	paramtype2 = "facedir",
-	groups = {pickaxey=1, container=4, deco_block=1, material_stone=1},
-	is_ground_content = false,
-	sounds = mcl_sounds.node_sound_stone_defaults(),
-
-	on_timer = furnace_node_timer,
-	after_dig_node = function(pos, oldnode, oldmetadata, digger)
-		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,
-
-	on_construct = function(pos)
-		local meta = minetest.get_meta(pos)
-		meta:set_string("formspec", inactive_formspec)
-		local inv = meta:get_inventory()
-		inv:set_size("src", 1)
-		inv:set_size("fuel", 1)
-		inv:set_size("dst", 1)
-	end,
-	on_destruct = function(pos)
-		mcl_particles.delete_node_particlespawners(pos)
-		give_xp(pos)
-	end,
-
-	on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
-		-- Reset accumulated game time when player works with furnace:
-		mcl_time.touch(pos)
-		minetest.get_node_timer(pos):start(1.0)
-
-		on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
-	end,
-	on_metadata_inventory_put = function(pos)
-		-- Reset accumulated game time when player works with furnace:
-		mcl_time.touch(pos)
-		-- start timer function, it will sort out whether furnace can burn or not.
-		minetest.get_node_timer(pos):start(1.0)
-	end,
-	on_metadata_inventory_take = function(pos, listname, index, stack, player)
-		-- Reset accumulated game time when player works with furnace:
-		mcl_time.touch(pos)
-		-- start timer function, it will helpful if player clears dst slot
-		minetest.get_node_timer(pos):start(1.0)
-
-		on_metadata_inventory_take(pos, listname, index, stack, player)
-	end,
-
-	allow_metadata_inventory_put = allow_metadata_inventory_put,
-	allow_metadata_inventory_move = allow_metadata_inventory_move,
-	allow_metadata_inventory_take = allow_metadata_inventory_take,
-	on_receive_fields = receive_fields,
-	_mcl_blast_resistance = 3.5,
-	_mcl_hardness = 3.5,
-	on_rotate = on_rotate,
-})
-
-minetest.register_node("mcl_furnaces:furnace_active", {
-	description = S("Burning Furnace"),
-	_doc_items_create_entry = false,
-	tiles = {
-		"default_furnace_top.png", "default_furnace_bottom.png",
-		"default_furnace_side.png", "default_furnace_side.png",
-		"default_furnace_side.png", "default_furnace_front_active.png",
-	},
-	paramtype2 = "facedir",
-	paramtype = "light",
-	light_source = LIGHT_ACTIVE_FURNACE,
-	drop = "mcl_furnaces:furnace",
-	groups = {pickaxey=1, container=4, deco_block=1, not_in_creative_inventory=1, material_stone=1},
-	is_ground_content = false,
-	sounds = mcl_sounds.node_sound_stone_defaults(),
-	on_timer = furnace_node_timer,
-
-	after_dig_node = function(pos, oldnode, oldmetadata, digger)
-		local meta = minetest.get_meta(pos)
-		local meta2 = meta
-		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:to_table())
-	end,
-
-	on_construct = function(pos)
-		local node = minetest.get_node(pos)
-		spawn_flames(pos, node.param2)
-	end,
-	on_destruct = function(pos)
-		mcl_particles.delete_node_particlespawners(pos)
-		give_xp(pos)
-	end,
-
-	allow_metadata_inventory_put = allow_metadata_inventory_put,
-	allow_metadata_inventory_move = allow_metadata_inventory_move,
-	allow_metadata_inventory_take = allow_metadata_inventory_take,
-	on_metadata_inventory_move = on_metadata_inventory_move,
-	on_metadata_inventory_take = on_metadata_inventory_take,
-	on_receive_fields = receive_fields,
-	_mcl_blast_resistance = 3.5,
-	_mcl_hardness = 3.5,
-	on_rotate = on_rotate,
-	after_rotate = after_rotate_active,
-})
-
-minetest.register_craft({
-	output = "mcl_furnaces:furnace",
-	recipe = {
-		{ "mcl_core:cobble", "mcl_core:cobble", "mcl_core:cobble" },
-		{ "mcl_core:cobble", "", "mcl_core:cobble" },
-		{ "mcl_core:cobble", "mcl_core:cobble", "mcl_core:cobble" },
-	}
-})
-
--- Add entry alias for the Help
-if minetest.get_modpath("doc") then
-	doc.add_entry_alias("nodes", "mcl_furnaces:furnace", "nodes", "mcl_furnaces:furnace_active")
-end
-
-minetest.register_lbm({
-	label = "Active furnace flame particles",
-	name = "mcl_furnaces:flames",
-	nodenames = {"mcl_furnaces:furnace_active"},
-	run_at_every_load = true,
-	action = function(pos, node)
-		spawn_flames(pos, node.param2)
-	end,
-})
-
--- Legacy
-minetest.register_lbm({
-	label = "Update furnace formspecs (0.60.0)",
-	name = "mcl_furnaces:update_formspecs_0_60_0",
-	-- Only update inactive furnaces because active ones should update themselves
-	nodenames = { "mcl_furnaces:furnace" },
-	run_at_every_load = false,
-	action = function(pos, node)
-		local meta = minetest.get_meta(pos)
-		meta:set_string("formspec", inactive_formspec)
-	end,
-})

mods/ITEMS/mcl_furnaces/smoker.lua

@@ -0,0 +1,549 @@
+
+local S = minetest.get_translator(minetest.get_current_modname())
+
+local LIGHT_ACTIVE_FURNACE = 13
+
+--
+-- Formspecs
+--
+
+local function active_formspec(fuel_percent, item_percent)
+	return "size[9,8.75]"..
+	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
+	"list[current_player;main;0,4.5;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
+	"list[current_player;main;0,7.74;9,1;]"..
+	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
+	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Smoker"))).."]"..
+	"list[context;src;2.75,0.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
+	"list[context;fuel;2.75,2.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
+	"list[context;dst;5.75,1.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
+	"image[2.75,1.5;1,1;default_furnace_fire_bg.png^[lowpart:"..
+	(100-fuel_percent)..":default_furnace_fire_fg.png]"..
+	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[lowpart:"..
+	(item_percent)..":gui_furnace_arrow_fg.png^[transformR270]"..
+	-- Craft guide button temporarily removed due to Minetest bug.
+	-- TODO: Add it back when the Minetest bug is fixed.
+	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
+	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
+	"listring[context;dst]"..
+	"listring[current_player;main]"..
+	"listring[context;src]"..
+	"listring[current_player;main]"..
+	"listring[context;fuel]"..
+	"listring[current_player;main]"
+end
+
+local inactive_formspec = "size[9,8.75]"..
+	"label[0,4;"..minetest.formspec_escape(minetest.colorize("#313131", S("Inventory"))).."]"..
+	"list[current_player;main;0,4.5;9,3;9]"..
+	mcl_formspec.get_itemslot_bg(0,4.5,9,3)..
+	"list[current_player;main;0,7.74;9,1;]"..
+	mcl_formspec.get_itemslot_bg(0,7.74,9,1)..
+	"label[2.75,0;"..minetest.formspec_escape(minetest.colorize("#313131", S("Smoker"))).."]"..
+	"list[context;src;2.75,0.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,0.5,1,1)..
+	"list[context;fuel;2.75,2.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(2.75,2.5,1,1)..
+	"list[context;dst;5.75,1.5;1,1;]"..
+	mcl_formspec.get_itemslot_bg(5.75,1.5,1,1)..
+	"image[2.75,1.5;1,1;default_furnace_fire_bg.png]"..
+	"image[4.1,1.5;1.5,1;gui_furnace_arrow_bg.png^[transformR270]"..
+	-- Craft guide button temporarily removed due to Minetest bug.
+	-- TODO: Add it back when the Minetest bug is fixed.
+	--"image_button[8,0;1,1;craftguide_book.png;craftguide;]"..
+	--"tooltip[craftguide;"..minetest.formspec_escape(S("Recipe book")).."]"..
+	"listring[context;dst]"..
+	"listring[current_player;main]"..
+	"listring[context;src]"..
+	"listring[current_player;main]"..
+	"listring[context;fuel]"..
+	"listring[current_player;main]"
+
+local receive_fields = function(pos, formname, fields, sender)
+	if fields.craftguide then
+		mcl_craftguide.show(sender:get_player_name())
+	end
+end
+
+local function give_xp(pos, player)
+	local meta = minetest.get_meta(pos)
+	local dir = vector.divide(minetest.facedir_to_dir(minetest.get_node(pos).param2),-1.95)
+	local xp = meta:get_int("xp")
+	if xp > 0 then
+		if player then
+			mcl_experience.add_xp(player, xp)
+		else
+			mcl_experience.throw_xp(vector.add(pos, dir), xp)
+		end
+		meta:set_int("xp", 0)
+	end
+end
+
+--
+-- Node callback functions that are the same for active and inactive furnace
+--
+
+local function allow_metadata_inventory_put(pos, listname, index, stack, player)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return 0
+	end
+	local meta = minetest.get_meta(pos)
+	local inv = meta:get_inventory()
+	if listname == "fuel" then
+				return 0
+		end
+
+		-- Test stack with size 1 because we burn one fuel at a time
+		local teststack = ItemStack(stack)
+		teststack:set_count(1)
+		local output, decremented_input = minetest.get_craft_result({method="fuel", width=1, items={teststack}})
+		if output.time ~= 0 then
+			-- Only allow to place 1 item if fuel get replaced by recipe.
+			-- This is the case for lava buckets.
+			local replace_item = decremented_input.items[1]
+			if replace_item:is_empty() then
+				-- For most fuels, just allow to place everything
+				return stack:get_count()
+			else
+				if inv:get_stack(listname, index):get_count() == 0 then
+					return 1
+				else
+					return 0
+				end
+			end
+		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)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return 0
+	end
+	return stack:get_count()
+end
+
+local function on_metadata_inventory_take(pos, listname, index, stack, player)
+	-- Award smelting achievements
+	if listname == "dst" then
+		if stack:get_name() == "mcl_fishing:fish_cooked" then
+			awards.unlock(player:get_player_name(), "mcl:cookFish")
+		end
+		give_xp(pos, player)
+	end
+end
+
+local function on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+	if from_list == "dst" then
+		give_xp(pos, player)
+	end
+end
+
+local function spawn_flames(pos, param2)
+	local minrelpos, maxrelpos
+	local dir = minetest.facedir_to_dir(param2)
+	if dir.x > 0 then
+		minrelpos = { x = -0.6, y = -0.05, z = -0.25 }
+		maxrelpos = { x = -0.55, y = -0.45, z = 0.25 }
+	elseif dir.x < 0 then
+		minrelpos = { x = 0.55, y = -0.05, z = -0.25 }
+		maxrelpos = { x = 0.6, y = -0.45, z = 0.25 }
+	elseif dir.z > 0 then
+		minrelpos = { x = -0.25, y = -0.05, z = -0.6 }
+		maxrelpos = { x = 0.25, y = -0.45, z = -0.55 }
+	elseif dir.z < 0 then
+		minrelpos = { x = -0.25, y = -0.05, z = 0.55 }
+		maxrelpos = { x = 0.25, y = -0.45, z = 0.6 }
+	else
+		return
+	end
+	mcl_particles.add_node_particlespawner(pos, {
+		amount = 4,
+		time = 0,
+		minpos = vector.add(pos, minrelpos),
+		maxpos = vector.add(pos, maxrelpos),
+		minvel = { x = -0.01, y = 0, z = -0.01 },
+		maxvel = { x = 0.01, y = 0.1, z = 0.01 },
+		minexptime = 0.3,
+		maxexptime = 0.6,
+		minsize = 0.4,
+		maxsize = 0.8,
+		texture = "mcl_particles_flame.png",
+		glow = LIGHT_ACTIVE_FURNACE,
+	}, "low")
+end
+
+local function swap_node(pos, name)
+	local node = minetest.get_node(pos)
+	if node.name == name then
+		return
+	end
+	node.name = name
+	minetest.swap_node(pos, node)
+	if name == "mcl_furnaces:smoker_active" then
+		spawn_flames(pos, node.param2)
+	else
+		mcl_particles.delete_node_particlespawners(pos)
+	end
+end
+
+local function furnace_node_timer(pos, elapsed)
+	--
+	-- Inizialize metadata
+	--
+	local meta = minetest.get_meta(pos)
+	local fuel_time = meta:get_float("fuel_time") or 0
+	local src_time = meta:get_float("src_time") or 0
+	local src_item = meta:get_string("src_item") or ""
+	local fuel_totaltime = meta:get_float("fuel_totaltime") or 0
+
+	local inv = meta:get_inventory()
+	local srclist, fuellist
+
+	local cookable, cooked
+	local active = true
+	local fuel
+
+	srclist = inv:get_list("src")
+	fuellist = inv:get_list("fuel")
+
+	-- Check if src item has been changed
+	if srclist[1]:get_name() ~= src_item then
+		-- Reset cooking progress in this case
+		src_time = 0
+		src_item = srclist[1]:get_name()
+	end
+
+	local update = true
+	local elapsed_game_time = mcl_time.get_irl_seconds_passed_at_pos_or_nil(pos) or elapsed
+	while elapsed_game_time > 0.00001 and update do
+		--
+		-- Cooking
+		--
+
+		local el = elapsed_game_time
+
+		-- Check if we have cookable content: cookable
+		local aftercooked
+		cooked, aftercooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+		cookable = false
+		cookableItems = {"mcl_fishing:fish_raw", "mcl_fishing:salmon_raw", "mcl_farming:potato_item", "mcl_mobitems:mutton", "mcl_mobitems:beef", "mcl_mobitems:chicken", "mcl_mobitems:porkchop", "mcl_mobitems:rabbit"}
+			--for _, item in ipairs(cookableItems) do
+			for _,item in ipairs(cookableItems) do
+			local stack = inv:get_stack("src",1)
+				if stack:get_name() == item then
+					cookable = true
+				end
+			end 
+		if cookable then
+			-- Successful cooking requires space in dst slot and time
+			if not inv:room_for_item("dst", cooked.item) then
+				cookable = false
+			end
+		end
+
+		if cookable then -- fuel lasts long enough, adjust el to cooking duration
+			el = math.min(el, cooked.time - src_time)
+		end
+
+		-- Check if we have enough fuel to burn
+		active = fuel_time < fuel_totaltime
+		if cookable and not active then
+			-- We need to get new fuel
+			local afterfuel
+			fuel, afterfuel = minetest.get_craft_result({method = "fuel", width = 1, items = fuellist})
+
+			if fuel.time == 0 then
+				-- No valid fuel in fuel list -- stop
+				fuel_totaltime = 0
+				src_time = 0
+				update = false
+			else
+				-- Take fuel from fuel list
+				inv:set_stack("fuel", 1, afterfuel.items[1])
+				fuel_time = 0
+				fuel_totaltime = fuel.time
+				el = math.min(el, fuel_totaltime)
+				active = true
+				fuellist = inv:get_list("fuel")
+			end
+		elseif active then
+			el = math.min(el, fuel_totaltime - fuel_time)
+			-- The furnace is currently active and has enough fuel
+			fuel_time = fuel_time + el
+		end
+
+		-- If there is a cookable item then check if it is ready yet
+		if cookable and active then
+		-- in the src_time variable, the *1.5 is the multiplication that makes the smoker work faster than a normal furnace. I (PrairieWind) have it at 1.5 times faster, but it can be OP and 2 times faster, or 1.2 times faster. All are good numbers.
+			src_time = (src_time + el)*1.5
+			-- Place result in dst list if done
+			if src_time >= cooked.time then
+				inv:add_item("dst", cooked.item)
+				inv:set_stack("src", 1, aftercooked.items[1])
+
+				srclist = inv:get_list("src")
+				src_time = 0
+
+				meta:set_int("xp", meta:get_int("xp") + 1)		-- ToDo give each recipe an idividial XP count
+			end
+		end
+
+		elapsed_game_time = elapsed_game_time - el
+	end
+
+	if fuel and fuel_totaltime > fuel.time then
+		fuel_totaltime = fuel.time
+	end
+	if srclist and srclist[1]:is_empty() then
+		src_time = 0
+	end
+
+	--
+	-- Update formspec and node
+	--
+	local formspec = inactive_formspec
+	local item_percent = 0
+	if cookable then
+		item_percent = math.floor(src_time / cooked.time * 100)
+	end
+
+	local result = false
+
+	if active then
+		local fuel_percent = 0
+		if fuel_totaltime > 0 then
+			fuel_percent = math.floor(fuel_time / fuel_totaltime * 100)
+		end
+		formspec = active_formspec(fuel_percent, item_percent)
+		swap_node(pos, "mcl_furnaces:smoker_active")
+		-- make sure timer restarts automatically
+		result = true
+	else
+		swap_node(pos, "mcl_furnaces:smoker")
+		-- stop timer on the inactive furnace
+		minetest.get_node_timer(pos):stop()
+	end
+
+	--
+	-- Set meta values
+	--
+	meta:set_float("fuel_totaltime", fuel_totaltime)
+	meta:set_float("fuel_time", fuel_time)
+	meta:set_float("src_time", src_time)
+	if srclist then
+		 meta:set_string("src_item", src_item)
+	else
+		 meta:set_string("src_item", "")
+	end
+	meta:set_string("formspec", formspec)
+
+	return result
+end
+
+local on_rotate, after_rotate_active
+if minetest.get_modpath("screwdriver") then
+	on_rotate = screwdriver.rotate_simple
+	after_rotate_active = function(pos)
+		local node = minetest.get_node(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		if node.name == "mcl_furnaces:smoker" then
+			return
+		end
+		spawn_flames(pos, node.param2)
+	end
+end
+
+minetest.register_node("mcl_furnaces:smoker", {
+	description = S("Smoker"),
+	_tt_help = S("Uses fuel to smelt or cook items"),
+	_doc_items_longdesc = S("Smokers cook or smelt several items, using a furnace fuel, into something else, but faster than a normal furnace."),
+	_doc_items_usagehelp =
+			S([[
+				Use the furnace to open the furnace menu.
+				Place a furnace fuel in the lower slot and the source material in the upper slot.
+				The furnace will slowly use its fuel to smelt the item.
+				The result will be placed into the output slot at the right side.
+			]]).."\n"..
+			S("Use the recipe book to see what you can smelt, what you can use as fuel and how long it will burn."),
+	_doc_items_hidden = false,
+	tiles = {
+		"smoker_top.png", "smoker_top.png",
+		"smoker_side.png", "smoker_side.png",
+		"smoker_side.png", "smoker_front.png"
+	},
+	paramtype2 = "facedir",
+	groups = {pickaxey=1, container=4, deco_block=1, material_stone=1},
+	is_ground_content = false,
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+
+	on_timer = furnace_node_timer,
+	after_dig_node = function(pos, oldnode, oldmetadata, digger)
+		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,
+
+	on_construct = function(pos)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", inactive_formspec)
+		local inv = meta:get_inventory()
+		inv:set_size("src", 1)
+		inv:set_size("fuel", 1)
+		inv:set_size("dst", 1)
+	end,
+	on_destruct = function(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		give_xp(pos)
+	end,
+
+	on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		minetest.get_node_timer(pos):start(1.0)
+
+		on_metadata_inventory_move(pos, from_list, from_index, to_list, to_index, count, player)
+	end,
+	on_metadata_inventory_put = function(pos)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		-- start timer function, it will sort out whether furnace can burn or not.
+		minetest.get_node_timer(pos):start(1.0)
+	end,
+	on_metadata_inventory_take = function(pos, listname, index, stack, player)
+		-- Reset accumulated game time when player works with furnace:
+		mcl_time.touch(pos)
+		-- start timer function, it will helpful if player clears dst slot
+		minetest.get_node_timer(pos):start(1.0)
+
+		on_metadata_inventory_take(pos, listname, index, stack, player)
+	end,
+
+	allow_metadata_inventory_put = allow_metadata_inventory_put,
+	allow_metadata_inventory_move = allow_metadata_inventory_move,
+	allow_metadata_inventory_take = allow_metadata_inventory_take,
+	on_receive_fields = receive_fields,
+	_mcl_blast_resistance = 3.5,
+	_mcl_hardness = 3.5,
+	on_rotate = on_rotate,
+})
+
+minetest.register_node("mcl_furnaces:smoker_active", {
+	description = S("Burning Furnace"),
+	_doc_items_create_entry = false,
+	tiles = {
+		"smoker_top.png", "smoker_top.png",
+		"smoker_side.png", "smoker_side.png",
+		"smoker_side.png", {name = "smoker_front_on.png",
+				animation = {type = "vertical_frames", aspect_w = 16, aspect_h = 16, length = 48}},
+	},
+	paramtype2 = "facedir",
+	paramtype = "light",
+	light_source = LIGHT_ACTIVE_FURNACE,
+	drop = "mcl_furnaces:smoker",
+	groups = {pickaxey=1, container=4, deco_block=1, not_in_creative_inventory=1, material_stone=1},
+	is_ground_content = false,
+	sounds = mcl_sounds.node_sound_stone_defaults(),
+	on_timer = furnace_node_timer,
+
+	after_dig_node = function(pos, oldnode, oldmetadata, digger)
+		local meta = minetest.get_meta(pos)
+		local meta2 = meta
+		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:to_table())
+	end,
+
+	on_construct = function(pos)
+		local node = minetest.get_node(pos)
+		spawn_flames(pos, node.param2)
+	end,
+	on_destruct = function(pos)
+		mcl_particles.delete_node_particlespawners(pos)
+		give_xp(pos)
+	end,
+
+	allow_metadata_inventory_put = allow_metadata_inventory_put,
+	allow_metadata_inventory_move = allow_metadata_inventory_move,
+	allow_metadata_inventory_take = allow_metadata_inventory_take,
+	on_metadata_inventory_move = on_metadata_inventory_move,
+	on_metadata_inventory_take = on_metadata_inventory_take,
+	on_receive_fields = receive_fields,
+	_mcl_blast_resistance = 3.5,
+	_mcl_hardness = 3.5,
+	on_rotate = on_rotate,
+	after_rotate = after_rotate_active,
+})
+
+minetest.register_craft({
+	output = "mcl_furnaces:smoker",
+	recipe = {
+		{ "", "group:tree", "" },
+		{ "group:tree", "mcl_furnaces:furnace", "group:tree" },
+		{ "", "group:tree", "" },
+	}
+})
+
+-- Add entry alias for the Help
+if minetest.get_modpath("doc") then
+	doc.add_entry_alias("nodes", "mcl_furnaces:smoker", "nodes", "mcl_furnaces:smoker_active")
+end
+
+minetest.register_lbm({
+	label = "Active furnace flame particles",
+	name = "mcl_furnaces:flames",
+	nodenames = {"mcl_furnaces:smoker_active"},
+	run_at_every_load = true,
+	action = function(pos, node)
+		spawn_flames(pos, node.param2)
+	end,
+})
+
+-- Legacy
+minetest.register_lbm({
+	label = "Update furnace formspecs (0.60.0)",
+	name = "mcl_furnaces:update_formspecs_0_60_0",
+	-- Only update inactive furnaces because active ones should update themselves
+	nodenames = { "mcl_furnaces:smoker" },
+	run_at_every_load = false,
+	action = function(pos, node)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", inactive_formspec)
+	end,
+})