Fix music player's sound management

Zefram

2014-08-14 1d0687556a52891aeadc0e8d9a58e44c53cb826b

 technic/machines/LV/water_mill.lua

@@ -9,38 +9,10 @@
minetest.register_craft({
   output = 'technic:water_mill',
   recipe = {
      {'default:stone', 'default:stone',        'default:stone'},
      {'group:wood',    'default:diamond',      'group:wood'},
      {'default:stone', 'default:copper_ingot', 'default:stone'},
      {'technic:marble', 'default:diamond',        'technic:marble'},
      {'group:wood',     'technic:machine_casing', 'group:wood'},
      {'technic:marble', 'technic:lv_cable0',      'technic:marble'},
   }
})

minetest.register_node("technic:water_mill", {
   description = S("Water Mill"),
   tiles = {"technic_water_mill_top.png",  "technic_machine_bottom.png",
            "technic_water_mill_side.png", "technic_water_mill_side.png",
            "technic_water_mill_side.png", "technic_water_mill_side.png"},
   paramtype2 = "facedir",
   groups = {snappy=2, choppy=2, oddly_breakable_by_hand=2},
   legacy_facedir_simple = true,
   sounds = default.node_sound_wood_defaults(),
   on_construct = function(pos)
      local meta = minetest.get_meta(pos)
      meta:set_string("infotext", S("Water Mill"))
      meta:set_int("LV_EU_supply", 0)
   end,	
})

minetest.register_node("technic:water_mill_active", {
   description = S("Water Mill"),
   tiles = {"technic_water_mill_top_active.png", "technic_machine_bottom.png",
            "technic_water_mill_side.png",       "technic_water_mill_side.png",
            "technic_water_mill_side.png",       "technic_water_mill_side.png"},
   paramtype2 = "facedir",
   groups = {snappy=2, choppy=2, oddly_breakable_by_hand=2, not_in_creative_inventory=1},
   legacy_facedir_simple = true,
   sounds = default.node_sound_wood_defaults(),
   drop = "technic:water_mill",
})

local function check_node_around_mill(pos)
@@ -52,52 +24,78 @@
   return false
end

minetest.register_abm({
   nodenames = {"technic:water_mill", "technic:water_mill_active"},
   interval = 1,
   chance   = 1,
   action = function(pos, node, active_object_count, active_object_count_wider)
      local meta             = minetest.get_meta(pos)
      local water_nodes      = 0
      local lava_nodes       = 0
      local production_level = 0
      local eu_supply        = 0
local run = function(pos, node)
   local meta             = minetest.get_meta(pos)
   local water_nodes      = 0
   local lava_nodes       = 0
   local production_level = 0
   local eu_supply        = 0

      local positions = {
         {x=pos.x+1, y=pos.y, z=pos.z},
         {x=pos.x-1, y=pos.y, z=pos.z},
         {x=pos.x,   y=pos.y, z=pos.z+1},
         {x=pos.x,   y=pos.y, z=pos.z-1},
      }
   local positions = {
      {x=pos.x+1, y=pos.y, z=pos.z},
      {x=pos.x-1, y=pos.y, z=pos.z},
      {x=pos.x,   y=pos.y, z=pos.z+1},
      {x=pos.x,   y=pos.y, z=pos.z-1},
   }

      for _, p in pairs(positions) do
         local check = check_node_around_mill(p)
         if check then
            water_nodes = water_nodes + 1
         end
      end

      production_level = 25 * water_nodes
      eu_supply = 30 * water_nodes

      if production_level > 0 then
         meta:set_int("LV_EU_supply", eu_supply)
      end

      meta:set_string("infotext",
         S("Water Mill").." ("..production_level.."%)")

      if production_level > 0 and
         minetest.get_node(pos).name == "technic:water_mill" then
         technic.swap_node (pos, "technic:water_mill_active")
         meta:set_int("LV_EU_supply", 0)
         return
      end
      if production_level == 0 then
         technic.swap_node(pos, "technic:water_mill")
   for _, p in pairs(positions) do
      local check = check_node_around_mill(p)
      if check then
         water_nodes = water_nodes + 1
      end
   end
}) 

   production_level = 25 * water_nodes
   eu_supply = 30 * water_nodes

   if production_level > 0 then
      meta:set_int("LV_EU_supply", eu_supply)
   end

   meta:set_string("infotext",
      S("Hydro %s Generator"):format("LV").." ("..production_level.."%)")

   if production_level > 0 and
      minetest.get_node(pos).name == "technic:water_mill" then
      technic.swap_node (pos, "technic:water_mill_active")
      meta:set_int("LV_EU_supply", 0)
      return
   end
   if production_level == 0 then
      technic.swap_node(pos, "technic:water_mill")
   end
end

minetest.register_node("technic:water_mill", {
   description = S("Hydro %s Generator"):format("LV"),
   tiles = {"technic_water_mill_top.png",  "technic_machine_bottom.png",
            "technic_water_mill_side.png", "technic_water_mill_side.png",
            "technic_water_mill_side.png", "technic_water_mill_side.png"},
   paramtype2 = "facedir",
   groups = {snappy=2, choppy=2, oddly_breakable_by_hand=2, technic_machine=1},
   legacy_facedir_simple = true,
   sounds = default.node_sound_wood_defaults(),
   on_construct = function(pos)
      local meta = minetest.get_meta(pos)
      meta:set_string("infotext", S("Hydro %s Generator"):format("LV"))
      meta:set_int("LV_EU_supply", 0)
   end,
   technic_run = run,
})

minetest.register_node("technic:water_mill_active", {
   description = S("Hydro %s Generator"):format("LV"),
   tiles = {"technic_water_mill_top_active.png", "technic_machine_bottom.png",
            "technic_water_mill_side.png",       "technic_water_mill_side.png",
            "technic_water_mill_side.png",       "technic_water_mill_side.png"},
   paramtype2 = "facedir",
   groups = {snappy=2, choppy=2, oddly_breakable_by_hand=2, technic_machine=1, not_in_creative_inventory=1},
   legacy_facedir_simple = true,
   sounds = default.node_sound_wood_defaults(),
   drop = "technic:water_mill",
   technic_run = run,
   technic_disabled_machine_name = "technic:water_mill",
})

technic.register_machine("LV", "technic:water_mill",        technic.producer)
technic.register_machine("LV", "technic:water_mill_active", technic.producer)