84 lines
2.1 KiB
Lua
84 lines
2.1 KiB
Lua
local steptime = 0
|
|
|
|
-- Ensure pregen data is stored and saved properly
|
|
|
|
local function len_pgen()
|
|
return #rspawn.playerspawns["pre gen"]
|
|
end
|
|
|
|
local function set_pgen(idx, v)
|
|
rspawn.playerspawns["pre gen"][idx] = v
|
|
rspawn:spawnsave()
|
|
end
|
|
|
|
local function get_pgen(idx)
|
|
return rspawn.playerspawns["pre gen"][idx]
|
|
end
|
|
|
|
-- Spawn generation
|
|
|
|
local function push_new_spawn()
|
|
if len_pgen() >= rspawn.max_pregen_spawns then
|
|
rspawn:debug("Max pregenerated spawns ("..rspawn.max_pregen_spawns..") reached : "..len_pgen())
|
|
return
|
|
end
|
|
|
|
local random_pos = rspawn:genpos()
|
|
local pos1,pos2 = rspawn:get_positions_for(random_pos, rspawn.search_radius)
|
|
|
|
if rspawn:forceload_blocks_in(pos1, pos2) then
|
|
minetest.after(rspawn.gen_frequency*0.8, function()
|
|
-- Let the forceload do its thing, then act
|
|
|
|
local newpos = rspawn:newspawn(random_pos, rspawn.search_radius)
|
|
if newpos then
|
|
rspawn:debug("Generated "..minetest.pos_to_string(newpos))
|
|
set_pgen(len_pgen()+1, newpos )
|
|
else
|
|
rspawn:debug("Failed to generate new spawn point to push")
|
|
minetest.chat_send_player(rspawn.admin, "Failed to generate new spawn")
|
|
end
|
|
|
|
rspawn:forceload_free_blocks_in(pos1, pos2)
|
|
end)
|
|
else
|
|
rspawn:debug("Failed to push new spawn point - preexisting operation took precedence.")
|
|
end
|
|
end
|
|
|
|
minetest.register_globalstep(function(dtime)
|
|
steptime = steptime + dtime
|
|
if steptime > rspawn.gen_frequency then
|
|
steptime = 0
|
|
else
|
|
return
|
|
end
|
|
|
|
push_new_spawn()
|
|
end)
|
|
|
|
-- Access pregenrated spawns
|
|
|
|
function rspawn:get_next_spawn()
|
|
local nspawn
|
|
|
|
if len_pgen() > 0 then
|
|
nspawn = get_pgen(len_pgen() )
|
|
set_pgen(len_pgen(), nil)
|
|
|
|
-- Someone might have claimed the area since.
|
|
if minetest.is_protected(nspawn, "") then
|
|
return rspawn:get_next_spawn()
|
|
else
|
|
rspawn:debug("Returning pregenerated spawn",nspawn)
|
|
end
|
|
end
|
|
|
|
return nspawn
|
|
end
|
|
|
|
-- On load...
|
|
|
|
push_new_spawn()
|
|
|