craftguide.lua

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