mirror of
https://github.com/sys4-fr/server-nalc.git
synced 2024-09-09 14:20:25 +02:00
237 lines
5.7 KiB
Lua
237 lines
5.7 KiB
Lua
-- read/write
|
|
function hunger.read(player)
|
|
local inv = player:get_inventory()
|
|
if not inv then
|
|
return nil
|
|
end
|
|
local hgp = inv:get_stack("hunger", 1):get_count()
|
|
if hgp == 0 then
|
|
hgp = 21
|
|
inv:set_stack("hunger", 1, ItemStack({name = ":", count = hgp}))
|
|
else
|
|
hgp = hgp
|
|
end
|
|
if tonumber(hgp) > HUNGER_MAX + 1 then
|
|
hgp = HUNGER_MAX + 1
|
|
end
|
|
return hgp - 1
|
|
end
|
|
|
|
function hunger.save(player)
|
|
local inv = player:get_inventory()
|
|
local name = player:get_player_name()
|
|
local value = hunger[name].lvl
|
|
if not inv or not value then
|
|
return nil
|
|
end
|
|
if value > HUNGER_MAX then
|
|
value = HUNGER_MAX
|
|
end
|
|
if value < 0 then
|
|
value = 0
|
|
end
|
|
inv:set_stack("hunger", 1, ItemStack({name = ":", count = value + 1}))
|
|
return true
|
|
end
|
|
|
|
function hunger.update_hunger(player, new_lvl)
|
|
local name = player:get_player_name() or nil
|
|
if not name then
|
|
return false
|
|
end
|
|
if minetest.setting_getbool("enable_damage") == false then
|
|
hunger[name] = 20
|
|
return
|
|
end
|
|
local lvl = hunger[name].lvl
|
|
if new_lvl then
|
|
lvl = new_lvl
|
|
end
|
|
if lvl > HUNGER_MAX then
|
|
lvl = HUNGER_MAX
|
|
end
|
|
hunger[name].lvl = lvl
|
|
if lvl > 20 then
|
|
lvl = 20
|
|
end
|
|
hud.change_item(player, "hunger", {number = lvl})
|
|
hunger.save(player)
|
|
end
|
|
local update_hunger = hunger.update_hunger
|
|
|
|
-- player-action based hunger changes
|
|
function hunger.handle_node_actions(pos, oldnode, player, ext)
|
|
if not player or not player:is_player() then
|
|
return
|
|
end
|
|
local name = player:get_player_name()
|
|
local exhaus = hunger[name].exhaus
|
|
if not exhaus then
|
|
hunger[name].exhaus = 0
|
|
--return
|
|
end
|
|
|
|
local new = HUNGER_EXHAUST_PLACE
|
|
|
|
-- placenode event
|
|
if not ext then
|
|
new = HUNGER_EXHAUST_DIG
|
|
end
|
|
|
|
-- assume its send by action_timer(globalstep)
|
|
if not pos and not oldnode then
|
|
new = HUNGER_EXHAUST_MOVE
|
|
end
|
|
|
|
exhaus = exhaus + new
|
|
|
|
if exhaus > HUNGER_EXHAUST_LVL then
|
|
exhaus = 0
|
|
local h = tonumber(hunger[name].lvl)
|
|
if h > 0 then
|
|
update_hunger(player, h - 1)
|
|
end
|
|
end
|
|
|
|
hunger[name].exhaus = exhaus
|
|
end
|
|
|
|
-- Time based hunger functions
|
|
if minetest.setting_getbool("enable_damage") then
|
|
local hunger_timer = 0
|
|
local health_timer = 0
|
|
local action_timer = 0
|
|
minetest.register_globalstep(function(dtime)
|
|
hunger_timer = hunger_timer + dtime
|
|
health_timer = health_timer + dtime
|
|
action_timer = action_timer + dtime
|
|
|
|
if action_timer > HUNGER_MOVE_TICK then
|
|
for _,player in ipairs(minetest.get_connected_players()) do
|
|
local controls = player:get_player_control()
|
|
-- Determine if the player is walking
|
|
if controls.up or controls.down or controls.left or controls.right then
|
|
hunger.handle_node_actions(nil, nil, player)
|
|
end
|
|
end
|
|
action_timer = 0
|
|
end
|
|
|
|
-- lower saturation by 1 point after <HUNGER_TICK> second(s)
|
|
if hunger_timer > HUNGER_TICK then
|
|
for _,player in ipairs(minetest.get_connected_players()) do
|
|
local name = player:get_player_name()
|
|
local tab = hunger[name]
|
|
if tab then
|
|
local hunger = tab.lvl
|
|
if hunger > 0 then
|
|
update_hunger(player, hunger - 1)
|
|
end
|
|
end
|
|
end
|
|
hunger_timer = 0
|
|
end
|
|
|
|
-- heal or damage player, depending on saturation
|
|
if health_timer > HUNGER_HEALTH_TICK then
|
|
for _,player in ipairs(minetest.get_connected_players()) do
|
|
local name = player:get_player_name()
|
|
local tab = hunger[name]
|
|
if tab then
|
|
local air = player:get_breath() or 0
|
|
local hp = player:get_hp()
|
|
|
|
-- heal player by 1 hp if not dead and saturation is > 15 (of 30)
|
|
if tonumber(tab.lvl) > HUNGER_HEAL_LVL and air > 0 then
|
|
player:set_hp(hp + HUNGER_HEAL)
|
|
end
|
|
|
|
-- or damage player by 1 hp if saturation is < 2 (of 30)
|
|
if tonumber(tab.lvl) < HUNGER_STARVE_LVL then
|
|
player:set_hp(hp - HUNGER_STARVE)
|
|
end
|
|
end
|
|
end
|
|
|
|
health_timer = 0
|
|
end
|
|
end)
|
|
end
|
|
|
|
|
|
-- food functions
|
|
local food = hunger.food
|
|
|
|
function hunger.register_food(name, hunger_change, replace_with_item, poisen, heal, sound)
|
|
food[name] = {}
|
|
food[name].saturation = hunger_change -- hunger points added
|
|
food[name].replace = replace_with_item -- what item is given back after eating
|
|
food[name].poisen = poisen -- time its poisening
|
|
food[name].healing = heal -- amount of HP
|
|
food[name].sound = sound -- special sound that is played when eating
|
|
end
|
|
|
|
-- Poison player
|
|
local function poisenp(tick, time, time_left, player)
|
|
time_left = time_left + tick
|
|
if time_left < time then
|
|
minetest.after(tick, poisenp, tick, time, time_left, player)
|
|
else
|
|
hud.change_item(player, "hunger", {text = "hud_hunger_fg.png"})
|
|
end
|
|
local hp = player:get_hp() -1 or 0
|
|
if hp > 0 then
|
|
player:set_hp(hp)
|
|
end
|
|
end
|
|
|
|
function hunger.eat(hp_change, replace_with_item, itemstack, user, pointed_thing)
|
|
local item = itemstack:get_name()
|
|
local def = food[item]
|
|
if not def then
|
|
def = {}
|
|
def.saturation = hp_change * 1.3
|
|
def.replace = replace_with_item
|
|
end
|
|
local func = hunger.item_eat(def.saturation, def.replace, def.poisen, def.healing, def.sound)
|
|
return func(itemstack, user, pointed_thing)
|
|
end
|
|
|
|
function hunger.item_eat(hunger_change, replace_with_item, poisen, heal, sound)
|
|
return function(itemstack, user, pointed_thing)
|
|
if itemstack:take_item() ~= nil and user ~= nil then
|
|
local name = user:get_player_name()
|
|
local sat = tonumber(hunger[name].lvl)
|
|
local hp = user:get_hp()
|
|
-- Saturation
|
|
if sat < HUNGER_MAX and hunger_change then
|
|
sat = sat + hunger_change
|
|
hunger.update_hunger(user, sat)
|
|
end
|
|
-- Healing
|
|
if hp < 20 and heal then
|
|
hp = hp + heal
|
|
if hp > 20 then
|
|
hp = 20
|
|
end
|
|
user:set_hp(hp)
|
|
end
|
|
-- Poison
|
|
if poisen then
|
|
hud.change_item(user, "hunger", {text = "hunger_statbar_poisen.png"})
|
|
poisenp(1.0, poisen, 0, user)
|
|
end
|
|
|
|
-- eating sound
|
|
if not sound then
|
|
sound = "hunger_eat"
|
|
end
|
|
minetest.sound_play(sound, {to_player = name, gain = 0.7})
|
|
|
|
itemstack:add_item(replace_with_item)
|
|
end
|
|
|
|
return itemstack
|
|
end
|
|
end
|