araxiaonline/RandomScriptsforAzerothCore
3
0
Fork 0
mirror of https://github.com/araxiaonline/RandomScriptsforAzerothCore.git synced 2026-06-13 02:22:19 -04:00
Code Issues Packages Projects Releases Wiki Activity

Add files via upload

Browse Source
This commit is contained in:
Dinkledork
2023-03-10 03:23:34 -07:00
committed by GitHub
parent bb8d26da51
commit e6a5000f2c
12 changed files with 334 additions and 77 deletions
Download Patch File Download Diff File Expand all files Collapse all files

112
Alleria2.lua
View File

@@ -1,70 +1,84 @@
local Alleria = {};
local function CastRapidShot(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 71251, true)
function Alleria.OnEnterCombat(event, creature, target)
creature:RegisterEvent(Alleria.CastFD, 1, 1)
creature:RegisterEvent(Alleria.CastRoot, 10300, 1)
creature:RegisterEvent(Alleria.CastDisengage, 10400, 1)
creature:RegisterEvent(Alleria.CastRapidShot, 7100, 0)
creature:RegisterEvent(Alleria.CastMultiShot, 6100, 0)
creature:RegisterEvent(Alleria.CastExplosiveShot, 6600, 0)
creature:RegisterEvent(Alleria.CastBlackArrow, 15300, 0)
creature:RegisterEvent(Alleria.CastShoot, 499, 0)
creature:RegisterEvent(Alleria.ForceDespawn, 90000, 1)
end
local function CastShoot(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 39079, true)
function Alleria.OnLeaveCombat(event, creature)
creature:RemoveEvents()
end
local function CastMultiShot(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 59713, false)
function Alleria.OnDied(event, creature, killer)
creature:RemoveEvents()
end
local function CastExplosiveShot(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 60053, false)
function Alleria.CastRapidShot(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 71251, true)
end
end
local function CastBlackArrow(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 63672, false)
function Alleria.CastShoot(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 39079, true)
end
end
local function CastDisengage(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 57635, false)
function Alleria.CastMultiShot(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 59713, false)
end
end
local function CastFD(eventId, delay, calls, creature)
function Alleria.CastExplosiveShot(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 60053, false)
end
end
function Alleria.CastBlackArrow(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 63672, false)
end
end
function Alleria.CastDisengage(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 57635, false)
end
end
function Alleria.CastFD(event, delay, calls, creature)
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(creature, 23604, false)
end
local function CastRoot(eventId, delay, calls, creature)
local victim = creature:GetVictim()
creature:CastSpell(victim, 50762, false)
end
local function ForceDespawn(eventId, delay, calls, creature)
function Alleria.CastRoot(event, delay, calls, creature)
local victim = creature:GetVictim()
if not creature:IsCasting() or not creature:IsCastingSpell(71251) then
creature:CastSpell(victim, 50762, false)
end
end
function Alleria.ForceDespawn(event, delay, calls, creature)
creature:DespawnOrUnsummon(1)
end
local function OnEnterCombat(event, creature, target)
creature:RegisterEvent(CastFD, 1, 1)
creature:RegisterEvent(CastRoot, 10300, 1)
creature:RegisterEvent(CastDisengage, 10400, 1)
creature:RegisterEvent(CastRapidShot, 7100, 0)
creature:RegisterEvent(CastMultiShot, 6100, 0)
creature:RegisterEvent(CastExplosiveShot, 6600, 0)
creature:RegisterEvent(CastBlackArrow, 15300, 0)
creature:RegisterEvent(CastShoot, 499, 0)
creature:RegisterEvent(ForceDespawn, 90000, 1)
end
local function OnLeaveCombat(event, creature)
creature:RemoveEvents()
end
local function OnDied(event, creature, killer)
creature:RemoveEvents()
end
RegisterCreatureEvent(400021, 1, OnEnterCombat)
RegisterCreatureEvent(400021, 2, OnLeaveCombat)
RegisterCreatureEvent(400021, 4, OnDied)
RegisterCreatureEvent(400021, 1, Alleria.OnEnterCombat)
RegisterCreatureEvent(400021, 2, Alleria.OnLeaveCombat)
RegisterCreatureEvent(400021, 4, Alleria.OnDied)