game/technic.git

			@@ -12,8 +12,18 @@
			}
			})

			local machine_name = S("Fuel-Fired Alloy Furnace")
			local formspec =
			"size[8,9]"..
			"label[0,0;"..machine_name.."]"..
			"image[2,2;1,1;default_furnace_fire_bg.png]"..
			"list[current_name;fuel;2,3;1,1;]"..
			"list[current_name;src;2,1;2,1;]"..
			"list[current_name;dst;5,1;2,2;]"..
			"list[current_player;main;0,5;8,4;]"

			minetest.register_node("technic:coal_alloy_furnace", {
			description = S("Fuel-Fired Alloy Furnace"),
			description = machine_name,
			tiles = {"technic_coal_alloy_furnace_top.png", "technic_coal_alloy_furnace_bottom.png",
			"technic_coal_alloy_furnace_side.png", "technic_coal_alloy_furnace_side.png",
			"technic_coal_alloy_furnace_side.png", "technic_coal_alloy_furnace_front.png"},
			@@ -22,13 +32,12 @@
			legacy_facedir_simple = true,
			sounds = default.node_sound_stone_defaults(),
			on_construct = function(pos)
			local meta = minetest.env:get_meta(pos)
			meta:set_string("formspec", coal_alloy_furnace_formspec)
			meta:set_string("infotext", S("Fuel-Fired Alloy Furnace"))
			local meta = minetest.get_meta(pos)
			meta:set_string("formspec", formspec)
			meta:set_string("infotext", machine_name)
			local inv = meta:get_inventory()
			inv:set_size("fuel", 1)
			inv:set_size("src", 1)
			inv:set_size("src2", 1)
			inv:set_size("src", 2)
			inv:set_size("dst", 4)
			end,
			can_dig = technic.machine_can_dig,
			@@ -38,7 +47,7 @@
			})

			minetest.register_node("technic:coal_alloy_furnace_active", {
			description = S("Fuel-Fired Alloy Furnace"),
			description = machine_name,
			tiles = {"technic_coal_alloy_furnace_top.png", "technic_coal_alloy_furnace_bottom.png",
			"technic_coal_alloy_furnace_side.png", "technic_coal_alloy_furnace_side.png",
			"technic_coal_alloy_furnace_side.png", "technic_coal_alloy_furnace_front_active.png"},
			@@ -61,17 +70,14 @@
			action = function(pos, node, active_object_count, active_object_count_wider)
			local meta = minetest.get_meta(pos)
			local inv = meta:get_inventory()

			if inv:get_size("src") == 1 then -- Old furnace -> convert it
			inv:set_size("src", 2)
			inv:set_stack("src", 2, inv:get_stack("src2", 1))
			inv:set_size("src2", 0)
			end

			local recipe = nil
			local machine_name = S("Fuel-Fired Alloy Furnace")
			local formspec =
			"size[8,9]"..
			"label[0,0;"..machine_name.."]"..
			"image[2,2;1,1;default_furnace_fire_bg.png]"..
			"list[current_name;fuel;2,3;1,1;]"..
			"list[current_name;src;2,1;1,1;]"..
			"list[current_name;src2;3,1;1,1;]"..
			"list[current_name;dst;5,1;2,2;]"..
			"list[current_player;main;0,5;8,4;]"

			for i, name in pairs({
			"fuel_totaltime",
			@@ -84,33 +90,22 @@
			end

			-- Get what to cook if anything
			local srcstack = inv:get_stack("src", 1)
			local src2stack = inv:get_stack("src2", 1)
			local recipe = technic.get_alloy_recipe(srcstack, src2stack)
			if srcstack:get_name() > src2stack:get_name() then
			local temp = srcstack
			srcstack = src2stack
			src2stack = temp
			end
			local result = technic.get_recipe("alloy", inv:get_list("src"))

			local was_active = false

			if meta:get_float("fuel_time") < meta:get_float("fuel_totaltime") then
			was_active = true
			meta:set_int("fuel_time", meta:get_int("fuel_time") + 1)
			if recipe then
			if result then
			meta:set_int("src_time", meta:get_int("src_time") + 1)
			if meta:get_int("src_time") == 6 then
			-- check if there's room for output in "dst" list
			local dst_stack = ItemStack(recipe.output)
			if inv:room_for_item("dst", dst_stack) then
			srcstack:take_item(recipe.input[1].count)
			inv:set_stack("src", 1, srcstack)
			src2stack:take_item(recipe.input[2].count)
			inv:set_stack("src2", 1, src2stack)
			inv:add_item("dst", dst_stack)
			end
			if meta:get_int("src_time") >= result.time then
			meta:set_int("src_time", 0)
			local result_stack = ItemStack(result.output)
			if inv:room_for_item("dst", result_stack) then
			inv:set_list("src", result.new_input)
			inv:add_item("dst", result_stack)
			end
			end
			else
			meta:set_int("src_time", 0)
			@@ -128,22 +123,17 @@
			"image[2,2;1,1;default_furnace_fire_bg.png^[lowpart:"..
			(100 - percent)..":default_furnace_fire_fg.png]"..
			"list[current_name;fuel;2,3;1,1;]"..
			"list[current_name;src;2,1;1,1;]"..
			"list[current_name;src2;3,1;1,1;]"..
			"list[current_name;src;2,1;2,1;]"..
			"list[current_name;dst;5,1;2,2;]"..
			"list[current_player;main;0,5;8,4;]")
			return
			end

			-- FIXME: Make this look more like the electrical version.
			-- This code refetches the recipe to see if it can be done again after the iteration
			srcstack = inv:get_stack("src", 1)
			srcstack = inv:get_stack("src2", 1)
			local recipe = technic.get_alloy_recipe(srcstack, src2stack)
			local recipe = technic.get_recipe("alloy", inv:get_list("src"))

			if recipe then
			if not recipe then
			if was_active then
			meta:set_string("infotext", "Furnace is empty")
			meta:set_string("infotext", S("%s is empty"):format(machine_name))
			technic.swap_node(pos, "technic:coal_alloy_furnace")
			meta:set_string("formspec", formspec)
			end
			@@ -152,10 +142,11 @@

			-- Next take a hard look at the fuel situation
			local fuel = nil
			local afterfuel
			local fuellist = inv:get_list("fuel")

			if fuellist then
			fuel = minetest.get_craft_result({method = "fuel", width = 1, items = fuellist})
			fuel, afterfuel = minetest.get_craft_result({method = "fuel", width = 1, items = fuellist})
			end

			if fuel.time <= 0 then
			@@ -168,9 +159,7 @@
			meta:set_string("fuel_totaltime", fuel.time)
			meta:set_string("fuel_time", 0)

			local stack = inv:get_stack("fuel", 1)
			stack:take_item()
			inv:set_stack("fuel", 1, stack)
			inv:set_stack("fuel", 1, afterfuel.items[1])
			end,
			})