-- LV Music player.
|
-- The playe can play music. But it is high ampage!
|
minetest.register_alias("music_player", "technic:music_player")
|
minetest.register_craft({
|
output = 'technic:music_player',
|
recipe = {
|
{'default:wood', 'default:wood', 'default:wood'},
|
{'default:diamond', 'default:diamond', 'default:diamond'},
|
{'default:stone', 'default:copper_ingot', 'default:stone'},
|
}
|
})
|
|
minetest.register_craftitem("technic:music_player", {
|
description = "Music Player",
|
stack_max = 99,
|
})
|
|
local music_player_formspec =
|
"invsize[8,9;]"..
|
"label[0,0;Music Player]"..
|
"button[4,1;1,1;track1;1]"..
|
"button[5,1;1,1;track2;2]"..
|
"button[6,1;1,1;track3;3]"..
|
"button[4,2;1,1;track4;4]"..
|
"button[5,2;1,1;track5;5]"..
|
"button[6,2;1,1;track6;6]"..
|
"button[4,3;1,1;track7;7]"..
|
"button[5,3;1,1;track8;8]"..
|
"button[6,3;1,1;track9;9]"..
|
"button[4,4;1,2;play;Play]"..
|
"button[6,4;1,2;stop;Stop]"..
|
"label[4,0;Current track --]"
|
|
minetest.register_node(
|
"technic:music_player",
|
{
|
description = "Music Player",
|
tiles = {"technic_music_player_top.png", "technic_machine_bottom.png", "technic_music_player_side.png",
|
"technic_music_player_side.png", "technic_music_player_side.png", "technic_music_player_side.png"},
|
groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
|
sounds = default.node_sound_wood_defaults(),
|
on_construct = function(pos)
|
local meta = minetest.env:get_meta(pos)
|
meta:set_string("infotext", "Music Player")
|
meta:set_float("technic_power_machine", 1)
|
meta:set_int("active", 0) -- Is the device on?
|
meta:set_int("music_player_current_track", 1)
|
meta:set_string("formspec", music_player_formspec)
|
end,
|
on_receive_fields = function(pos, formanme, fields, sender)
|
local meta = minetest.env:get_meta(pos)
|
music_handle = meta:get_int("music_handle")
|
music_player_current_track = meta:get_int("music_player_current_track")
|
if fields.track1 then music_player_current_track = 1 end
|
if fields.track2 then music_player_current_track = 2 end
|
if fields.track3 then music_player_current_track = 3 end
|
if fields.track4 then music_player_current_track = 4 end
|
if fields.track5 then music_player_current_track = 5 end
|
if fields.track6 then music_player_current_track = 6 end
|
if fields.track7 then music_player_current_track = 7 end
|
if fields.track8 then music_player_current_track = 8 end
|
if fields.track9 then music_player_current_track = 9 end
|
meta:set_int("music_player_current_track",music_player_current_track)
|
if fields.play and meta:get_int("active") == 0 then
|
if music_handle then minetest.sound_stop(music_handle) end
|
music_handle = minetest.sound_play("technic_track"..music_player_current_track, {pos = pos, gain = 1.0,loop = true, max_hear_distance = 72,})
|
meta:set_int("active",1)
|
end
|
if fields.stop then
|
meta:set_int("active",0)
|
if music_handle then minetest.sound_stop(music_handle) end
|
end
|
meta:set_int("music_handle",music_handle)
|
end,
|
})
|
|
minetest.register_abm(
|
{ nodenames = {"technic:music_player"},
|
interval = 1,
|
chance = 1,
|
action = function(pos, node, active_object_count, active_object_count_wider)
|
local meta = minetest.env:get_meta(pos)
|
local eu_input = meta:get_int("LV_EU_input")
|
local state = meta:get_int("state")
|
local next_state = state
|
|
-- Machine information
|
local machine_name = "Music Player"
|
local machine_node = "technic:music_player"
|
local machine_state_demand = { 10, 150 }
|
|
local music_handle = meta:get_int("music_handle")
|
|
-- Setup meta data if it does not exist. state is used as an indicator of this
|
if state == 0 then
|
meta:set_int("state", 1)
|
meta:set_int("LV_EU_demand", machine_state_demand[1])
|
meta:set_int("LV_EU_input", 0)
|
return
|
end
|
|
-- Power off automatically if no longer connected to a switching station
|
technic.switching_station_timeout_count(pos, "LV")
|
|
-- State machine
|
if eu_input == 0 then
|
-- unpowered - go idle
|
-- hacky_swap_node(pos, machine_node) -- if someday two nodes for this
|
meta:set_string("infotext", machine_name.." Unpowered")
|
next_state = 1
|
elseif eu_input == machine_state_demand[state] then
|
-- Powered - do the state specific actions
|
if state == 1 then
|
-- hacky_swap_node(pos, machine_node) -- if someday two nodes for this
|
meta:set_string("infotext", machine_name.." Idle")
|
|
if meta:get_int("active") == 1 then
|
next_state = 2
|
end
|
|
elseif state == 2 then
|
-- hacky_swap_node(pos, machine_node.."_active") -- if someday two nodes for this
|
meta:set_string("infotext", machine_name.." Active")
|
|
music_player_current_track=meta:get_int("music_player_current_track")
|
meta:set_string("formspec",
|
"invsize[8,9;]"..
|
"label[0,0;Music Player]"..
|
"button[4,1;1,1;track1;1]"..
|
"button[5,1;1,1;track2;2]"..
|
"button[6,1;1,1;track3;3]"..
|
"button[4,2;1,1;track4;4]"..
|
"button[5,2;1,1;track5;5]"..
|
"button[6,2;1,1;track6;6]"..
|
"button[4,3;1,1;track7;7]"..
|
"button[5,3;1,1;track8;8]"..
|
"button[6,3;1,1;track9;9]"..
|
"button[4,4;1,2;play;Play]"..
|
"button[6,4;1,2;stop;Stop]"..
|
"label[4,0;Current track "..tostring(music_player_current_track).."]"
|
)
|
if meta:get_int("active") == 0 then
|
if music_handle then minetest.sound_stop(music_handle) end
|
next_state = 1
|
end
|
end
|
end
|
-- Change state?
|
if next_state ~= state then
|
meta:set_int("LV_EU_demand", machine_state_demand[next_state])
|
meta:set_int("state", next_state)
|
end
|
end
|
})
|
|
technic.register_LV_machine ("technic:music_player","RE")
|
