craftguide.lua

   1 local craftguide, datas = {}, {}
   2
   3 function craftguide:get_recipe(item)
   4         if item:sub(1,6) == "group:" then
   5                 if item:sub(-4) == "wool" or item:sub(-3) == "dye" then
   6                         item = item:sub(7)..":white"
   7                 elseif minetest.registered_items["default:"..item:sub(7)] then
   8                         item = item:gsub("group:", "default:")
   9                 else for node, def in pairs(minetest.registered_items) do
  10                          if def.groups[item:match("[^,:]+$")] then item = node end
  11                      end
  12                 end
  13         end
  14         return item
  15 end
  16
  17 function craftguide:get_formspec(stack, pagenum, item, recipe_num, filter, player_name)
  18         local inv_size = datas[player_name].size
  19         local npp, i, s = 8*3, 0, 0
  20         local pagemax = math.floor((inv_size - 1) / npp + 1)
  21
  22         if     pagenum > pagemax then pagenum = 1
  23         elseif pagenum == 0      then pagenum = pagemax end
  24
  25         local formspec = [[ size[8,6.6;]
  26                         tablecolumns[color;text;color;text]
  27                         tableoptions[background=#00000000;highlight=#00000000;border=false]
  28                         button[5.4,0;0.8,0.95;prev;<]
  29                         button[7.2,0;0.8,0.95;next;>]
  30                         button[2.5,0.2;0.8,0.5;search;?]
  31                         button[3.2,0.2;0.8,0.5;clear;X]
  32                         tooltip[search;Search]
  33                         tooltip[clear;Reset] ]]
  34                         .."table[6,0.18;1.1,0.5;pagenum;#FFFF00,"..tostring(pagenum)..
  35                         ",#FFFFFF,/ "..tostring(pagemax).."]"..
  36                         "field[0.3,0.32;2.6,1;filter;;"..filter.."]"..
  37                         default.gui_bg..default.gui_bg_img
  38
  39         for _, name in pairs(self:get_items(filter, player_name)) do
  40                 if s < (pagenum - 1) * npp then
  41                         s = s + 1
  42                 else if i >= npp then break end
  43                         formspec = formspec.."item_image_button["..(i%8)..","..
  44                                              (math.floor(i/8)+1)..";1,1;"..name..";"..name..";]"
  45                         i = i + 1
  46                 end
  47         end
  48
  49         if item and minetest.registered_items[item] then
  50                 --print(dump(minetest.get_all_craft_recipes(item)))
  51                 local items_num = #minetest.get_all_craft_recipes(item)
  52                 if recipe_num > items_num then recipe_num = 1 end
  53
  54                 if items_num > 1 then formspec = formspec..
  55                         "button[0,6;1.6,1;alternate;Alternate]"..
  56                         "label[0,5.5;Recipe "..recipe_num.." of "..items_num.."]"
  57                 end
  58
  59                 local type = minetest.get_all_craft_recipes(item)[recipe_num].type
  60                 if type == "cooking" then formspec = formspec..
  61                         "image[3.75,4.6;0.5,0.5;default_furnace_fire_fg.png]"
  62                 end
  63
  64                 local items = minetest.get_all_craft_recipes(item)[recipe_num].items
  65                 local width = minetest.get_all_craft_recipes(item)[recipe_num].width
  66                 if width == 0 then width = math.min(3, #items) end
  67                 -- Lua 5.3 removed `table.maxn`, use `xdecor.maxn` in case of breakage.
  68                 local rows = math.ceil(table.maxn(items) / width)
  69
  70                 local function is_group(item)
  71                         if item:sub(1,6) == "group:" then return "\nG" end
  72                         return ""
  73                 end
  74
  75                 for i, v in pairs(items) do formspec = formspec..
  76                         "item_image_button["..((i-1) % width + 4.5)..","..
  77                         (math.floor((i-1) / width + (6 - math.min(2, rows))))..";1,1;"..
  78                         self:get_recipe(v)..";"..self:get_recipe(v)..";"..is_group(v).."]"
  79                 end
  80
  81                 local output = minetest.get_all_craft_recipes(item)[recipe_num].output
  82                 formspec = formspec.."item_image_button[2.5,5;1,1;"..output..";"..item..";]"..
  83                                      "image[3.5,5;1,1;gui_furnace_arrow_bg.png^[transformR90]"
  84         end
  85
  86         stack:set_metadata(formspec)
  87         datas[player_name].formspec = stack:get_metadata()
  88         minetest.show_formspec(player_name, "xdecor:crafting_guide", formspec)
  89 end
  90
  91 function craftguide:get_items(filter, player_name)
  92         local items_list = {}
  93         for name, def in pairs(minetest.registered_items) do
  94                 if not (def.groups.not_in_creative_inventory == 1) and
  95                                 minetest.get_craft_recipe(name).items and
  96                                 def.description and def.description ~= "" and
  97                                 (not filter or def.name:find(filter, 1, true) or
  98                                         def.description:lower():find(filter, 1, true)) then
  99                         items_list[#items_list+1] = name
 100                 end
 101         end
 102
 103         datas[player_name].size = #items_list
 104         table.sort(items_list)
 105         return items_list
 106 end
 107
 108 minetest.register_on_player_receive_fields(function(player, listname, fields)
 109         if listname ~= "xdecor:crafting_guide" then return end
 110         local player_name = player:get_player_name()
 111         local stack = player:get_wielded_item()
 112         local formspec = datas[player_name].formspec
 113         local filter = formspec:match("filter;;([%w_:]+)") or ""
 114         local pagenum = tonumber(formspec:match("#FFFF00,(%d+)")) or 1
 115
 116         if fields.clear then
 117                 craftguide:get_items(nil, player_name)
 118                 craftguide:get_formspec(stack, 1, nil, 1, "", player_name)
 119         elseif fields.alternate then
 120                 local item = formspec:match("item_image_button%[.*;([%w_:]+);.*%]") or 1
 121                 local recipe_num = tonumber(formspec:match("Recipe%s(%d+)")) or 1
 122                 recipe_num = recipe_num + 1
 123                 craftguide:get_formspec(stack, pagenum, item, recipe_num, filter, player_name)
 124         elseif fields.search then
 125                 craftguide:get_items(fields.filter:lower(), player_name)
 126                 craftguide:get_formspec(stack, 1, nil, 1, fields.filter:lower(), player_name)
 127         elseif fields.prev or fields.next then
 128                 if fields.prev then pagenum = pagenum - 1
 129                 else pagenum = pagenum + 1 end
 130                 craftguide:get_formspec(stack, pagenum, nil, 1, filter, player_name)
 131         else for item in pairs(fields) do
 132                  if minetest.get_craft_recipe(item).items then
 133                         craftguide:get_formspec(stack, pagenum, item, 1, filter, player_name)
 134                  end
 135              end
 136         end
 137 end)
 138
 139 minetest.register_craftitem("xdecor:crafting_guide", {
 140         description = "Crafting Guide",
 141         inventory_image = "xdecor_crafting_guide.png",
 142         wield_image = "xdecor_crafting_guide.png",
 143         stack_max = 1,
 144         on_use = function(itemstack, user)
 145                 local player_name = user:get_player_name()
 146                 datas[player_name] = {}
 147
 148                 craftguide:get_items(nil, player_name)
 149                 craftguide:get_formspec(itemstack, 1, nil, 1, "", player_name)
 150         end
 151 })
 152