mods/music/init.lua

   1
   2 --[[
   3
   4   ITB (insidethebox) minetest game - Copyright (C) 2017-2018 sofar & nore
   5
   6   This library is free software; you can redistribute it and/or
   7   modify it under the terms of the GNU Lesser General Public License
   8   as published by the Free Software Foundation; either version 2.1
   9   of the License, or (at your option) any later version.
  10
  11   This library is distributed in the hope that it will be useful,
  12   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with this library; if not, write to the Free
  18   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  19   MA 02111-1307 USA
  20
  21 ]]--
  22
  23 --[[
  24
  25   Music API for itb
  26
  27 --]]
  28
  29 --
  30 -- we require `localmusic` to provide event-to-track mappings
  31 --
  32 assert(localmusic, "localmusic mod missing, required to map events to tracks")
  33
  34 local LOOP = 7 * 60 -- seconds if looping tracks randomly
  35
  36 --
  37 -- cache data
  38 --
  39 local streams = {}
  40
  41 local tracks = {}
  42
  43
  44 --
  45 -- API
  46 --
  47 music = {}
  48
  49 music.track = function(player, track)
  50         minetest.log("action", "playing music track \"" .. track .. "\" to " .. player:get_player_name())
  51         streams[player] = minetest.sound_play(track, {
  52                 to_player = player:get_player_name(),
  53                 loop = false,
  54                 gain = 0.3
  55         })
  56         tracks[player] = track
  57 end
  58
  59 music.stop = function(player)
  60         if streams[player] then
  61                 minetest.sound_stop(streams[player])
  62                 streams[player] = nil
  63         end
  64         tracks[player] = nil
  65 end
  66
  67 music.loop = function(player, stream, add, track)
  68         if streams[player] ~= stream or not streams[player] then
  69                 -- stream was stopped?
  70                 return
  71         end
  72
  73         if not tracks[player] or tracks[player] ~= track then
  74                 -- somethign else playing?
  75                 return
  76         end
  77
  78         music.stop(player)
  79
  80         -- pick a track from add[] and adjust streams
  81         track = add[math.random(1, #add)]
  82         music.track(player, track)
  83
  84         minetest.after(LOOP, music.loop, player, streams[player], add, track)
  85 end
  86
  87 music.start = function(player, info, tag)
  88         -- ignore if music disabled.
  89         music.stop(player)
  90
  91         if player:get_attribute("music") == "0" then
  92                 return
  93         end
  94
  95         --TODO use info.box_id to retrieve emblem scoring for a box, then pick emblem tracks.
  96         if not localmusic[tag] then
  97                 minetest.log("error", "missing music track mapping for \"" .. tag .. "\"")
  98         else
  99                 local track = localmusic[tag]
 100                 music.track(player, track)
 101
 102                 local add = localmusic[tag .. "_add"]
 103                 if add then
 104                         minetest.after(LOOP, music.loop, player, streams[player], add, track)
 105                 end
 106         end
 107 end
 108
 109
 110 --
 111 -- joinplayer: main lobby?
 112 --
 113 minetest.register_on_joinplayer(function(player)
 114         music.start(player, nil, "join")
 115 end)
 116
 117 local track_by_number = {}
 118 for k, _ in pairs(localmusic) do
 119         if not string.find(k, "_add") then
 120                 table.insert(track_by_number, k)
 121         end
 122 end
 123
 124 minetest.register_node("music:jukebox", {
 125         description = "Jukebox\nLeft/right click to select track",
 126         tiles = {"jukebox_top.png", "jukebox_top.png", "jukebox_side.png"},
 127         groups = {node = 1, unbreakable = 1, trigger = 1},
 128         sounds = sounds.metal,
 129         on_punch = function(pos, node, puncher, pointed_thing)
 130                 local name = puncher:get_player_name()
 131                 if not puncher or not boxes.players_editing_boxes[name] then
 132                         return
 133                 end
 134                 local meta = minetest.get_meta(pos)
 135                 local track = meta:get_int("track") + 1
 136                 if track >= #track_by_number then
 137                         track = 0
 138                 end
 139                 minetest.chat_send_player(name, "track = " .. track_by_number[track + 1])
 140                 meta:set_int("track", track)
 141         end,
 142         on_rightclick = function(pos, node, puncher, itemstack, pointed_thing)
 143                 local name = puncher:get_player_name()
 144                 if not puncher or not boxes.players_editing_boxes[name] then
 145                         return
 146                 end
 147                 local meta = minetest.get_meta(pos)
 148                 local track = meta:get_int("track") - 1
 149                 if track < 0 then
 150                         track = #track_by_number - 1
 151                 end
 152                 minetest.chat_send_player(name, "track = " .. track_by_number[track + 1])
 153                 meta:set_int("track", track)
 154         end,
 155         on_trigger = function(pos)
 156                 local box = boxes.find_box(pos)
 157                 if not box then
 158                         return
 159                 end
 160                 local p = minetest.get_player_by_name(box.name)
 161                 if not p then
 162                         return
 163                 end
 164                 local meta = minetest.get_meta(pos)
 165                 local track = meta:get_int("track")
 166                 music.start(p, nil, track_by_number[track + 1])
 167         end,
 168         on_untrigger = function(pos)
 169                 local box = boxes.find_box(pos)
 170                 if not box then
 171                         return
 172                 end
 173                 local p = minetest.get_player_by_name(box.name)
 174                 if not p then
 175                         return
 176                 end
 177                 music.stop(p)
 178         end,
 179         on_reveal = function(name, pos)
 180                 local meta = minetest.get_meta(pos)
 181                 local track = meta:get_int("track")
 182                 minetest.chat_send_player(name, minetest.colorize( "#4444ff",
 183                                 "> track = " .. (track_by_number[track + 1] or "default")))
 184         end,
 185 })