Publish

init.lua

@@ -0,0 +1,225 @@
+
+-- A solar furnace is an auxiliary device which allows to use cooking recipes
+-- without fuel. The downside is half the speed of a fuel-consuming furnace 
+-- and the need to be exposed to maximal direct sunlight at all times (L = 15).
+
+
+local S = technic.getter
+
+minetest.register_craft({
+	output = 'technic_solar_furnace:solar_furnace',
+	recipe = {
+		{'technic:stainless_steel_ingot',	'technic:stainless_steel_ingot',	'technic:stainless_steel_ingot'},
+		{'technic:composite_plate',		'default:furnace',			'technic:composite_plate'},
+		{'technic:cast_iron_ingot',		'technic:cast_iron_ingot',		'technic:cast_iron_ingot'},
+	}
+})
+
+local machine_name = S("Solar Furnace")
+local formspec =
+	"size[8,9]"..
+	"label[0,0;"..machine_name.."]"..
+	"image[2,2;1,1;technic_power_meter_bg.png]"..
+	"list[current_name;src;2,1;1,1;]"..
+	"list[current_name;dst;5,1;2,2;]"..
+	"list[current_player;main;0,5;8,4;]"..
+	"listring[current_name;dst]"..
+	"listring[current_player;main]"..
+	"listring[current_name;src]"..
+	"listring[current_player;main]"
+
+
+local run_solar_furnace = function(pos, elapsed)
+
+	local meta = minetest.get_meta(pos)
+	local inv    = meta:get_inventory()
+	
+	local recipe = nil
+	elapsed = meta:get_int("elapsed")
+	if not elapsed then
+		meta:set_int("elapsed", 0)
+		elapsed = 0
+	end
+	
+	if not meta:get_int("cook_time") then
+		meta:set_int("cook_time", 0)
+	end
+	
+	local light_pos = {x = pos.x, y = pos.y + 1, z = pos.z}
+	
+	local powered = false
+	
+	local node = minetest.get_node_or_nil(light_pos)
+
+	if minetest.get_node_light(light_pos) == 15 and node.name == "air" then
+		powered = true
+	end
+	
+	local result = technic.get_recipe("cooking", inv:get_list("src"))
+	if result and result.time then
+		meta:set_int("cook_time", result.time * 2)
+	end
+	
+
+	
+	if powered then 
+
+		if result then
+			
+			if elapsed >= meta:get_int("cook_time") then
+				
+				local percent = 100
+				meta:set_string("infotext", S("%s is active"):format(machine_name).." ("..percent.."%)")
+				meta:set_string("formspec",
+								"size[8,9]"..
+									"label[0,0;"..machine_name.."]"..
+									"image[2,2;1,1;technic_power_meter_bg.png^[lowpart:" .. percent .. ":technic_power_meter_fg.png]"..
+									"list[current_name;src;2,1;1,1;]"..
+									"list[current_name;dst;5,1;2,2;]"..
+									"list[current_player;main;0,5;8,4;]"..
+									"listring[current_name;dst]"..
+									"listring[current_player;main]"..
+									"listring[current_name;src]"..
+									"listring[current_player;main]")
+				
+				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
+				
+				meta:set_int("elapsed", 0)
+				
+				local recipe = technic.get_recipe("cooking", inv:get_list("src"))
+
+				if not recipe then
+					meta:set_string("infotext", S("%s is empty"):format(machine_name))
+					technic.swap_node(pos, "technic_solar_furnace:solar_furnace")
+					meta:set_string("formspec", formspec)
+				end
+				
+			else
+
+				local percent = math.floor(elapsed / meta:get_int("cook_time") * 100)
+				if percent > 100 then
+					percent = 100
+				end
+				meta:set_string("infotext", S("%s is active"):format(machine_name).." ("..percent.."%)")
+				technic.swap_node(pos, "technic_solar_furnace:solar_furnace_active")
+				meta:set_string("formspec",
+								"size[8,9]"..
+									"label[0,0;"..machine_name.."]"..
+									"image[2,2;1,1;technic_power_meter_bg.png^[lowpart:" .. percent .. ":technic_power_meter_fg.png]"..
+									"list[current_name;src;2,1;1,1;]"..
+									"list[current_name;dst;5,1;2,2;]"..
+									"list[current_player;main;0,5;8,4;]"..
+									"listring[current_name;dst]"..
+									"listring[current_player;main]"..
+									"listring[current_name;src]"..
+									"listring[current_player;main]")
+				meta:set_int("elapsed", elapsed+1)
+				return true				
+			end
+		else
+			meta:set_int("elapsed", 0)
+			
+			meta:set_string("infotext", S("%s is empty"):format(machine_name))
+			technic.swap_node(pos, "technic_solar_furnace:solar_furnace")
+			meta:set_string("formspec", formspec)
+		end
+		
+	else
+
+		meta:set_int("elapsed", 0)
+		
+		meta:set_string("infotext", S("%s cannot function\nMust be in full direct sunlight"):format(machine_name))
+		technic.swap_node(pos, "technic_solar_furnace:solar_furnace")
+		meta:set_string("formspec", formspec)
+	end
+	
+	return true
+end
+    
+
+
+
+
+
+minetest.register_node("technic_solar_furnace:solar_furnace", {
+	description = machine_name,
+	drawtype = "nodebox",
+	node_box = {
+		type = "fixed",
+		fixed = {
+                     {-5/16, -1/2, -5/16, 5/16, 3/16, 5/16},
+                     {-1/2, 3/16, -1/2, 1/2, 1/2, 1/2},
+                     {-2/16, 1/2, -2/16, 2/16, 17/32, 2/16},
+			},
+	},
+	tiles = {"technic_solar_furnace_top.png",  "technic_solar_furnace_bottom.png",
+	         "technic_solar_furnace_side.png", "technic_solar_furnace_side.png",
+	         "technic_solar_furnace_side.png", "technic_solar_furnace_side.png"},
+	paramtype2 = "facedir",
+	groups = {cracky=2},
+	legacy_facedir_simple = true,
+	sounds = default.node_sound_stone_defaults(),
+	on_construct = function(pos)
+		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("src", 1)
+		inv:set_size("dst", 4)
+		meta:set_int("elapsed", 0)
+		meta:set_int("cook_time", 0)
+		minetest.get_node_timer(pos):start(1.0)
+	end,
+	on_metadata_inventory_move = function(pos)
+		minetest.get_node_timer(pos):start(1.0)
+	end,
+	on_metadata_inventory_put = function(pos)
+		-- start timer function, it will sort out whether furnace can burn or not.
+		minetest.get_node_timer(pos):start(1.0)
+	end,
+	can_dig = technic.machine_can_dig,
+	allow_metadata_inventory_put = technic.machine_inventory_put,
+	allow_metadata_inventory_take = technic.machine_inventory_take,
+	allow_metadata_inventory_move = technic.machine_inventory_move,
+	on_timer = run_solar_furnace
+})
+
+minetest.register_node("technic_solar_furnace:solar_furnace_active", {
+	description = machine_name,
+	drawtype = "nodebox",
+	node_box = {
+		type = "fixed",
+		fixed = {
+			{-5/16, -1/2, -5/16, 5/16, 3/16, 5/16},
+			{-1/2, 3/16, -1/2, 1/2, 1/2, 1/2},
+			{-2/16, 1/2, -2/16, 2/16, 17/32, 2/16},
+		},
+	},
+	tiles = {"technic_solar_furnace_top.png",  "technic_solar_furnace_bottom.png",
+	         "technic_solar_furnace_side.png", "technic_solar_furnace_side.png",
+	         "technic_solar_furnace_side.png", "technic_solar_furnace_side.png"},
+	paramtype2 = "facedir",
+	light_source = 14,
+	drop = "technic:solar_furnace",
+	groups = {cracky=2, not_in_creative_inventory=1},
+	legacy_facedir_simple = true,
+	sounds = default.node_sound_stone_defaults(),
+	can_dig = technic.machine_can_dig,
+	allow_metadata_inventory_put = technic.machine_inventory_put,
+	allow_metadata_inventory_take = technic.machine_inventory_take,
+	allow_metadata_inventory_move = technic.machine_inventory_move,
+	on_timer = run_solar_furnace,
+	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,
+
+})
+
+

mod.conf

@@ -0,0 +1 @@
+depends = default, technic