190 lines
6.5 KiB
Lua
190 lines
6.5 KiB
Lua
-- mob spawner
|
|
|
|
minetest.register_node("mobs:spawner",{
|
|
description = "Mob Spawner",
|
|
groups = { oddly_breakable_by_hand=3 },
|
|
tiles = { "mobs_spawner.png" },
|
|
sunlight_propagates = true,
|
|
drop = "default:dirt",
|
|
on_receive_fields = function(pos, formname, fields, sender)
|
|
local name = sender:get_player_name()
|
|
if minetest.check_player_privs(name,{ immortal=true }) then
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("entity",fields.entity)
|
|
meta:set_string("infotext",fields.entity)
|
|
if fields.active_objects ~= nil then
|
|
meta:set_int("active_objects",fields.active_objects)
|
|
end
|
|
if fields.active_objects_wider ~= nil then
|
|
meta:set_int("active_objects_wider",fields.active_objects_wider)
|
|
end
|
|
meta:set_string("formspec",getformspec(pos))
|
|
else
|
|
minetest.chat_send_player(name,"You do not have permission to change mob spawner settings")
|
|
end
|
|
end,
|
|
after_place_node = function(pos, placer, itemstack, pointed_thing)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("formspec",getformspec(pos))
|
|
end,
|
|
can_dig = function(pos,player)
|
|
return minetest.check_player_privs(player:get_player_name(),{ immortal=true })
|
|
end,
|
|
on_punch = function (pos, node, puncher, pointed_thing)
|
|
if minetest.check_player_privs(puncher:get_player_name(),{ immortal=true }) then
|
|
local meta = minetest.get_meta(pos)
|
|
local entity = meta:get_string("entity")
|
|
if entity ~= "" then
|
|
if minetest.registered_entities[entity] == nil then
|
|
if mobs.mob_list[entity] ~= nil then
|
|
entity = mobs:get_random(entity)
|
|
else
|
|
return
|
|
end
|
|
end
|
|
local spawnpos = pos
|
|
spawnpos.y = spawnpos.y + 4
|
|
minetest.log("info","Spawn block spawning "..tostring(entity).." at "..minetest.pos_to_string(spawnpos))
|
|
mobs:spawn_mob(spawnpos,entity)
|
|
else
|
|
minetest.log("action","No entity set in spawner block at "..minetest.pos_to_string(pos))
|
|
end
|
|
end
|
|
end,
|
|
})
|
|
|
|
minetest.register_abm({
|
|
nodenames = {"mobs:spawner"},
|
|
interval = 60,
|
|
chance = 5,
|
|
action = function(pos, node, active_object_count, active_object_count_wider)
|
|
if abm_limiter() then return end
|
|
local meta = minetest.get_meta(pos)
|
|
local entity = meta:get_string("entity")
|
|
local active_objects = meta:get_int("active_objects")
|
|
local active_objects_wider = meta:get_int("active_objects_wider")
|
|
if entity ~= "" then
|
|
if minetest.registered_entities[entity] == nil then
|
|
if mobs.mob_list[entity] ~= nil then
|
|
entity = mobs:get_random(entity)
|
|
else
|
|
return
|
|
end
|
|
end
|
|
if active_objects_wider > 0 then
|
|
if active_object_count_wider > active_objects_wider then
|
|
return
|
|
end
|
|
end
|
|
|
|
if active_objects > 0 then
|
|
if active_object_count > active_objects then
|
|
return
|
|
end
|
|
end
|
|
|
|
local spawnpos = { x=pos.x, y=pos.y, z=pos.z }
|
|
spawnpos.y = spawnpos.y + 6
|
|
minetest.log("info","Spawn block spawning "..tostring(entity).." at "..minetest.pos_to_string(spawnpos))
|
|
local r = mobs:spawn_mob(spawnpos,entity)
|
|
if r == -1 then
|
|
-- they are spawning in a block, remove this spawner
|
|
local fails = meta:get_int("spawning_fails")
|
|
fails = fails + 1
|
|
meta:set_int("spawning_fails",fails)
|
|
if fails > 5 then
|
|
minetest.log("action","Too many spawning fails, removing spawning block at "..minetest.pos_to_string(pos))
|
|
minetest.remove_node(pos)
|
|
end
|
|
end
|
|
else
|
|
minetest.log("action","No entity set in spawner block at "..minetest.pos_to_string(pos))
|
|
end
|
|
end,
|
|
})
|
|
|
|
function getformspec(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
|
|
local spawnerformspec = "size[6,6,false]"
|
|
spawnerformspec = spawnerformspec .. "field[.5,0.5;5,1;entity;Mob;"..meta:get_string("entity").."]"
|
|
spawnerformspec = spawnerformspec .. "field[.5,2;3,1;active_objects;Active Objects;"..meta:get_string("active_objects").."]"
|
|
spawnerformspec = spawnerformspec .. "field[.5,3.5;3,1;active_objects_wider;Active Objects Wider;"..meta:get_string("active_objects_wider").."]"
|
|
spawnerformspec = spawnerformspec .. "button_exit[.5,5;3,1;send;Save]"
|
|
return spawnerformspec
|
|
end
|
|
|
|
function mobs.spawn_npc_and_spawner(pos,barbarian_village)
|
|
|
|
if randomChance(30) then
|
|
return
|
|
end
|
|
|
|
math.randomseed(os.clock())
|
|
local numNPCs = math.random(0,1)
|
|
--print("Spawning "..tostring(numNPCs).." NPCs")
|
|
if numNPCs > 0 then
|
|
for i=0,numNPCs,1 do
|
|
local npos = {}
|
|
npos.x = pos.x + math.random(-8,8)
|
|
npos.y = pos.y + 2
|
|
npos.z = pos.z + math.random(-8,8)
|
|
|
|
local spawnerpos = {x=npos.x, y=npos.y, z=npos.z}
|
|
spawnerpos.y = spawnerpos.y - 5
|
|
|
|
if barbarian_village == true then
|
|
local barbarian = mobs:get_random('barbarian')
|
|
minetest.log("info","Spawning "..barbarian.." at "..minetest.pos_to_string(npos))
|
|
local mob = minetest.add_entity(npos, barbarian)
|
|
if mob then
|
|
local distance_rating = ( ( get_distance(game_origin,npos) ) / 15000 )
|
|
mob = mob:get_luaentity()
|
|
local newHP = mob.hp_min + math.floor( mob.hp_max * distance_rating )
|
|
mob.object:set_hp( newHP )
|
|
--local metatable = { fields = { entity = barbarian, active_objects = 6 } }
|
|
--table.insert(extranodes, {node={name="mobs:spawner",param1=0, param2=0}, pos=spawnerpos,mob="barbarian"})
|
|
minetest.set_node(spawnerpos,{name="mobs:spawner"})
|
|
local meta = minetest.get_meta(spawnerpos)
|
|
meta:set_string("entity","barbarian")
|
|
meta:set_string("infotext","barbarian")
|
|
meta:set_int("active_objects",6)
|
|
meta:set_int("active_objects_wider",8)
|
|
end
|
|
else
|
|
|
|
local npc = mobs:get_random('npc')
|
|
minetest.log("info","Spawning "..npc.." at "..minetest.pos_to_string(npos))
|
|
local mob = minetest.add_entity(npos, npc)
|
|
if mob then
|
|
mob = mob:get_luaentity()
|
|
local p = mob.object:getpos()
|
|
math.randomseed( ( p.x * p.y * p.z ) )
|
|
|
|
minetest.set_node(spawnerpos,{name="mobs:spawner"})
|
|
local meta = minetest.get_meta(spawnerpos)
|
|
meta:set_string("entity","npc")
|
|
meta:set_string("infotext","npc")
|
|
meta:set_int("active_objects",6)
|
|
meta:set_int("active_objects_wider",8)
|
|
--table.insert(extranodes, {node={name="mobs:spawner",param1=0, param2=0}, pos=spawnerpos, mob="npc"})
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
function mobs.add_spawner(pos,mob,ao,aow)
|
|
local r = mobs:spawn_mob(pos,mob)
|
|
if r ~= -1 then
|
|
local spos = {x=pos.x,y=pos.y-5,z=pos.z}
|
|
minetest.set_node(spos,{name="mobs:spawner"})
|
|
local meta = minetest.get_meta(spos)
|
|
meta:set_string("entity",mob)
|
|
meta:set_string("infotext",mob)
|
|
meta:set_int("active_objects",ao)
|
|
meta:set_int("active_objects_wider",aow)
|
|
end
|
|
end
|
|
|