345 lines
13 KiB
Lua
345 lines
13 KiB
Lua
-- X Bows
|
|
-- by SaKeL
|
|
|
|
minetest = minetest.global_exists('minetest') and minetest--[[@as Minetest]]
|
|
ItemStack = minetest.global_exists('ItemStack') and ItemStack--[[@as ItemStack]]
|
|
vector = minetest.global_exists('vector') and vector--[[@as Vector]]
|
|
default = minetest.global_exists('default') and default--[[@as MtgDefault]]
|
|
sfinv = minetest.global_exists('sfinv') and sfinv--[[@as Sfinv]]
|
|
unified_inventory = minetest.global_exists('unified_inventory') and unified_inventory--[[@as UnifiedInventory]]
|
|
player_api = minetest.global_exists('player_api') and player_api--[[@as MtgPlayerApi]]
|
|
|
|
math.randomseed(tonumber(tostring(os.time()):reverse():sub(1, 9))--[[@as number]])
|
|
|
|
local path = minetest.get_modpath('x_bows')
|
|
local mod_start_time = minetest.get_us_time()
|
|
local bow_charged_timer = 0
|
|
|
|
dofile(path .. '/api.lua')
|
|
dofile(path .. '/particle_effects.lua')
|
|
dofile(path .. '/nodes.lua')
|
|
dofile(path .. '/arrow.lua')
|
|
dofile(path .. '/items.lua')
|
|
|
|
if XBows.i3 then
|
|
XBowsQuiver:i3_register_page()
|
|
elseif XBows.unified_inventory then
|
|
XBowsQuiver:ui_register_page()
|
|
else
|
|
XBowsQuiver:sfinv_register_page()
|
|
end
|
|
|
|
minetest.register_on_joinplayer(function(player)
|
|
local inv_quiver = player:get_inventory()--[[@as InvRef]]
|
|
local inv_arrow = player:get_inventory()--[[@as InvRef]]
|
|
|
|
if XBows.settings.x_bows_show_3d_quiver and XBows.player_api then
|
|
---Order matters here
|
|
if XBows.skinsdb then
|
|
player_api.set_model(player, 'skinsdb_3d_armor_character_5.b3d')
|
|
elseif XBows._3d_armor then
|
|
player_api.set_model(player, 'x_bows_3d_armor_character.b3d')
|
|
else
|
|
player_api.set_model(player, 'x_bows_character.b3d')
|
|
end
|
|
end
|
|
|
|
inv_quiver:set_size('x_bows:quiver_inv', 1 * 1)
|
|
inv_arrow:set_size('x_bows:arrow_inv', 1 * 1)
|
|
|
|
local quiver_stack = player:get_inventory():get_stack('x_bows:quiver_inv', 1)
|
|
|
|
if quiver_stack and not quiver_stack:is_empty() then
|
|
local st_meta = quiver_stack:get_meta()
|
|
local quiver_id = st_meta:get_string('quiver_id')
|
|
|
|
---create detached inventory
|
|
local detached_inv = XBowsQuiver:get_or_create_detached_inv(
|
|
quiver_id,
|
|
player:get_player_name(),
|
|
st_meta:get_string('quiver_items')
|
|
)
|
|
|
|
---set model textures
|
|
if detached_inv:is_empty('main') then
|
|
XBowsQuiver.quiver_empty_state[player:get_player_name()] = false
|
|
XBowsQuiver:show_3d_quiver(player, {is_empty = true})
|
|
else
|
|
XBowsQuiver.quiver_empty_state[player:get_player_name()] = true
|
|
XBowsQuiver:show_3d_quiver(player)
|
|
end
|
|
else
|
|
---set model textures
|
|
XBowsQuiver:hide_3d_quiver(player)
|
|
end
|
|
|
|
XBows:reset_charged_bow(player, true)
|
|
XBowsQuiver:close_quiver(player)
|
|
end)
|
|
|
|
if XBows.settings.x_bows_show_3d_quiver and XBows.player_api then
|
|
local model_name = 'x_bows_character.b3d'
|
|
|
|
if XBows.skinsdb then
|
|
---skinsdb
|
|
model_name = 'skinsdb_3d_armor_character_5.b3d'
|
|
elseif XBows._3d_armor then
|
|
---3d armor
|
|
model_name = 'x_bows_3d_armor_character.b3d'
|
|
end
|
|
|
|
player_api.register_model(model_name, {
|
|
animation_speed = 30,
|
|
textures = {'character.png'},
|
|
animations = {
|
|
-- Standard animations.
|
|
stand = {x = 0, y = 79},
|
|
lay = {x = 162, y = 166, eye_height = 0.3, override_local = true,
|
|
collisionbox = {-0.6, 0.0, -0.6, 0.6, 0.3, 0.6}},
|
|
walk = {x = 168, y = 187},
|
|
mine = {x = 189, y = 198},
|
|
walk_mine = {x = 200, y = 219},
|
|
sit = {x = 81, y = 160, eye_height = 0.8, override_local = true,
|
|
collisionbox = {-0.3, 0.0, -0.3, 0.3, 1.0, 0.3}}
|
|
},
|
|
collisionbox = {-0.3, 0.0, -0.3, 0.3, 1.7, 0.3},
|
|
stepheight = 0.6,
|
|
eye_height = 1.47
|
|
})
|
|
end
|
|
|
|
---formspec callbacks
|
|
minetest.register_allow_player_inventory_action(function(player, action, inventory, inventory_info)
|
|
---arrow inventory
|
|
if action == 'move' and inventory_info.to_list == 'x_bows:arrow_inv' then
|
|
local stack = inventory:get_stack(inventory_info.from_list, inventory_info.from_index)
|
|
|
|
if minetest.get_item_group(stack:get_name(), 'arrow') ~= 0 then
|
|
return inventory_info.count
|
|
else
|
|
return 0
|
|
end
|
|
elseif action == 'move' and inventory_info.from_list == 'x_bows:arrow_inv' then
|
|
local stack = inventory:get_stack(inventory_info.from_list, inventory_info.from_index)
|
|
|
|
if minetest.get_item_group(stack:get_name(), 'arrow') ~= 0 then
|
|
return inventory_info.count
|
|
else
|
|
return 0
|
|
end
|
|
elseif action == 'put' and inventory_info.listname == 'x_bows:arrow_inv' then
|
|
if minetest.get_item_group(inventory_info.stack:get_name(), 'arrow') ~= 0 then
|
|
return inventory_info.stack:get_count()
|
|
else
|
|
return 0
|
|
end
|
|
elseif action == 'take' and inventory_info.listname == 'x_bows:arrow_inv' then
|
|
if minetest.get_item_group(inventory_info.stack:get_name(), 'arrow') ~= 0 then
|
|
return inventory_info.stack:get_count()
|
|
else
|
|
return 0
|
|
end
|
|
end
|
|
|
|
---quiver inventory
|
|
if action == 'move' and inventory_info.to_list == 'x_bows:quiver_inv' then
|
|
local stack = inventory:get_stack(inventory_info.from_list, inventory_info.from_index)
|
|
if minetest.get_item_group(stack:get_name(), 'quiver') ~= 0 then
|
|
return inventory_info.count
|
|
else
|
|
return 0
|
|
end
|
|
elseif action == 'move' and inventory_info.from_list == 'x_bows:quiver_inv' then
|
|
local stack = inventory:get_stack(inventory_info.from_list, inventory_info.from_index)
|
|
if minetest.get_item_group(stack:get_name(), 'quiver') ~= 0 then
|
|
return inventory_info.count
|
|
else
|
|
return 0
|
|
end
|
|
elseif action == 'put' and inventory_info.listname == 'x_bows:quiver_inv' then
|
|
if minetest.get_item_group(inventory_info.stack:get_name(), 'quiver') ~= 0 then
|
|
return inventory_info.stack:get_count()
|
|
else
|
|
return 0
|
|
end
|
|
elseif action == 'take' and inventory_info.listname == 'x_bows:quiver_inv' then
|
|
if minetest.get_item_group(inventory_info.stack:get_name(), 'quiver') ~= 0 then
|
|
return inventory_info.stack:get_count()
|
|
else
|
|
return 0
|
|
end
|
|
end
|
|
|
|
return inventory_info.count or inventory_info.stack:get_count()
|
|
end)
|
|
|
|
minetest.register_on_player_inventory_action(function(player, action, inventory, inventory_info)
|
|
---arrow
|
|
if action == 'move' and inventory_info.to_list == 'x_bows:arrow_inv' then
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
elseif action == 'move' and inventory_info.from_list == 'x_bows:arrow_inv' then
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
elseif action == 'put' and inventory_info.listname == 'x_bows:arrow_inv' then
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
elseif action == 'take' and inventory_info.listname == 'x_bows:arrow_inv' then
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
end
|
|
|
|
---quiver
|
|
if action == 'move' and inventory_info.to_list == 'x_bows:quiver_inv' then
|
|
local stack = inventory:get_stack(inventory_info.to_list, inventory_info.to_index)
|
|
|
|
---init detached inventory if not already
|
|
local st_meta = stack:get_meta()
|
|
local quiver_id = st_meta:get_string('quiver_id')
|
|
|
|
if quiver_id == '' then
|
|
quiver_id = stack:get_name()..'_'..XBows.uuid()
|
|
st_meta:set_string('quiver_id', quiver_id)
|
|
inventory:set_stack(inventory_info.to_list, inventory_info.to_index, stack)
|
|
end
|
|
|
|
local detached_inv = XBowsQuiver:get_or_create_detached_inv(
|
|
quiver_id,
|
|
player:get_player_name(),
|
|
st_meta:get_string('quiver_items')
|
|
)
|
|
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
|
|
---set player visual
|
|
if detached_inv:is_empty('main') then
|
|
XBowsQuiver.quiver_empty_state[player:get_player_name()] = false
|
|
XBowsQuiver:show_3d_quiver(player, {is_empty = true})
|
|
else
|
|
XBowsQuiver.quiver_empty_state[player:get_player_name()] = true
|
|
XBowsQuiver:show_3d_quiver(player)
|
|
end
|
|
elseif action == 'move' and inventory_info.from_list == 'x_bows:quiver_inv' then
|
|
local stack = inventory:get_stack(inventory_info.from_list, inventory_info.from_index)
|
|
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
|
|
---set player visual
|
|
if stack:is_empty() then
|
|
XBowsQuiver:hide_3d_quiver(player)
|
|
end
|
|
elseif action == 'put' and inventory_info.listname == 'x_bows:quiver_inv' then
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
elseif action == 'take' and inventory_info.listname == 'x_bows:quiver_inv' then
|
|
if XBows.i3 then
|
|
i3.set_fs(player)
|
|
elseif XBows.unified_inventory then
|
|
unified_inventory.set_inventory_formspec(player, 'x_bows:quiver_page')
|
|
else
|
|
sfinv.set_player_inventory_formspec(player)
|
|
end
|
|
|
|
---set player visual
|
|
if inventory:is_empty(inventory_info.listname) then
|
|
XBowsQuiver:hide_3d_quiver(player)
|
|
end
|
|
end
|
|
end)
|
|
|
|
minetest.register_on_player_receive_fields(function(player, formname, fields)
|
|
if player and fields.quit then
|
|
XBowsQuiver:close_quiver(player, formname)
|
|
end
|
|
end)
|
|
|
|
---backwards compatibility
|
|
minetest.register_alias('x_bows:arrow_diamond_tipped_poison', 'x_bows:arrow_diamond')
|
|
|
|
-- sneak, fov adjustments when bow is charged
|
|
minetest.register_globalstep(function(dtime)
|
|
bow_charged_timer = bow_charged_timer + dtime
|
|
|
|
if bow_charged_timer > 0.5 then
|
|
for _, player in ipairs(minetest.get_connected_players()) do
|
|
local player_name = player:get_player_name()
|
|
local wielded_stack = player:get_wielded_item()
|
|
local wielded_stack_name = wielded_stack:get_name()
|
|
|
|
if not wielded_stack_name then
|
|
return
|
|
end
|
|
|
|
if not XBows.player_bow_sneak[player_name] then
|
|
XBows.player_bow_sneak[player_name] = {}
|
|
end
|
|
|
|
if minetest.get_item_group(wielded_stack_name, 'bow_charged') ~= 0 and not XBows.player_bow_sneak[player_name].sneak then
|
|
--charged weapon
|
|
if XBows.playerphysics then
|
|
playerphysics.add_physics_factor(player, 'speed', 'x_bows:bow_charged_speed', 0.25)
|
|
elseif XBows.player_monoids then
|
|
player_monoids.speed:add_change(player, 0.25, 'x_bows:bow_charged_speed')
|
|
end
|
|
|
|
XBows.player_bow_sneak[player_name].sneak = true
|
|
player:set_fov(0.9, true, 0.4)
|
|
elseif minetest.get_item_group(wielded_stack_name, 'bow_charged') == 0 and XBows.player_bow_sneak[player_name].sneak then
|
|
if XBows.playerphysics then
|
|
playerphysics.remove_physics_factor(player, 'speed', 'x_bows:bow_charged_speed')
|
|
elseif XBows.player_monoids then
|
|
player_monoids.speed:del_change(player, 'x_bows:bow_charged_speed')
|
|
end
|
|
|
|
XBows.player_bow_sneak[player_name].sneak = false
|
|
player:set_fov(0, true, 0.4)
|
|
end
|
|
|
|
XBows:reset_charged_bow(player)
|
|
end
|
|
|
|
bow_charged_timer = 0
|
|
end
|
|
end)
|
|
|
|
local mod_end_time = (minetest.get_us_time() - mod_start_time) / 1000000
|
|
|
|
print('[Mod] x_bows loaded.. ['.. mod_end_time ..'s]')
|