local worktable = {}
screwdriver = screwdriver or {}
-local nodes = { -- Nodes allowed to be cut. Registration format: [mod name] = [[ node names ]].
- ["default"] = [[
- wood tree cobble desert_stone
- junglewood jungletree mossycobble stonebrick
- pine_wood pine_tree desert_cobble sandstonebrick
- acacia_wood acacia_tree stone desert_stonebrick
- aspen_wood aspen_tree sandstone obsidianbrick
-
- coalblock mese obsidian
- copperblock brick obsidian_glass
- steelblock cactus
- goldblock ice
- bronzeblock meselamp
- diamondblock glass
- ]],
-
- ["xdecor"] = [[
- coalstone_tile hard_clay
- desertstone_tile packed_ice
- stone_rune moonbrick
- stone_tile woodframed_glass
- cactusbrick wood_tile
- ]],
-}
+-- Nodes allowed to be cut.
+-- Only the regular, solid blocks without formspec or explosivity can be cut.
+function worktable:nodes(def)
+ return (def.drawtype == "normal" or def.drawtype:find("glass")) and
+ (def.groups.cracky or def.groups.choppy) and not
+ def.on_construct and not def.after_place_node 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
+end
-local defs = { -- Nodebox name, yield, definition.
- {"nanoslab", 16, {-.5,-.5,-.5,0,-.4375,0}},
- {"micropanel", 16, {-.5,-.5,-.5,.5,-.4375,0}},
- {"microslab", 8, {-.5,-.5,-.5,.5,-.4375,.5}},
- {"thinstair", 8, {{-.5,-.0625,-.5,.5,0,0},{-.5,.4375,0,.5,.5,.5}}},
- {"cube", 4, {-.5,-.5,0,0,0,.5}},
- {"panel", 4, {-.5,-.5,-.5,.5,0,0}},
- {"slab", 2, {-.5,-.5,-.5,.5,0,.5}},
- {"doublepanel", 2, {{-.5,-.5,-.5,.5,0,0},{-.5,0,0,.5,.5,.5}}},
- {"halfstair", 2, {{-.5,-.5,-.5,0,0,.5},{-.5,0,0,0,.5,.5}}},
- {"outerstair", 1, {{-.5,-.5,-.5,.5,0,.5},{-.5,0,0,0,.5,.5}}},
- {"stair", 1, {{-.5,-.5,-.5,.5,0,.5},{-.5,0,0,.5,.5,.5}}},
- {"innerstair", 1, {{-.5,-.5,-.5,.5,0,.5},{-.5,0,0,.5,.5,.5},{-.5,0,-.5,0,.5,0}}}
+-- Nodeboxes definitions.
+worktable.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 }}
}
-function worktable.get_recipe(item)
+-- Tools allowed to be repaired.
+worktable.repairable_tools = [[
+ pick, axe, shovel, sword, hoe, armor, shield
+]]
+
+function worktable:get_recipe(item)
if item:find("^group:") then
if item:find("wool$") or item:find("dye$") then
item = item:sub(7)..":white"
elseif minetest.registered_items["default:"..item:sub(7)] then
item = item:gsub("group:", "default:")
- else
- for node, def in pairs(minetest.registered_items) do
- if def.groups[item:match("[^,:]+$")] then
- item = node
- end
- end
+ else for node, def in pairs(minetest.registered_items) do
+ if def.groups[item:match("[^,:]+$")] then item = node end
+ end
end
end
return item
end
-function worktable.craftguide_formspec(meta, pagenum, item, recipe_num, filter, tab_id)
+function worktable:craftguide_formspec(meta, pagenum, item, recipe_num, filter)
local inv_size = meta:get_int("inv_size")
local npp, i, s = 8*3, 0, 0
local pagemax = math.floor((inv_size - 1) / npp + 1)
- if pagenum > pagemax then
- pagenum = 1
- elseif pagenum == 0 then
- pagenum = pagemax
- end
+ if pagenum > pagemax then pagenum = 1
+ elseif pagenum == 0 then pagenum = pagemax end
local formspec = [[ size[8,6.6;]
tablecolumns[color;text;color;text]
tableoptions[background=#00000000;highlight=#00000000;border=false]
- button[5.5,0;0.7,1;prev;<]
- button[7.3,0;0.7,1;next;>]
+ button[5.5,0;0.7,0.95;prev;<]
+ button[7.3,0;0.7,0.95;next;>]
button[4,0.2;0.7,0.5;search;?]
button[4.6,0.2;0.7,0.5;clearfilter;X]
button[0,0;1.5,1;backcraft;< Back]
tooltip[search;Search]
- tooltip[clearfilter;Reset] ]]
- .."tabheader[0,0;tabs;All,Nodes,Tools,Items;"..tostring(tab_id)..";true;false]"..
- "table[6.1,0.2;1.1,0.5;pagenum;#FFFF00,"..tostring(pagenum)..
+ tooltip[clearfilter;Reset] ]] ..
+ "table[6.1,0.18;1.1,0.5;pagenum;#FFFF00,"..tostring(pagenum)..
",#FFFFFF,/ "..tostring(pagemax).."]"..
"field[1.8,0.32;2.6,1;filter;;"..filter.."]"..xbg
- for _, name in pairs(worktable.craftguide_main_list(meta, filter, tab_id)) do
+ for _, name in pairs(self:craftguide_items(meta, filter)) do
if s < (pagenum - 1) * npp then
s = s + 1
- else
- if i >= npp then break end
+ else if i >= npp then break end
formspec = formspec.."item_image_button["..(i%8)..","..
- (math.floor(i/8)+1)..";1,1;"..name..";"..name..";]"
+ (math.floor(i/8)+1)..";1,1;"..name..";"..name..";]"
i = i + 1
end
end
local items_num = #minetest.get_all_craft_recipes(item)
if recipe_num > items_num then recipe_num = 1 end
- if items_num > 1 then
- formspec = formspec.."button[0,6;1.6,1;alternate;Alternate]"..
- "label[0,5.5;Recipe "..recipe_num.." of "..items_num.."]"
+ if items_num > 1 then formspec = formspec..
+ "button[0,6;1.6,1;alternate;Alternate]"..
+ "label[0,5.5;Recipe "..recipe_num.." of "..items_num.."]"
end
local type = minetest.get_all_craft_recipes(item)[recipe_num].type
- if type == "cooking" then
- formspec = formspec.."image[3.75,4.6;0.5,0.5;default_furnace_fire_fg.png]"
+ if type == "cooking" then formspec = formspec..
+ "image[3.75,4.6;0.5,0.5;default_furnace_fire_fg.png]"
end
local items = minetest.get_all_craft_recipes(item)[recipe_num].items
local width = minetest.get_all_craft_recipes(item)[recipe_num].width
if width == 0 then width = math.min(3, #items) end
- local rows = math.ceil(table.maxn(items) / width)
+ local rows = math.ceil(table.maxn(items) / width) -- Lua 5.3 removed `table.maxn`, use `xdecor.maxn` in case of failure.
local function is_group(item)
- if item:find("^group:") then return "G" end
+ if item:find("^group:") then return "\nG" end
return ""
end
- for i, v in pairs(items) do
- formspec = formspec.."item_image_button["..((i-1) % width + 4.5)..","..
- (math.floor((i-1) / width + (6 - math.min(2, rows))))..";1,1;"..
- worktable.get_recipe(v)..";"..worktable.get_recipe(v)..";"..is_group(v).."]"
+ for i, v in pairs(items) do formspec = formspec..
+ "item_image_button["..((i-1) % width + 4.5)..","..
+ (math.floor((i-1) / width + (6 - math.min(2, rows))))..";1,1;"..
+ self:get_recipe(v)..";"..self:get_recipe(v)..";"..is_group(v).."]"
end
- formspec = formspec.."item_image[2.5,5;1,1;"..item.."]"..
- "image[3.5,5;1,1;gui_furnace_arrow_bg.png^[transformR90]"
+ local output = minetest.get_all_craft_recipes(item)[recipe_num].output
+ formspec = formspec.."item_image_button[2.5,5;1,1;"..output..";"..item..";]"..
+ "image[3.5,5;1,1;gui_furnace_arrow_bg.png^[transformR90]"
end
meta:set_string("formspec", formspec)
end
-local function tab_category(tab_id)
- local id_category = {
- minetest.registered_items,
- minetest.registered_nodes,
- minetest.registered_tools,
- minetest.registered_craftitems
- }
-
- return id_category[tab_id] or id_category[1]
-end
-
-function worktable.craftguide_main_list(meta, filter, tab_id)
+function worktable:craftguide_items(meta, filter)
local items_list = {}
- for name, def in pairs(tab_category(tab_id)) do
+ for name, def in pairs(minetest.registered_items) do
if not (def.groups.not_in_creative_inventory == 1) and
minetest.get_craft_recipe(name).items and
def.description and def.description ~= "" and
- (not filter or def.name:find(filter, 1, true)) then
+ (not filter or def.name:find(filter, 1, true) or
+ def.description:lower():find(filter, 1, true)) then
items_list[#items_list+1] = name
end
end
return items_list
end
+function worktable: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
+
worktable.formspecs = {
crafting = function(meta)
meta:set_string("formspec", [[ size[8,7;]
local formspec = meta:to_table().fields.formspec
local filter = formspec:match("filter;;([%w_:]+)") or ""
local pagenum = tonumber(formspec:match("#FFFF00,(%d+)")) or 1
- local tab_id = tonumber(formspec:match("tabheader%[.*;(%d+)%;.*%]")) or 1
if fields.back then
worktable.formspecs.main(meta)
elseif fields.storage then
worktable.formspecs.storage(meta)
elseif fields.craftguide or fields.clearfilter then
- worktable.craftguide_main_list(meta, nil, tab_id)
- worktable.craftguide_formspec(meta, 1, nil, 1, "", tab_id)
+ worktable:craftguide_items(meta, nil)
+ worktable:craftguide_formspec(meta, 1, nil, 1, "")
elseif fields.alternate then
- local item = formspec:match("item_image%[.*;([%w_:]+)%]") or ""
+ local item = formspec:match("image_button%[.*;([%w_:]+);.*%]") or ""
local recipe_num = tonumber(formspec:match("Recipe%s(%d+)")) or 1
recipe_num = recipe_num + 1
- worktable.craftguide_formspec(meta, pagenum, item, recipe_num, filter, tab_id)
+ worktable:craftguide_formspec(meta, pagenum, item, recipe_num, filter)
elseif fields.search then
- worktable.craftguide_main_list(meta, fields.filter:lower(), tab_id)
- worktable.craftguide_formspec(meta, 1, nil, 1, fields.filter:lower(), tab_id)
- elseif fields.tabs then
- worktable.craftguide_main_list(meta, filter, tonumber(fields.tabs))
- worktable.craftguide_formspec(meta, 1, nil, 1, filter, tonumber(fields.tabs))
+ worktable:craftguide_items(meta, fields.filter:lower())
+ worktable:craftguide_formspec(meta, 1, nil, 1, fields.filter:lower())
elseif fields.prev or fields.next then
- if fields.prev then
- pagenum = pagenum - 1
- else
- pagenum = pagenum + 1
- end
- worktable.craftguide_formspec(meta, pagenum, nil, 1, filter, tab_id)
- else
- for item in pairs(fields) do
- if item:match(".-:") and minetest.get_craft_recipe(item).items then
- worktable.craftguide_formspec(meta, pagenum, item, 1, filter, tab_id)
- end
- end
+ if fields.prev then pagenum = pagenum - 1
+ else pagenum = pagenum + 1 end
+ worktable:craftguide_formspec(meta, pagenum, nil, 1, filter)
+ else for item in pairs(fields) do
+ if minetest.get_craft_recipe(item).items then
+ worktable:craftguide_formspec(meta, pagenum, item, 1, filter)
+ end
+ end
end
end
inv:is_empty("tool") and inv:is_empty("storage")
end
-function worktable.allowed(mod, node)
- if not mod then return end
- for it in mod:gmatch("[%w_]+") do
- if it == node then return true end
- end
- return false
-end
-
-local function trash_delete(pos)
- local inv = minetest.get_meta(pos):get_inventory()
- minetest.after(0, function()
- inv:set_stack("trash", 1, "")
- end)
-end
-
-function worktable.put(pos, listname, _, stack)
+function worktable.put(_, listname, _, stack)
local stackname = stack:get_name()
- local mod, node = stackname:match("(.*):(.*)")
-
- if (listname == "tool" and stack:get_wear() > 0 and stackname ~= "xdecor:hammer") or
- (listname == "input" and worktable.allowed(nodes[mod], node)) or
+ if (listname == "tool" and stack:get_wear() > 0 and
+ worktable.repairable_tools:find(stackname:match(":(%w+)"))) or
+ (listname == "input" and minetest.registered_nodes[stackname.."_cube"]) or
(listname == "hammer" and stackname == "xdecor:hammer") or
listname == "storage" or listname == "trash" then
- if listname == "trash" then trash_delete(pos) end
return stack:get_count()
end
-
return 0
end
function worktable.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
+ if inv:room_for_item("main", stack:get_name()) then return -1 end
return 0
end
return stack:get_count()
end
-function worktable.move(pos, _, _, to_list, _, count)
- if to_list == "storage" then
- return count
- elseif to_list == "trash" then
- trash_delete(pos)
- return count
- end
+function worktable.move(_, _, _, to_list, _, count)
+ if to_list == "storage" or to_list == "trash" then return count end
return 0
end
-function worktable.get_output(inv, stack)
- if inv:is_empty("input") then
- inv:set_list("forms", {})
- return
- end
-
- local input, output = inv:get_stack("input", 1), {}
- for _, n in pairs(defs) do
- local count = math.min(n[2] * input:get_count(), input:get_stack_max())
- output[#output+1] = stack:get_name().."_"..n[1].." "..count
- end
-
- inv:set_list("forms", output)
-end
-
function worktable.on_put(pos, listname, _, stack)
+ local inv = minetest.get_meta(pos):get_inventory()
if listname == "input" then
- local inv = minetest.get_meta(pos):get_inventory()
- worktable.get_output(inv, stack)
+ local input = inv:get_stack("input", 1)
+ worktable:get_output(inv, input, stack:get_name())
+ elseif listname == "trash" then
+ inv:set_list("trash", {})
end
end
function worktable.on_take(pos, listname, index, stack)
local inv = minetest.get_meta(pos):get_inventory()
- local inputstack = inv:get_stack("input", 1)
+ local input = inv:get_stack("input", 1)
if listname == "input" then
- if stack:get_name() == inputstack:get_name() then
- worktable.get_output(inv, stack)
- else
- inv:set_list("forms", {})
- end
+ if stack:get_name() == input:get_name() then
+ worktable:get_output(inv, input, stack:get_name())
+ else inv:set_list("forms", {}) end
elseif listname == "forms" then
- inputstack:take_item(math.ceil(stack:get_count() / defs[index][2]))
- inv:set_stack("input", 1, inputstack)
- worktable.get_output(inv, inputstack)
+ input:take_item(math.ceil(stack:get_count() / worktable.defs[index][2]))
+ inv:set_stack("input", 1, input)
+ worktable:get_output(inv, input, input:get_name())
end
end
+function worktable.on_move(pos, _, _, to_list, _, count)
+ local inv = minetest.get_meta(pos):get_inventory()
+ if to_list == "trash" then inv:set_list("trash", {}) end
+end
+
xdecor.register("worktable", {
description = "Work Table",
groups = {cracky=2, choppy=2, oddly_breakable_by_hand=1},
on_receive_fields = worktable.fields,
on_metadata_inventory_put = worktable.on_put,
on_metadata_inventory_take = worktable.on_take,
+ on_metadata_inventory_move = worktable.on_move,
allow_metadata_inventory_put = worktable.put,
allow_metadata_inventory_take = worktable.take,
allow_metadata_inventory_move = worktable.move
})
-for _, d in pairs(defs) do
-for mod, n in pairs(nodes) do
-for name in n:gmatch("[%w_]+") do
- local ndef = minetest.registered_nodes[mod..":"..name]
- if ndef then
- local groups, tiles, light = {}, {}
+for _, d in pairs(worktable.defs) do
+for node in pairs(minetest.registered_nodes) do
+ local def = minetest.registered_nodes[node]
+ if worktable:nodes(def) and d[3] then
+ local groups, tiles = {}, {}
groups.not_in_creative_inventory = 1
- for k, v in pairs(ndef.groups) do
+ for k, v in pairs(def.groups) do
if k ~= "wood" and k ~= "stone" and k ~= "level" then
groups[k] = v
end
end
- if #ndef.tiles > 1 and not ndef.drawtype:find("glass") then
- tiles = ndef.tiles
+ if def.tiles then
+ if #def.tiles > 1 and not def.drawtype:find("glass") then
+ tiles = def.tiles
+ else tiles = {def.tiles[1]} end
else
- tiles = {ndef.tiles[1]}
+ tiles = {def.tile_images[1]}
end
- if ndef.light_source > 3 then
- light = ndef.light_source - 1
+ 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(":"..mod..":"..name.."_"..d[1], {
- description = ndef.description.." "..d[1]:gsub("^%l", string.upper),
+ minetest.register_node(":"..node.."_"..d[1], {
+ description = def.description.." "..d[1]:gsub("^%l", string.upper),
paramtype = "light",
paramtype2 = "facedir",
drawtype = "nodebox",
- light_source = light,
- sounds = ndef.sounds,
+ sounds = def.sounds,
tiles = tiles,
groups = groups,
- node_box = {type = "fixed", fixed = d[3]},
+ node_box = xdecor.pixelbox(16, {unpack(d, 3)}), -- `unpack` has been changed to `table.unpack` in newest Lua versions.
sunlight_propagates = true,
- on_place = minetest.rotate_node
+ on_place = minetest.rotate_node,
+ on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
+ local player_name = clicker:get_player_name()
+ if minetest.is_protected(pos, player_name) then
+ minetest.record_protection_violation(pos, player_name) return
+ end
+
+ local T = {
+ {"nanoslab", nil, 2},
+ {"micropanel", nil, 3},
+ {"cube", nil, 6},
+ {"cube", "panel", 9},
+ {"cube", "outerstair", 11},
+ {"cube", "halfstair", 7},
+ {"cube", "innerstair", nil},
+ {"panel", nil, 7},
+ {"panel", "outerstair", 12},
+ {"halfstair", nil, 11},
+ {"halfstair", "outerstair", nil}
+ }
+
+ local newnode, combined = def.name, false
+ if clicker:get_player_control().sneak then
+ local wield_item = clicker:get_wielded_item():get_name()
+ for _, x in pairs(T) do
+ if wield_item == newnode.."_"..x[1] then
+ if not x[2] then x[2] = x[1] end
+ local pointed_nodebox = minetest.get_node(pos).name:match("(%w+)$")
+
+ if x[2] == pointed_nodebox then
+ if x[3] then newnode = newnode.."_"..worktable.defs[x[3]][1] end
+ combined = true
+ minetest.set_node(pos, {name=newnode, param2=node.param2})
+ end
+ end
+ end
+ else
+ minetest.item_place_node(itemstack, clicker, pointed_thing)
+ end
+
+ if combined and not minetest.setting_getbool("creative_mode") then
+ itemstack:take_item()
+ end
+ return itemstack
+ end
})
end
-end
+ if node:find("meselamp") then
+ if d[3] then minetest.register_alias("default:meselamp_"..d[1], "default:glass_"..d[1])
+ else minetest.register_alias("stairs:"..d[1].."_meselamp", "stairs:"..d[1].."_glass") end
+ elseif worktable:nodes(def) and not d[3] then
+ minetest.register_alias(node.."_"..d[1], "stairs:"..d[1].."_"..node:match(":(.*)"))
+ end
end
end
interval = 3, chance = 1,
action = function(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
- return
- end
+ local tool, hammer = inv:get_stack("tool", 1), inv:get_stack("hammer", 1)
+ if tool:is_empty() or hammer:is_empty() or tool:get_wear() == 0 then return end
-- Wear : 0-65535 | 0 = new condition.
tool:add_wear(-500)