add sound to torchspines

looped_node_sound/init.lua

@@ -0,0 +1,111 @@
+looped_node_sound = {}
+
+looped_node_sound.register = function(def)
+	local handles = {}
+	local timer = 0
+	
+	-- Parameters
+	local radius = def.radius or 8 -- node search radius around player
+	local cycle = def.cycle_time or 3 -- Cycle time for sound updates
+	assert(def.node_list, "[looped_sound_node] register function called without a node_list in its definition")
+	assert(def.sound, "[looped_sound_node] register function called without a sound in its definition")
+	local node_list = def.node_list
+	local sound = def.sound
+	local gain_per_node = def.gain_per_node or 0.125
+	local gain_max = def.max_gain or 1.0
+	local max_hear_distance = def.max_hear_distance or 32
+
+	-- Update sound for player
+	function update_player_sound(player)
+		local player_name = player:get_player_name()
+		-- Search for nodes in radius around player
+		local ppos = player:get_pos()
+		local areamin = vector.subtract(ppos, radius)
+		local areamax = vector.add(ppos, radius)
+		local fpos, num = minetest.find_nodes_in_area(
+			areamin,
+			areamax,
+			node_list
+		)
+		-- Total number of nodes in radius
+		local total = 0
+		for _, count in pairs(num) do
+			total = total + count
+		end
+		-- Stop previous sound
+		if handles[player_name] then
+			minetest.sound_stop(handles[player_name])
+		end
+		-- If nodes
+		if total > 0 then
+			-- Find centre of node positions
+			local fposmid = fpos[1]
+			-- If more than 1 node
+			if #fpos > 1 then
+				local fposmin = areamax
+				local fposmax = areamin
+				for i = 1, #fpos do
+					local fposi = fpos[i]
+					if fposi.x > fposmax.x then
+						fposmax.x = fposi.x
+					end
+					if fposi.y > fposmax.y then
+						fposmax.y = fposi.y
+					end
+					if fposi.z > fposmax.z then
+						fposmax.z = fposi.z
+					end
+					if fposi.x < fposmin.x then
+						fposmin.x = fposi.x
+					end
+					if fposi.y < fposmin.y then
+						fposmin.y = fposi.y
+					end
+					if fposi.z < fposmin.z then
+						fposmin.z = fposi.z
+					end
+				end
+				fposmid = vector.divide(vector.add(fposmin, fposmax), 2)
+			end
+			-- Play sound
+			local handle = minetest.sound_play(sound, {
+				pos = fposmid,
+				to_player = player_name,
+				gain = math.min(total * gain_per_node, gain_max),
+				max_hear_distance = max_hear_distance,
+				loop = true -- In case of lag
+			})
+			-- Store sound handle for this player
+			if handle then
+				handles[player_name] = handle
+			else
+				handles[player_name] = nil
+			end
+		else
+			handles[player_name] = nil
+		end
+	end
+
+	-- Cycle for updating players sounds
+	minetest.register_globalstep(function(dtime)
+		timer = timer + dtime
+		if timer < cycle then
+			return
+		end
+
+		timer = 0
+		local players = minetest.get_connected_players()
+		for n = 1, #players do
+			update_player_sound(players[n])
+		end
+	end)
+
+	-- Stop sound and clear handle on player leave
+	minetest.register_on_leaveplayer(function(player)
+		local player_name = player:get_player_name()
+		if handles[player_name] then
+			minetest.sound_stop(handles[player_name])
+			handles[player_name] = nil
+		end
+	end)
+end

looped_node_sound/license.txt

@@ -0,0 +1,16 @@
+License of source code
+----------------------
+
+GNU Lesser General Public License, version 2.1
+Copyright (C) 2012-2016 celeron55, Perttu Ahola <celeron55@gmail.com>
+Copyright (C) 2012-2016 Various Minetest developers and contributors
+Copyright (C) 2022 FaceDeer, pulled code out of the default game fire mod and made generic
+
+This program is free software; you can redistribute it and/or modify it under the terms
+of the GNU Lesser General Public License as published by the Free Software Foundation;
+either version 2.1 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 Lesser General Public License for more details:
+https://www.gnu.org/licenses/old-licenses/lgpl-2.1.html

looped_node_sound/mod.conf

@@ -0,0 +1,4 @@
+name = looped_node_sound
+description = A simple API for causing nodes to appear to be emitting a looped sound
+depends =
+optional_depends =