mod-sneeker/spawn.lua
AntumDeluge 85e849767f Add method 'sneeker.get_pos_string':
Returns x, y, z coordinates in a string.
2017-05-29 02:49:02 -07:00

73 lines
1.9 KiB
Lua

-- Original code by Rui: WTFPL
local time_min = 60
local time_hr = time_min * 60
local time_day = time_hr * 24
local spawn_chance = minetest.setting_get('sneeker.spawn_chance') or 18000
local spawn_interval = minetest.setting_get('sneeker.spawn_interval') or time_min * 40 -- Default interval is 40 minutes
sneeker.log('Spawn chance: ' .. tostring(spawn_chance) .. ' (1/' .. tostring(spawn_chance) .. ')')
sneeker.log('Spawn interval: ' .. tostring(spawn_interval) .. ' (' .. tostring(spawn_interval/60) .. ' minute(s))')
minetest.register_abm({
nodenames = {'default:dirt_with_grass', 'default:stone'},
neighbors = {'air'},
interval = spawn_interval,
chance = spawn_chance,
action = function(pos, node, _, active_object_count_wider)
local spawnit = true
if active_object_count_wider > 5 then
spawnit = false
end
if spawnit then
-- Check light value of node
pos.y = pos.y+1
local node_light = minetest.get_node_light(pos)
-- Debugging spawning
sneeker.log_debug('Node light level at ' .. sneeker.get_pos_string(pos) .. ': ' .. tostring(node_light))
if not node_light or node_light > sneeker.spawn_maxlight or node_light < -1 then
spawnit = false
end
-- Spawn range
if pos.y > 31000 then
spawnit = false
end
-- Node must be touching air
if minetest.get_node(pos).name ~= 'air' then
spawnit = false
end
pos.y = pos.y+1
if minetest.get_node(pos).name ~= 'air' then
spawnit = false
end
if spawnit then
-- Get total count of sneekers in world
local name, count
for name in pairs(minetest.luaentities) do
if name == sneeker.mob_name then
count = count + 1
end
end
if count >= sneeker.spawn_cap then
spawnit = false -- Max sneekers already exist
end
end
end
if spawnit then
sneeker.spawn(pos)
else
sneeker.log_debug('Spawn denied')
end
end
})