mods/mob_spawners/init.lua

   1 dungeon_loot = {}
   2
   3 dungeon_loot.CHESTS_MIN = 10 -- not necessarily in a single dungeon
   4 dungeon_loot.CHESTS_MAX = 50
   5 dungeon_loot.STACKS_PER_CHEST_MAX = 10
   6
   7 mob_spawners = {}
   8
   9 function register_mob_spawner(mobname,texture,mesh)
  10     minetest.register_node(":mob_spawners:"..mobname,{
  11         description = mobname:gsub("^%l", string.upper).." Spawner",
  12         drawtype = "allfaces",
  13                 tiles = {"spawner.png"},
  14                 groups = {stone = 3, pathable = 1},
  15         sounds = main.stoneSound(),
  16         sunlight_propagates = true,
  17         paramtype = "light",
  18         drop = "",
  19         on_construct = function(pos)
  20             minetest.add_entity(pos, "mob_spawners:"..mobname)
  21         end,
  22         after_destruct = function(pos)
  23             for _,object in ipairs(minetest.get_objects_inside_radius(pos, 0.5)) do
  24                 if not object:is_player() then
  25                     if object:get_luaentity().name == "mob_spawners:"..mobname then
  26                         object:remove()
  27                         return
  28                     end
  29                 end
  30             end
  31         end
  32     })
  33
  34     table.insert(mob_spawners,"mob_spawners:"..mobname)
  35
  36     minetest.register_lbm({
  37         name = ":mob_spawners:"..mobname,
  38         nodenames = {"mob_spawners:"..mobname},
  39         action = function(pos)
  40             minetest.add_entity(pos, "mob_spawners:"..mobname)
  41         end,
  42     })
  43
  44     minetest.register_abm({
  45         label = "mob_spawners:"..mobname,
  46         nodenames = {"mob_spawners:"..mobname},
  47         neighbors = {"air"},
  48         interval = 5,
  49         chance = 1,
  50         action = function(pos)
  51             --readd the mob visual
  52             local found = false
  53             for _,object in ipairs(minetest.get_objects_inside_radius(pos, 0.5)) do
  54                 if not object:is_player() then
  55                     if object:get_luaentity().name == "mob_spawners:"..mobname then
  56                         found = true
  57                         break
  58                     end
  59                 end
  60             end
  61             if found == false then
  62                 minetest.add_entity(pos, "mob_spawners:"..mobname)
  63             end
  64
  65             local mobcount = 0
  66             for _,object in ipairs(minetest.get_objects_inside_radius(pos, 10)) do
  67                 if not object:is_player() and object:get_luaentity().mobname then
  68                     mobcount = mobcount + 1
  69                     if mobcount > 5 then
  70                         return
  71                     end
  72                 end
  73             end
  74
  75             for i = 1,math.random(2,4) do
  76                 local newpos = minetest.find_node_near(pos, 5, {"air"})
  77                 if newpos then
  78                     minetest.add_entity(newpos,"mob:"..mobname)
  79                 end
  80             end
  81             end,
  82     })
  83
  84     local spawner_entity = {}
  85     spawner_entity.initial_properties = {
  86         physical = false,
  87         collide_with_objects = false,
  88         collisionbox = {0,0,0,0,0,0},
  89         visual = "mesh",
  90         visual_size = {x=1,y=1,z=1},
  91         mesh = mesh,
  92         textures = texture,
  93         is_visible = true,
  94         pointable = false,
  95         makes_footstep_sound = false,
  96         static_save = false,
  97         automatic_rotate = 3
  98     }
  99     spawner_entity.on_activate = function()
 100         --do nothing
 101     end
 102     spawner_entity.on_step = function()
 103         --do nothing
 104     end
 105     minetest.register_entity(":mob_spawners:"..mobname, spawner_entity)
 106 end
 107
 108 dofile(minetest.get_modpath("mob_spawners") .. "/loot.lua")
 109 dofile(minetest.get_modpath("mob_spawners") .. "/mapgen.lua")