ShadowNinja
2013-04-26 00328622d9cc38a7768a7bf449f5c52ddba666f7
item_drop/init.lua
@@ -1,66 +1,72 @@
dofile(minetest.get_modpath("item_drop").."/item_entity.lua")
time_pick = 3
minetest.register_globalstep(function(dtime)
   for _,player in ipairs(minetest.get_connected_players()) do
      local pos = player:getpos()
      pos.y = pos.y+0.5
      local inv = player:get_inventory()
      for _,object in ipairs(minetest.env:get_objects_inside_radius(pos, 2)) do
         if not object:is_player() and object:get_luaentity() then
            local obj=object:get_luaentity()
            if obj.name == "__builtin:item" then
               if inv:room_for_item("main", ItemStack(obj.itemstring)) then
                  if obj.timer > time_pick then
                     inv:add_item("main", ItemStack(obj.itemstring))
                     if obj.itemstring ~= "" then
                        minetest.sound_play("item_drop_pickup",{pos = pos, gain = 1.0, max_hear_distance = 10})
                     end
                     if object:get_luaentity() then
                        object:get_luaentity().itemstring = ""
                        object:remove()
if technic.config:getBool("enable_item_pickup") then
   minetest.register_globalstep(function(dtime)
      for _,player in ipairs(minetest.get_connected_players()) do
         local pos = player:getpos()
         pos.y = pos.y+0.5
         local inv = player:get_inventory()
         for _,object in ipairs(minetest.env:get_objects_inside_radius(pos, 2)) do
            if not object:is_player() and object:get_luaentity() then
               local obj=object:get_luaentity()
               if obj.name == "__builtin:item" then
                  if inv:room_for_item("main", ItemStack(obj.itemstring)) then
                     if obj.timer > time_pick then
                        inv:add_item("main", ItemStack(obj.itemstring))
                        if obj.itemstring ~= "" then
                           minetest.sound_play("item_drop_pickup",{pos = pos, gain = 1.0, max_hear_distance = 10})
                        end
                        if object:get_luaentity() then
                           object:get_luaentity().itemstring = ""
                           object:remove()
                        end
                     end
                  end
               end
            end
         end
      end
   end
end)
   end)
end
function minetest.handle_node_drops(pos, drops, digger)
   for _,item in ipairs(drops) do
      local count, name
      if type(item) == "string" then
         count = 1
         name = item
      else
         count = item:get_count()
         name = item:get_name()
      end
      for i=1,count do
         local obj = minetest.env:add_item(pos, name)
         if obj ~= nil then
            obj:get_luaentity().collect = true
            local x = math.random(1, 5)
            if math.random(1,2) == 1 then
               x = -x
            end
            local z = math.random(1, 5)
            if math.random(1,2) == 1 then
               z = -z
            end
            obj:setvelocity({x=1/x, y=obj:getvelocity().y, z=1/z})
            obj:get_luaentity().timer = time_pick
            -- FIXME this doesnt work for deactiveted objects
            if minetest.setting_get("remove_items") and tonumber(minetest.setting_get("remove_items")) then
               minetest.after(tonumber(minetest.setting_get("remove_items")), function(obj)
                  obj:remove()
               end, obj)
if technic.config:getBool("enable_item_drop") then
   function minetest.handle_node_drops(pos, drops, digger)
      for _,item in ipairs(drops) do
         local count, name
         if type(item) == "string" then
            count = 1
            name = item
         else
            count = item:get_count()
            name = item:get_name()
         end
         for i=1,count do
            local obj = minetest.env:add_item(pos, name)
            if obj ~= nil then
               obj:get_luaentity().collect = true
               local x = math.random(1, 5)
               if math.random(1,2) == 1 then
                  x = -x
               end
               local z = math.random(1, 5)
               if math.random(1,2) == 1 then
                  z = -z
               end
               obj:setvelocity({x=1/x, y=obj:getvelocity().y, z=1/z})
               obj:get_luaentity().timer = time_pick
               -- FIXME this doesnt work for deactiveted objects
               if minetest.setting_get("remove_items") and tonumber(minetest.setting_get("remove_items")) then
                  minetest.after(tonumber(minetest.setting_get("remove_items")), function(obj)
                     obj:remove()
                  end, obj)
               end
            end
         end
      end
   end
end
--[[
minetest.register_on_dieplayer(function(name, pos)
   local inv = name:get_inventory()