David Leal
2020-06-12 a8daa417c485ee20716ec050d4c676b5c91af773
technic/tools/sonic_screwdriver.lua
@@ -1,59 +1,98 @@
local sonic_screwdriver_max_charge=15000
technic.register_power_tool ("technic:sonic_screwdriver",sonic_screwdriver_max_charge)
local sonic_screwdriver_max_charge = 15000
local S = technic.getter
technic.register_power_tool("technic:sonic_screwdriver", sonic_screwdriver_max_charge)
-- screwdriver handler code reused from minetest/minetest_game screwdriver @a9ac480
local ROTATE_FACE = 1
local ROTATE_AXIS = 2
local function nextrange(x, max)
   x = x + 1
   if x > max then
      x = 0
   end
   return x
end
-- Handles rotation
local function screwdriver_handler(itemstack, user, pointed_thing, mode)
   if pointed_thing.type ~= "node" then
      return
   end
   local pos = pointed_thing.under
   if minetest.is_protected(pos, user:get_player_name()) then
      minetest.record_protection_violation(pos, user:get_player_name())
      return
   end
   local node = minetest.get_node(pos)
   local ndef = minetest.registered_nodes[node.name]
   if not ndef or not ndef.paramtype2 == "facedir" or
         (ndef.drawtype == "nodebox" and
         not ndef.node_box.type == "fixed") or
         node.param2 == nil then
      return
   end
   -- contrary to the default screwdriver, do not check for can_dig, to allow rotating machines with CLU's in them
   -- this is consistent with the previous sonic screwdriver
   local meta1 = minetest.deserialize(itemstack:get_metadata())
   if not meta1 or not meta1.charge or meta1.charge < 100 then
      return
   end
   minetest.sound_play("technic_sonic_screwdriver", {pos = pos, gain = 0.3, max_hear_distance = 10})
   -- Set param2
   local rotationPart = node.param2 % 32 -- get first 4 bits
   local preservePart = node.param2 - rotationPart
   local axisdir = math.floor(rotationPart / 4)
   local rotation = rotationPart - axisdir * 4
   if mode == ROTATE_FACE then
      rotationPart = axisdir * 4 + nextrange(rotation, 3)
   elseif mode == ROTATE_AXIS then
      rotationPart = nextrange(axisdir, 5) * 4
   end
   node.param2 = preservePart + rotationPart
   minetest.swap_node(pos, node)
   if not technic.creative_mode then
      meta1.charge = meta1.charge - 100
      itemstack:set_metadata(minetest.serialize(meta1))
      technic.set_RE_wear(itemstack, meta1.charge, sonic_screwdriver_max_charge)
   end
   return itemstack
end
minetest.register_tool("technic:sonic_screwdriver", {
         description = "Sonic Screwdriver",
         inventory_image = "technic_sonic_screwdriver.png",
         on_use = function(itemstack, user, pointed_thing)
               -- Must be pointing to facedir applicable node
               if pointed_thing.type~="node" then return end
               local pos=minetest.get_pointed_thing_position(pointed_thing,above)
               local node=minetest.env:get_node(pos)
               local node_name=node.name
                  if minetest.registered_nodes[node_name].paramtype2 == "facedir" or minetest.registered_nodes[node_name].paramtype2 == "wallmounted" then
               if node.param2==nil  then return end
               item=itemstack:to_table()
               local meta1=get_item_meta(item["metadata"])
               if meta1==nil then return end --tool not charghed
               if meta1["charge"]==nil then return end
               charge=meta1["charge"]
               if charge-100>0 then
                  minetest.sound_play("technic_sonic_screwdriver", {pos = pos, gain = 0.3, max_hear_distance = 10,})
                  local n = node.param2
                  if minetest.registered_nodes[node_name].paramtype2 == "facedir" then
                     n = n+1
                  if n == 4 then n = 0 end
                  else
                     n = n+1
                     if n == 6 then n = 0 end
                  end
                  -- hacky_swap_node, unforunatly.
                  local meta = minetest.env:get_meta(pos)
                  local meta0 = meta:to_table()
                  node.param2 = n
                  minetest.env:set_node(pos,node)
                  meta = minetest.env:get_meta(pos)
                  meta:from_table(meta0)
   description = S("Sonic Screwdriver (left-click rotates face, right-click rotates axis)"),
   inventory_image = "technic_sonic_screwdriver.png",
   wear_represents = "technic_RE_charge",
   on_refill = technic.refill_RE_charge,
   on_use = function(itemstack, user, pointed_thing)
      screwdriver_handler(itemstack, user, pointed_thing, ROTATE_FACE)
      return itemstack
   end,
   on_place = function(itemstack, user, pointed_thing)
      screwdriver_handler(itemstack, user, pointed_thing, ROTATE_AXIS)
      return itemstack
   end,
})
                  charge=charge-100;
                  meta1["charge"]=charge
                  item["metadata"]=set_item_meta(meta1)
                  technic.set_RE_wear(item,charge,sonic_screwdriver_max_charge)
                  itemstack:replace(item)
                  end
                  return itemstack
                  else
                  return itemstack
                  end
                  end,
   })
minetest.register_craft({
   output = "technic:sonic_screwdriver",
   recipe = {
      {"default:diamond"},
      {"technic:battery"},
      {"technic:stainless_steel_ingot"}
      }
      {"",                         "default:diamond",        ""},
      {"mesecons_materials:fiber", "technic:battery",        "mesecons_materials:fiber"},
      {"mesecons_materials:fiber", "moreores:mithril_ingot", "mesecons_materials:fiber"}
   }
})