Handheld prospecting tool

Zefram

2014-07-03 636b0f20df4fef3eef821c23ccc2f606828f5c6f

 technic/tools/sonic_screwdriver.lua

@@ -1,53 +1,66 @@
local sonic_screwdriver_max_charge = 15000

local S = technic.getter

technic.register_power_tool("technic:sonic_screwdriver", sonic_screwdriver_max_charge)

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"),
   inventory_image = "technic_sonic_screwdriver.png",
   wear_represents = "technic_RE_charge",
   on_refill = technic.refill_RE_charge,
   on_use = function(itemstack, user, pointed_thing)
      -- Must be pointing to facedir applicable node
      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 node_name = node.name
      if minetest.registered_nodes[node_name].paramtype2 ~= "facedir" and
         minetest.registered_nodes[node_name].paramtype2 ~= "wallmounted" then
         return
      end
      if node.param2 == nil then
         return
      end
      local meta1 = minetest.deserialize(itemstack:get_metadata())
      if not meta1 or not meta1.charge then
         return
      end
      if meta1.charge >= 100 then
         minetest.sound_play("technic_sonic_screwdriver",
               {pos = pos, gain = 0.3, max_hear_distance = 10})
         local p = node.param2
         if minetest.registered_nodes[node_name].paramtype2 == "facedir" then
            p = p + 1
            if p == 4 then
               p = 0
            end
         else
            p = p + 1
            if p == 6 then
               p = 0
            end
         end
         if minetest.is_protected(pos, user:get_player_name()) then
            minetest.record_protection_violation(pos, user:get_player_name())
         else
            node.param2 = p
            minetest.swap_node(pos, node)

                  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,
		 
   })
            meta1.charge = meta1.charge - 100
            itemstack:set_metadata(minetest.serialize(meta1))
            technic.set_RE_wear(itemstack, meta1.charge, sonic_screwdriver_max_charge)
         end
      end
      return itemstack
   end, 
})
 
minetest.register_craft({
   output = "technic:sonic_screwdriver",
@@ -55,5 +68,6 @@
      {"default:diamond"},
      {"technic:battery"},
      {"technic:stainless_steel_ingot"}
      }
   }
})