FreeBlock/mods/ITEMS/REDSTONE/mesecons_noteblock/init.lua

minetest.register_node("mesecons_noteblock:noteblock", {
	description = "Note Block",
	_doc_items_longdesc = "A note block is a redstone component which plays a musical note when it is supplied with redstone power.",
	_doc_items_usagehelp = "Rightclick the note block to choose one of many possible notes to play.",
	tiles = {"mesecons_noteblock.png"},
	groups = {handy=1,axey=1, material_wood=1},
	is_ground_content = false,
	place_param2 = 0,
	on_rightclick = function (pos, node) -- change sound when punched
		node.param2 = (node.param2+1)%24
		mesecon.noteblock_play(pos, node.param2)
		minetest.set_node(pos, node)
	end,
	sounds = mcl_sounds.node_sound_wood_defaults(),
	mesecons = {effector = { -- play sound when activated
		action_on = function (pos, node)
			mesecon.noteblock_play(pos, node.param2)
		end
	}},
	_mcl_blast_resistance = 4,
	_mcl_hardness = 0.8,
})

minetest.register_craft({
	output = '"mesecons_noteblock:noteblock" 1',
	recipe = {
		{"group:wood", "group:wood", "group:wood"},
		{"group:wood", "mesecons:redstone", "group:wood"},
		{"group:wood", "group:wood", "group:wood"},
	}
})

minetest.register_craft({
	type = "fuel",
	recipe = "mesecons_noteblock:noteblock",
	burntime = 15
})

local soundnames_piano = {
	[0] = "mesecons_noteblock_c",
	"mesecons_noteblock_csharp",
	"mesecons_noteblock_d",
	"mesecons_noteblock_dsharp",
	"mesecons_noteblock_e",
	"mesecons_noteblock_f",
	"mesecons_noteblock_fsharp",
	"mesecons_noteblock_g",
	"mesecons_noteblock_gsharp",
	"mesecons_noteblock_a",
	"mesecons_noteblock_asharp",
	"mesecons_noteblock_b",

	"mesecons_noteblock_c2",
	"mesecons_noteblock_csharp2",
	"mesecons_noteblock_d2",
	"mesecons_noteblock_dsharp2",
	"mesecons_noteblock_e2",
	"mesecons_noteblock_f2",
	"mesecons_noteblock_fsharp2",
	"mesecons_noteblock_g2",
	"mesecons_noteblock_gsharp2",
	"mesecons_noteblock_a2",
	"mesecons_noteblock_asharp2",
	"mesecons_noteblock_b2",

}

mesecon.noteblock_play = function (pos, param2)
	local soundname

	-- Default: One of 24 piano notes
	soundname = soundnames_piano[param2]

	local block_below_name = minetest.get_node({x=pos.x, y=pos.y-1, z=pos.z}).name
	if minetest.get_item_group(block_below_name, "material_glass") ~= 0 then
		-- TODO: Sticks and clicks
		soundname="mesecons_noteblock_kick"
	elseif minetest.get_item_group(block_below_name, "material_wood") ~= 0 then
		-- TODO: Bass guitar
		soundname="mesecons_noteblock_crash"
	elseif minetest.get_item_group(block_below_name, "material_sand") ~= 0 then
		-- TODO: 24 Snare drum sounds
		soundname="mesecons_noteblock_snare"
	elseif minetest.get_item_group(block_below_name, "material_stone") ~= 0 then
		-- TODO: Bass drum
		soundname="mesecons_noteblock_snare"
	end
	minetest.sound_play(soundname,
	{pos = pos, gain = 1.0, max_hear_distance = 48,})
end