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, flammable = 2},
   7 })
   8
   9 minetest.register_craftitem("default:paper", {
  10         description = "Paper",
  11         inventory_image = "default_paper.png",
  12         groups = {flammable = 3},
  13 })
  14
  15
  16 local lpp = 14 -- Lines per book's page
  17 local function book_on_use(itemstack, user)
  18         local player_name = user:get_player_name()
  19         local meta = itemstack:get_meta()
  20         local title, text, owner = "", "", player_name
  21         local page, page_max, lines, string = 1, 1, {}, ""
  22
  23         -- Backwards compatibility
  24         local old_data = minetest.deserialize(itemstack:get_metadata())
  25         if old_data then
  26                 meta:from_table({ fields = old_data })
  27         end
  28
  29         local data = meta:to_table().fields
  30
  31         if data.owner then
  32                 title = data.title
  33                 text = data.text
  34                 owner = data.owner
  35
  36                 for str in (text .. "\n"):gmatch("([^\n]*)[\n]") do
  37                         lines[#lines+1] = str
  38                 end
  39
  40                 if data.page then
  41                         page = data.page
  42                         page_max = data.page_max
  43
  44                         for i = ((lpp * page) - lpp) + 1, lpp * page do
  45                                 if not lines[i] then break end
  46                                 string = string .. lines[i] .. "\n"
  47                         end
  48                 end
  49         end
  50
  51         local formspec
  52         if owner == player_name then
  53                 formspec = "size[8,8]" .. default.gui_bg ..
  54                         default.gui_bg_img ..
  55                         "field[0.5,1;7.5,0;title;Title:;" ..
  56                                 minetest.formspec_escape(title) .. "]" ..
  57                         "textarea[0.5,1.5;7.5,7;text;Contents:;" ..
  58                                 minetest.formspec_escape(text) .. "]" ..
  59                         "button_exit[2.5,7.5;3,1;save;Save]"
  60         else
  61                 formspec = "size[8,8]" .. default.gui_bg ..
  62                         default.gui_bg_img ..
  63                         "label[0.5,0.5;by " .. owner .. "]" ..
  64                         "tablecolumns[color;text]" ..
  65                         "tableoptions[background=#00000000;highlight=#00000000;border=false]" ..
  66                         "table[0.4,0;7,0.5;title;#FFFF00," .. minetest.formspec_escape(title) .. "]" ..
  67                         "textarea[0.5,1.5;7.5,7;;" ..
  68                                 minetest.formspec_escape(string ~= "" and string or text) .. ";]" ..
  69                         "button[2.4,7.6;0.8,0.8;book_prev;<]" ..
  70                         "label[3.2,7.7;Page " .. page .. " of " .. page_max .. "]" ..
  71                         "button[4.9,7.6;0.8,0.8;book_next;>]"
  72         end
  73
  74         minetest.show_formspec(player_name, "default:book", formspec)
  75         return itemstack
  76 end
  77
  78 local max_text_size = 10000
  79 local max_title_size = 80
  80 local short_title_size = 35
  81 minetest.register_on_player_receive_fields(function(player, formname, fields)
  82         if formname ~= "default:book" then return end
  83         local inv = player:get_inventory()
  84         local stack = player:get_wielded_item()
  85
  86         if fields.save and fields.title and fields.text
  87                         and fields.title ~= "" and fields.text ~= "" then
  88                 local new_stack, data
  89                 if stack:get_name() ~= "default:book_written" then
  90                         local count = stack:get_count()
  91                         if count == 1 then
  92                                 stack:set_name("default:book_written")
  93                         else
  94                                 stack:set_count(count - 1)
  95                                 new_stack = ItemStack("default:book_written")
  96                         end
  97                 else
  98                         data = stack:get_meta():to_table().fields
  99                 end
 100
 101                 if data and data.owner and data.owner ~= player:get_player_name() then
 102                         return
 103                 end
 104
 105                 if not data then data = {} end
 106                 data.title = fields.title:sub(1, max_title_size)
 107                 data.owner = player:get_player_name()
 108                 local short_title = data.title
 109                 -- Don't bother triming the title if the trailing dots would make it longer
 110                 if #short_title > short_title_size + 3 then
 111                         short_title = short_title:sub(1, short_title_size) .. "..."
 112                 end
 113                 data.description = "\""..short_title.."\" by "..data.owner
 114                 data.text = fields.text:sub(1, max_text_size)
 115                 data.text = data.text:gsub("\r\n", "\n"):gsub("\r", "\n")
 116                 data.page = 1
 117                 data.page_max = math.ceil((#data.text:gsub("[^\n]", "") + 1) / lpp)
 118
 119                 if new_stack then
 120                         new_stack:get_meta():from_table({ fields = data })
 121                         if inv:room_for_item("main", new_stack) then
 122                                 inv:add_item("main", new_stack)
 123                         else
 124                                 minetest.add_item(player:getpos(), new_stack)
 125                         end
 126                 else
 127                         stack:get_meta():from_table({ fields = data })
 128                 end
 129
 130         elseif fields.book_next or fields.book_prev then
 131                 local data = stack:get_meta():to_table().fields
 132                 if not data or not data.page then
 133                         return
 134                 end
 135
 136                 data.page = tonumber(data.page)
 137                 data.page_max = tonumber(data.page_max)
 138
 139                 if fields.book_next then
 140                         data.page = data.page + 1
 141                         if data.page > data.page_max then
 142                                 data.page = 1
 143                         end
 144                 else
 145                         data.page = data.page - 1
 146                         if data.page == 0 then
 147                                 data.page = data.page_max
 148                         end
 149                 end
 150
 151                 stack:get_meta():from_table({fields = data})
 152                 stack = book_on_use(stack, player)
 153         end
 154
 155         -- Update stack
 156         player:set_wielded_item(stack)
 157 end)
 158
 159 minetest.register_craftitem("default:book", {
 160         description = "Book",
 161         inventory_image = "default_book.png",
 162         groups = {book = 1, flammable = 3},
 163         on_use = book_on_use,
 164 })
 165
 166 minetest.register_craftitem("default:book_written", {
 167         description = "Book With Text",
 168         inventory_image = "default_book_written.png",
 169         groups = {book = 1, not_in_creative_inventory = 1, flammable = 3},
 170         stack_max = 1,
 171         on_use = book_on_use,
 172 })
 173
 174 minetest.register_craft({
 175         type = "shapeless",
 176         output = "default:book_written",
 177         recipe = {"default:book", "default:book_written"}
 178 })
 179
 180 minetest.register_on_craft(function(itemstack, player, old_craft_grid, craft_inv)
 181         if itemstack:get_name() ~= "default:book_written" then
 182                 return
 183         end
 184
 185         local original
 186         local index
 187         for i = 1, player:get_inventory():get_size("craft") do
 188                 if old_craft_grid[i]:get_name() == "default:book_written" then
 189                         original = old_craft_grid[i]
 190                         index = i
 191                 end
 192         end
 193         if not original then
 194                 return
 195         end
 196         local copymeta = original:get_meta():to_table()
 197         -- copy of the book held by player's mouse cursor
 198         itemstack:get_meta():from_table(copymeta)
 199         -- put the book with metadata back in the craft grid
 200         craft_inv:set_stack("craft", index, original)
 201 end)
 202
 203 minetest.register_craftitem("default:skeleton_key", {
 204         description = "Skeleton Key",
 205         inventory_image = "default_key_skeleton.png",
 206         groups = {key = 1},
 207         on_use = function(itemstack, user, pointed_thing)
 208                 if pointed_thing.type ~= "node" then
 209                         return itemstack
 210                 end
 211
 212                 local pos = pointed_thing.under
 213                 local node = minetest.get_node(pos)
 214
 215                 if not node then
 216                         return itemstack
 217                 end
 218
 219                 local on_skeleton_key_use = minetest.registered_nodes[node.name].on_skeleton_key_use
 220                 if not on_skeleton_key_use then
 221                         return itemstack
 222                 end
 223
 224                 -- make a new key secret in case the node callback needs it
 225                 local random = math.random
 226                 local newsecret = string.format(
 227                         "%04x%04x%04x%04x",
 228                         random(2^16) - 1, random(2^16) - 1,
 229                         random(2^16) - 1, random(2^16) - 1)
 230
 231                 local secret, _, _ = on_skeleton_key_use(pos, user, newsecret)
 232
 233                 if secret then
 234                         local inv = minetest.get_inventory({type="player", name=user:get_player_name()})
 235
 236                         -- update original itemstack
 237                         itemstack:take_item()
 238
 239                         -- finish and return the new key
 240                         local new_stack = ItemStack("default:key")
 241                         local meta = new_stack:get_meta()
 242                         meta:set_string("secret", secret)
 243                         meta:set_string("description", "Key to "..user:get_player_name().."'s "
 244                                 ..minetest.registered_nodes[node.name].description)
 245
 246                         if itemstack:get_count() == 0 then
 247                                 itemstack = new_stack
 248                         else
 249                                 if inv:add_item("main", new_stack):get_count() > 0 then
 250                                         minetest.add_item(user:getpos(), new_stack)
 251                                 end -- else: added to inventory successfully
 252                         end
 253
 254                         return itemstack
 255                 end
 256         end
 257 })
 258
 259 minetest.register_craftitem("default:coal_lump", {
 260         description = "Coal Lump",
 261         inventory_image = "default_coal_lump.png",
 262         groups = {coal = 1, flammable = 1}
 263 })
 264
 265 minetest.register_craftitem("default:iron_lump", {
 266         description = "Iron Lump",
 267         inventory_image = "default_iron_lump.png",
 268 })
 269
 270 minetest.register_craftitem("default:copper_lump", {
 271         description = "Copper Lump",
 272         inventory_image = "default_copper_lump.png",
 273 })
 274
 275 minetest.register_craftitem("default:tin_lump", {
 276         description = "Tin Lump",
 277         inventory_image = "default_tin_lump.png",
 278 })
 279
 280 minetest.register_craftitem("default:mese_crystal", {
 281         description = "Mese Crystal",
 282         inventory_image = "default_mese_crystal.png",
 283 })
 284
 285 minetest.register_craftitem("default:gold_lump", {
 286         description = "Gold Lump",
 287         inventory_image = "default_gold_lump.png",
 288 })
 289
 290 minetest.register_craftitem("default:diamond", {
 291         description = "Diamond",
 292         inventory_image = "default_diamond.png",
 293 })
 294
 295 minetest.register_craftitem("default:clay_lump", {
 296         description = "Clay Lump",
 297         inventory_image = "default_clay_lump.png",
 298 })
 299
 300 minetest.register_craftitem("default:steel_ingot", {
 301         description = "Steel Ingot",
 302         inventory_image = "default_steel_ingot.png",
 303 })
 304
 305 minetest.register_craftitem("default:copper_ingot", {
 306         description = "Copper Ingot",
 307         inventory_image = "default_copper_ingot.png",
 308 })
 309
 310 minetest.register_craftitem("default:tin_ingot", {
 311         description = "Tin Ingot",
 312         inventory_image = "default_tin_ingot.png",
 313 })
 314
 315 minetest.register_craftitem("default:bronze_ingot", {
 316         description = "Bronze Ingot",
 317         inventory_image = "default_bronze_ingot.png",
 318 })
 319
 320 minetest.register_craftitem("default:gold_ingot", {
 321         description = "Gold Ingot",
 322         inventory_image = "default_gold_ingot.png"
 323 })
 324
 325 minetest.register_craftitem("default:mese_crystal_fragment", {
 326         description = "Mese Crystal Fragment",
 327         inventory_image = "default_mese_crystal_fragment.png",
 328 })
 329
 330 minetest.register_craftitem("default:clay_brick", {
 331         description = "Clay Brick",
 332         inventory_image = "default_clay_brick.png",
 333 })
 334
 335 minetest.register_craftitem("default:obsidian_shard", {
 336         description = "Obsidian Shard",
 337         inventory_image = "default_obsidian_shard.png",
 338 })
 339
 340 minetest.register_craftitem("default:flint", {
 341         description = "Flint",
 342         inventory_image = "default_flint.png"
 343 })