musttest_game/mods/hunger/init.lua

hunger = {}
hunger.players = {}
hunger.food = {}

HUNGER_TICK = 60*3		-- time in seconds after that 1 hunger point is taken
HUNGER_HEALTH_TICK = 30		-- time in seconds after player gets healed/damaged
HUNGER_MOVE_TICK = 5		-- time in seconds after the movement is checked

HUNGER_EXHAUST_DIG = 6		-- exhaustion increased this value after digged node
HUNGER_EXHAUST_PLACE = 3	-- exhaustion increased this value after placed
HUNGER_EXHAUST_MOVE = 0.5 	-- exhaustion increased this value if player movement detected
HUNGER_EXHAUST_LVL = 160	-- at what exhaustion player saturation gets lowered

HUNGER_HEAL = 1			-- number of HP player gets healed after HUNGER_HEALTH_TICK
HUNGER_HEAL_LVL = 10		-- lower level of saturation needed to get healed
HUNGER_STARVE = 1		-- number of HP player gets damaged by hunger after HUNGER_HEALTH_TICK
HUNGER_STARVE_LVL = 3		-- level of staturation that causes starving

HUNGER_MAX = 30			-- maximum level of saturation


local modpath = minetest.get_modpath("hunger")
dofile(modpath .. "/functions.lua")
dofile(modpath .. "/food.lua")
dofile(modpath .. "/legacy.lua")


-- Callbacks

-- initialization
minetest.register_on_joinplayer(function(player)
	local inv = player:get_inventory()
	inv:set_size("hunger", 1)

	local name = player:get_player_name()
	hunger.players[name] = {}
	hunger.players[name].lvl = hunger.read(player)
	hunger.players[name].exhaus = 0
	local lvl = hunger.players[name].lvl
	if lvl > 30 then
		lvl = 30
	end

	minetest.after(0.8, function()
		hud.change_item(player, "hunger", {number = lvl, max = HUNGER_MAX})
	end)
end)

-- for exhaustion
minetest.register_on_placenode(hunger.handle_node_actions)
minetest.register_on_dignode(hunger.handle_node_actions)
minetest.register_on_respawnplayer(function(player)
	hunger.update_hunger(player, 20)
	return true
end)

-- clean up
minetest.register_on_leaveplayer(function(player, timeout)
	local pname = player:get_player_name()
	hunger.players[pname] = nil
end)