mods/mob/api/interaction.lua

   1 --
   2 mobs.create_interaction_functions = function(def,mob_register)
   3         --the sword wear mechanic
   4         mob_register.add_sword_wear = function(self, puncher, time_from_last_punch, tool_capabilities, dir)
   5                 if puncher:is_player() then
   6                         local itemstack = puncher:get_wielded_item()
   7                         local wear = itemstack:get_definition().mob_hit_wear
   8                         if wear then
   9                                 itemstack:add_wear(wear)
  10                                 if itemstack:get_name() == "" then
  11                                         minetest.sound_play("tool_break",{to_player = puncher:get_player_name(),gain=0.4})
  12                                 end
  13                                 puncher:set_wielded_item(itemstack)
  14                         end
  15                 end
  16         end
  17
  18         --critical effect particles
  19         mob_register.do_critical_particles = function(pos)
  20                 minetest.add_particlespawner({
  21                         amount = 40,
  22                         time = 0.001,
  23                         minpos = pos,
  24                         maxpos = pos,
  25                         minvel = vector.new(-2,-2,-2),
  26                         maxvel = vector.new(2,8,2),
  27                         minacc = {x=0, y=4, z=0},
  28                         maxacc = {x=0, y=12, z=0},
  29                         minexptime = 1.1,
  30                         maxexptime = 1.5,
  31                         minsize = 1,
  32                         maxsize = 2,
  33                         collisiondetection = false,
  34                         vertical = false,
  35                         texture = "critical.png",
  36                 })
  37         end
  38
  39         mob_register.collision_detection = function(self)
  40                 local pos = self.object:get_pos()
  41                 --do collision detection from the base of the mob
  42                 pos.y = pos.y - self.object:get_properties().collisionbox[2]
  43                 for _,object in ipairs(minetest.get_objects_inside_radius(pos, self.collision_boundary)) do
  44                         if object:is_player() or object:get_luaentity().mob == true then
  45                                 local pos2 = object:get_pos()
  46
  47                                 local dir = vector.direction(pos,pos2)
  48                                 dir.y = 0
  49
  50                                 --eliminate mob being stuck in corners
  51                                 if dir.x == 0 and dir.z == 0 then
  52                                         dir = vector.new(math.random(-1,1)*math.random(),0,math.random(-1,1)*math.random())
  53                                 end
  54
  55                                 local velocity = vector.multiply(dir,1.1)
  56
  57                                 vel1 = vector.multiply(velocity, -1)
  58                                 vel2 = velocity
  59                                 self.object:add_velocity(vel1)
  60
  61                                 if object:is_player() then
  62                                         object:add_player_velocity(vel2)
  63                                 else
  64                                         object:add_velocity(vel2)
  65                                 end
  66                         end
  67                 end
  68         end
  69
  70         mob_register.fall_damage = function(self)
  71                 local vel = self.object:get_velocity()
  72                 if vel and self.oldvel then
  73                    if self.oldvel.y < -7 and vel.y == 0 then
  74                           local damage = math.abs(self.oldvel.y + 7)
  75                           damage = math.floor(damage/1.5)
  76                           self.object:punch(self.object, 2,
  77                                  {
  78                                   full_punch_interval=1.5,
  79                                   damage_groups = {damage=damage},
  80                                  })
  81                    end
  82                 end
  83                 self.oldvel = vel
  84         end
  85
  86         --this controls what happens when the mob gets punched
  87         mob_register.on_punch = function(self, puncher, time_from_last_punch, tool_capabilities, dir)
  88                 local hp = self.hp
  89                 local vel = self.object:get_velocity()
  90                 local hurt = tool_capabilities.damage_groups.damage
  91
  92                 if not hurt then
  93                         hurt = 1
  94                 end
  95
  96                 local critical = false
  97
  98                 --criticals
  99                 local pos = self.object:get_pos()
 100                 if puncher:is_player() then
 101                         local puncher_vel = puncher:get_player_velocity().y
 102                         if puncher_vel < 0 then
 103                                 hurt = hurt * 1.5
 104                                 critical = true
 105                         end
 106                 end
 107
 108                 local hp = hp-hurt
 109
 110                 if (self.punched_timer <= 0 and hp > 1) and not self.dead then
 111                         if puncher ~= self.object then
 112                                 if self.attacked_hostile then
 113                                         self.hostile = true
 114                                         self.hostile_timer = 20
 115                                         self.punched_timer = 0.8
 116                                         if self.group_attack == true then
 117                                                 for _,object in ipairs(minetest.get_objects_inside_radius(pos, self.view_distance)) do
 118                                                         if not object:is_player() and object:get_luaentity() and object:get_luaentity().mobname == self.mobname then
 119                                                                 object:get_luaentity().hostile = true
 120                                                                 object:get_luaentity().hostile_timer = 20
 121                                                         end
 122                                                 end
 123                                         end
 124                                 end
 125                         end
 126
 127                         --critical effect
 128                         if critical == true then
 129                                 self.do_critical_particles(pos)
 130                                 minetest.sound_play("critical", {object=self.object, gain = 0.1, max_hear_distance = 10,pitch = math.random(80,100)/100})
 131                         end
 132                         minetest.sound_play(self.hurt_sound, {object=self.object, gain = 1.0, max_hear_distance = 10,pitch = math.random(100,140)/100})
 133
 134                         self.hp = hp
 135
 136                         self.direction = vector.multiply(dir,-1)
 137                         dir = vector.multiply(dir,10)
 138                         if vel.y <= 0 then
 139                                 dir.y = 4
 140                         else
 141                                 dir.y = 0
 142                         end
 143
 144
 145                         self.object:add_velocity(dir)
 146                         self.add_sword_wear(self, puncher, time_from_last_punch, tool_capabilities, dir)
 147                 elseif (self.punched_timer <= 0 and self.death_animation_timer == 0) then
 148                         if puncher ~= self.object then
 149                                 if self.attacked_hostile then
 150                                         self.hostile = true
 151                                         self.hostile_timer = 20
 152                                         self.punched_timer = 0.8
 153                                         if self.group_attack == true then
 154                                                 for _,object in ipairs(minetest.get_objects_inside_radius(pos, self.view_distance)) do
 155                                                         if not object:is_player() and object:get_luaentity() and object:get_luaentity().mobname == self.mobname then
 156                                                                 object:get_luaentity().hostile = true
 157                                                                 object:get_luaentity().hostile_timer = 20
 158                                                         end
 159                                                 end
 160                                         end
 161                                 end
 162                         end
 163                         self.death_animation_timer = 1
 164                         self.dead = true
 165
 166                         --critical effect
 167                         if critical == true then
 168                                 self.do_critical_particles(pos)
 169                                 minetest.sound_play("critical", {object=self.object, gain = 0.1, max_hear_distance = 10,pitch = math.random(80,100)/100})
 170                         end
 171                         minetest.sound_play(self.die_sound, {object=self.object, gain = 1.0, max_hear_distance = 10,pitch = math.random(80,100)/100})
 172
 173                         self.object:set_texture_mod("^[colorize:red:130")
 174                         self.add_sword_wear(self, puncher, time_from_last_punch, tool_capabilities, dir)
 175                 end
 176         end
 177
 178         --this is what happens when a mob dies
 179         mob_register.on_death = function(self, killer)
 180                 local pos = self.object:getpos()
 181                 --pos.y = pos.y + 0.4
 182                 minetest.sound_play("mob_die", {pos = pos, gain = 1.0})
 183                 minetest.add_particlespawner({
 184                         amount = 40,
 185                         time = 0.001,
 186                         minpos = pos,
 187                         maxpos = pos,
 188                         minvel = vector.new(-5,-5,-5),
 189                         maxvel = vector.new(5,5,5),
 190                         minacc = {x=0, y=0, z=0},
 191                         maxacc = {x=0, y=0, z=0},
 192                         minexptime = 1.1,
 193                         maxexptime = 1.5,
 194                         minsize = 1,
 195                         maxsize = 2,
 196                         collisiondetection = false,
 197                         vertical = false,
 198                         texture = "smoke.png",
 199                 })
 200
 201                 --only throw items if registered
 202                 if self.item_drop then
 203                         --detect if multiple items are going to be added
 204                         if self.item_amount  and self.item_minumum then
 205                                 local data_item_amount = math.random(self.item_minimum, self.item_amount)
 206                                 for i = self.item_minimum,data_item_amount do
 207                                         minetest.throw_item(pos,self.item_drop)
 208                                 end
 209                         else
 210                                 minetest.throw_item(pos,self.item_drop)
 211                         end
 212                 end
 213
 214                 global_mob_amount = global_mob_amount - 1
 215                 print("Mobs Died. Current Mobs: "..global_mob_amount)
 216                 if self.child and self.child:get_luaentity() then
 217                         self.child:get_luaentity().parent = nil
 218                 end
 219
 220                 self.object:remove()
 221         end
 222
 223         --the pig will look for and at players
 224         mob_register.look_around = function(self,dtime)
 225                 local pos = self.object:get_pos()
 226
 227                 if self.die_in_light and self.die_in_light_level and self.die_in_light == true then
 228                         local light_level = minetest.get_node_light(pos)
 229                         if light_level then
 230                                 if (self.die_in_light == true and light_level > self.die_in_light_level) then
 231                                         local damage = self.hp
 232                                         self.object:punch(self.object, 2,
 233                                                 {
 234                                                 full_punch_interval=1.5,
 235                                                 damage_groups = {damage=damage},
 236                                         })
 237                                 end
 238                         end
 239                 end
 240
 241                 --STARE O_O
 242                 --and follow!
 243                 self.following = false
 244                 local player_found = false
 245                 for _,object in ipairs(minetest.get_objects_inside_radius(pos, self.view_distance)) do
 246                         if object:is_player() and player_found == false and object:get_hp() > 0 then
 247                                 --look at player's camera
 248                                 local pos2 = object:get_pos()
 249                                 pos2.y = pos2.y + 1.625
 250
 251                                 player_found = true
 252
 253                                 if self.head_bone then
 254                                         self.move_head(self,pos2,dtime)
 255                                 end
 256
 257
 258                                 if self.hostile == true then
 259
 260
 261                                         local distance = vector.distance(pos,pos2)
 262
 263
 264                                         --punch the player
 265                                         if self.attack_type == "punch" then
 266                                                 if distance < 2.5 and self.punch_timer <= 0 and object:get_hp() > 0 then
 267                                                         local line_of_sight = minetest.line_of_sight(pos, pos2)
 268                                                         if line_of_sight == true then
 269                                                                 self.punch_timer = 1
 270                                                                 object:punch(self.object, 2,
 271                                                                         {
 272                                                                         full_punch_interval=1.5,
 273                                                                         damage_groups = {fleshy=2},
 274                                                                 },vector.direction(pos,pos2))
 275                                                         end
 276                                                 end
 277                                         elseif self.attack_type == "explode" then
 278                                                 if distance <  self.explosion_radius then
 279
 280                                                         if not self.tnt_timer then
 281                                                                 minetest.sound_play("tnt_ignite", {object = self.object, gain = 1.0,})
 282                                                                 self.tnt_timer = self.explosion_time
 283                                                                 self.object:set_texture_mod("^[colorize:white:130")
 284                                                         end
 285                                                 end
 286                                         elseif self.attack_type == "projectile" then
 287                                                 if not self.projectile_timer then
 288                                                         self.projectile_timer = self.projectile_timer_cooldown
 289                                                 end
 290                                                 if self.projectile_timer <= 0 then
 291                                                         self.projectile_timer = self.projectile_timer_cooldown
 292
 293                                                         local obj = minetest.add_entity(pos, self.projectile_type)
 294                                                         if obj then
 295                                                                 local dir = vector.multiply(vector.direction(pos,pos2), 50)
 296                                                                 obj:set_velocity(dir)
 297                                                                 obj:get_luaentity().timer = 2
 298                                                         end
 299                                                 end
 300                                         end
 301                                         self.direction = vector.direction(vector.new(pos.x,0,pos.z),vector.new(pos2.x,0,pos2.z))
 302                                         self.speed = self.max_speed
 303                                         self.following = true
 304                                 end
 305                                 --only look at one player
 306                                 break
 307                         end
 308                 end
 309                 --stare straight if not found
 310                 if player_found == false then
 311                         --self.move_head(self,nil,dtime)
 312                         if self.manage_hostile_timer then
 313                                 self.manage_hostile_timer(self,dtime)
 314                         end
 315                 end
 316         end
 317
 318         return(mob_register)
 319 end