Remove invalid file
[minetest_hades/hades_revisited.git] / mods / hbhunger / hunger.lua
blobdb012fd6741756c1e4cd024ae6a1ac47aefa799d
1 -- Keep these for backwards compatibility
2 function hbhunger.save_hunger(player)
3 hbhunger.set_hunger_raw(player)
4 end
5 function hbhunger.load_hunger(player)
6 hbhunger.get_hunger_raw(player)
7 end
9 -- wrapper for minetest.item_eat (this way we make sure other mods can't break this one)
10 local org_eat = core.do_item_eat
11 core.do_item_eat = function(hp_change, replace_with_item, itemstack, user, pointed_thing)
12 local old_itemstack = itemstack
13 itemstack = hbhunger.eat(hp_change, replace_with_item, itemstack, user, pointed_thing)
14 for _, callback in pairs(core.registered_on_item_eats) do
15 local result = callback(hp_change, replace_with_item, itemstack, user, pointed_thing, old_itemstack)
16 if result then
17 return result
18 end
19 end
20 return itemstack
21 end
23 -- food functions
24 local food = hbhunger.food
26 function hbhunger.register_food(name, hunger_change, replace_with_item, poisen, heal, sound)
27 food[name] = {}
28 food[name].saturation = hunger_change -- hunger points added
29 food[name].replace = replace_with_item -- what item is given back after eating
30 food[name].poisen = poisen -- time its poisening
31 food[name].healing = heal -- amount of HP
32 food[name].sound = sound -- special sound that is played when eating
33 end
35 function hbhunger.eat(hp_change, replace_with_item, itemstack, user, pointed_thing)
36 local item = itemstack:get_name()
37 local def = food[item]
38 if not def then
39 def = {}
40 if type(hp_change) ~= "number" then
41 hp_change = 1
42 core.log("error", "Wrong on_use() definition for item '" .. item .. "'")
43 end
44 def.saturation = hp_change * 1.3
45 def.replace = replace_with_item
46 end
47 local sound = def.sound
48 if not sound then
49 if minetest.get_item_group(item, "food") == 3 then
50 sound = "survival_thirst_drink"
51 elseif not sound then
52 sound = "hbhunger_eat_generic"
53 end
54 end
55 local func = hbhunger.item_eat(def.saturation, def.replace, def.poisen, def.healing, sound)
56 return func(itemstack, user, pointed_thing)
57 end
59 -- Poison player
60 local function poisenp(tick, time, time_left, player)
61 -- First check if player is still there
62 if not player:is_player() then
63 return
64 end
65 time_left = time_left + tick
66 if time_left < time then
67 minetest.after(tick, poisenp, tick, time, time_left, player)
68 else
69 hbhunger.poisonings[player:get_player_name()] = hbhunger.poisonings[player:get_player_name()] - 1
70 if hbhunger.poisonings[player:get_player_name()] <= 0 then
71 -- Reset HUD bar color
72 hb.change_hudbar(player, "health", nil, nil, "hudbars_icon_health.png", nil, "hudbars_bar_health.png")
73 end
74 end
75 if player:get_hp()-1 > 0 then
76 player:set_hp(player:get_hp()-1)
77 end
79 end
81 function hbhunger.item_eat(hunger_change, replace_with_item, poisen, heal, sound)
82 return function(itemstack, user, pointed_thing)
83 if itemstack:take_item() ~= nil and user ~= nil then
84 local name = user:get_player_name()
85 local h = tonumber(hbhunger.hunger[name])
86 local hp = user:get_hp()
87 if h == nil or hp == nil then
88 return
89 end
90 minetest.sound_play(
91 {name = sound or "hbhunger_eat_generic",
92 gain = 1},
93 {object=user,
94 max_hear_distance = 16,
95 pitch = 1 + math.random(-10, 10)*0.005,},
96 true
99 -- Saturation
100 if h < 30 and hunger_change then
101 h = h + hunger_change
102 if h > 30 then h = 30 end
103 hbhunger.hunger[name] = h
104 hbhunger.set_hunger_raw(user)
106 -- Healing
107 if hp < 20 and heal then
108 hp = hp + heal
109 if hp > 20 then hp = 20 end
110 user:set_hp(hp)
112 -- Poison
113 if poisen then
114 -- Set poison bar
115 hb.change_hudbar(user, "health", nil, nil, "hbhunger_icon_health_poison.png", nil, "hbhunger_bar_health_poison.png")
116 hbhunger.poisonings[name] = hbhunger.poisonings[name] + 1
117 poisenp(1, poisen, 0, user)
120 if itemstack:get_count() == 0 then
121 itemstack:add_item(replace_with_item)
122 else
123 local inv = user:get_inventory()
124 if inv:room_for_item("main", replace_with_item) then
125 inv:add_item("main", replace_with_item)
126 else
127 minetest.add_item(user:get_pos(), replace_with_item)
131 return itemstack
135 if minetest.get_modpath("hades_trees") ~= nil then
136 hbhunger.register_food("hades_trees:apple", 2)
138 if minetest.get_modpath("flowers") ~= nil then
139 hbhunger.register_food("flowers:mushroom_brown", 1)
140 hbhunger.register_food("flowers:mushroom_red", 1, "", 3)
142 if minetest.get_modpath("farming") ~= nil then
143 hbhunger.register_food("farming:bread", 4)
146 if minetest.get_modpath("mobs") ~= nil then
147 if mobs.mod ~= nil and mobs.mod == "redo" then
148 hbhunger.register_food("mobs:cheese", 4)
149 hbhunger.register_food("mobs:meat", 8)
150 hbhunger.register_food("mobs:meat_raw", 4)
151 hbhunger.register_food("mobs:rat_cooked", 4)
152 hbhunger.register_food("mobs:honey", 2)
153 hbhunger.register_food("mobs:pork_raw", 3, "", 3)
154 hbhunger.register_food("mobs:pork_cooked", 8)
155 hbhunger.register_food("mobs:chicken_cooked", 6)
156 hbhunger.register_food("mobs:chicken_raw", 2, "", 3)
157 hbhunger.register_food("mobs:chicken_egg_fried", 2)
158 if minetest.get_modpath("bucket") then
159 hbhunger.register_food("mobs:bucket_milk", 3, "bucket:bucket_empty")
161 else
162 hbhunger.register_food("mobs:meat", 6)
163 hbhunger.register_food("mobs:meat_raw", 3)
164 hbhunger.register_food("mobs:rat_cooked", 5)
168 if minetest.get_modpath("moretrees") ~= nil then
169 hbhunger.register_food("moretrees:coconut_milk", 1)
170 hbhunger.register_food("moretrees:raw_coconut", 2)
171 hbhunger.register_food("moretrees:acorn_muffin", 3)
172 hbhunger.register_food("moretrees:spruce_nuts", 1)
173 hbhunger.register_food("moretrees:pine_nuts", 1)
174 hbhunger.register_food("moretrees:fir_nuts", 1)
177 if minetest.get_modpath("dwarves") ~= nil then
178 hbhunger.register_food("dwarves:beer", 2)
179 hbhunger.register_food("dwarves:apple_cider", 1)
180 hbhunger.register_food("dwarves:midus", 2)
181 hbhunger.register_food("dwarves:tequila", 2)
182 hbhunger.register_food("dwarves:tequila_with_lime", 2)
183 hbhunger.register_food("dwarves:sake", 2)
186 if minetest.get_modpath("animalmaterials") ~= nil then
187 hbhunger.register_food("animalmaterials:milk", 2)
188 hbhunger.register_food("animalmaterials:meat_raw", 3)
189 hbhunger.register_food("animalmaterials:meat_pork", 3)
190 hbhunger.register_food("animalmaterials:meat_beef", 3)
191 hbhunger.register_food("animalmaterials:meat_chicken", 3)
192 hbhunger.register_food("animalmaterials:meat_lamb", 3)
193 hbhunger.register_food("animalmaterials:meat_venison", 3)
194 hbhunger.register_food("animalmaterials:meat_undead", 3, "", 3)
195 hbhunger.register_food("animalmaterials:meat_toxic", 3, "", 5)
196 hbhunger.register_food("animalmaterials:meat_ostrich", 3)
197 hbhunger.register_food("animalmaterials:fish_bluewhite", 2)
198 hbhunger.register_food("animalmaterials:fish_clownfish", 2)
201 if minetest.get_modpath("fishing") ~= nil then
202 hbhunger.register_food("fishing:fish_raw", 2)
203 hbhunger.register_food("fishing:fish_cooked", 5)
204 hbhunger.register_food("fishing:sushi", 6)
205 hbhunger.register_food("fishing:shark", 4)
206 hbhunger.register_food("fishing:shark_cooked", 8)
207 hbhunger.register_food("fishing:pike", 4)
208 hbhunger.register_food("fishing:pike_cooked", 8)
211 if minetest.get_modpath("glooptest") ~= nil then
212 hbhunger.register_food("glooptest:kalite_lump", 1)
215 if minetest.get_modpath("bushes") ~= nil then
216 hbhunger.register_food("bushes:sugar", 1)
217 hbhunger.register_food("bushes:strawberry", 2)
218 hbhunger.register_food("bushes:berry_pie_raw", 3)
219 hbhunger.register_food("bushes:berry_pie_cooked", 4)
220 hbhunger.register_food("bushes:basket_pies", 15)
223 if minetest.get_modpath("bushes_classic") then
224 -- bushes_classic mod, as found in the plantlife modpack
225 local berries = {
226 "strawberry",
227 "blackberry",
228 "blueberry",
229 "raspberry",
230 "gooseberry",
231 "mixed_berry"}
232 for _, berry in ipairs(berries) do
233 if berry ~= "mixed_berry" then
234 hbhunger.register_food("bushes:"..berry, 1)
236 hbhunger.register_food("bushes:"..berry.."_pie_raw", 2)
237 hbhunger.register_food("bushes:"..berry.."_pie_cooked", 5)
238 hbhunger.register_food("bushes:basket_"..berry, 15)
242 if minetest.get_modpath("mushroom") ~= nil then
243 hbhunger.register_food("mushroom:brown", 1)
244 hbhunger.register_food("mushroom:red", 1, "", 3)
245 -- mushroom potions: red = strong poison, brown = light restorative
246 if minetest.get_modpath("vessels") then
247 hbhunger.register_food("mushroom:brown_essence", 1, "vessels:glass_bottle", nil, 4)
248 hbhunger.register_food("mushroom:poison", 1, "vessels:glass_bottle", 10)
252 if minetest.get_modpath("docfarming") ~= nil then
253 hbhunger.register_food("docfarming:carrot", 3)
254 hbhunger.register_food("docfarming:cucumber", 2)
255 hbhunger.register_food("docfarming:corn", 3)
256 hbhunger.register_food("docfarming:potato", 4)
257 hbhunger.register_food("docfarming:bakedpotato", 5)
258 hbhunger.register_food("docfarming:raspberry", 3)
261 if minetest.get_modpath("farming_plus") ~= nil then
262 hbhunger.register_food("farming_plus:carrot_item", 3)
263 hbhunger.register_food("farming_plus:banana", 2)
264 hbhunger.register_food("farming_plus:orange_item", 2)
265 hbhunger.register_food("farming:pumpkin_bread", 4)
266 hbhunger.register_food("farming_plus:strawberry_item", 2)
267 hbhunger.register_food("farming_plus:tomato_item", 2)
268 hbhunger.register_food("farming_plus:potato_item", 4)
269 hbhunger.register_food("farming_plus:rhubarb_item", 2)
272 if minetest.get_modpath("mtfoods") ~= nil then
273 hbhunger.register_food("mtfoods:dandelion_milk", 1)
274 hbhunger.register_food("mtfoods:sugar", 1)
275 hbhunger.register_food("mtfoods:short_bread", 4)
276 hbhunger.register_food("mtfoods:cream", 1)
277 hbhunger.register_food("mtfoods:chocolate", 2)
278 hbhunger.register_food("mtfoods:cupcake", 2)
279 hbhunger.register_food("mtfoods:strawberry_shortcake", 2)
280 hbhunger.register_food("mtfoods:cake", 3)
281 hbhunger.register_food("mtfoods:chocolate_cake", 3)
282 hbhunger.register_food("mtfoods:carrot_cake", 3)
283 hbhunger.register_food("mtfoods:pie_crust", 3)
284 hbhunger.register_food("mtfoods:apple_pie", 3)
285 hbhunger.register_food("mtfoods:rhubarb_pie", 2)
286 hbhunger.register_food("mtfoods:banana_pie", 3)
287 hbhunger.register_food("mtfoods:pumpkin_pie", 3)
288 hbhunger.register_food("mtfoods:cookies", 2)
289 hbhunger.register_food("mtfoods:mlt_burger", 5)
290 hbhunger.register_food("mtfoods:potato_slices", 2)
291 hbhunger.register_food("mtfoods:potato_chips", 3)
292 --mtfoods:medicine
293 hbhunger.register_food("mtfoods:casserole", 3)
294 hbhunger.register_food("mtfoods:glass_flute", 2)
295 hbhunger.register_food("mtfoods:orange_juice", 2)
296 hbhunger.register_food("mtfoods:apple_juice", 2)
297 hbhunger.register_food("mtfoods:apple_cider", 2)
298 hbhunger.register_food("mtfoods:cider_rack", 2)
301 if minetest.get_modpath("fruit") ~= nil then
302 hbhunger.register_food("fruit:apple", 2)
303 hbhunger.register_food("fruit:pear", 2)
304 hbhunger.register_food("fruit:bananna", 3)
305 hbhunger.register_food("fruit:orange", 2)
308 if minetest.get_modpath("mush45") ~= nil then
309 hbhunger.register_food("mush45:meal", 4)
312 if minetest.get_modpath("seaplants") ~= nil then
313 hbhunger.register_food("seaplants:kelpgreen", 1)
314 hbhunger.register_food("seaplants:kelpbrown", 1)
315 hbhunger.register_food("seaplants:seagrassgreen", 1)
316 hbhunger.register_food("seaplants:seagrassred", 1)
317 hbhunger.register_food("seaplants:seasaladmix", 6)
318 hbhunger.register_food("seaplants:kelpgreensalad", 1)
319 hbhunger.register_food("seaplants:kelpbrownsalad", 1)
320 hbhunger.register_food("seaplants:seagrassgreensalad", 1)
321 hbhunger.register_food("seaplants:seagrassgreensalad", 1)
324 if minetest.get_modpath("mobfcooking") ~= nil then
325 hbhunger.register_food("mobfcooking:cooked_pork", 6)
326 hbhunger.register_food("mobfcooking:cooked_ostrich", 6)
327 hbhunger.register_food("mobfcooking:cooked_beef", 6)
328 hbhunger.register_food("mobfcooking:cooked_chicken", 6)
329 hbhunger.register_food("mobfcooking:cooked_lamb", 6)
330 hbhunger.register_food("mobfcooking:cooked_venison", 6)
331 hbhunger.register_food("mobfcooking:cooked_fish", 6)
334 if minetest.get_modpath("creatures") ~= nil then
335 hbhunger.register_food("creatures:meat", 6)
336 hbhunger.register_food("creatures:flesh", 3)
337 hbhunger.register_food("creatures:rotten_flesh", 3, "", 3)
340 if minetest.get_modpath("ethereal") then
341 hbhunger.register_food("ethereal:strawberry", 1)
342 hbhunger.register_food("ethereal:banana", 4)
343 hbhunger.register_food("ethereal:pine_nuts", 1)
344 hbhunger.register_food("ethereal:bamboo_sprout", 0, "", 3)
345 hbhunger.register_food("ethereal:fern_tubers", 1)
346 hbhunger.register_food("ethereal:banana_bread", 7)
347 hbhunger.register_food("ethereal:mushroom_plant", 2)
348 hbhunger.register_food("ethereal:coconut_slice", 2)
349 hbhunger.register_food("ethereal:golden_apple", 4, "", nil, 10)
350 hbhunger.register_food("ethereal:wild_onion_plant", 2)
351 hbhunger.register_food("ethereal:mushroom_soup", 4, "ethereal:bowl")
352 hbhunger.register_food("ethereal:mushroom_soup_cooked", 6, "ethereal:bowl")
353 hbhunger.register_food("ethereal:hearty_stew", 6, "ethereal:bowl", 3)
354 hbhunger.register_food("ethereal:hearty_stew_cooked", 10, "ethereal:bowl")
355 if minetest.get_modpath("bucket") then
356 hbhunger.register_food("ethereal:bucket_cactus", 2, "bucket:bucket_empty")
358 hbhunger.register_food("ethereal:fish_raw", 2)
359 hbhunger.register_food("ethereal:fish_cooked", 5)
360 hbhunger.register_food("ethereal:seaweed", 1)
361 hbhunger.register_food("ethereal:yellowleaves", 1, "", nil, 1)
362 hbhunger.register_food("ethereal:sashimi", 4)
363 hbhunger.register_food("ethereal:orange", 2)
366 if minetest.get_modpath("farming") and farming.mod == "redo" then
367 hbhunger.register_food("farming:bread", 6)
368 hbhunger.register_food("farming:potato", 1)
369 hbhunger.register_food("farming:baked_potato", 6)
370 hbhunger.register_food("farming:cucumber", 4)
371 hbhunger.register_food("farming:tomato", 4)
372 hbhunger.register_food("farming:carrot", 3)
373 hbhunger.register_food("farming:carrot_gold", 6, "", nil, 8)
374 hbhunger.register_food("farming:corn", 3)
375 hbhunger.register_food("farming:corn_cob", 5)
376 hbhunger.register_food("farming:melon_slice", 2)
377 hbhunger.register_food("farming:pumpkin_slice", 1)
378 hbhunger.register_food("farming:pumpkin_bread", 9)
379 hbhunger.register_food("farming:coffee_cup", 2, "farming:drinking_cup")
380 hbhunger.register_food("farming:coffee_cup_hot", 3, "farming:drinking_cup", nil, 2)
381 hbhunger.register_food("farming:cookie", 2)
382 hbhunger.register_food("farming:chocolate_dark", 3)
383 hbhunger.register_food("farming:donut", 4)
384 hbhunger.register_food("farming:donut_chocolate", 6)
385 hbhunger.register_food("farming:donut_apple", 6)
386 hbhunger.register_food("farming:raspberries", 1)
387 hbhunger.register_food("farming:blueberries", 1)
388 hbhunger.register_food("farming:muffin_blueberry", 4)
389 if minetest.get_modpath("vessels") then
390 hbhunger.register_food("farming:smoothie_raspberry", 2, "vessels:drinking_glass")
392 hbhunger.register_food("farming:rhubarb", 1)
393 hbhunger.register_food("farming:rhubarb_pie", 6)
394 hbhunger.register_food("farming:beans", 1)
397 if minetest.get_modpath("kpgmobs") ~= nil then
398 hbhunger.register_food("kpgmobs:uley", 3)
399 hbhunger.register_food("kpgmobs:meat", 6)
400 hbhunger.register_food("kpgmobs:rat_cooked", 5)
401 hbhunger.register_food("kpgmobs:med_cooked", 4)
402 if minetest.get_modpath("bucket") then
403 hbhunger.register_food("kpgmobs:bucket_milk", 4, "bucket:bucket_empty")
407 if minetest.get_modpath("jkfarming") ~= nil then
408 hbhunger.register_food("jkfarming:carrot", 3)
409 hbhunger.register_food("jkfarming:corn", 3)
410 hbhunger.register_food("jkfarming:melon_part", 2)
411 hbhunger.register_food("jkfarming:cake", 3)
414 if minetest.get_modpath("jkanimals") ~= nil then
415 hbhunger.register_food("jkanimals:meat", 6)
418 if minetest.get_modpath("jkwine") ~= nil then
419 hbhunger.register_food("jkwine:grapes", 2)
420 hbhunger.register_food("jkwine:winebottle", 1)
423 if minetest.get_modpath("cooking") ~= nil then
424 hbhunger.register_food("cooking:meat_beef_cooked", 4)
425 hbhunger.register_food("cooking:fish_bluewhite_cooked", 3)
426 hbhunger.register_food("cooking:fish_clownfish_cooked", 1)
427 hbhunger.register_food("cooking:meat_chicken_cooked", 2)
428 hbhunger.register_food("cooking:meat_cooked", 2)
429 hbhunger.register_food("cooking:meat_pork_cooked", 3)
430 hbhunger.register_food("cooking:meat_toxic_cooked", -3)
431 hbhunger.register_food("cooking:meat_venison_cooked", 3)
432 hbhunger.register_food("cooking:meat_undead_cooked", 1)
435 -- ferns mod of plantlife_modpack
436 if minetest.get_modpath("ferns") ~= nil then
437 hbhunger.register_food("ferns:fiddlehead", 1, "", 1)
438 hbhunger.register_food("ferns:fiddlehead_roasted", 3)
439 hbhunger.register_food("ferns:ferntuber_roasted", 3)
440 hbhunger.register_food("ferns:horsetail_01", 1)
443 if minetest.get_modpath("pizza") ~= nil then
444 hbhunger.register_food("pizza:pizza", 30, "", nil, 30)
445 hbhunger.register_food("pizza:pizzaslice", 5, "", nil, 5)
448 if minetest.get_modpath("nssm") then
449 hbhunger.register_food("nssm:werewolf_leg", 3)
450 hbhunger.register_food("nssm:heron_leg", 2)
451 hbhunger.register_food("nssm:chichibios_heron_leg", 4)
452 hbhunger.register_food("nssm:crocodile_tail", 3)
453 hbhunger.register_food("nssm:duck_legs", 1)
454 hbhunger.register_food("nssm:ant_leg", 1)
455 hbhunger.register_food("nssm:spider_leg", 1)
456 hbhunger.register_food("nssm:tentacle", 2)
457 hbhunger.register_food("nssm:worm_flesh", 2, "", 2) -- poisonous
458 hbhunger.register_food("nssm:amphibian_heart", 1)
459 hbhunger.register_food("nssm:raw_scrausics_wing", 1)
460 -- superfoods
461 hbhunger.register_food("nssm:phoenix_nuggets", 20, "", nil, 20)
462 hbhunger.register_food("nssm:phoenix_tear", 20, "", nil, 20)
465 -- player-action based hunger changes
466 function hbhunger.handle_node_actions(pos, oldnode, player, ext)
467 -- is_fake_player comes from the pipeworks, we are not interested in those
468 if not player or not player:is_player() or player.is_fake_player == true then
469 return
471 local name = player:get_player_name()
472 local exhaus = hbhunger.exhaustion[name]
473 if exhaus == nil then return end
474 local new = hbhunger.EXHAUST_PLACE
475 -- placenode event
476 if not ext then
477 new = hbhunger.EXHAUST_DIG
479 -- assume its send by main timer when movement detected
480 if not pos and not oldnode then
481 new = hbhunger.EXHAUST_MOVE
483 exhaus = exhaus + new
484 if exhaus > hbhunger.EXHAUST_LVL then
485 exhaus = 0
486 local h = tonumber(hbhunger.hunger[name])
487 h = h - 1
488 if h < 0 then h = 0 end
489 hbhunger.hunger[name] = h
490 hbhunger.set_hunger_raw(player)
492 hbhunger.exhaustion[name] = exhaus
495 minetest.register_on_placenode(hbhunger.handle_node_actions)
496 minetest.register_on_dignode(hbhunger.handle_node_actions)