1
0
mirror of https://github.com/sys4-fr/server-nalc.git synced 2024-11-16 23:40:31 +01:00
server-nalc/mods/music/init.lua
2015-09-08 20:47:09 +02:00

86 lines
2.7 KiB
Lua
Executable File

local players = {}
local music_volume = 1
local SOUNDVOLUME = 1
-- compatibility with soundset mod
local get_volume
if (minetest.get_modpath("soundset")) ~= nil then
get_volume = soundset.get_gain
else
get_volume = function (player_name, sound_type) return SOUNDVOLUME end
-- set volume command
minetest.register_chatcommand("svol", {
params = "<svol>",
description = "set sound volume (0.1 to 1.0)",
privs = {server=true},
func = function(name, param)
if tonumber(param) then
SOUNDVOLUME = tonumber(param)
minetest.chat_send_player(name, "Sound volume set.")
else
minetest.chat_send_player(name, "Sound volume no set, bad param.")
end
end,
})
end
local musics = {
--{name="StrangelyBeautifulShort", length=3*60+.5, gain=music_volume*.7},
--{name="Loneliness", length=3*60+51, gain=music_volume*.9},
--{name="AvalonShort", length=2*60+58, gain=music_volume*1.4},
--{name="Aube", length=2*60+24, gain=music_volume*1.8},
--{name="Interlude", length=3*60+30.5, gain=music_volume*1.8},
--{name="mtest", length=4*60+33, gain=music_volume},
--{name="echos", length=2*60+26, gain=music_volume},
--{name="FoamOfTheSea", length=1*60+50, gain=music_volume},
{name="Ambivalent", length=2*60+31, gain=music_volume*.9},
--{name="eastern_feeling", length=3*60+51, gain=music_volume},
--{name="Mass_Effect_Uncharted_Worlds", length=2*60+29, gain=music_volume},
{name="EtherealShort", length=3*60+4, gain=music_volume*.7},
--{name="Mute", length=3*60+43, gain=music_volume*.9},
--{name="FarawayShort", length=3*60+5, gain=music_volume*.7},
{name="dark_ambiance", length=44, gain=music_volume}
}
-- stops all sounds that are not in still_playing
local stop_sound = function(player_name)
if players[player_name] ~= nil then
minetest.sound_stop(players[player_name])
players[player_name] = nil
end
end
-- start playing the sound, set the handler and delete the handler after sound is played
local play_sound = function(player_name, music, gain)
if players[player_name] == nil then
local handler = minetest.sound_play(music.name, {to_player=player_name, gain=music.gain*gain})
if handler ~= nil then
players[player_name] = handler
minetest.after(music.length, stop_sound, player_name)
end
end
end
local function tick()
for _, player in ipairs(minetest.get_connected_players()) do
local player_name = player:get_player_name()
local gain = get_volume(player_name, "music")
if gain > 0 and players[player_name] == nil then
local music = musics[math.random(#musics)]
play_sound(player_name, music, gain)
end
end
minetest.after(math.random(15,30)*60, tick)
end
minetest.register_on_leaveplayer(function(player)
local player_name = player:get_player_name()
stop_sound(player_name)
end)
minetest.after(60, tick)