VoxeLibre/mods/PLAYER/mcl_music/init.lua

159 lines
4.5 KiB
Lua

local modname = minetest.get_current_modname()
local modpath = minetest.get_modpath(modname)
local music_enabled = minetest.settings:get_bool("mcl_game_music", true)
local pianowtune = "diminixed-pianowtune02"
local end_tune = "diminixed-ambientwip02"
local never_grow_up = "diminixed-nevergrowup04"
local nether_tune = "horizonchris96-traitor"
local odd_block = "Jester-0dd-BL0ck"
local flock_of_one = "Jester-Flock-of-One"
local gift = "Jester-Gift"
local hailing_forest = "Jester-Hailing_Forest"
local lonely_blossom = "exhale_and_tim_unwin-lonely_blossom"
local valley_of_ghosts = "exhale_and_tim_unwin-valley_of_ghosts"
local farmer = "exhale_and_tim_unwin-farmer"
local dimension_to_base_track = {
["overworld"] = {pianowtune, never_grow_up, flock_of_one, gift, hailing_forest, lonely_blossom, farmer},
["nether"] = {nether_tune, valley_of_ghosts},
["end"] = {end_tune},
["mining"] = {odd_block},
}
local listeners = {}
local function pick_track(dimension, underground)
local track_key
if dimension == "overworld" and underground then
track_key = "mining"
else
-- Pick random dimension song
track_key = dimension
end
local dimension_tracks = dimension_to_base_track[track_key]
if dimension_tracks and #dimension_tracks >= 1 then
local index = 1
if #dimension_tracks > 1 then
index = math.random(1, #dimension_tracks)
end
local chosen_track = dimension_tracks[index]
--minetest.log("chosen_track: " .. chosen_track)
minetest.log("action", "[mcl_music] Playing track: " .. chosen_track .. ", for context: " .. track_key)
return chosen_track
else
--?
end
return nil
end
local function stop_music_for_listener_name(listener_name)
if not listener_name then return end
local listener = listeners[listener_name]
if not listener then return end
local handle = listener.handle
if not handle then return end
minetest.log("action", "[mcl_music] Stopping music")
minetest.sound_stop(handle)
listeners[listener_name].handle = nil
end
local function stop_music_for_all()
for _, player in pairs(minetest.get_connected_players()) do
local player_name = player:get_player_name()
stop_music_for_listener_name(player_name)
end
end
local function play_song(track, player_name, dimension, day_count)
local spec = {
name = track,
gain = 0.3,
pitch = 1.0,
}
local parameters = {
to_player = player_name,
gain = 1.0,
fade = 0.0,
pitch = 1.0,
}
local handle = minetest.sound_play(spec, parameters, false)
listeners[player_name] = {
handle = handle,
dimension = dimension,
day_count = day_count,
}
end
local function play()
local time = minetest.get_timeofday()
if time < 0.25 or time >= 0.75 then
stop_music_for_all()
minetest.after(10, play)
return
end
local day_count = minetest.get_day_count()
for _, player in pairs(minetest.get_connected_players()) do
local player_name = player:get_player_name()
local hp = player:get_hp()
local pos = player:get_pos()
local dimension = mcl_worlds.pos_to_dimension(pos)
local listener = listeners[player_name]
local handle = listener and listener.handle
--local old_hp = listener and listener.hp
--local is_hp_changed = old_hp and (math.abs(old_hp - hp) > 0.00001) or false
local old_dimension = listener and listener.dimension
local is_dimension_changed = old_dimension and (old_dimension ~= dimension) or false
--minetest.log("handle: " .. dump (handle))
if is_dimension_changed then
stop_music_for_listener_name(player_name)
if not listeners[player_name] then
listeners[player_name] = {}
end
listeners[player_name].hp = hp
listeners[player_name].dimension = dimension
elseif not handle and (not listener or (listener.day_count ~= day_count)) then
local underground = dimension == "overworld" and pos and pos.y < 0
local track = pick_track(dimension, underground)
if track then
play_song(track, player_name, dimension, day_count)
else
--minetest.log("no track found. weird")
end
else
--minetest.log("else")
end
end
minetest.after(7, play)
end
if music_enabled then
minetest.log("action", "[mcl_music] In-game music is activated")
minetest.after(15, play)
minetest.register_on_joinplayer(function(player, last_login)
local player_name = player:get_player_name()
stop_music_for_listener_name(player_name)
end)
minetest.register_on_respawnplayer(function(player)
local player_name = player:get_player_name()
stop_music_for_listener_name(player_name)
end)
else
minetest.log("action", "[mcl_music] In-game music is deactivated")
end