+local minetest,pairs = minetest,pairs
+
+inventory = {}
+local tmi_master_inventory = {}
+local is_crafting = {}
+local pool = {}
+local max = 7*7
+--2x2 formspec
+local base_inv =
+"size[17.2,8.75]"..
+"background[-0.19,-0.25;9.41,9.49;main_inventory.png]"..
+"listcolors[#8b8a89;#c9c3c6;#3e3d3e;#000000;#FFFFFF]"..
+"list[current_player;main;0,4.5;9,1;]".. --hot bar
+"list[current_player;main;0,6;9,3;9]".. --big part
+"list[current_player;craft;2.5,1;2,2;]"..
+--armor slots
+"list[current_player;armor_head;0.25,0;1,1;]"..
+"list[current_player;armor_torso;0.25,1;1,1;]"..
+"list[current_player;armor_legs;0.25,2;1,1;]"..
+"list[current_player;armor_feet;0.25,3;1,1;]"..
+--craft preview with ring
+"list[current_player;craftpreview;6.1,1.5;1,1;]"..
+"listring[current_player;main]"..
+"listring[current_player;craft]"
+--this is the 3x3 crafting table formspec
+local crafting_table_inv =
+"size[17.2,8.75]"..
+"background[-0.19,-0.25;9.41,9.49;crafting_inventory_workbench.png]"..
+"listcolors[#8b8a89;#c9c3c6;#3e3d3e;#000000;#FFFFFF]"..
+"list[current_player;main;0,4.5;9,1;]".. --hot bar
+"list[current_player;main;0,6;9,3;9]".. --big part
+"list[current_player;craft;1.75,0.5;3,3;]"..
+--armor slots
+"list[current_player;armor_head;0.25,0;1,1;]"..
+"list[current_player;armor_torso;0.25,1;1,1;]"..
+"list[current_player;armor_legs;0.25,2;1,1;]"..
+"list[current_player;armor_feet;0.25,3;1,1;]"..
+--craft preview with ring
+"list[current_player;craftpreview;6.1,1.5;1,1;]"..
+"listring[current_player;main]"..
+"listring[current_player;craft]"
+--this is from Linuxdirk, thank you AspireMint for showing me this
+local recipe_converter = function (items, width)
+ local usable_recipe = { {}, {}, {} }
+
+ -- The recipe is a shapeless recipe so all items are in one table
+ if width == 0 then
+ usable_recipe = items
+ end
+
+ -- x _ _
+ -- x _ _
+ -- x _ _
+ if width == 1 then
+ usable_recipe[1][1] = items[1] or ''
+ usable_recipe[2][1] = items[2] or ''
+ usable_recipe[3][1] = items[3] or ''
+ end
+
+ -- x x _
+ -- x x _
+ -- x x _
+ if width == 2 then
+ usable_recipe[1][1] = items[1] or ''
+ usable_recipe[1][2] = items[2] or ''
+ usable_recipe[2][1] = items[3] or ''
+ usable_recipe[2][2] = items[4] or ''
+ usable_recipe[3][1] = items[5] or ''
+ usable_recipe[3][2] = items[6] or ''
+ end
+
+ -- x x x
+ -- x x x
+ -- x x x
+ if width == 3 then
+ usable_recipe[1][1] = items[1] or ''
+ usable_recipe[1][2] = items[2] or ''
+ usable_recipe[1][3] = items[3] or ''
+ usable_recipe[2][1] = items[4] or ''
+ usable_recipe[2][2] = items[5] or ''
+ usable_recipe[2][3] = items[6] or ''
+ usable_recipe[3][1] = items[7] or ''
+ usable_recipe[3][2] = items[8] or ''
+ usable_recipe[3][3] = items[9] or ''
+ end
+ return(usable_recipe)
+end
+
+local map_group_to_item = {
+ ["coal"] = "main:coal",
+ ["glass"] = "main:glass",
+ ["sand"] = "main:sand",
+ ["stick"] = "main:stick",
+ ["stone"] = "main:cobble",
+ ["tree"] = "main:tree",
+ ["wood"] = "main:wood"
+}
+
+local get_if_group = function(item)
+ if item ~= nil and item:sub(1,6) == "group:" then
+ local group_name = item:sub(7, item:len())
+ local mapped_item = map_group_to_item[group_name]
+ if mapped_item ~= nil then
+ return(mapped_item)
+ end
+ end
+ return(item)
+end
+
+
+local base_x = 0.75
+local base_y = -0.5
+local output_constant =
+"listcolors[#8b8a89;#c9c3c6;#3e3d3e;#000000;#FFFFFF]"..
+"list[current_player;main;0,4.5;9,1;]".. --hot bar
+"list[current_player;main;0,6;9,3;9]".. --main inventory
+"button[5,3.5;1,1;inventory.back;back]" --back button
+local output
+local recipe
+local usable_recipe
+local function create_craft_formspec(item)
+ --don't do air
+ if item == "" then
+ return("")
+ end
+
+ recipe = minetest.get_craft_recipe(item)
+
+ usable_table = recipe_converter(recipe.items, recipe.width)
+
+ output = output_constant
+
+ if recipe.method == "normal" then
+ if usable_table then
+ --shaped (regular)
+ if recipe.width > 0 then
+ for x = 1,3 do
+ for y = 1,3 do
+ item = get_if_group(usable_table[x][y])
+ if item then
+ output = output.."item_image_button["..base_x+y..","..base_y+x..";1,1;"..item..";"..item..";]"
+ else
+ output = output.."item_image_button["..base_x+y..","..base_y+x..";1,1;;;]"
+ end
+ end
+ end
+ --shapeless
+ else
+ local i = 1
+ for x = 1,3 do
+ for y = 1,3 do
+ item = get_if_group(usable_table[i])
+ if item then
+ output = output.."item_image_button["..base_x+y..","..base_y+x..";1,1;"..item..";"..item..";]"
+ else
+ output = output.."item_image_button["..base_x+y..","..base_y+x..";1,1;;;]"
+ end
+ i = i + 1
+ end
+ end
+ end
+ end
+ elseif recipe.method == "cooking" then
+ item = recipe.items[1]
+ output = output.."item_image_button["..(base_x+2)..","..(base_y+1)..";1,1;"..item..";"..item..";]"
+ output = output.."image[2.75,1.5;1,1;default_furnace_fire_fg.png]"
+ end
+ return(output)
+end
+
+local function cheat_button(name)
+ if pool[name] and pool[name].cheating then
+ return "button[12.75,7.6;2,2;inventory.cheat;cheat:on]"
+ elseif minetest.check_player_privs(name, {give = true}) then
+ return "button[12.75,7.6;2,2;inventory.cheat;cheat:off]"
+ else
+ return ""
+ end
+end
+
+local function empty_armor_slots(player)
+ local fs = "formspec_version[3]"
+ local inv = player:get_inventory()
+ for i, comp in ipairs({"head", "torso", "legs", "feet"}) do
+ if inv:get_stack("armor_" .. comp, 1):get_name() == "" then
+ fs = fs .. "image[0.25," .. (i - 1) .. ";1,1;inventory_empty_armor_slot_" .. comp .. ".png]"
+ end
+ end
+ return fs
+end
+
+local form
+local id
+local inv
+local item
+local stack
+local craft_inv
+local name
+local temp_pool
+minetest.register_on_player_receive_fields(function(player, formname, fields)
+ name = player:get_player_name()
+ temp_pool = pool[name]
+
+ if formname == "" then
+ form = base_inv
+ id = ""
+ elseif formname == "crafting" then
+ form = crafting_table_inv
+ id = "crafting"
+ if fields.quit then
+ is_crafting[name] = nil
+ end
+ end
+
+ --"next" button
+ if fields["inventory.next"] then
+ temp_pool.page = temp_pool.page + 1
+ --page loops back to first
+ if temp_pool.page > tmi_master_inventory.page_limit then
+ temp_pool.page = 1
+ end
+ minetest.show_formspec(name,id, form..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ minetest.sound_play("lever", {to_player = name,gain=0.7})
+ player:set_inventory_formspec(base_inv..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ --"prev" button
+ elseif fields["inventory.prev"] then
+ temp_pool.page = temp_pool.page - 1
+ --page loops back to end
+ if temp_pool.page < 1 then
+ temp_pool.page = tmi_master_inventory.page_limit
+ end
+
+ minetest.show_formspec(name,id, form..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ minetest.sound_play("lever", {to_player = name,gain=0.7})
+ player:set_inventory_formspec(base_inv..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ elseif fields["inventory.back"] then
+
+ minetest.show_formspec(name,id, form..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ minetest.sound_play("lever", {to_player = name,gain=0.7})
+ --this resets the craft table
+ elseif fields.quit then
+ inv = player:get_inventory()
+ dump_craft(player)
+ inv:set_width("craft", 2)
+ inv:set_size("craft", 4)
+ --reset the player inv
+ --minetest.show_formspec(name,id, form..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ elseif fields["inventory.cheat"] then
+ --check if the player has the give priv
+ if (not temp_pool.cheating and minetest.get_player_privs(name).give == true) or temp_pool.cheating == true then
+ temp_pool.cheating = not temp_pool.cheating
+
+ minetest.show_formspec(name,id, form..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ minetest.sound_play("lever", {to_player = name,gain=0.7})
+ player:set_inventory_formspec(base_inv..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ else
+ minetest.chat_send_player(name, "Sorry m8, server says I can't let you do that :(")
+ minetest.sound_play("lever", {to_player = name,gain=0.7,pitch=0.7})
+ end
+ --this is the "cheating" aka giveme function and craft recipe
+ elseif fields and type(fields) == "table" and string.match(next(fields),"inventory.") then
+
+ item = string.gsub(next(fields), "inventory.", "")
+ stack = ItemStack(item.." 64")
+ inv = player:get_inventory()
+ if temp_pool.cheating and minetest.get_player_privs(name).give then
+
+ --room for item
+ if inv and inv:room_for_item("main",stack) then
+ inv:add_item("main", stack)
+ minetest.sound_play("pickup", {to_player = name,gain=0.7,pitch = math.random(60,100)/100})
+ --no room for item
+ else
+ minetest.chat_send_player(name, "Might want to clean up your inventory")
+ minetest.sound_play("lever", {to_player = name,gain=0.7,pitch=0.7})
+ end
+
+ --this is to get the craft recipe
+ else
+ craft_inv = create_craft_formspec(item)
+ if craft_inv and craft_inv ~= "" then
+ minetest.show_formspec(name, id, empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..craft_inv..cheat_button(name))
+ minetest.sound_play("lever", {to_player = name,gain=0.7})
+ end
+ end
+
+ end
+end)
+
+
+--run through the items and then set the pages
+local item_counter = 0
+local page = 1
+local x = 0
+local y = 0
+
+minetest.register_on_mods_loaded(function()
+
+--sort all items (There is definitely a better way to do this)
+
+--get all craftable items
+local all_items_table = {}
+for index,data in pairs(minetest.registered_items) do
+ if data.name ~= "" then
+ local recipe = minetest.get_craft_recipe(data.name)
+ --only put in craftable items
+ if recipe.method then
+ table.insert(all_items_table,data.name)
+ end
+ end
+end
+
+table.sort(all_items_table)
+
+--dump all the items in
+
+tmi_master_inventory["page_"..page] = "size[17.2,8.75]background[-0.19,-0.25;9.41,9.49;crafting_inventory_workbench.png]"
+
+for _,item in pairs(all_items_table) do
+ tmi_master_inventory["page_"..page] = tmi_master_inventory["page_"..page].."item_image_button["..(9.25+x)..","..y..";1,1;"..item..";inventory."..item..";]"
+ x = x + 1
+ if x > 7 then
+ x = 0
+ y = y + 1
+ end
+ if y > 7 then
+ y = 0
+ page = page + 1
+ tmi_master_inventory["page_"..page] = "size[17.2,8.75]background[-0.19,-0.25;9.41,9.49;crafting_inventory_workbench.png]"
+ end
+end
+
+--add buttons and labels
+for i = 1,page do
+ --set the last page
+ tmi_master_inventory["page_"..i] = tmi_master_inventory["page_"..i].."button[9.25,7.6;2,2;inventory.prev;prev]"..
+ "button[15.25,7.6;2,2;inventory.next;next]"..
+ --this is +1 so it makes more sense
+ "label[11.5,8.25;page "..i.."/"..page.."]"
+end
+
+tmi_master_inventory.page_limit = page
+
+--override crafting table
+local name
+local temp_pool
+
+minetest.override_item("craftingtable:craftingtable", {
+ on_rightclick = function(pos, node, player, itemstack)
+ name = player:get_player_name()
+ is_crafting[name] = true
+ temp_pool = pool[name]
+ player:get_inventory():set_width("craft", 3)
+ player:get_inventory():set_size("craft", 9)
+ minetest.show_formspec(name, "crafting", crafting_table_inv..empty_armor_slots(player)..tmi_master_inventory["page_"..temp_pool.page]..cheat_button(name))
+ end
+})
+end)
+
+function inventory.set(player)
+ player:set_inventory_formspec(base_inv..empty_armor_slots(player)..tmi_master_inventory["page_1"]..cheat_button(player:get_player_name()))
+end
+
+function inventory.reload(player)
+ inventory.set(player)
+ local name = player:get_player_name()
+ if is_crafting[name] then
+ minetest.show_formspec(name, "crafting", crafting_table_inv..empty_armor_slots(player)..tmi_master_inventory["page_1"]..cheat_button(name))
+ else
+ minetest.show_formspec(name, "", base_inv..empty_armor_slots(player)..tmi_master_inventory["page_1"]..cheat_button(name))
+ end
+end
+
+
+--set new players inventory up
+local name
+local temp_pool
+local inv
+minetest.register_on_joinplayer(function(player)
+ name = player:get_player_name()
+ pool[name] = {}
+ temp_pool = pool[name]
+
+ temp_pool.page = 1
+ temp_pool.cheating = false
+
+ inv = player:get_inventory()
+ inv:set_width("craft", 2)
+ inv:set_width("main", 9)
+ inv:set_size("main", 9*4)
+ inv:set_size("craft", 4)
+
+ inventory.set(player)
+
+ player:hud_set_hotbar_itemcount(9)
+ player:hud_set_hotbar_image("inventory_hotbar.png")
+ player:hud_set_hotbar_selected_image("hotbar_selected.png")
+end)
+
+local name
+minetest.register_on_leaveplayer(function(player)
+ name = player:get_player_name()
+ pool[name] = nil
+ is_crafting[name] = nil
+end)