106 lines
2.8 KiB
Lua
106 lines
2.8 KiB
Lua
|
|
||
|
|
music={}
|
||
|
|
|
||
|
|
|
||
|
|
music.pause_between_songs=minetest.settings:get("music.pause_between_songs") or 10
|
||
|
|
|
||
|
|
--end config
|
||
|
|
|
||
|
|
music.modpath=minetest.get_modpath("music")
|
||
|
|
if not music.modpath then
|
||
|
|
error("music mod folder has to be named 'music'!")
|
||
|
|
end
|
||
|
|
--{name, length, gain~1}
|
||
|
|
music.songs = {}
|
||
|
|
local sfile, sfileerr=io.open(music.modpath..DIR_DELIM.."songs.txt")
|
||
|
|
if not sfile then error("Error opening songs.txt: "..sfileerr) end
|
||
|
|
for line in sfile:lines() do
|
||
|
|
if line~="" and line[1]~="#" then
|
||
|
|
local name, timeMinsStr, timeSecsStr, gainStr, title = string.match(line, "^(%S+)%s+(%d+):([%d%.]+)%s+([%d%.]+)%s*(.*)$")
|
||
|
|
local timeMins, timeSecs, gain = tonumber(timeMinsStr), tonumber(timeSecsStr), tonumber(gainStr)
|
||
|
|
if title=="" then title = name end
|
||
|
|
if name and timeMins and timeSecs and gain then
|
||
|
|
music.songs[#music.songs+1]={name=name, length=timeMins*60+timeSecs, lengthhr=timeMinsStr..":"..timeSecsStr, gain=gain, title=title}
|
||
|
|
else
|
||
|
|
minetest.log("warning", "[music] Misformatted song entry in songs.txt: "..line)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
sfile:close()
|
||
|
|
|
||
|
|
if #music.songs==0 then
|
||
|
|
print("[music]no songs registered, not doing anything")
|
||
|
|
return
|
||
|
|
end
|
||
|
|
|
||
|
|
music.storage = minetest.get_mod_storage()
|
||
|
|
|
||
|
|
music.handles={}
|
||
|
|
|
||
|
|
music.playing=false
|
||
|
|
music.id_playing=nil
|
||
|
|
music.song_time_left=nil
|
||
|
|
music.time_next=10 --sekunden
|
||
|
|
music.id_last_played=nil
|
||
|
|
|
||
|
|
minetest.register_globalstep(function(dtime)
|
||
|
|
if music.playing then
|
||
|
|
if music.song_time_left<=0 then
|
||
|
|
music.stop_song()
|
||
|
|
music.time_next=music.pause_between_songs
|
||
|
|
else
|
||
|
|
music.song_time_left=music.song_time_left-dtime
|
||
|
|
end
|
||
|
|
elseif music.time_next then
|
||
|
|
if music.time_next<=0 then
|
||
|
|
music.next_song()
|
||
|
|
else
|
||
|
|
music.time_next=music.time_next-dtime
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end)
|
||
|
|
music.play_song=function(id)
|
||
|
|
if music.playing then
|
||
|
|
music.stop_song()
|
||
|
|
end
|
||
|
|
local song=music.songs[id]
|
||
|
|
if not song then return end
|
||
|
|
for _,player in ipairs(minetest.get_connected_players()) do
|
||
|
|
local pname=player:get_player_name()
|
||
|
|
local pvolume=tonumber(music.storage:get_string("vol_"..pname))
|
||
|
|
if not pvolume then pvolume=1 end
|
||
|
|
if pvolume>0 then
|
||
|
|
local handle = minetest.sound_play(song.name, {to_player=pname, gain=song.gain*pvolume})
|
||
|
|
if handle then
|
||
|
|
music.handles[pname]=handle
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
music.playing=id
|
||
|
|
--adding 2 seconds as security
|
||
|
|
music.song_time_left = song.length + 2
|
||
|
|
end
|
||
|
|
music.stop_song=function()
|
||
|
|
for pname, handle in pairs(music.handles) do
|
||
|
|
minetest.sound_stop(handle)
|
||
|
|
end
|
||
|
|
music.id_last_played=music.playing
|
||
|
|
music.playing=nil
|
||
|
|
music.handles={}
|
||
|
|
music.time_next=nil
|
||
|
|
end
|
||
|
|
|
||
|
|
music.next_song=function()
|
||
|
|
local next
|
||
|
|
repeat
|
||
|
|
next=math.random(1,#music.songs)
|
||
|
|
until #music.songs==1 or next~=music.id_last_played
|
||
|
|
music.play_song(next)
|
||
|
|
end
|
||
|
|
|
||
|
|
music.song_human_readable=function(id)
|
||
|
|
if not tonumber(id) then return "<error>" end
|
||
|
|
local song=music.songs[id]
|
||
|
|
if not song then return "<error>" end
|
||
|
|
return id..": "..song.title.." ["..song.lengthhr.."]"
|
||
|
|
end
|