X-Git-Url: https://git.lizzy.rs/?a=blobdiff_plain;f=workbench.lua;h=ccf1918cb95f7f135174780c1b80501ae5d1f9de;hb=beeda8cb9becef5811808ddaa0d2525a147076cb;hp=c77ff79d4744a3d07148e80be56d78cf0d14700d;hpb=669d495742d08847aca9d1b58a660ae65848ae1c;p=xdecor.git

diff --git a/workbench.lua b/workbench.lua
index c77ff79..ccf1918 100644
--- a/workbench.lua
+++ b/workbench.lua
@@ -1,115 +1,273 @@
--- Repair Tool's code by Krock, modified by kilbith
+local workbench = {}
+screwdriver = screwdriver or {}
 
-xdecor.register("workbench", {
-	description = "Work Bench", infotext = "Work Bench",
-	sounds = default.node_sound_wood_defaults(), groups = {snappy=3}, 
-	tiles = {"xdecor_workbench_top.png", "xdecor_workbench_top.png", 
-		"xdecor_workbench_sides.png", "xdecor_workbench_sides.png",
-		"xdecor_workbench_front.png", "xdecor_workbench_front.png"},
-	on_construct = function(pos)
-		local meta = minetest.get_meta(pos)
-		meta:set_string("formspec", "size[8,7;]"..fancy_gui..
-			"label[0,0;Cut your wood into...]"..
-			"label[0,1.5;Input]"..
-			"list[current_name;input;0,2;1,1;]"..
-			"image[1,2;1,1;xdecor_saw.png]"..
-			"label[2,1.5;Output]"..
-			"list[current_name;output;2,2;1,1;]"..
-			"label[5.5,0;Damaged tool]"..
-			"list[current_name;src;6,0.5;1,1;]"..
-			"image[4.35,1.1;1.5,1.5;xdecor_hammer.png]"..
-			"label[5.8,1.5;Hammer]]"..
-			"list[current_name;fuel;6,2;1,1;]"..
-			"item_image_button[0,0.5;1,1;xdecor:microslab_wood;microslab; ]"..
-			"item_image_button[1,0.5;1,1;xdecor:microslab_half_wood;microslabhalf; ]"..
-			"item_image_button[2,0.5;1,1;xdecor:microcube_wood;microcube; ]"..
-			"item_image_button[3,0.5;1,1;xdecor:panel_wood;panel; ]"..
-			"list[current_player;main;0,3.25;8,4;]")
-		meta:set_string("infotext", "Work Bench")
-		local inv = meta:get_inventory()
-		inv:set_size("output", 1)
-		inv:set_size("input", 1)
-		inv:set_size("src", 1)
-		inv:set_size("fuel", 1)
-	end,
-	on_receive_fields = function(pos, formname, fields, sender)
-		local meta = minetest.get_meta(pos)
-		local inv = meta:get_inventory()
-		local shape = {}
-		local anz = 0
-
-		if fields["microslab"] then
-			anz = "8"
-			shape = "xdecor:microslab_wood"
-		elseif fields["microslabhalf"] then
-			anz = "16"
-			shape = "xdecor:microslab_half_wood"
-		elseif fields["microcube"] then
-			anz = "8"
-			shape = "xdecor:microcube_wood"
-		elseif fields["panel"] then
-			anz = "4"
-			shape = "xdecor:panel_wood"
-		else return end
-
-		local inputstack = inv:get_stack("input", 1)
-		if minetest.get_item_group(inputstack:get_name(), "wood") ~= 0 then
-			local give = {}
-			for i = 0, anz-1 do
-				give[i+1] = inv:add_item("output", shape)
-			end
-			inputstack:take_item()
-			inv:set_stack("input", 1, inputstack)
-		else return end
-	end,
-	can_dig = function(pos, player)
-		local meta = minetest.get_meta(pos)
-		local inv = meta:get_inventory()
-		return inv:is_empty("src") and inv:is_empty("fuel") 
-			and inv:is_empty("input") and inv:is_empty("output")
+-- Nodes allowed to be cut.
+-- Only the regular, solid blocks without metas or explosivity can be cut.
+local nodes = {}
+for node, def in pairs(minetest.registered_nodes) do
+	if (def.drawtype == "normal" or def.drawtype:sub(1,5) == "glass") and
+	   (def.groups.cracky or def.groups.choppy) and
+	   not def.on_construct and
+	   not def.after_place_node and
+	   not def.on_rightclick and
+	   not def.on_blast and
+	   not def.allow_metadata_inventory_take and
+	   not (def.groups.not_in_creative_inventory == 1) and
+	   not def.groups.wool and
+	   not def.description:find("Ore") and
+	   def.description and
+	   def.description ~= "" and
+	   def.light_source == 0
+	then
+		nodes[#nodes+1] = node
 	end
-})
+end
+
+-- Nodeboxes definitions.
+workbench.defs = {
+	-- Name       Yield   X  Y   Z  W   H  L
+	{"nanoslab",	16, { 0, 0,  0, 8,  1, 8  }},
+	{"micropanel",	16, { 0, 0,  0, 16, 1, 8  }},
+	{"microslab",	8,  { 0, 0,  0, 16, 1, 16 }},
+	{"thinstair",	8,  { 0, 7,  0, 16, 1, 8  },
+			    { 0, 15, 8, 16, 1, 8  }},
+	{"cube", 	4,  { 0, 0,  0, 8,  8, 8  }},
+	{"panel",	4,  { 0, 0,  0, 16, 8, 8  }},
+	{"slab", 	2,  nil			  },
+	{"doublepanel", 2,  { 0, 0,  0, 16, 8, 8  },
+			    { 0, 8,  8, 16, 8, 8  }},
+	{"halfstair",	2,  { 0, 0,  0, 8,  8, 16 },
+			    { 0, 8,  8, 8,  8, 8  }},
+	{"outerstair",	1,  { 0, 0,  0, 16, 8, 16 },
+			    { 0, 8,  8, 8,  8, 8  }},
+	{"stair",	1,  nil			  },
+	{"innerstair",	1,  { 0, 0,  0, 16, 8, 16 },
+			    { 0, 8,  8, 16, 8, 8  },
+			    { 0, 8,  0, 8,  8, 8  }}
+}
+
+-- Tools allowed to be repaired.
+function workbench:repairable(stack)
+	local tools = {"pick", "axe", "shovel", "sword", "hoe", "armor", "shield"}
+	for _, t in pairs(tools) do
+		if stack:find(t) then return true end
+	end
+	return false
+end
+
+function workbench:get_output(inv, input, name)
+	if inv:is_empty("input") then
+		inv:set_list("forms", {}) return
+	end
+
+	local output = {}
+	for _, n in pairs(self.defs) do
+		local count = math.min(n[2] * input:get_count(), input:get_stack_max())
+		local item = name.."_"..n[1]
+		if not n[3] then item = "stairs:"..n[1].."_"..name:match(":(.*)") end
+		output[#output+1] = item.." "..count
+	end
+	inv:set_list("forms", output)
+end
 
-local function register_wood_cut(name, desc, box, f_groups)
-	f_groups = {}
-	f_groups.snappy = 3
-	f_groups.not_in_creative_inventory = 1
-	xdecor.register(name.."_wood", {
-		description = "Wood "..desc,
-		tiles = {"xdecor_wood_tile.png"}, groups = f_groups,
-		sounds = default.node_sound_wood_defaults(),
-		node_box = { type = "fixed", fixed = box } }) end
-
-wood = {}
-wood.datas = {
-	{"microslab", "Microslab", { -0.5, -0.5, -0.5, 0.5, -0.4375, 0.5 }},
-	{"microslab_half", "Half Microslab", { -0.5, -0.5, -0.5, 0.5, -0.4375, 0 }},
-	{"microcube", "Microcube", { -0.5, -0.5, -0.5, 0, 0, 0 }},
-	{"panel", "Panel", { -0.5, -0.5, -0.5, 0.5, 0, 0 }},
+local formspecs = {
+	-- Main formspec.
+	[[ label[0.9,1.23;Cut]
+	   label[0.9,2.23;Repair]
+	   box[-0.05,1;2.05,0.9;#555555]
+	   box[-0.05,2;2.05,0.9;#555555]
+	   button[0,0;2,1;craft;Crafting]
+	   button[2,0;2,1;storage;Storage]
+	   image[3,1;1,1;gui_furnace_arrow_bg.png^[transformR270]
+	   image[0,1;1,1;worktable_saw.png]
+	   image[0,2;1,1;worktable_anvil.png]
+	   image[3,2;1,1;hammer_layout.png]
+	   list[context;input;2,1;1,1;]
+	   list[context;tool;2,2;1,1;]
+	   list[context;hammer;3,2;1,1;]
+	   list[context;forms;4,0;4,3;] ]],
+	-- Crafting formspec.
+	[[ image[5,1;1,1;gui_furnace_arrow_bg.png^[transformR270]
+	   button[0,0;1.5,1;back;< Back]
+	   list[current_player;craft;2,0;3,3;]
+	   list[current_player;craftpreview;6,1;1,1;]
+	   listring[current_player;main]
+	   listring[current_player;craft] ]],
+	-- Storage formspec.
+	[[ list[context;storage;0,1;8,2;]
+	   button[0,0;1.5,1;back;< Back]
+	   listring[context;storage]
+	   listring[current_player;main] ]]
 }
 
-for _, item in pairs(wood.datas) do
-	register_wood_cut(unpack(item))
+function workbench:set_formspec(meta, id)
+	meta:set_string("formspec", "size[8,7;]list[current_player;main;0,3.25;8,4;]"..
+			formspecs[id]..xbg..default.get_hotbar_bg(0,3.25))
+end
+
+function workbench.construct(pos)
+	local meta = minetest.get_meta(pos)
+	local inv = meta:get_inventory()
+
+	inv:set_size("tool", 1)
+	inv:set_size("input", 1)
+	inv:set_size("hammer", 1)
+	inv:set_size("forms", 4*3)
+	inv:set_size("storage", 8*2)
+
+	meta:set_string("infotext", "Work Bench")
+	workbench:set_formspec(meta, 1)
+end
+
+function workbench.fields(pos, _, fields)
+	local meta = minetest.get_meta(pos)
+	if     fields.back    then workbench:set_formspec(meta, 1)
+	elseif fields.craft   then workbench:set_formspec(meta, 2)
+	elseif fields.storage then workbench:set_formspec(meta, 3) end
+end
+
+function workbench.dig(pos)
+	local inv = minetest.get_meta(pos):get_inventory()
+	return inv:is_empty("input") and inv:is_empty("hammer") and
+		inv:is_empty("tool") and inv:is_empty("storage")
+end
+
+function workbench.timer(pos)
+	local timer = minetest.get_node_timer(pos)
+	local inv = minetest.get_meta(pos):get_inventory()
+	local tool = inv:get_stack("tool", 1)
+	local hammer = inv:get_stack("hammer", 1)
+
+	if tool:is_empty() or hammer:is_empty() or tool:get_wear() == 0 then
+		timer:stop() return
+	end
+
+	-- Tool's wearing range: 0-65535 | 0 = new condition.
+	tool:add_wear(-500)
+	hammer:add_wear(700)
+
+	inv:set_stack("tool", 1, tool)
+	inv:set_stack("hammer", 1, hammer)
+	return true
 end
 
-minetest.register_abm({
-	nodenames = {"xdecor:workbench"},
-	interval = 5, chance = 1,
-	action = function(pos, node, active_object_count, active_object_count_wider)
-		local meta = minetest.get_meta(pos)
-		local inv = meta:get_inventory()
-		local src = inv:get_stack("src", 1)
-		local wear = src:get_wear()
-		local repair = -1400
-
-		if (src:is_empty() or wear == 0 or wear == 65535) then return end
-		local fuel = inv:get_stack("fuel", 1)
-		if (fuel:is_empty() or fuel:get_name() ~= "xdecor:hammer") then return end
-
-		if (wear + repair < 0) then src:add_wear(repair + wear)
-		else src:add_wear(repair) end
-
-		inv:set_stack("src", 1, src)
-		inv:remove_item("fuel", "xdecor:hammer 1")
+function workbench.put(_, listname, _, stack)
+	local stackname = stack:get_name()
+	if (listname == "tool" and stack:get_wear() > 0 and workbench:repairable(stackname)) or
+	   (listname == "input" and minetest.registered_nodes[stackname.."_cube"]) or
+	   (listname == "hammer" and stackname == "xdecor:hammer") or
+	    listname == "storage" then
+		return stack:get_count()
 	end
+	return 0
+end
+
+function workbench.take(_, listname, _, stack, player)
+	if listname == "forms" then
+		local inv = player:get_inventory()
+		if inv:room_for_item("main", stack:get_name()) then return -1 end
+		return 0
+	end
+	return stack:get_count()
+end
+
+function workbench.move(_, from_list, _, to_list, _, count)
+	if to_list == "storage" and from_list ~= "forms" then return count end
+	return 0
+end
+
+function workbench.on_put(pos, listname, _, stack)
+	local inv = minetest.get_meta(pos):get_inventory()
+	if listname == "input" then
+		local input = inv:get_stack("input", 1)
+		workbench:get_output(inv, input, stack:get_name())
+	elseif listname == "tool" or listname == "hammer" then
+		local timer = minetest.get_node_timer(pos)
+		timer:start(3.0)
+	end
+end
+
+function workbench.on_take(pos, listname, index, stack)
+	local inv = minetest.get_meta(pos):get_inventory()
+	local input = inv:get_stack("input", 1)
+
+	if listname == "input" then
+		if stack:get_name() == input:get_name() then
+			workbench:get_output(inv, input, stack:get_name())
+		else
+			inv:set_list("forms", {})
+		end
+	elseif listname == "forms" then
+		input:take_item(math.ceil(stack:get_count() / workbench.defs[index][2]))
+		inv:set_stack("input", 1, input)
+		workbench:get_output(inv, input, input:get_name())
+	end
+end
+
+xdecor.register("workbench", {
+	description = "Work Bench",
+	groups = {cracky=2, choppy=2, oddly_breakable_by_hand=1},
+	sounds = default.node_sound_wood_defaults(),
+	tiles = {"xdecor_workbench_top.png",   "xdecor_workbench_top.png",
+		 "xdecor_workbench_sides.png", "xdecor_workbench_sides.png",
+		 "xdecor_workbench_front.png", "xdecor_workbench_front.png"},
+	on_rotate = screwdriver.rotate_simple,
+	can_dig = workbench.dig,
+	on_timer = workbench.timer,
+	on_construct = workbench.construct,
+	on_receive_fields = workbench.fields,
+	on_metadata_inventory_put = workbench.on_put,
+	on_metadata_inventory_take = workbench.on_take,
+	allow_metadata_inventory_put = workbench.put,
+	allow_metadata_inventory_take = workbench.take,
+	allow_metadata_inventory_move = workbench.move
 })
+
+for _, d in pairs(workbench.defs) do
+for i = 1, #nodes do
+	local node = nodes[i]
+	local def = minetest.registered_nodes[node]
+
+	if d[3] then
+		local groups = {}
+		local tiles
+		groups.not_in_creative_inventory = 1
+
+		for k, v in pairs(def.groups) do
+			if k ~= "wood" and k ~= "stone" and k ~= "level" then
+				groups[k] = v
+			end
+		end
+
+		if def.tiles then
+			if #def.tiles > 1 and not (def.drawtype:sub(1,5) == "glass") then
+				tiles = def.tiles
+			else
+				tiles = {def.tiles[1]}
+			end
+		else
+			tiles = {def.tile_images[1]}
+		end
+
+		if not minetest.registered_nodes["stairs:slab_"..node:match(":(.*)")] then
+			stairs.register_stair_and_slab(node:match(":(.*)"), node, groups, tiles,
+				def.description.." Stair", def.description.." Slab", def.sounds)
+		end
+
+		minetest.register_node(":"..node.."_"..d[1], {
+			description = def.description.." "..d[1]:gsub("^%l", string.upper),
+			paramtype = "light",
+			paramtype2 = "facedir",
+			drawtype = "nodebox",
+			sounds = def.sounds,
+			tiles = tiles,
+			groups = groups,
+			-- `unpack` has been changed to `table.unpack` in newest Lua versions.
+			node_box = xdecor.pixelbox(16, {unpack(d, 3)}),
+			sunlight_propagates = true,
+			on_place = minetest.rotate_node
+		})
+	end
+end
+end
+