237 lines
7.8 KiB
Lua
237 lines
7.8 KiB
Lua
--[[
|
||
death_messages - A Minetest mod which sends a chat message when a player dies.
|
||
Copyright (C) 2016 EvergreenTree
|
||
|
||
This program is free software: you can redistribute it and/or modify
|
||
it under the terms of the GNU General Public License as published by
|
||
the Free Software Foundation, either version 3 of the License, or
|
||
(at your option) any later version.
|
||
|
||
This program is distributed in the hope that it will be useful,
|
||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
GNU General Public License for more details.
|
||
|
||
You should have received a copy of the GNU General Public License
|
||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
--]]
|
||
--Carbone death coords
|
||
--License of media (textures and sounds) From carbone subgame
|
||
--------------------------------------
|
||
--mods/default/sounds/player_death.ogg: from OpenArena – GNU GPL v2.
|
||
-----------------------------------------------------------------------------------------------
|
||
local title = "Death Messages"
|
||
local version = "0.1.5"
|
||
local mname = "death_messages"
|
||
-----------------------------------------------------------------------------------------------
|
||
dofile(minetest.get_modpath("death_messages").."/settings.txt")
|
||
-----------------------------------------------------------------------------------------------
|
||
local LANG = minetest.settings:get("language")
|
||
if not (LANG and (LANG ~= "")) then LANG = "en" end
|
||
-- check if stamina and/or hbhunger is used and death may occured by exhausting
|
||
local mstamina = minetest.get_modpath("stamina")
|
||
local mhbhunger = minetest.get_modpath("hbhunger")
|
||
local lstamina = 100
|
||
-- check if thirsty is used and death may occured by exhausting
|
||
local mthirsty = minetest.get_modpath("thirsty")
|
||
local lthirsty = 100
|
||
local msunburn = minetest.get_modpath("sunburn")
|
||
local lsunburn = 0
|
||
|
||
-- A table of quips for death messages. The first item in each sub table is the
|
||
-- default message used when RANDOM_MESSAGES is disabled.
|
||
local messages = {}
|
||
local swas = { en = " was ", de = " war " }
|
||
local sby = { en = " by ", de = " von " }
|
||
local swith = {en = " with ", de = " mit " }
|
||
|
||
-- Default messages
|
||
-- Read messages per language file
|
||
for _,lan in ipairs({"en","de"}) do
|
||
-- local lan=tlan:gsub(".txt",""):gsub("./","")
|
||
local infile=minetest.get_modpath("death_messages").."/"..lan..".txt"
|
||
local file = io.open(infile, "r")
|
||
for line in file:lines() do
|
||
if line:sub(1,1) ~= "#" then -- lines starting with # are handled as comment
|
||
local attribs = line:gsub("\r",""):split(",",true)
|
||
if #attribs>1 then
|
||
if messages[attribs[1]]==nil then
|
||
messages[attribs[1]]={}
|
||
end
|
||
if messages[attribs[1]][lan] == nil then
|
||
messages[attribs[1]][lan] = {}
|
||
end
|
||
table.insert(messages[attribs[1]][lan],attribs[2])
|
||
end
|
||
end
|
||
end
|
||
end
|
||
|
||
local function get_message(mtype)
|
||
if mtype==nil then mtype="default" end
|
||
if RANDOM_MESSAGES then
|
||
local lmessages=messages[mtype][LANG]
|
||
return lmessages[math.random(1, #lmessages)]
|
||
else
|
||
return messages[1] -- 1 is the index for the non-random message
|
||
end
|
||
end
|
||
|
||
local function get_int_attribute(player, key)
|
||
local level = player:get_attribute(key)
|
||
if level then
|
||
return tonumber(level)
|
||
else
|
||
return nil
|
||
end
|
||
end
|
||
|
||
|
||
local function guess_reason(player)
|
||
local node = minetest.registered_nodes[minetest.get_node(player:getpos()).name]
|
||
local pos = player:getpos()
|
||
local reas_meas="default"
|
||
local lstamina = 10
|
||
local lthirsty = 10
|
||
local lsunburn = 0
|
||
local lhunger = 0
|
||
pos.x = math.floor(pos.x + 0.5)
|
||
pos.y = math.floor(pos.y + 0.5)
|
||
pos.z = math.floor(pos.z + 0.5)
|
||
local param2 = minetest.dir_to_facedir(player:get_look_dir())
|
||
if mstamina ~= nil then
|
||
lstamina = get_int_attribute(player, "stamina:level")
|
||
end
|
||
if mhbhunger ~= nil then
|
||
lhunger = tonumber(hbhunger.hunger[player_name])
|
||
end
|
||
if mthirsty ~= nil then
|
||
lthirsty = thirsty.get_thirst_factor(player)
|
||
end
|
||
if msunburn ~= nil then
|
||
lsunburn = sunburn.get_sunburn(player)
|
||
end
|
||
|
||
-- Death by lava
|
||
if node.name == "default:lava_source" then
|
||
reas_meas="lava"
|
||
elseif node.name == "default:lava_flowing" then
|
||
reas_meas="lava"
|
||
-- Death by drowning
|
||
elseif player:get_breath() == 0 then
|
||
reas_meas="drown"
|
||
-- Death by fire
|
||
elseif node.name == "fire:basic_flame" then
|
||
reas_meas="fire"
|
||
-- Death by Toxic water
|
||
elseif node.name == "es:toxic_water_source" then
|
||
reas_meas="toxic"
|
||
elseif node.name == "es:toxic_water_flowing" then
|
||
reas_meas="toxic"
|
||
elseif node.name == "groups:radioactive" then
|
||
reas_meas="toxic"
|
||
elseif lthirsty <= 1 then
|
||
reas_meas="thirst"
|
||
elseif lhunger <= 1 then
|
||
reas_meas="hunger"
|
||
elseif lstamina <= 1 then
|
||
reas_meas="exhausted"
|
||
elseif lsunburn >= 19 then
|
||
reas_meas="sunburn"
|
||
-- Death by something else
|
||
else
|
||
reas_meas="default"
|
||
end
|
||
end
|
||
|
||
minetest.register_on_dieplayer(function(player,reason)
|
||
local reas_meas="default"
|
||
local player_name = player:get_player_name()
|
||
if minetest.is_singleplayer() then
|
||
player_name = "You"
|
||
end
|
||
local node = minetest.registered_nodes[minetest.get_node(player:getpos()).name]
|
||
local pos = player:getpos()
|
||
minetest.sound_play("player_death", {pos = pos, gain = 1})
|
||
if reason == nil then
|
||
reas_meas=guess_reason(player)
|
||
else
|
||
print(dump2(reason))
|
||
if reason.type ~= nil then
|
||
if (reason.type == "fall") or (reason.type == "punch") or (reason.type == "drawn") then
|
||
reas_mean = reason.type
|
||
else
|
||
reas_mean=guess_reason(player)
|
||
end
|
||
else
|
||
if (#reason > 1) then
|
||
reas_meas="default"
|
||
else
|
||
reas_meas="default"
|
||
end
|
||
end
|
||
end
|
||
minetest.chat_send_all(string.char(0x1b).."(c@#00CED1)"..player_name..string.char(0x1b).."(c@#ff0000)"..get_message(reas_meas))
|
||
end)
|
||
|
||
--bigfoot code
|
||
-- bigfoot547's death messages
|
||
-- hacked by maikerumine
|
||
|
||
-- get tool/item when hitting get_name() returns item name (e.g. "default:stone")
|
||
minetest.register_on_punchplayer(function(player, hitter)
|
||
local pos = player:getpos()
|
||
local death = {x=0, y=23, z=-1.5}
|
||
if not (player or hitter) then
|
||
return false
|
||
end
|
||
if not hitter:get_player_name() == "" then
|
||
return false
|
||
end
|
||
minetest.after(0, function(holding)
|
||
if player:get_hp() == 0 and hitter:get_player_name() ~= "" and holding == hitter:get_wielded_item() ~= "" then
|
||
|
||
local holding = hitter:get_wielded_item()
|
||
if holding:to_string() ~= "" then
|
||
local weap = holding:get_name(holding:get_name())
|
||
if holding then
|
||
minetest.chat_send_all(
|
||
string.char(0x1b).."(c@#00CED1)"..player:get_player_name()..
|
||
string.char(0x1b).."(c@#ff0000)"..swas[LANG]..
|
||
string.char(0x1b).."(c@#ff0000)"..get_message("pvp")..
|
||
string.char(0x1b).."(c@#ff0000)"..sby[LANG]..
|
||
string.char(0x1b).."(c@#00CED1)"..hitter:get_player_name()..
|
||
string.char(0x1b).."(c@#ffffff)"..swith[LANG]..
|
||
string.char(0x1b).."(c@#FF8C00)"..weap..
|
||
string.char(0x1b).."(c@#00bbff)"..get_message("player")) --TODO: make custom mob death messages
|
||
|
||
end
|
||
end
|
||
|
||
if player=="" or hitter=="" then return end -- no killers/victims
|
||
return true
|
||
|
||
|
||
elseif hitter:get_player_name() == "" and player:get_hp() == 0 then
|
||
minetest.chat_send_all(
|
||
string.char(0x1b).."(c@#00CED1)"..player:get_player_name()..
|
||
string.char(0x1b).."(c@#ff0000)"..swas[LANG]..
|
||
string.char(0x1b).."(c@#ff0000)"..get_message("pvp")..
|
||
string.char(0x1b).."(c@#ff0000)"..sby[LANG]..
|
||
string.char(0x1b).."(c@#FF8C00)"..hitter:get_luaentity().name.. --too many mobs add to crash
|
||
string.char(0x1b).."(c@#00bbff)"..get_message("mobs")) --TODO: make custom mob death messages
|
||
|
||
if player=="" or hitter=="" or hitter=="*" then return end -- no mob killers/victims
|
||
else
|
||
|
||
return false
|
||
end
|
||
|
||
end)
|
||
|
||
end)
|
||
|
||
-----------------------------------------------------------------------------------------------
|
||
print("[Mod] "..title.." ["..version.."] ["..mname.."] ["..LANG.."] Loaded...")
|
||
-----------------------------------------------------------------------------------------------
|