stujones11 adaeb31bdd Fix
2019-05-26 21:16:44 +01:00

89 lines
2.2 KiB
Lua

local age = 0.5 --How old an item has to be before collecting
local radius_magnet = 2 --Radius of item magnet
local player_collect_height = 1.3 --Added to their pos y value
local function valid_pos(pos)
if pos then
for _, v in pairs({"x", "y", "z"}) do
if not pos[v] or pos[v] < -32000 or pos[v] > 32000 then
return
end
end
return true
end
end
local function collect_items(player)
local pos = player:get_pos()
if not valid_pos(pos) then
return
end
local col_pos = vector.add(pos, {x=0, y=player_collect_height, z=0})
local objects = minetest.get_objects_inside_radius(col_pos, radius_magnet)
for _,object in ipairs(objects) do
local entity = object:get_luaentity()
if entity and not object:is_player() and
entity.name == "__builtin:item" and entity.age > age then
if entity.collectioner == true and entity.age > entity.age_stamp then
local inv = player:get_inventory()
local item = ItemStack(entity.itemstring)
--collect
if item:get_name() ~= "" and inv and
inv:room_for_item("main", item) then
inv:add_item("main", item)
minetest.sound_play("item_drop_pickup", {
pos = pos,
max_hear_distance = 15,
gain = 0.1,
})
entity.itemstring = ""
object:remove()
end
else
--magnet, moveto for extreme speed boost
object:moveto(col_pos)
entity.collectioner = true
entity.age_stamp = entity.age
end
end
end
end
local function table_iter(t)
local i = 0
local n = table.getn(t)
return function ()
i = i + 1
if i <= n then
return t[i]
end
end
end
local player_iter = nil
--Item collection
minetest.register_globalstep(function()
if player_iter == nil then
local names = {}
for player in table_iter(minetest.get_connected_players()) do
local name = player:get_player_name()
if name then
table.insert(names, name)
end
end
player_iter = table_iter(names)
end
-- only deal with one player per server step
local name = player_iter()
if name then
local player = minetest.get_player_by_name(name)
if player and player:is_player() and player:get_hp() > 0 then
--radial detection
collect_items(player)
return
end
end
player_iter = nil
end)