Mineclonia/mods/ITEMS/mcl_jukebox/init.lua

237 lines
7.8 KiB
Lua
Raw Normal View History

local S = minetest.get_translator("mcl_jukebox")
-- Player name-indexed table containing the currently heard track
2017-01-11 15:25:04 +00:00
local active_tracks = {}
-- Player name-indexed table containing the current used HUD ID for the “Now playing” message.
2017-01-11 21:32:38 +00:00
local active_huds = {}
2017-01-11 15:25:04 +00:00
-- Player name-indexed table for the “Now playing” message.
-- Used to make sure that minetest.after only applies to the latest HUD change event
local hud_sequence_numbers = {}
-- List of music
2017-01-11 15:25:04 +00:00
local recorddata = {
-- { title, author, identifier }
2017-01-11 15:25:04 +00:00
{ "The Evil Sister (Jordach's Mix)", "SoundHelix", "13" } ,
{ "The Energetic Rat (Jordach's Mix)", "SoundHelix", "wait" },
{ "Eastern Feeling", "Jordach", "blocks"},
{ "Minetest", "Jordach", "far" },
{ "Credit Roll (Jordach's HD Mix)", "Junichi Masuda", "chirp" },
{ "Winter Feeling", "Tom Peter", "strad" },
2017-01-11 15:25:04 +00:00
{ "Synthgroove (Jordach's Mix)", "HeroOfTheWinds", "mellohi" },
{ "The Clueless Frog (Jordach's Mix)", "SoundHelix", "mall" },
}
local records = #recorddata
for r=1, records do
2017-03-10 04:10:08 +00:00
local doc = false
local entryname, longdesc, usagehelp
2017-03-10 04:10:08 +00:00
if r == 1 then
doc = true
entryname = S("Music Disc")
longdesc = S("A music disc holds a single music track which can be used in a jukebox to play music.")
usagehelp = S("Place a music dict into an empty jukebox to play the music. Use the jukebox again to retrieve the music disc. The music can only be heard by you, not by other players.")
2017-03-10 04:10:08 +00:00
end
2017-01-11 15:25:04 +00:00
minetest.register_craftitem("mcl_jukebox:record_"..r, {
description =
core.colorize("#55FFFF", S("Music Disc")) .. "\n" ..
core.colorize("#989898", S("@1—@2", recorddata[r][2], recorddata[r][1])),
2017-03-10 04:10:08 +00:00
_doc_items_create_entry = doc,
_doc_items_entry_name = entryname,
_doc_items_longdesc = longdesc,
_doc_items_usagehelp = usagehelp,
2017-01-11 15:25:04 +00:00
inventory_image = "mcl_jukebox_record_"..recorddata[r][3]..".png",
stack_max = 1,
groups = { music_record = r },
})
end
2017-01-11 21:32:38 +00:00
local function now_playing(player, track_id)
local playername = player:get_player_name()
local hud = active_huds[playername]
2019-03-15 08:52:13 +00:00
local text = S("Now playing: @1—@2", recorddata[track_id][2], recorddata[track_id][1])
2017-01-11 21:32:38 +00:00
if not hud_sequence_numbers[playername] then
hud_sequence_numbers[playername] = 1
else
hud_sequence_numbers[playername] = hud_sequence_numbers[playername] + 1
end
local id
2017-01-11 21:32:38 +00:00
if hud ~= nil then
id = hud
player:hud_change(id, "text", text)
2017-01-11 21:32:38 +00:00
else
id = player:hud_add({
2017-01-11 21:32:38 +00:00
hud_elem_type = "text",
position = { x=0.5, y=0.8 },
offset = { x=0, y = 0 },
size = { x=100, y=100},
2017-01-11 23:24:52 +00:00
number = 0x55FFFF,
2017-01-11 21:32:38 +00:00
text = text,
})
active_huds[playername] = id
2017-01-11 21:32:38 +00:00
end
minetest.after(5, function(tab)
local playername = tab[1]
local player = minetest.get_player_by_name(playername)
2017-01-11 21:32:38 +00:00
local id = tab[2]
local seq = tab[3]
if not player or not player:is_player() or not active_huds[playername] or not hud_sequence_numbers[playername] or seq ~= hud_sequence_numbers[playername] then
2017-01-11 21:32:38 +00:00
return
end
if id == active_huds[playername] then
player:hud_remove(active_huds[playername])
active_huds[playername] = nil
2017-01-11 21:32:38 +00:00
end
end, {playername, id, hud_sequence_numbers[playername]})
2017-01-11 21:32:38 +00:00
end
minetest.register_on_leaveplayer(function(player)
active_tracks[player:get_player_name()] = nil
active_huds[player:get_player_name()] = nil
hud_sequence_numbers[player:get_player_name()] = nil
2017-01-11 21:32:38 +00:00
end)
2017-01-11 15:25:04 +00:00
-- Jukebox crafting
minetest.register_craft({
output = 'mcl_jukebox:jukebox',
recipe = {
{'group:wood', 'group:wood', 'group:wood'},
2017-01-31 22:32:56 +00:00
{'group:wood', 'mcl_core:diamond', 'group:wood'},
2017-01-11 15:25:04 +00:00
{'group:wood', 'group:wood', 'group:wood'},
}
})
2018-05-12 19:50:56 +00:00
local play_record = function(pos, itemstack, player)
local record_id = minetest.get_item_group(itemstack:get_name(), "music_record")
if record_id ~= 0 then
local cname = player:get_player_name()
2018-05-12 19:50:56 +00:00
if active_tracks[cname] ~= nil then
minetest.sound_stop(active_tracks[cname])
active_tracks[cname] = nil
end
active_tracks[cname] = minetest.sound_play("mcl_jukebox_track_"..record_id, {
to_player = cname,
2018-05-12 19:50:56 +00:00
gain = 1,
})
now_playing(player, record_id)
2018-05-12 19:50:56 +00:00
return true
end
return false
end
2017-01-11 21:32:38 +00:00
2017-01-11 15:25:04 +00:00
-- Jukebox
minetest.register_node("mcl_jukebox:jukebox", {
description = S("Jukebox"),
_doc_items_longdesc = S("Jukeboxes play music when they're supplied with a music disc."),
_doc_items_usagehelp = S("Place a music disc into an empty jukebox to insert the music disc and play music. If the jukebox already has a music disc, you will retrieve this music disc first. The music can only be heard by you, not by other players."),
2017-01-11 15:25:04 +00:00
tiles = {"mcl_jukebox_top.png", "mcl_jukebox_side.png", "mcl_jukebox_side.png"},
sounds = mcl_sounds.node_sound_wood_defaults(),
2018-05-12 19:50:56 +00:00
groups = {handy=1,axey=1, container=7, deco_block=1, material_wood=1},
is_ground_content = false,
2017-01-11 15:25:04 +00:00
on_construct = function(pos)
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
inv:set_size("main", 1)
end,
2017-01-11 21:40:00 +00:00
on_rightclick= function(pos, node, clicker, itemstack, pointed_thing)
if not clicker then return end
local cname = clicker:get_player_name()
2019-02-08 20:59:01 +00:00
if minetest.is_protected(pos, cname) then
minetest.record_protection_violation(pos, cname)
return
end
2017-01-11 15:25:04 +00:00
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
if not inv:is_empty("main") then
-- Jukebox contains a disc: Stop music and remove disc
2017-01-11 21:40:00 +00:00
if active_tracks[cname] ~= nil then
minetest.sound_stop(active_tracks[cname])
2017-01-11 15:25:04 +00:00
end
local lx = pos.x
local ly = pos.y+1
local lz = pos.z
local record = inv:get_stack("main", 1)
local dropped_item = minetest.add_item({x=lx, y=ly, z=lz}, record)
2017-11-18 21:12:36 +00:00
-- Rotate record to match with “slot” texture
dropped_item:set_yaw(math.pi/2)
2017-01-11 15:25:04 +00:00
inv:set_stack("main", 1, "")
2017-01-11 21:40:00 +00:00
if active_tracks[cname] ~= nil then
minetest.sound_stop(active_tracks[cname])
clicker:hud_remove(active_huds[cname])
active_tracks[cname] = nil
active_huds[cname] = nil
2017-01-11 15:25:04 +00:00
end
else
-- Jukebox is empty: Play track if player holds music record
2018-05-12 19:50:56 +00:00
local playing = play_record(pos, itemstack, clicker)
if playing then
local put_itemstack = ItemStack(itemstack)
put_itemstack:set_count(1)
inv:set_stack("main", 1, put_itemstack)
2017-01-11 21:40:00 +00:00
itemstack:take_item()
2017-01-11 15:25:04 +00:00
end
end
2018-05-12 19:50:56 +00:00
return itemstack
2017-01-11 15:25:04 +00:00
end,
2019-02-08 20:59:01 +00:00
allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
local name = player:get_player_name()
if minetest.is_protected(pos, name) then
minetest.record_protection_violation(pos, name)
return 0
else
return count
end
end,
allow_metadata_inventory_take = function(pos, listname, index, stack, player)
local name = player:get_player_name()
if minetest.is_protected(pos, name) then
minetest.record_protection_violation(pos, name)
return 0
else
return stack:get_count()
end
end,
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
local name = player:get_player_name()
if minetest.is_protected(pos, name) then
minetest.record_protection_violation(pos, name)
return 0
else
return stack:get_count()
end
end,
2017-01-11 15:25:04 +00:00
after_dig_node = function(pos, oldnode, oldmetadata, digger)
2017-01-11 21:52:34 +00:00
local name = digger:get_player_name()
2017-01-11 15:25:04 +00:00
local meta = minetest.get_meta(pos)
local meta2 = meta
meta:from_table(oldmetadata)
local inv = meta:get_inventory()
local stack = inv:get_stack("main", 1)
if not stack:is_empty() then
local p = {x=pos.x+math.random(0, 10)/10-0.5, y=pos.y, z=pos.z+math.random(0, 10)/10-0.5}
2017-11-18 21:12:36 +00:00
local dropped_item = minetest.add_item(p, stack)
-- Rotate record to match with “slot” texture
dropped_item:set_yaw(math.pi/2)
if active_tracks[name] ~= nil then
minetest.sound_stop(active_tracks[name])
digger:hud_remove(active_huds[name])
2017-01-11 22:22:09 +00:00
active_tracks[name] = nil
active_huds[name] = nil
end
2017-01-11 15:25:04 +00:00
end
meta:from_table(meta2:to_table())
end,
_mcl_blast_resistance = 30,
_mcl_hardness = 2,
2017-01-11 15:25:04 +00:00
})
2017-01-11 21:48:53 +00:00
minetest.register_craft({
type = "fuel",
recipe = "mcl_jukebox:jukebox",
burntime = 15,
})