| commit | author | age | ||
| ee5c6c | 1 | -- LV Music player. |
| K | 2 | -- The playe can play music. But it is high ampage! |
| 82cba9 | 3 | minetest.register_alias("music_player", "technic:music_player") |
| R | 4 | minetest.register_craft({ |
| 5 | output = 'technic:music_player', | |
| 6 | recipe = { | |
| 3a3700 | 7 | {'default:wood', 'default:wood', 'default:wood'}, |
| R | 8 | {'default:diamond', 'default:diamond', 'default:diamond'}, |
| 9 | {'default:stone', 'default:copper_ingot', 'default:stone'}, | |
| 82cba9 | 10 | } |
| R | 11 | }) |
| 12 | ||
| 13 | minetest.register_craftitem("technic:music_player", { | |
| 14 | description = "Music Player", | |
| 15 | stack_max = 99, | |
| 16 | }) | |
| 17 | ||
| ee5c6c | 18 | local music_player_formspec = |
| K | 19 | "invsize[8,9;]".. |
| 20 | "label[0,0;Music Player]".. | |
| 21 | "button[4,1;1,1;track1;1]".. | |
| 22 | "button[5,1;1,1;track2;2]".. | |
| 23 | "button[6,1;1,1;track3;3]".. | |
| 24 | "button[4,2;1,1;track4;4]".. | |
| 25 | "button[5,2;1,1;track5;5]".. | |
| 26 | "button[6,2;1,1;track6;6]".. | |
| 27 | "button[4,3;1,1;track7;7]".. | |
| 28 | "button[5,3;1,1;track8;8]".. | |
| 29 | "button[6,3;1,1;track9;9]".. | |
| 30 | "button[4,4;1,2;play;Play]".. | |
| 31 | "button[6,4;1,2;stop;Stop]".. | |
| 32 | "label[4,0;Current track --]" | |
| 82cba9 | 33 | |
| ee5c6c | 34 | minetest.register_node( |
| K | 35 | "technic:music_player", |
| 36 | { | |
| 37 | description = "Music Player", | |
| 38 | tiles = {"technic_music_player_top.png", "technic_machine_bottom.png", "technic_music_player_side.png", | |
| 39 | "technic_music_player_side.png", "technic_music_player_side.png", "technic_music_player_side.png"}, | |
| 40 | groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2}, | |
| 41 | sounds = default.node_sound_wood_defaults(), | |
| 42 | on_construct = function(pos) | |
| 43 | local meta = minetest.env:get_meta(pos) | |
| 44 | meta:set_string("infotext", "Music Player") | |
| 45 | meta:set_float("technic_power_machine", 1) | |
| 46 | meta:set_int("active", 0) -- Is the device on? | |
| 47 | meta:set_int("music_player_current_track", 1) | |
| 48 | meta:set_string("formspec", music_player_formspec) | |
| 49 | end, | |
| 50 | on_receive_fields = function(pos, formanme, fields, sender) | |
| 51 | local meta = minetest.env:get_meta(pos) | |
| 52 | music_handle = meta:get_int("music_handle") | |
| 53 | music_player_current_track = meta:get_int("music_player_current_track") | |
| 54 | if fields.track1 then music_player_current_track = 1 end | |
| 55 | if fields.track2 then music_player_current_track = 2 end | |
| 56 | if fields.track3 then music_player_current_track = 3 end | |
| 57 | if fields.track4 then music_player_current_track = 4 end | |
| 58 | if fields.track5 then music_player_current_track = 5 end | |
| 59 | if fields.track6 then music_player_current_track = 6 end | |
| 60 | if fields.track7 then music_player_current_track = 7 end | |
| 61 | if fields.track8 then music_player_current_track = 8 end | |
| 62 | if fields.track9 then music_player_current_track = 9 end | |
| 63 | meta:set_int("music_player_current_track",music_player_current_track) | |
| 64 | if fields.play and meta:get_int("active") == 0 then | |
| 65 | if music_handle then minetest.sound_stop(music_handle) end | |
| 66 | music_handle = minetest.sound_play("technic_track"..music_player_current_track, {pos = pos, gain = 1.0,loop = true, max_hear_distance = 72,}) | |
| 67 | meta:set_int("active",1) | |
| 68 | end | |
| 69 | if fields.stop then | |
| 70 | meta:set_int("active",0) | |
| 71 | if music_handle then minetest.sound_stop(music_handle) end | |
| 72 | end | |
| 73 | meta:set_int("music_handle",music_handle) | |
| 74 | end, | |
| 75 | }) | |
| 76 | ||
| 77 | minetest.register_abm( | |
| 78 | { nodenames = {"technic:music_player"}, | |
| 79 | interval = 1, | |
| 80 | chance = 1, | |
| 81 | action = function(pos, node, active_object_count, active_object_count_wider) | |
| 82 | local meta = minetest.env:get_meta(pos) | |
| 83 | local eu_input = meta:get_int("LV_EU_input") | |
| 84 | local state = meta:get_int("state") | |
| 85 | local next_state = state | |
| 86 | ||
| 87 | -- Machine information | |
| 88 | local machine_name = "Music Player" | |
| 89 | local machine_node = "technic:music_player" | |
| 90 | local machine_state_demand = { 10, 150 } | |
| 91 | ||
| 92 | local music_handle = meta:get_int("music_handle") | |
| 93 | ||
| 94 | -- Setup meta data if it does not exist. state is used as an indicator of this | |
| 95 | if state == 0 then | |
| 96 | meta:set_int("state", 1) | |
| 97 | meta:set_int("LV_EU_demand", machine_state_demand[1]) | |
| 98 | meta:set_int("LV_EU_input", 0) | |
| 99 | return | |
| 100 | end | |
| 101 | ||
| 102 | -- Power off automatically if no longer connected to a switching station | |
| 103 | technic.switching_station_timeout_count(pos, "LV") | |
| 104 | ||
| 105 | -- State machine | |
| 106 | if eu_input == 0 then | |
| 107 | -- unpowered - go idle | |
| 108 | -- hacky_swap_node(pos, machine_node) -- if someday two nodes for this | |
| 109 | meta:set_string("infotext", machine_name.." Unpowered") | |
| 110 | next_state = 1 | |
| 111 | elseif eu_input == machine_state_demand[state] then | |
| 112 | -- Powered - do the state specific actions | |
| 113 | if state == 1 then | |
| 114 | -- hacky_swap_node(pos, machine_node) -- if someday two nodes for this | |
| 115 | meta:set_string("infotext", machine_name.." Idle") | |
| 116 | ||
| 117 | if meta:get_int("active") == 1 then | |
| 118 | next_state = 2 | |
| 119 | end | |
| 120 | ||
| 121 | elseif state == 2 then | |
| 122 | -- hacky_swap_node(pos, machine_node.."_active") -- if someday two nodes for this | |
| 123 | meta:set_string("infotext", machine_name.." Active") | |
| 124 | ||
| 125 | music_player_current_track=meta:get_int("music_player_current_track") | |
| 126 | meta:set_string("formspec", | |
| 127 | "invsize[8,9;]".. | |
| 128 | "label[0,0;Music Player]".. | |
| 129 | "button[4,1;1,1;track1;1]".. | |
| 130 | "button[5,1;1,1;track2;2]".. | |
| 131 | "button[6,1;1,1;track3;3]".. | |
| 132 | "button[4,2;1,1;track4;4]".. | |
| 133 | "button[5,2;1,1;track5;5]".. | |
| 134 | "button[6,2;1,1;track6;6]".. | |
| 135 | "button[4,3;1,1;track7;7]".. | |
| 136 | "button[5,3;1,1;track8;8]".. | |
| 137 | "button[6,3;1,1;track9;9]".. | |
| 138 | "button[4,4;1,2;play;Play]".. | |
| 139 | "button[6,4;1,2;stop;Stop]".. | |
| 140 | "label[4,0;Current track "..tostring(music_player_current_track).."]" | |
| 141 | ) | |
| 142 | if meta:get_int("active") == 0 then | |
| 143 | if music_handle then minetest.sound_stop(music_handle) end | |
| 144 | next_state = 1 | |
| 145 | end | |
| 146 | end | |
| 147 | end | |
| 148 | -- Change state? | |
| 149 | if next_state ~= state then | |
| 150 | meta:set_int("LV_EU_demand", machine_state_demand[next_state]) | |
| 151 | meta:set_int("state", next_state) | |
| 152 | end | |
| 153 | end | |
| 154 | }) | |
| 155 | ||
| 156 | technic.register_LV_machine ("technic:music_player","RE") | |
