nalc/server-nalc
1
0
Fork 0
mirror of https://github.com/sys4-fr/server-nalc.git synced 2024-11-16 15:30:30 +01:00
Code Issues Releases Wiki Activity

Rolled back mobs mod

Browse Source
This commit is contained in:
LeMagnesium 2015-04-20 23:07:51 +02:00
parent e253799535
commit f3da5b0a97
2 changed files with 153 additions and 130 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

205
mods/mobs/api.lua
View File

@ -1,4 +1,4 @@
-- Mobs Api (20th April 2015)
-- Mobs Api (11th April 2015)
mobs = {}
mobs.mod = "redo"
@ -19,6 +19,7 @@ function mobs:register_mob(name, def)
on_die = def.on_die,
jump_height = def.jump_height or 6,
jump_chance = def.jump_chance or 0,
footstep = def.footstep,
rotate = def.rotate or 0, -- 0=front, 1.5=side, 3.0=back, 4.5=side2
lifetimer = def.lifetimer or 600,
hp_min = def.hp_min or 5,
@ -80,6 +81,7 @@ lifetimer = def.lifetimer or 600,
if self.state ~= "attack" then
if math.random(0,100) < 90 and self.sounds.war_cry then
minetest.sound_play(self.sounds.war_cry,{object = self.object})
print ("attack sound")
end
self.state = "attack"
self.attack.player = player
@ -180,36 +182,26 @@ lifetimer = def.lifetimer or 600,
end
-- check for mob drop/replace (used for chicken egg and sheep eating grass/wheat)
if self.replace_rate
and math.random(1,self.replace_rate) == 1
and self.child == false then
local pos = self.object:getpos()
pos.y = pos.y + self.replace_offset
if self.replace_rate and math.random(1,self.replace_rate) == 1 and self.child == false then
local pos = self.object:getpos() ; pos.y = pos.y + self.replace_offset
if self.footstep and self.object:getvelocity().y == 0 and minetest.get_node(pos).name == "air" then minetest.set_node(pos, {name = self.footstep}) end
if #minetest.find_nodes_in_area(pos,pos,self.replace_what) > 0
and self.object:getvelocity().y == 0
and self.replace_what then
--and self.state == "stand" then
and self.replace_what
and self.state == "stand" then
minetest.set_node(pos, {name = self.replace_with})
end
end
-- jump direction (adapted from Carbone mobs), gravity, falling or floating in water
if self.object:getvelocity().y > 0.1 then
local yaw = self.object:getyaw() + self.rotate
local x = math.sin(yaw) * -2
local z = math.cos(yaw) * 2
-- gravity, falling or floating in water
if self.floats == 1 then
if minetest.get_item_group(minetest.get_node(self.object:getpos()).name, "water") ~= 0 then
if self.floats == 1 then self.object:setacceleration({x = x, y = 1.5, z = z}) end
else
self.object:setacceleration({x = x, y = self.fall_speed, z = z})
end
else
if minetest.get_item_group(minetest.get_node(self.object:getpos()).name, "water") ~= 0 then
if self.floats == 1 then self.object:setacceleration({x = 0, y = 1.5, z = 0}) end
self.object:setacceleration({x = 0, y = 1.5, z = 0})
else
self.object:setacceleration({x = 0, y = self.fall_speed, z = 0})
end
else
self.object:setacceleration({x = 0, y = self.fall_speed, z = 0})
end
-- fall damage
@ -548,21 +540,7 @@ lifetimer = def.lifetimer or 600,
elseif self.state == "walk" then
local lp = nil
local s = self.object:getpos()
-- if there is water nearby, try to avoid it
local lp = minetest.find_node_near(s, 2, {"group:water"})
if lp ~= nil then
local vec = {x=lp.x-s.x, y=lp.y-s.y, z=lp.z-s.z}
yaw = math.atan(vec.z/vec.x) + 3*math.pi / 2 + self.rotate
if lp.x > s.x then
yaw = yaw+math.pi
end
self.object:setyaw(yaw)
-- no water near, so randomly turn
elseif math.random(1, 100) <= 30 then
if math.random(1, 100) <= 30 then
self.object:setyaw(self.object:getyaw()+((math.random(0,360)-180)/180*math.pi))
end
if self.jump and self.get_velocity(self) <= 0.5 and self.object:getvelocity().y == 0 then
@ -577,9 +555,8 @@ lifetimer = def.lifetimer or 600,
self.state = "stand"
self:set_animation("stand")
end
-- Modif MFF "attack type kamicaze" des creepers /DEBUT
elseif self.state == "attack" and self.attack_type == "explode" then
elseif self.state == "attack" and self.attack_type == "kamicaze" then
if not self.attack.player or not self.attack.player:is_player() then
self.state = "stand"
self:set_animation("stand")
@ -605,7 +582,10 @@ lifetimer = def.lifetimer or 600,
end
local vec = {x = p.x -s.x, y = p.y -s.y, z = p.z -s.z}
local yaw = math.atan(vec.z/vec.x)+math.pi/2 + self.rotate
local yaw = math.atan(vec.z/vec.x)+math.pi/2
if self.drawtype == "side" then
yaw = yaw+(math.pi/2)
end
if p.x > s.x then
yaw = yaw+math.pi
end
@ -619,7 +599,7 @@ lifetimer = def.lifetimer or 600,
else
self.timer = 0
self.blinktimer = 0
if self.get_velocity(self) <= 0.5 and self.object:getvelocity().y == 0 then
if self.get_velocity(self) <= 1.58 and self.object:getvelocity().y == 0 then
local v = self.object:getvelocity()
v.y = 5
self.object:setvelocity(v)
@ -632,7 +612,7 @@ lifetimer = def.lifetimer or 600,
self.timer = self.timer + dtime
self.blinktimer = (self.blinktimer or 0) + dtime
if self.blinktimer > 0.2 then
self.blinktimer = 0 -- self.blinktimer - 0.2
self.blinktimer = self.blinktimer - 0.2
if self.blinkstatus then
self.object:settexturemod("")
else
@ -641,23 +621,68 @@ lifetimer = def.lifetimer or 600,
self.blinkstatus = not self.blinkstatus
end
if self.timer > 3 then
local pos = vector.round(self.object:getpos())
do_tnt_physics(pos, 3, self) -- hurt player/mobs in blast area
if minetest.find_node_near(pos, 1, {"group:water"})
or minetest.is_protected(pos, "") then
local pos = self.object:getpos()
pos.x = math.floor(pos.x+0.5)
pos.y = math.floor(pos.y+0.5)
pos.z = math.floor(pos.z+0.5)
do_tnt_physics(pos, 3, self) -- on applique le principe le la tnt
local meta = minetest.get_meta(pos)
minetest.sound_play("tnt_explode", {pos = pos,gain = 1.0,max_hear_distance = 16,})
if minetest.get_node(pos).name == "default:water_source" or minetest.get_node(pos).name == "default:water_flowing" or minetest.is_protected(pos, "tnt") then
self.object:remove()
if self.sounds.explode ~= "" then
minetest.sound_play(self.sounds.explode, {pos = pos, gain = 1.0, max_hear_distance = 16})
end
effect(pos, 10, "tnt_smoke.png")
return
end
for x=-3,3 do
for y=-3,3 do
for z=-3,3 do
if x*x+y*y+z*z <= 3 * 3 + 3 then
local np={x=pos.x+x,y=pos.y+y,z=pos.z+z}
local n = minetest.get_node(np)
if n.name ~= "air" and n.name ~= "doors:door_steel_b_1" and n.name ~= "doors:door_steel_t_1"
and n.name ~= "doors:door_steel_b_2" and n.name ~= "doors:door_steel_t_2"
and n.name ~= "default:chest_locked" and n.name ~= "default:obsidian" and n.name ~= "default:obsidian_cooled"
and n.name ~= "default:obsidianbrick" and n.name ~= "default:bedrock"
and n.name ~= "more_chests:cobble" and n.name ~= "more_chests:shared" and n.name ~= "more_chests:secret"
and n.name ~= "more_chests:dropbox" and n.name ~= "chesttools:shared_chest"
and minetest.get_item_group(n.name, "unbreakable") ~= 1 and next(areas:getAreasAtPos(np)) == nil then
--activate_if_tnt(n.name, np, pos, 3) -- Pas de module TNT sur le serveur donc inutile
if n.name == "default:chest" then
meta = minetest.get_meta(np)
local inv = meta:get_inventory()
for i = 1,32 do
local m_stack = inv:get_stack("main",i)
local obj = minetest.add_item(pos,m_stack)
if obj then
obj:setvelocity({x=math.random(-2,2), y=7, z=math.random(-2,2)})
end
end
end
if n.name == "doors:door_wood_b_1" then
minetest.remove_node({x=np.x,y=np.y+1,z=np.z})
elseif n.name == "doors:door_wood_t_1" then
minetest.remove_node({x=np.x,y=np.y-1,z=np.z})
end
minetest.remove_node(np)
nodeupdate(np)
--[[ if n.name ~= "tnt:tnt" and math.random() > 0.9 then
local drop = minetest.get_node_drops(n.name, "")
for _,item in ipairs(drop) do
if type(item) == "string" then
if math.random(1,100) > 40 then
local obj = minetest.add_item(np, item)
end
end
end
end ]]
end
end
end
end
self.object:remove()
mobs:explosion(pos, 2, 1, 1, "tnt_explode", self.sounds.explode)
end
end
end
-- Modif MFF "attack type kamicaze" des creepers /FIN
elseif self.state == "attack" and self.attack_type == "dogfight" then
if not self.attack.player or not self.attack.player:getpos() then
@ -685,7 +710,7 @@ lifetimer = def.lifetimer or 600,
yaw = yaw+math.pi
end
self.object:setyaw(yaw)
if self.attack.dist > 3 then -- was set to 2 but slimes didnt hurt when above player
if self.attack.dist > 2 then
-- jump attack
if (self.jump and self.get_velocity(self) <= 0.5 and self.object:getvelocity().y == 0)
or (self.object:getvelocity().y == 0 and self.jump_chance > 0) then
@ -954,11 +979,11 @@ function mobs:spawn_specific(name, nodes, neighbors, min_light, max_light, inter
-- are we spawning inside a solid node?
local nod = minetest.get_node_or_nil(pos)
if not nod or not nod.name or not minetest.registered_nodes[nod.name]
if not nod or not minetest.registered_nodes[nod.name]
or minetest.registered_nodes[nod.name].walkable == true then return end
pos.y = pos.y + 1
nod = minetest.get_node_or_nil(pos)
if not nod or not nod.name or not minetest.registered_nodes[nod.name]
if not nod or not minetest.registered_nodes[nod.name]
or minetest.registered_nodes[nod.name].walkable == true then return end
if minetest.setting_getbool("display_mob_spawn") then
@ -976,7 +1001,7 @@ end
-- compatibility with older mob registration
function mobs:register_spawn(name, nodes, max_light, min_light, chance, active_object_count, max_height)
mobs:spawn_specific(name, nodes, {"air"}, min_light, max_light, 30, chance, active_object_count, -31000, max_height)
mobs:spawn_specific(name, nodes, {"air"}, min_light, max_light, 30, chance, active_object_count, -32000, max_height)
end
-- particle effects
@ -998,75 +1023,6 @@ function effect(pos, amount, texture)
})
end
-- explosion
function mobs:explosion(pos, radius, fire, smoke, sound)
-- node hit, bursts into flame (cannot blast through obsidian or protection redo mod items)
if not fire then fire = 0 end
if not smoke then smoke = 0 end
local pos = vector.round(pos)
local radius = 1
local vm = VoxelManip()
local minp, maxp = vm:read_from_map(vector.subtract(pos, radius), vector.add(pos, radius))
local a = VoxelArea:new({MinEdge = minp, MaxEdge = maxp})
local data = vm:get_data()
local p = {}
local c_air = minetest.get_content_id("air")
local c_ignore = minetest.get_content_id("ignore")
local c_obsidian = minetest.get_content_id("default:obsidian")
local c_brick = minetest.get_content_id("default:obsidianbrick")
local c_chest = minetest.get_content_id("default:chest_locked")
if sound and sound ~= "" then minetest.sound_play(sound, {pos = pos, gain = 1.0, max_hear_distance = 16}) end
for z = -radius, radius do
for y = -radius, radius do
local vi = a:index(pos.x + (-radius), pos.y + y, pos.z + z)
for x = -radius, radius do
p.x = pos.x + x
p.y = pos.y + y
p.z = pos.z + z
if n.name ~= "doors:door_steel_b_1" and n.name ~= "doors:door_steel_t_1"
and n.name ~= "doors:door_steel_b_2" and n.name ~= "doors:door_steel_t_2"
and n.name ~= "default:chest_locked" and n.name ~= "default:obsidian_cooled"
and n.name ~= "default:obsidianbrick" and n.name ~= "default:bedrock"
and n.name ~= "more_chests:cobble" and n.name ~= "more_chests:shared" and n.name ~= "more_chests:secret"
and n.name ~= "more_chests:dropbox" and n.name ~= "chesttools:shared_chest"
and minetest.get_item_group(n.name, "unbreakable") ~= 1 and next(areas:getAreasAtPos(np)) == nil
and data[vi] ~= c_air and data[vi] ~= c_ignore and data[vi] ~= c_obsidian and data[vi] ~= c_brick then and data[vi] ~= c_chest then
local n = minetest.get_node(p).name
-- do NOT destroy protection nodes but DO destroy nodes in protected area
if not n:find("protector:")
--and not minetest.is_protected(p, "")
and minetest.get_item_group(n.name, "unbreakable") ~= 1 then
-- if chest then drop items inside
if n == "default:chest" then
local meta = minetest.get_meta(p)
local inv = meta:get_inventory()
for i = 1,32 do
local m_stack = inv:get_stack("main",i)
local obj = minetest.add_item(pos,m_stack)
if obj then
obj:setvelocity({x=math.random(-2,2), y=7, z=math.random(-2,2)})
end
end
end
if n.name == "doors:door_wood_b_1" then
minetest.remove_node({x=np.x,y=np.y+1,z=np.z})
elseif n.name == "doors:door_wood_t_1" then
minetest.remove_node({x=np.x,y=np.y-1,z=np.z})
end
if fire > 0 and (minetest.registered_nodes[n].groups.flammable or math.random(1, 100) <= 30) then
minetest.set_node(p, {name="fire:basic_flame"})
else
minetest.remove_node(p)
end
if smoke > 0 then effect(p, 1, "tnt_smoke.png") end
end
end
vi = vi + 1
end
end
end
end
-- on mob death drop items
function check_for_death(self)
local hp = self.object:get_hp()
@ -1097,7 +1053,6 @@ function check_for_death(self)
self.on_die(self, pos)
end
end
-- Modif MFF "fonction TNT" des creepers /DEBUT
function do_tnt_physics(tnt_np,tntr,entity)
local objs = minetest.get_objects_inside_radius(tnt_np, tntr)

72
mods/mobs/dungeonmaster.lua
View File

@ -1,8 +1,13 @@
-- Dungeon Master by PilzAdam
-- Node which cannot be destroyed by DungeonMasters' fireballs
local excluded = {"nether:netherrack","default:obsidian_glass","default:obsidian", "default:obsidian_cooled", "default:bedrock", "doors:door_steel_b_1", "doors:door_steel_t_1", "doors:door_steel_b_2", "doors:door_steel_t_2","default:chest_locked"}
mobs:register_mob("mobs:dungeon_master", {
-- animal, monster, npc, barbarian
type = "monster",
-- aggressive, shoots fireballs at player, deal 13 damages
passive = false,
damage = 13,
attack_type = "shoot",
@ -13,6 +18,7 @@ mobs:register_mob("mobs:dungeon_master", {
hp_min = 50,
hp_max = 60,
armor = 60,
-- textures and model
collisionbox = {-0.7, -0.01, -0.7, 0.7, 2.6, 0.7},
visual = "mesh",
mesh = "mobs_dungeon_master.x",
@ -29,6 +35,7 @@ mobs:register_mob("mobs:dungeon_master", {
random = "mobs_dungeonmaster",
attack = "mobs_fireball",
},
-- speed and jump
walk_velocity = 1,
run_velocity = 2,
jump = false,
@ -48,9 +55,11 @@ mobs:register_mob("mobs:dungeon_master", {
{name = "maptools:silver_coin",
chance = 1, min = 2, max = 10,},
},
-- damaged by
water_damage = 1,
lava_damage = 1,
light_damage = 0,
-- model animation
animation = {
stand_start = 0, stand_end = 19,
walk_start = 20, walk_end = 35,
@ -85,8 +94,67 @@ mobs:register_arrow("mobs:fireball", {
}, 0)
end,
-- node hit, bursts into flame
-- node hit, bursts into flame (cannot blast through obsidian or protection redo mod items)
hit_node = function(self, pos, node)
mobs:explosion(pos, 1, 1, 0)
local pos = vector.round(pos)
local radius = 1
local vm = VoxelManip()
local minp, maxp = vm:read_from_map(vector.subtract(pos, radius), vector.add(pos, radius))
local a = VoxelArea:new({MinEdge = minp, MaxEdge = maxp})
local data = vm:get_data()
local p = {}
local c_air = minetest.get_content_id("air")
local c_ignore = minetest.get_content_id("ignore")
local c_obsidian = minetest.get_content_id("default:obsidian")
local c_brick = minetest.get_content_id("default:obsidianbrick")
for z = -radius, radius do
for y = -radius, radius do
local vi = a:index(pos.x + (-radius), pos.y + y, pos.z + z)
for x = -radius, radius do
p.x = pos.x + x
p.y = pos.y + y
p.z = pos.z + z
if data[vi] ~= c_air and data[vi] ~= c_ignore and data[vi] ~= c_obsidian and data[vi] ~= c_brick then
local n = minetest.get_node(p).name
-- do NOT destroy protection nodes but DO destroy nodes in protected area
if not n:find("protector:") then -- and not minetest.is_protected(p, "") then
local excluding = minetest.get_item_group(n, "unbreakable") == 1
or n:split(":")[1] == "nether"
or next(areas:getAreasAtPos(p)) ~= nil
for _,i in ipairs(excluded) do
if i == n then excluding = true end
end
--if p.y < -19600 and including and n:split(":")[1] == "nether" then
if excluding then
return
end
if n == "default:chest" then
meta = minetest.get_meta(p)
inv = meta:get_inventory()
for i = 1,32 do
m_stack = inv:get_stack("main",i)
obj = minetest.add_item(pos,m_stack)
if obj then
obj:setvelocity({x=math.random(-2,1), y=7, z=math.random(-2,1)})
end
end
end
if minetest.registered_nodes[n].groups.flammable or math.random(1, 100) <= 30 then
minetest.set_node(p, {name="fire:basic_flame"})
else
minetest.remove_node(p)
end
if n == "doors:door_wood_b_1" then
minetest.remove_node({x=p.x,y=p.y+1,z=p.z})
elseif n == "doors:door_wood_t_1" then
minetest.remove_node({x=p.x,y=p.y-1,z=p.z})
end
end
end
vi = vi + 1
end
end
end
end
})