forked from minetest-mods/hbsprint
217 lines
8.1 KiB
Lua
217 lines
8.1 KiB
Lua
-- Vars
|
|
|
|
local speed = tonumber(minetest.settings:get ("sprint_speed")) or 1.3
|
|
local jump = tonumber(minetest.settings:get ("sprint_jump")) or 1.1
|
|
local key = minetest.settings:get ("sprint_key") or "Use"
|
|
local dir = minetest.settings:get_bool("sprint_forward_only") ~= false
|
|
local particles = tonumber(minetest.settings:get ("sprint_particles")) or 2
|
|
local stamina = minetest.settings:get_bool("sprint_stamina") ~= false
|
|
local stamina_drain = tonumber(minetest.settings:get ("sprint_stamina_drain")) or 2
|
|
local replenish = tonumber(minetest.settings:get ("sprint_stamina_replenish")) or 2
|
|
local starve = minetest.settings:get_bool("sprint_starve") ~= false
|
|
local starve_drain = tonumber(minetest.settings:get ("sprint_starve_drain")) or 0.5
|
|
local starve_limit = tonumber(minetest.settings:get ("sprint_starve_limit")) or 6
|
|
local breath = minetest.settings:get_bool("sprint_breath") ~= false
|
|
local breath_drain = tonumber(minetest.settings:get ("sprint_breath_drain")) or 1
|
|
local autohide = minetest.settings:get_bool("hudbars_autohide_stamina") ~= false
|
|
|
|
local sprint_timer_step = 0.5
|
|
local sprint_timer = 0
|
|
|
|
local mod_hudbars = minetest.get_modpath("hudbars") or false
|
|
local mod_player_monoids = minetest.get_modpath("player_monoids") or false
|
|
local mod_playerphysics = minetest.get_modpath("playerphysics") or false
|
|
local starve
|
|
if minetest.get_modpath("hbhunger") then
|
|
starve = "hbhunger"
|
|
elseif minetest.get_modpath("hunger_ng") then
|
|
starve = "hunger_ng"
|
|
--starve_drain = starve_drain * -1
|
|
else
|
|
starve = false
|
|
end
|
|
if minetest.settings:get_bool("creative_mode") then
|
|
starve = false
|
|
end
|
|
-- Functions
|
|
|
|
local function start_sprint(player)
|
|
if player:get_meta():get("hbsprint:sprinting") == "false" then
|
|
if mod_player_monoids then
|
|
player_monoids.speed:add_change(player, speed, "hbsprint:speed")
|
|
player_monoids.jump:add_change(player, jump, "hbsprint:jump")
|
|
elseif mod_playerphysics then
|
|
playerphysics.add_physics_factor(player, "speed", "hbsprint:speed", speed)
|
|
playerphysics.add_physics_factor(player, "jump", "hbsprint:jump", jump)
|
|
else
|
|
player:set_physics_override({speed = speed, jump = jump})
|
|
end
|
|
end
|
|
end
|
|
|
|
local function stop_sprint(player)
|
|
if player:get_meta():get("hbsprint:sprinting") == "true" then
|
|
if mod_player_monoids then
|
|
player_monoids.speed:del_change(player, "hbsprint:speed")
|
|
player_monoids.jump:del_change(player, "hbsprint:jump")
|
|
elseif mod_playerphysics then
|
|
playerphysics.remove_physics_factor(player, "speed", "hbsprint:speed")
|
|
playerphysics.remove_physics_factor(player, "jump", "hbsprint:jump")
|
|
else
|
|
player:set_physics_override({speed = 1, jump = 1})
|
|
end
|
|
end
|
|
end
|
|
|
|
local function drain_stamina(player)
|
|
local player_stamina = tonumber(player:get_meta():get("hbsprint:stamina"))
|
|
if player_stamina > 0 then
|
|
player:get_meta():set_float("hbsprint:stamina", player_stamina - stamina_drain)
|
|
end
|
|
if mod_hudbars then
|
|
if autohide and player_stamina < 20 then hb.unhide_hudbar(player, "stamina") end
|
|
hb.change_hudbar(player, "stamina", player_stamina)
|
|
end
|
|
end
|
|
|
|
local function replenish_stamina(player)
|
|
local player_stamina = tonumber(player:get_meta():get("hbsprint:stamina"))
|
|
if player_stamina < 20 then
|
|
player:get_meta():set_float("hbsprint:stamina", player_stamina + stamina_drain)
|
|
end
|
|
if mod_hudbars then
|
|
hb.change_hudbar(player, "stamina", player_stamina)
|
|
if autohide and player_stamina == 20 then hb.hide_hudbar(player, "stamina") end
|
|
end
|
|
end
|
|
|
|
local function drain_hunger(player, hunger, name)
|
|
if hunger > 0 then
|
|
local newhunger = hunger - starve_drain
|
|
if starve == "hbhunger" then
|
|
hbhunger.hunger[name] = newhunger
|
|
hbhunger.set_hunger_raw(player)
|
|
elseif starve == "hunger_ng" then
|
|
hunger_ng.alter_hunger(name, - starve_drain, "Sprinting")
|
|
end
|
|
end
|
|
end
|
|
|
|
local function drain_breath(player)
|
|
local player_breath = player:get_breath()
|
|
if player_breath < 11 then
|
|
player_breath = player_breath - breath_drain
|
|
if player_breath > 0 then
|
|
player:set_breath(player_breath)
|
|
end
|
|
end
|
|
end
|
|
|
|
local function create_particles(player, name, pos, ground)
|
|
if ground and ground.name ~= "air" and ground.name ~= "ignore" then
|
|
local def = minetest.registered_nodes[ground.name]
|
|
local tile = def.tiles[1] or def.inventory_image or ""
|
|
if type(tile) == "string" then
|
|
for i = 1, particles do
|
|
minetest.add_particle({
|
|
pos = {x = pos.x + math.random(-1,1) * math.random() / 2, y = pos.y + 0.1, z = pos.z + math.random(-1,1) * math.random() / 2},
|
|
velocity = {x = 0, y = 5, z = 0},
|
|
acceleration = {x = 0, y = -13, z = 0},
|
|
expirationtime = math.random(),
|
|
size = math.random() + 0.5,
|
|
vertical = false,
|
|
texture = tile,
|
|
})
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
-- Registrations
|
|
|
|
if mod_hudbars and stamina then
|
|
hb.register_hudbar(
|
|
"stamina",
|
|
0xFFFFFF,
|
|
"Stamina",
|
|
{
|
|
bar = "sprint_stamina_bar.png",
|
|
icon = "sprint_stamina_icon.png",
|
|
bgicon = "sprint_stamina_bgicon.png"
|
|
},
|
|
20,
|
|
20,
|
|
autohide)
|
|
end
|
|
|
|
minetest.register_on_joinplayer(function(player)
|
|
if mod_hudbars and stamina then hb.init_hudbar(player, "stamina", 20, 20, autohide) end
|
|
player:get_meta():set_float("hbsprint:stamina", 20)
|
|
end)
|
|
|
|
minetest.register_globalstep(function(dtime)
|
|
sprint_timer = sprint_timer + dtime
|
|
if sprint_timer >= sprint_timer_step then
|
|
for _,player in ipairs(minetest.get_connected_players()) do
|
|
local ctrl = player:get_player_control()
|
|
local key_press = false
|
|
player:get_meta():set_float("hbsprint_stamina_timer", player:get_meta():get_float("hbsprint_stamina_timer") + sprint_timer)
|
|
player:get_meta():set_float("hbsprint_breath_timer", player:get_meta():get_float("hbsprint_breath_timer") + sprint_timer)
|
|
if key == "Use" and dir then
|
|
key_press = ctrl.aux1 and ctrl.up and not ctrl.left and not ctrl.right
|
|
elseif key == "Use" and not dir then
|
|
key_press = ctrl.aux1
|
|
end
|
|
-- if key == "W" and dir then
|
|
-- key_press = ctrl.aux1 and ctrl.up or key_press and ctrl.up
|
|
-- elseif key == "W" then
|
|
-- key_press = ctrl.aux1 or key_press and key_tap
|
|
-- end
|
|
|
|
if key_press then
|
|
local name = player:get_player_name()
|
|
local hunger = 30
|
|
local pos = player:get_pos()
|
|
local ground = minetest.get_node_or_nil({x=pos.x, y=pos.y-1, z=pos.z})
|
|
local walkable = false
|
|
local player_stamina = tonumber(player:get_meta():get("hbsprint:stamina"))
|
|
if starve == "hbhunger" then
|
|
hunger = tonumber(hbhunger.hunger[name])
|
|
elseif starve == "hunger_ng" then
|
|
hunger = hunger_ng.get_hunger_information(name).hunger.exact
|
|
end
|
|
if ground ~= nil then
|
|
local ground_def = minetest.registered_nodes[ground.name]
|
|
if ground_def and (minetest.registered_nodes[ground.name].walkable or minetest.registered_nodes[ground.name].liquidtype ~= "none") then
|
|
walkable = true
|
|
end
|
|
end
|
|
if player_stamina > 0 and hunger > starve_limit and walkable then
|
|
start_sprint(player)
|
|
player:get_meta():set_string("hbsprint:sprinting", "true")
|
|
if stamina then drain_stamina(player) end
|
|
if starve then drain_hunger(player, hunger, name) end
|
|
if breath then
|
|
if player:get_meta():get_float("hbsprint_breath_timer") >= 2 then
|
|
drain_breath(player)
|
|
player:get_meta():set_float("hbsprint_breath_timer", 0)
|
|
end
|
|
end
|
|
if particles then create_particles(player, name, pos, ground) end
|
|
else
|
|
stop_sprint(player)
|
|
player:get_meta():set_string("hbsprint:sprinting", "false")
|
|
end
|
|
else
|
|
stop_sprint(player)
|
|
player:get_meta():set_string("hbsprint:sprinting", "false")
|
|
if player:get_meta():get_float("hbsprint_stamina_timer") >= replenish then
|
|
if stamina then replenish_stamina(player) end
|
|
player:get_meta():set_float("hbsprint_stamina_timer", 0)
|
|
end
|
|
end
|
|
end
|
|
sprint_timer = 0
|
|
end
|
|
end)
|