2020-05-25 11:43:51 -04:00

75 lines
2.1 KiB
Lua

-- LUALOCALS < ---------------------------------------------------------
local minetest, nodecore, pairs
= minetest, nodecore, pairs
-- LUALOCALS > ---------------------------------------------------------
local hurtcache = {}
minetest.register_on_player_hpchange(function(player, hp)
local orig = player:get_hp()
if not nodecore.player_can_take_damage(player) then
return orig
end
local pname
if hp < 0 then
pname = player:get_player_name()
hurtcache[pname] = nodecore.gametime
player:get_meta():set_float("hurttime", nodecore.gametime)
if nodecore.player_visible(player) then
minetest.after(0, function()
local now = player:get_hp()
if now >= orig then return end
nodecore.sound_play_except("player_damage", {
pos = player:get_pos(),
gain = 0.5
}, player)
end)
end
end
if hp + orig <= 0 then
hp = 1 - orig
player:get_meta():set_float("dhp", -1)
end
return hp
end,
true
)
minetest.register_on_dieplayer(function(player)
nodecore.setphealth(player, 0, "on_dieplayer")
end)
local full = {}
local function heal(player, dtime)
local hp = player:get_hp()
if hp <= 0 then return end
if hp == 1 then
local meta = player:get_meta()
if meta:get_float("dhp") == -1 then
local hurt = hurtcache[player:get_player_name()] or meta:get_float("hurttime")
if hurt + 0.5 < nodecore.gametime then
nodecore.setphealth(player, 0, "heal_rehurtfx", 2)
end
end
end
local pname = player:get_player_name()
local hpmax = player:get_properties().hp_max
if full[pname] and player:get_hp() >= hpmax then return end
full[pname] = nil
local hurt = hurtcache[pname] or player:get_meta():get_float("hurttime")
if hurt >= nodecore.gametime - 4 then return end
nodecore.addphealth(player, dtime * 2, "heal")
if nodecore.getphealth(player) >= hpmax then full[pname] = true end
end
minetest.register_globalstep(function(dtime)
for _, player in pairs(minetest.get_connected_players()) do
heal(player, dtime)
end
end)
local function setmax(player)
player:set_properties({hp_max = 8})
end
minetest.register_on_joinplayer(setmax)
minetest.register_on_newplayer(setmax)