mysoundblocks/init.lua

local block_sounds = {}
local player_name = {}

minetest.register_node("mysoundblocks:block", {
	description = "Sound Block",
	drawtype = "normal",
	tiles = {"mysoundblocks_block.png"},
	paramtype = "light",
	is_ground_content = false,
	groups = {oddly_breakable_by_hand = 1, not_in_creative_inventory = 0},

	on_place = function(itemstack, placer, pointed_thing)
	local pos = pointed_thing.above

		if minetest.get_player_privs(placer:get_player_name()).mysoundblocks ~= true then

			minetest.chat_send_player(placer:get_player_name(),
				"You need the mysoundblocks priv")
			return
		end

		if minetest.get_player_privs(placer:get_player_name()).mysoundblocks == true then
			minetest.set_node(pos,{name = "mysoundblocks:block"})
		end

	end,


	on_dig = function(pos, node, player)

		if minetest.get_player_privs(player:get_player_name()).mysoundblocks ~= true then

			minetest.chat_send_player(player:get_player_name(),
				"You need the mysoundblocks priv")
			return
		end

		if minetest.get_player_privs(player:get_player_name()).mysoundblocks == true then

			minetest.remove_node(pos)
		end

	end,

	on_rightclick = function(pos, node, player, itemstack, pointed_thing)

		local node = minetest.get_node(pos)
		local meta = minetest.get_meta(pos)

		minetest.show_formspec(player:get_player_name(),"fs",
				"size[6,5;]"..
				"field[1,1;4.5,1;snd;Enter Sound Name;]"..
				"field[1,2.5;2,1;sndl;Length;5]"..
				"field[3.5,2.5;2,1;sndhd;Radius;3]"..
				"button_exit[1,4;2,1;ents;Sound]"..
				"button_exit[3,4;2,1;entc;Chat]")

		minetest.register_on_player_receive_fields(function(player, formname, fields)
		local meta = minetest.get_meta(pos)
		local inv = meta:get_inventory()
		local thing1 = fields["snd"]
		local thing2 = fields["sndl"]
		local thing3 = fields["sndhd"]
		local thing4 = ""

			if fields["ents"] or
				fields["entc"] then

				if fields["ents"] then
					thing4 = "sound"
					meta:set_string("a",thing1)
					meta:set_string("b",thing2)
					meta:set_string("c",thing3)
					meta:set_string("d",thing4)
					minetest.swap_node(pos,{name = "mysoundblocks:block_hidden"})
				elseif fields["entc"] then
					thing4 = "chat"
					meta:set_string("a",thing1)
					meta:set_string("b",thing2)
					meta:set_string("c",thing3)
					meta:set_string("d",thing4)
					minetest.swap_node(pos,{name = "mysoundblocks:block_hidden"})
				end

			else
				return
			end
			
		end)


end

})

minetest.register_node("mysoundblocks:block_hidden", {
	tiles = {
		"mysoundblocks_hidden.png"
	},
	drawtype = "nodebox",
	paramtype = "light",
	walkable = false,
	pointable = false,
	group = {not_in_creative_inventory = 1},
})

minetest.register_privilege("mysoundblocks", "Lets you place and dig soundblocks")

minetest.register_chatcommand("showsb", {
	params = "",
	description = "Show the sound block",
	privs={mysoundblocks = true},

	func = function(name, param)

		local player = minetest.get_player_by_name(name)

		if not player then
			return false, "Player not found"
		end

		local pos = player:getpos()
			pos.y = pos.y + 1

		local npos = minetest.find_node_near(pos, 5,"mysoundblocks:block_hidden")

				minetest.swap_node(npos,{name = "mysoundblocks:block"})

--[[
local a = minetest.find_nodes_in_area({x = pos.x - 5, y = pos.y - 5, z = pos.z - 5},
		{x = pos.x + 5, y = pos.y + 5, z = pos.z + 5}, {"mysoundblock:block"})
--]]
	end
})

minetest.register_chatcommand("hidesb", {
	params = "",
	description = "Hide the sound block",
	privs = {mysoundblocks = true},

	func = function(name, param)

		local player = minetest.get_player_by_name(name)

		if not player then
			return false, "Player not found"
		end

		local pos = player:getpos()
			pos.y = pos.y + 1

		local npos = minetest.find_node_near(pos, 5,"mysoundblocks:block")

		if pos and npos then
			minetest.swap_node(npos,{name = "mysoundblocks:block_hidden"})
		end
	end
})

minetest.register_abm({
	nodenames = {"mysoundblocks:block_hidden"},
	interval = 1, -- abm's start from 1 second and above
	chance = 1,
	catch_up = false,

	action = function(pos, node, active_object_count, active_object_count_wider)

		local meta = minetest.get_meta(pos)
		local block_sound = meta:get_string("a")

			if block_sound == nil or
				block_sound == "" then
				minetest.swap_node(pos,{name = "mysoundblocks:block"})
				return
			end

		local block_time = tonumber(meta:get_string("b"))

			if block_time == nil then
				block_time = 5
			end

		local rad_dist = tonumber(meta:get_string("c"))

			if rad_dist == nil then
				rad_dist = 3
			end

		local sound_chat = meta:get_string("d")

		local all_objects = minetest.get_objects_inside_radius(pos, rad_dist)
		local p

		for _,obj in ipairs(all_objects) do

			if obj:is_player() then

				p = obj:get_player_name()

				if not player_name[p] then

					player_name[p] = true
					
					if sound_chat == "sound" then

						minetest.sound_play(block_sound, {
							max_hear_distance = 10,
							to_player = p,
							gain = 1.0,
						})
					else
						minetest.chat_send_player(p,block_sound)
					end

					minetest.after(block_time, function(p) -- time before player can hear the sound again
						player_name[p] = nil -- reset player
					end, p)

				end
			end
		end
	end
})