1. local NPCID = 71000
  2. local NPCSpawnID1 = 70000
  5. function LevelMob_OnCombat(pUnit, event, player)
  6. pUnit:SendChatMessage(12, 0, "Kommt herbei meine Br\195\188der!")
  7. pUnit:RegisterEvent("MobSpawn",1000, 1)
  8. end
  10. function MobSpawn(pUnit)
  11. if Unit:GetHealthPct() < 100 then
  12. pUnit:SendChatMessage(12, 0, "Erteilt den Wiedersachern unserer K\195\182nigin eine Lektion erteilen!")
  13. pUnit:GetX()
  14. pUnit:GetY()
  15. pUnit:GetZ()
  16. pUnit:SpawnCreature(70000, x+5, y+5, z+5, 0)
  17. pUnit:SpawnCreature(70000, x+10, y+5, z+5, 0)
  18. pUnit:SpawnCreature(70000, x+7, y+7, z+5, 0)
  19. pUnit:SpawnCreature(70000, x-5, y-5, z+5, 0)
  20. pUnit:SpawnCreature(70000, x-10, y-5, z+5, 0)
  21. end
  22. end
  24. function LevelMob_OnLeaveCombat(pUnit, event, player)
  25. pUnit:RemoveEvents()
  26. end
  28. function LevelMob_OnKillTarget(pUnit, event, player)
  29. pUnit:SendChatMessage(14, 0, "Ein weiterer toter Wurm f\195\188r die Spinnenk\195\182nigin!")
  30. pUnit:RemoveEvents()
  31. end
  33. function LevelMob_OnDie(pUnit, event, player)
  34. pUnit:RemoveEvents()
  35. end
  37. RegisterUnitEvent(NPCID, 1, "LevelMob_OnCombat")
  38. RegisterUnitEvent(NPCID, 2, "LevelMob_OnLeaveCombat")
  39. RegisterUnitEvent(NPCID, 3, "LevelMob_OnKillTarget")
  40. RegisterUnitEvent(NPCID, 4, "LevelMob_OnDie")