Vessels: Make shelf open on 2 sides not impossible 4 sides
[oweals/minetest_game.git] / mods / default / craftitems.lua
1 -- mods/default/craftitems.lua
2
3 minetest.register_craftitem("default:stick", {
4         description = "Stick",
5         inventory_image = "default_stick.png",
6         groups = {stick = 1},
7 })
8
9 minetest.register_craftitem("default:paper", {
10         description = "Paper",
11         inventory_image = "default_paper.png",
12 })
13
14 local lpp = 14 -- Lines per book's page
15 local function book_on_use(itemstack, user)
16         local player_name = user:get_player_name()
17         local data = minetest.deserialize(itemstack:get_metadata())
18         local formspec, title, text, owner = "", "", "", player_name
19         local page, page_max, lines, string = 1, 1, {}, ""
20
21         if data then
22                 title = data.title
23                 text = data.text
24                 owner = data.owner
25
26                 for str in (text .. "\n"):gmatch("([^\n]*)[\n]") do
27                         lines[#lines+1] = str
28                 end
29
30                 if data.page then
31                         page = data.page
32                         page_max = data.page_max
33
34                         for i = ((lpp * page) - lpp) + 1, lpp * page do
35                                 if not lines[i] then break end
36                                 string = string .. lines[i] .. "\n"
37                         end
38                 end
39         end
40
41         if owner == player_name then
42                 formspec = "size[8,8]" .. default.gui_bg ..
43                         default.gui_bg_img ..
44                         "field[0.5,1;7.5,0;title;Title:;" ..
45                                 minetest.formspec_escape(title) .. "]" ..
46                         "textarea[0.5,1.5;7.5,7;text;Contents:;" ..
47                                 minetest.formspec_escape(text) .. "]" ..
48                         "button_exit[2.5,7.5;3,1;save;Save]"
49         else
50                 formspec = "size[8,8]" .. default.gui_bg ..
51                         default.gui_bg_img ..
52                         "label[0.5,0.5;by " .. owner .. "]" ..
53                         "tablecolumns[color;text]" ..
54                         "tableoptions[background=#00000000;highlight=#00000000;border=false]" ..
55                         "table[0.4,0;7,0.5;title;#FFFF00," .. minetest.formspec_escape(title) .. "]" ..
56                         "textarea[0.5,1.5;7.5,7;;" ..
57                                 minetest.formspec_escape(string ~= "" and string or text) .. ";]" ..
58                         "button[2.4,7.6;0.8,0.8;book_prev;<]" ..
59                         "label[3.2,7.7;Page " .. page .. " of " .. page_max .. "]" ..
60                         "button[4.9,7.6;0.8,0.8;book_next;>]"
61         end
62
63         minetest.show_formspec(player_name, "default:book", formspec)
64 end
65
66 minetest.register_on_player_receive_fields(function(player, formname, fields)
67         if formname ~= "default:book" then return end
68         local inv = player:get_inventory()
69         local stack = player:get_wielded_item()
70
71         if fields.save and fields.title ~= "" and fields.text ~= "" then
72                 local new_stack, data
73                 if stack:get_name() ~= "default:book_written" then
74                         local count = stack:get_count()
75                         if count == 1 then
76                                 stack:set_name("default:book_written")
77                         else
78                                 stack:set_count(count - 1)
79                                 new_stack = ItemStack("default:book_written")
80                         end
81                 else
82                         data = minetest.deserialize(stack:get_metadata())
83                 end
84
85                 if not data then data = {} end
86                 data.title = fields.title
87                 data.text = fields.text
88                 data.text_len = #data.text
89                 data.page = 1
90                 data.page_max = math.ceil((#data.text:gsub("[^\n]", "") + 1) / lpp)
91                 data.owner = player:get_player_name()
92                 local data_str = minetest.serialize(data)
93
94                 if new_stack then
95                         new_stack:set_metadata(data_str)
96                         if inv:room_for_item("main", new_stack) then
97                                 inv:add_item("main", new_stack)
98                         else
99                                 minetest.add_item(player:getpos(), new_stack)
100                         end
101                 else
102                         stack:set_metadata(data_str)
103                 end
104
105         elseif fields.book_next or fields.book_prev then
106                 local data = minetest.deserialize(stack:get_metadata())
107                 if not data.page then return end
108
109                 if fields.book_next then
110                         data.page = data.page + 1
111                         if data.page > data.page_max then
112                                 data.page = 1
113                         end
114                 else
115                         data.page = data.page - 1
116                         if data.page == 0 then
117                                 data.page = data.page_max
118                         end
119                 end
120
121                 local data_str = minetest.serialize(data)
122                 stack:set_metadata(data_str)
123                 book_on_use(stack, player)
124         end
125
126         player:set_wielded_item(stack)
127 end)
128
129 minetest.register_craftitem("default:book", {
130         description = "Book",
131         inventory_image = "default_book.png",
132         groups = {book = 1},
133         on_use = book_on_use,
134 })
135
136 minetest.register_craftitem("default:book_written", {
137         description = "Book With Text",
138         inventory_image = "default_book_written.png",
139         groups = {book = 1, not_in_creative_inventory = 1},
140         stack_max = 1,
141         on_use = book_on_use,
142 })
143
144 minetest.register_craft({
145         type = "shapeless",
146         output = "default:book_written",
147         recipe = {"default:book", "default:book_written"}
148 })
149
150 minetest.register_on_craft(function(itemstack, player, old_craft_grid, craft_inv)
151         if itemstack:get_name() ~= "default:book_written" then
152                 return
153         end
154
155         local copy = ItemStack("default:book_written")
156         local original
157         local index
158         for i = 1, player:get_inventory():get_size("craft") do
159                 if old_craft_grid[i]:get_name() == "default:book_written" then
160                         original = old_craft_grid[i]
161                         index = i
162                 end
163         end
164         if not original then
165                 return
166         end
167         local copymeta = original:get_metadata()
168         -- copy of the book held by player's mouse cursor
169         itemstack:set_metadata(copymeta)
170         -- put the book with metadata back in the craft grid
171         craft_inv:set_stack("craft", index, original)
172 end)
173
174 minetest.register_craftitem("default:coal_lump", {
175         description = "Coal Lump",
176         inventory_image = "default_coal_lump.png",
177         groups = {coal = 1}
178 })
179
180 minetest.register_craftitem("default:iron_lump", {
181         description = "Iron Lump",
182         inventory_image = "default_iron_lump.png",
183 })
184
185 minetest.register_craftitem("default:copper_lump", {
186         description = "Copper Lump",
187         inventory_image = "default_copper_lump.png",
188 })
189
190 minetest.register_craftitem("default:mese_crystal", {
191         description = "Mese Crystal",
192         inventory_image = "default_mese_crystal.png",
193 })
194
195 minetest.register_craftitem("default:gold_lump", {
196         description = "Gold Lump",
197         inventory_image = "default_gold_lump.png",
198 })
199
200 minetest.register_craftitem("default:diamond", {
201         description = "Diamond",
202         inventory_image = "default_diamond.png",
203 })
204
205 minetest.register_craftitem("default:clay_lump", {
206         description = "Clay Lump",
207         inventory_image = "default_clay_lump.png",
208 })
209
210 minetest.register_craftitem("default:steel_ingot", {
211         description = "Steel Ingot",
212         inventory_image = "default_steel_ingot.png",
213 })
214
215 minetest.register_craftitem("default:copper_ingot", {
216         description = "Copper Ingot",
217         inventory_image = "default_copper_ingot.png",
218 })
219
220 minetest.register_craftitem("default:bronze_ingot", {
221         description = "Bronze Ingot",
222         inventory_image = "default_bronze_ingot.png",
223 })
224
225 minetest.register_craftitem("default:gold_ingot", {
226         description = "Gold Ingot",
227         inventory_image = "default_gold_ingot.png"
228 })
229
230 minetest.register_craftitem("default:mese_crystal_fragment", {
231         description = "Mese Crystal Fragment",
232         inventory_image = "default_mese_crystal_fragment.png",
233 })
234
235 minetest.register_craftitem("default:clay_brick", {
236         description = "Clay Brick",
237         inventory_image = "default_clay_brick.png",
238 })
239
240 minetest.register_craftitem("default:obsidian_shard", {
241         description = "Obsidian Shard",
242         inventory_image = "default_obsidian_shard.png",
243 })
244
245 minetest.register_craftitem("default:flint", {
246         description = "Flint",
247         inventory_image = "default_flint.png"
248 })
249