1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
|
local craftguide, datas, npp = {}, {}, 8*3
local min, ceil, floor = math.min, math.ceil, math.floor
local group_stereotypes = {
wool = "wool:white",
dye = "dye:white",
water_bucket = "bucket:bucket_water",
vessel = "vessels:glass_bottle",
coal = "default:coal_lump",
flower = "flowers:dandelion_yellow",
mesecon_conductor_craftable = "mesecons:wire_00000000_off",
}
function craftguide:get_recipe(item)
if item:sub(1,6) == "group:" then
local short_itemstr = item:sub(7)
if group_stereotypes[short_itemstr] then
item = group_stereotypes[short_itemstr]
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
end
end
return item
end
function craftguide:extract_groups(itemstr)
if itemstr:sub(1,6) ~= "group:" then return end
return itemstr:sub(7):split(",")
end
function craftguide:get_tooltip(item, recipe_type, cooktime, groups)
local item_desc = minetest.registered_items[item].description
local tooltip = "tooltip["..item..";"..((groups and "") or item_desc)
if groups then
local groupstr = "Any item belonging to the "
for i=1, #groups do
groupstr = groupstr..minetest.colorize("#FFFF00", groups[i])..
((groups[i+1] and " and ") or "")
end
tooltip = tooltip..groupstr.." group(s)"
end
if recipe_type == "cooking" then
tooltip = tooltip.."\nCooking time: "..minetest.colorize("#FFFF00", cooktime)
end
return tooltip.."]"
end
function craftguide:get_formspec(player_name)
local data = datas[player_name]
data.pagenum = data.pagenum or 1
data.recipe_num = data.recipe_num or 1
local formspec = [[ size[8,6.6;]
button[2.5,0.2;0.8,0.5;search;?]
button[3.2,0.2;0.8,0.5;clear;X]
tooltip[search;Search]
tooltip[clear;Reset]
field_close_on_enter[craftguide_filter, false]
button[5.4,0;0.8,0.95;prev;<] ]]..
"label[6.1,0.18;"..minetest.colorize("#FFFF00",
data.pagenum).." / "..data.pagemax.."]"..
"button[7.2,0;0.8,0.95;next;>]"..
"field[0.3,0.32;2.6,1;craftguide_filter;;"..
minetest.formspec_escape(data.filter).."]"..
default.gui_bg..default.gui_bg_img
local first_item = (data.pagenum - 1) * npp
for i = first_item, first_item + npp - 1 do
local name = data.items[i + 1]
if not name then break end -- last page
local X = i % 8
local Y = ((i % npp - X) / 8) + 1
formspec = formspec.."item_image_button["..X..","..Y..";1,1;"..name..";"..name..";]"
end
if data.item and minetest.registered_items[data.item] then
local recipes = minetest.get_all_craft_recipes(data.item)
if data.recipe_num > #recipes then data.recipe_num = 1 end
if #recipes > 1 then formspec = formspec..
[[ button[0,6;1.6,1;alternate;Alternate]
label[0,5.5;Recipe ]]..data.recipe_num.." of "..#recipes.."]"
end
local recipe_type = recipes[data.recipe_num].type
if recipe_type == "cooking" then
formspec = formspec.."image[3.75,4.6;0.5,0.5;default_furnace_front.png]"
end
local items = recipes[data.recipe_num].items
local width = recipes[data.recipe_num].width
if width == 0 then width = min(3, #items) end
-- Lua 5.3 removed `table.maxn`, use this alternative in case of breakage:
-- https://github.com/kilbith/xdecor/blob/master/handlers/helpers.lua#L1
local rows = ceil(table.maxn(items) / width)
for i, v in pairs(items) do
local X = (i-1) % width + 4.5
local Y = floor((i-1) / width + (6 - min(2, rows)))
local groups = self:extract_groups(v)
local label = (groups and "\nG") or ""
local item = self:get_recipe(v)
local tooltip = self:get_tooltip(item, recipe_type, width, groups)
formspec = formspec.."item_image_button["..X..","..Y..";1,1;"..
item..";"..item..";"..label.."]"..tooltip
end
local output = recipes[data.recipe_num].output
formspec = formspec..[[ image[3.5,5;1,1;gui_furnace_arrow_bg.png^[transformR90]
item_image_button[2.5,5;1,1;]]..output..";"..data.item..";]"
end
data.formspec = formspec
minetest.show_formspec(player_name, "craftguide:book", formspec)
end
function craftguide:get_items(player_name)
local items_list, data = {}, datas[player_name]
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
(def.name:find(data.filter, 1, true) or
def.description:lower():find(data.filter, 1, true)) then
items_list[#items_list+1] = name
end
end
table.sort(items_list)
data.items = items_list
data.size = #items_list
data.pagemax = ceil(data.size / npp)
end
minetest.register_on_player_receive_fields(function(player, formname, fields)
if formname ~= "craftguide:book" then return end
local player_name = player:get_player_name()
local data = datas[player_name]
local formspec = data.formspec
if fields.clear then
data.filter, data.item, data.pagenum, data.recipe_num = "", nil, 1, 1
craftguide:get_items(player_name)
craftguide:get_formspec(player_name)
elseif fields.alternate then
data.recipe_num = (data.recipe_num and data.recipe_num + 1) or 1
craftguide:get_formspec(player_name)
elseif fields.search or fields.key_enter_field == "craftguide_filter" then
data.filter = fields.craftguide_filter:lower()
data.pagenum = 1
craftguide:get_items(player_name)
craftguide:get_formspec(player_name)
elseif fields.prev or fields.next then
if fields.prev then data.pagenum = data.pagenum - 1
else data.pagenum = data.pagenum + 1 end
if data.pagenum > data.pagemax then data.pagenum = 1
elseif data.pagenum == 0 then data.pagenum = data.pagemax end
craftguide:get_formspec(player_name)
else for item in pairs(fields) do
if minetest.get_craft_recipe(item).items then
data.item = item
craftguide:get_formspec(player_name)
end
end
end
end)
minetest.register_craftitem("craftguide:book", {
description = "Crafting Guide",
inventory_image = "crafting_guide.png",
wield_image = "crafting_guide.png",
stack_max = 1,
groups = {book=1},
on_use = function(itemstack, user)
local player_name = user:get_player_name()
if not datas[player_name] then
datas[player_name] = {}
datas[player_name].filter = ""
craftguide:get_items(player_name)
craftguide:get_formspec(player_name)
else
minetest.show_formspec(player_name, "craftguide:book", datas[player_name].formspec)
end
end
})
minetest.register_craft({
output = "craftguide:book",
type = "shapeless",
recipe = {"default:book"}
})
minetest.register_alias("xdecor:crafting_guide", "craftguide:book")
|
