minenux/minetest-mod-dinv
1
0
Fork 0
Code Pull Requests Releases Activity

Add scroll buttons to chests.

Browse Source
This commit is contained in:
Duane Robertson 2019-07-22 22:03:21 -05:00
parent b7185edbf7
commit 62bcff22e4
1 changed files with 117 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

137
init.lua
View File

@ -16,15 +16,6 @@ mod.dat = {}
local worn_inv = 'worn'
local sorted_items
mod.form_size = 'size[11.25,7.75]'
mod.main_inventory = 'list[current_player;main;0,4;8,4;'
mod.craft_inventory = 'list[current_player;craft;3,0;3,3;]'
mod.craft_preview = 'list[current_player;craftpreview;6,1;1,1;]'
mod.main_inventory_scroll_up = 'image_button[8,4;1,1;transparent_button.png;dinv_main_inventory_up;Up]'
mod.main_inventory_scroll_down = 'image_button[8,7;1,1;transparent_button.png;dinv_main_inventory_down;Down]'
mod.recipe_buttons = 'image_button[3,3;1,1;transparent_button.png;dinv_recipe_back;Back]image_button[5,3;1,1;transparent_button.png;dinv_recipe_fore;Fore]'
mod.worn_items_inv = 'list[current_player;worn;9.25,4;2,4;]'
minetest.register_craftitem(mod_name..':bag_small', {
inventory_image = 'bags_small.png',
@ -333,6 +324,16 @@ end
local worn_items = mod.worn_items
mod.form_size = 'size[11.25,7.75]'
mod.main_inventory = 'list[current_player;main;0,4;8,4;'
mod.craft_inventory = 'list[current_player;craft;3,0;3,3;]'
mod.craft_preview = 'list[current_player;craftpreview;6,1;1,1;]'
mod.main_inventory_scroll_up = 'image_button[8,4;1,1;transparent_button.png;dinv_main_inventory_up;Up]'
mod.main_inventory_scroll_down = 'image_button[8,7;1,1;transparent_button.png;dinv_main_inventory_down;Down]'
mod.recipe_buttons = 'image_button[3,3;1,1;transparent_button.png;dinv_recipe_back;Back]image_button[5,3;1,1;transparent_button.png;dinv_recipe_fore;Fore]'
mod.worn_items_inv = 'list[current_player;worn;9.25,4;2,4;]'
function mod.make_inventory_spec(player)
if not player then
return
@ -359,6 +360,91 @@ function mod.make_inventory_spec(player)
end
function default.chest.get_chest_formspec(pos, player)
local scroll_to = 8
if player and player.get_player_name then
local player_name = player:get_player_name()
if mod.dat[player_name].scroll_main_to then
scroll_to = mod.dat[player_name].scroll_main_to
end
end
local spos = pos.x .. ',' .. pos.y .. ',' .. pos.z
local formspec =
'size[9,9]' ..
'list[nodemeta:' .. spos .. ';main;0,0.3;8,4;]' ..
'list[current_player;main;0,4.85;8,1;]' ..
'list[current_player;main;0,6.08;8,3;' .. scroll_to .. ']' ..
'listring[nodemeta:' .. spos .. ';main]' ..
'listring[current_player;main]' ..
'image_button[8,6.08;1,1;transparent_button.png;dinv_chest_main_inventory_up;Up]' ..
'image_button[8,8.08;1,1;transparent_button.png;dinv_chest_main_inventory_down;Down]' ..
default.get_hotbar_bg(0,4.85)
return formspec
end
local original_chest_functions = {}
for _, nd in pairs({ 'default:chest', 'default:chest_locked' }) do
original_chest_functions[nd] = {}
original_chest_functions[nd].on_rightclick = minetest.registered_items[nd].on_rightclick
minetest.override_item(nd, {
on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
if clicker.get_player_name then
local player_name = clicker:get_player_name()
local dat = mod.dat[player_name]
if dat then
dat.chest_opened = pos
end
end
original_chest_functions[nd].on_rightclick(pos, node, clicker, itemstack, pointed_thing)
end
})
end
minetest.register_on_player_receive_fields(function(player, formname, fields)
if formname ~= 'default:chest' then
return
end
if not (player and fields) then
return
end
if not (
fields['dinv_chest_main_inventory_up']
or fields['dinv_chest_main_inventory_down']
) then
return
end
local player_name = player:get_player_name()
local dat = mod.dat[player_name] or {}
local pos = dat.chest_opened
if not pos then
return
end
local pinv = player:get_inventory()
local main_inventory_size = pinv:get_size('main')
if fields['dinv_chest_main_inventory_up'] then
dat['scroll_main_to'] = math.max(8, (dat['scroll_main_to'] or 8) - 16)
minetest.show_formspec(player_name, 'default:chest', default.chest.get_chest_formspec(pos, player))
elseif fields['dinv_chest_main_inventory_down'] then
dat['scroll_main_to'] = (dat['scroll_main_to'] or 8) + 16
if dat['scroll_main_to'] >= main_inventory_size then
dat['scroll_main_to'] = 8
end
minetest.show_formspec(player_name, 'default:chest', default.chest.get_chest_formspec(pos, player))
end
end)
function mod.recipe_grid(player)
local player_name = player:get_player_name()
local dat = mod.dat[player_name]
@ -474,22 +560,16 @@ function mod.scroll_main(player, amount, max)
return
end
local fs = player:get_inventory_formspec()
--print('.*' .. mod.main_inventory:gsub('%[', '%%[') .. '(%d+)%].*')
local scroll = fs:gsub('.*%' .. mod.main_inventory:gsub('%[', '%%[') .. '(%d+)%].*', '%1')
--print(scroll)
if scroll then
local scroll_n = tonumber(scroll)
if scroll_n and scroll_n % 8 == 0 then
scroll_n = (scroll_n + amount)
if scroll_n > max or scroll_n < 0 then
scroll_n = 0
local scroll = mod.dat[player_name].scroll_main_to or 0
if scroll and scroll % 8 == 0 then
scroll = (scroll + amount)
if scroll > max or scroll < 0 then
scroll = 0
end
mod.dat[player_name].scroll_main_to = scroll_n
mod.dat[player_name].scroll_main_to = scroll
player:set_inventory_formspec(mod.make_inventory_spec(player))
end
end
end
function mod.get_main_size_by_bags(player)
@ -505,6 +585,7 @@ function mod.get_main_size_by_bags(player)
return isize
end
function mod.set_main_size_by_bags(player)
if not player then
return
@ -592,6 +673,20 @@ end
minetest.register_on_player_receive_fields(function(player, formname, fields)
if not (player and fields) then
return
end
if not (
fields['dinv_main_inventory_up']
or fields['dinv_main_inventory_down']
or fields['dinv_recipe_list']
or fields['dinv_recipe_back']
or fields['dinv_recipe_fore']
) then
return
end
local pinv = player:get_inventory()
local main_inventory_size = pinv:get_size('main')