Refill behaviour for power tools and cans

Zefram

2014-04-30 00d7c9bdead4d77f0ca88036eda44b8cce6cca34

 technic/tools/cans.lua

@@ -1,6 +1,8 @@
local water_can_max_load = 16
local lava_can_max_load = 8

local S = technic.getter

minetest.register_craft({
   output = 'technic:water_can 1',
   recipe = {
@@ -19,102 +21,125 @@
   }
})

local function set_can_wear(itemstack, level, max_level)
   local temp
   if level == 0 then
      temp = 0
   else
      temp = 65536 - math.floor(level / max_level * 65535)
      if temp > 65535 then temp = 65535 end
      if temp < 1 then temp = 1 end
   end
   itemstack:set_wear(temp)
end

minetest.register_tool("technic:water_can", {
   description = "Water Can",
   description = S("Water Can"),
   inventory_image = "technic_water_can.png",
   stack_max = 1,
   wear_represents = "content_level",
   liquids_pointable = true,
   on_use = function(itemstack, user, pointed_thing)
		
      if pointed_thing.type ~= "node" then
               return end
      n = minetest.env:get_node(pointed_thing.under)
		
      item=itemstack:to_table()
      local load=nil
      if item["metadata"]=="" then load=0 
      else load=tonumber(item["metadata"]) 
         return
      end
		
      if n.name == "default:water_source" then
         if load+1<17 then
         minetest.env:add_node(pointed_thing.under, {name="air"})
          load=load+1;	
         item["metadata"]=tostring(load)
         technic.set_RE_wear(item,load,water_can_max_load)
         itemstack:replace(item)
         end
         return itemstack
      end
      item=itemstack:to_table()
      if load==0 then return end
			
      if n.name == "default:water_flowing" then
         minetest.env:add_node(pointed_thing.under, {name="default:water_source"})
         load=load-1;	
         item["metadata"]=tostring(load)
         technic.set_RE_wear(item,load,water_can_max_load)
         itemstack:replace(item)
         return itemstack
         end
      node = minetest.get_node(pointed_thing.under)

      n = minetest.env:get_node(pointed_thing.above)
      if n.name == "air" then
         minetest.env:add_node(pointed_thing.above, {name="default:water_source"})
         load=load-1;	
         item["metadata"]=tostring(load)
         technic.set_RE_wear(item,load,water_can_max_load)
         itemstack:replace(item)
      local charge = nil
      if itemstack:get_metadata() == "" then
         charge = 0
      else
         charge = tonumber(itemstack:get_metadata())
      end
      if node.name == "default:water_source" then
         if charge < water_can_max_load then
            minetest.remove_node(pointed_thing.under)
            charge = charge + 1
            itemstack:set_metadata(tostring(charge))
            set_can_wear(itemstack, charge, water_can_max_load)
         end
         return itemstack
         end		
      end
      if charge == 0 then
         return
      end

      if node.name == "default:water_flowing" then
         minetest.set_node(pointed_thing.under, {name="default:water_source"})
         charge = charge - 1
         itemstack:set_metadata(tostring(charge))
         set_can_wear(itemstack, charge, water_can_max_load)
         return itemstack
      end

      node = minetest.get_node(pointed_thing.above)
      if node.name == "air" then
         minetest.set_node(pointed_thing.above, {name="default:water_source"})
         charge = charge - 1;
         itemstack:set_metadata(tostring(charge))
         set_can_wear(itemstack, charge, water_can_max_load)
         return itemstack
      end		
   end,
   on_refill = function(stack)
      stack:set_metadata(tostring(water_can_max_load))
      set_can_wear(stack, water_can_max_load, water_can_max_load)
      return stack
   end,
})

minetest.register_tool("technic:lava_can", {
   description = "Lava Can",
   description = S("Lava Can"),
   inventory_image = "technic_lava_can.png",
   stack_max = 1,
   wear_represents = "content_level",
   liquids_pointable = true,
   on_use = function(itemstack, user, pointed_thing)
      if pointed_thing.type ~= "node" then return end
      n = minetest.env:get_node(pointed_thing.under)
      item=itemstack:to_table()
      local load=nil
      if item["metadata"]=="" then load=0 
      else load=tonumber(item["metadata"]) 
      if pointed_thing.type ~= "node" then
         return
      end
		
      if n.name == "default:lava_source" then
         if load+1<17 then
         minetest.env:add_node(pointed_thing.under, {name="air"})
          load=load+1;
         item["metadata"]=tostring(load)
         technic.set_RE_wear(item,load,lava_can_max_load)
         itemstack:replace(item)
         end
         return itemstack
      node = minetest.get_node(pointed_thing.under)
      local charge = 0
      if itemstack:get_metadata() == "" then
         charge = 0
      else
         charge = tonumber(itemstack:get_metadata())
      end
      item=itemstack:to_table()
      if load==0 then return end
			
      if n.name == "default:lava_flowing" then
         minetest.env:add_node(pointed_thing.under, {name="default:lava_source"})
         load=load-1;	
         item["metadata"]=tostring(load)
         technic.set_RE_wear(item,load,lava_can_max_load)
         itemstack:replace(item)
         return itemstack
         end

      n = minetest.env:get_node(pointed_thing.above)
      if n.name == "air" then
         minetest.env:add_node(pointed_thing.above, {name="default:lava_source"})
         load=load-1;	
         item["metadata"]=tostring(load)
         technic.set_RE_wear(item,load,lava_can_max_load)
         itemstack:replace(item)
      if node.name == "default:lava_source" then
         if charge < lava_can_max_load then
            minetest.remove_node(pointed_thing.under)
            charge = charge + 1
            itemstack:set_metadata(tostring(charge))
            set_can_wear(itemstack, charge, lava_can_max_load)
         end
         return itemstack
         end	
      end
      if charge == 0 then
         return
      end

      if node.name == "default:lava_flowing" then
         minetest.set_node(pointed_thing.under, {name="default:lava_source"})
         charge = charge - 1	
         itemstack:set_metadata(tostring(charge))
         set_can_wear(itemstack, charge, lava_can_max_load)
         return itemstack
      end

      node = minetest.get_node(pointed_thing.above)
      if node.name == "air" then
         minetest.set_node(pointed_thing.above, {name="default:lava_source"})
         charge = charge - 1
         itemstack:set_metadata(tostring(charge))
         set_can_wear(itemstack, charge, lava_can_max_load)
         return itemstack
      end
   end,
   on_refill = function(stack)
      stack:set_metadata(tostring(lava_can_max_load))
      set_can_wear(stack, lava_can_max_load, lava_can_max_load)
      return stack
   end,
})