Add files via upload

2026-06-13 02:22:19 -04:00 · 2023-03-03 16:33:48 -07:00
parent f43287bfff
commit 36942f9202
8 changed files with 160 additions and 20 deletions
--- a/ArchBishopBen.lua
+++ b/ArchBishopBen.lua
@@ -17,8 +17,9 @@ creature:CastSpell(creature:GetVictim(), 37959, true)
 end

 local function OnEnterCombat(event, creature, target)
-creature:RegisterEvent(CastHolyB, 6600, 0)
-creature:RegisterEvent(CastHolyFire, 2500, 0)
+creature:PlayDirectSound(20417)
+creature:RegisterEvent(CastHolyB, 4600, 0)
+creature:RegisterEvent(CastHolyFire, 1500, 0)
 creature:RegisterEvent(CastSWP, 15000, 0)
 creature:RegisterEvent(CastHV, 25000, 0)

--- a/Bolvar.lua
+++ b/Bolvar.lua
@@ -8,8 +8,8 @@ local function CastHOR(eventId, delay, calls, creature)
 creature:CastSpell(creature:GetVictim(), 53595, true)
 end

-local function CastJOL(eventId, delay, calls, creature)
-creature:CastSpell(creature:GetVictim(), 20271, true)
+local function CastSunder(eventId, delay, calls, creature)
+creature:CastSpell(creature:GetVictim(), 58461, true)
 end

 local function CastAvengingWrath(event, creature)
@@ -23,7 +23,7 @@ end
 local function OnEnterCombat(event, creature, target)
 creature:RegisterEvent(CastAS, 12600, 0)
 creature:RegisterEvent(CastHOR, 5000, 0)
-creature:RegisterEvent(CastJOL, 10000, 0)
+creature:RegisterEvent(CastSunder, 10000, 0)
 creature:RegisterEvent(CastAvengingWrath, 1, 1)
 end

--- a/Bolvar2.lua
+++ b/Bolvar2.lua
@@ -3,28 +3,47 @@ local kingsSpell = 25898
 local wisdomSpell = 25918
 local mightSpell = 25916

+-- Sound ID for the blessing of kings
+local KINGS_SOUND_ID = 20423
+
+-- Emote ID for the blessing of kings
+local KINGS_EMOTE_ID = 113
+
+-- Sound ID for the blessing of wisdom
+local WISDOM_SOUND_ID = 20424
+
+-- Emote ID for the blessing of wisdom
+local WISDOM_EMOTE_ID = 153
+
+local MIGHT_SOUND_ID = 20425
+
 local function OnSpawn(event, creature)
-creature:CastSpell(creature, kingsSpell, true)
+    creature:CastSpell(creature, kingsSpell, true)
 end

 local function OnGossipHello(event, player, creature)
-player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_magic_magearmor:50:50:-43:0|tGrant me a Blessing of Kings", 0, 1, false, "", 0)
-player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_holy_sealofwisdom:50:50:-43:0|tGrant me a Blessing of Wisdom", 0, 2, false, "", 0)
-player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_holy_fistofjustice:50:50:-43:0|tGrant me a Blessing of Might", 0, 3, false, "", 0)
-player:GossipSendMenu(1, creature)
+    player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_magic_magearmor:50:50:-23:0|tGrant me a Blessing of Kings", 0, 1, false, "", 0)
+    player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_holy_sealofwisdom:50:50:-23:0|tGrant me a Blessing of Wisdom", 0, 2, false, "", 0)
+    player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_holy_fistofjustice:50:50:-23:0|tGrant me a Blessing of Might", 0, 3, false, "", 0)
+    player:GossipSendMenu(1, creature)
 end

 local function OnGossipSelect(event, player, creature, sender, intid, code, menuid)
-if intid == 1 then
-player:CastSpell(player, kingsSpell, true)
-elseif intid == 2 then
-player:CastSpell(player, wisdomSpell, true)
-elseif intid == 3 then
-player:CastSpell(player, mightSpell, true)
-end
-player:GossipComplete()
+    if intid == 1 then
+        player:CastSpell(player, kingsSpell, true)
+        creature:PlayDistanceSound(KINGS_SOUND_ID)
+        creature:PerformEmote(KINGS_EMOTE_ID)
+    elseif intid == 2 then
+        player:CastSpell(player, wisdomSpell, true)
+        creature:PlayDistanceSound(WISDOM_SOUND_ID)
+        creature:PerformEmote(WISDOM_EMOTE_ID)
+    elseif intid == 3 then
+        player:CastSpell(player, mightSpell, true)
+		creature:PlayDistanceSound(MIGHT_SOUND_ID)
+    end
+    player:GossipComplete()
 end

 RegisterCreatureEvent(Bolvar, 5, OnSpawn)
 RegisterCreatureGossipEvent(Bolvar, 1, OnGossipHello)
-RegisterCreatureGossipEvent(Bolvar, 2, OnGossipSelect)
+RegisterCreatureGossipEvent(Bolvar, 2, OnGossipSelect)
--- a/CustomGreench.lua
+++ b/CustomGreench.lua
@@ -1,3 +1,5 @@
+--Needs lots and lots of work.
+
 local AbominableGreench = {};

 function AbominableGreench.OnDie(event, creature)
--- a/FOEREAPER.lua
+++ b/FOEREAPER.lua
@@ -4,8 +4,14 @@ local function CastTrample(eventId, delay, calls, creature)
 creature:CastSpell(creature:GetVictim(), 5568, true)
 end

+local function CastKnockback(eventId, delay, calls, creature)
+creature:CastSpell(creature:GetVictim(), 49398, true)
+end
+
 function FoeReaper.OnEnterCombat(event, creature, target)
+creature:SendUnitYell("You like me, you really like me!", 0)
 creature:RegisterEvent(CastTrample, 5000, 0)
+creature:RegisterEvent(CastKnockback, 15000, 0)
 end

 function FoeReaper.OnLeaveCombat(event, creature)
--- a/Murky.lua
+++ b/Murky.lua
@@ -0,0 +1,28 @@
+function MurkyOnSpawn(event, creature)
+    local playerName = creature:GetOwner():GetName()
+    local dialogue = {
+        "Mrglglglgl! Murky here, reporting for duty!",
+        "Mrrrrrrrglglglgl! Murky happy to serve you, " .. playerName .. "!",
+        "Mrglgl! Murloc Murky at your service! Let's conquer Azeroth together!",
+        "Mrrrglglgl! Murky ready to take on any challenge with you, " .. playerName .. "!",
+        "Mrglglglglgl! Reporting for duty! Let's make some waves, " .. playerName .. "!",
+        "Mrrglglgl! Murky is excited to join your team, " .. playerName .. "! Let's show everyone what we're made of!",
+        "Mrglglgl! Murloc warrior Murky at your command, " .. playerName .. "! Let's make our enemies quake with fear!",
+        "Mrrrglglgl! Murky is eager to prove his worth to you, " .. playerName .. "! Let's take on the world together!",
+        "Mrglglglgl! This Murloc is ready to make some noise with you, " .. playerName .. "! Let's show them who's boss!",
+        "Mrrrglgl! Murky honored to be your loyal companion, " .. playerName .. "! Let's take on any challenge that comes our way!",
+        "Greetings, adventurer! The one and only Murky has arrived to join you on your quest!",
+        "Mrglgl! Murky is here to lend a fin and help you conquer the land, " .. playerName .. "!",
+        "Mrrglgl! Murky is thrilled to serve such a worthy leader as yourself, " .. playerName .. "!",
+        "Mrglglglgl! Murky reporting for duty! Let's make some mischief and have some fun, " .. playerName .. "!",
+        "Mrrglgl! Murky is honored to be fighting by your side, " .. playerName .. "! Let's take on our foes with all we've got!",
+        "Mrglglgl! Murky is eager to explore the land and see what adventures await us, " .. playerName .. "!",
+        "Mrrrglglgl! Murky is always up for a challenge, " .. playerName .. "! Let's go forth and conquer!",
+        "Mrglglglgl! Murky is ready to make some waves and take on the world, " .. playerName .. "! Let's do this!",
+        "Mrrrglgl! Murky will be your trusty sidekick on this journey, " .. playerName .. "! Let's make some memories!",
+        "Mrglglglgl! Murky is thrilled to be part of your team, " .. playerName .. "! Let's show them what we're made of and come out on top!"
+    }
+    creature:SendUnitSay(dialogue[math.random(#dialogue)], 0)
+end
+
+RegisterCreatureEvent(15186, 5, MurkyOnSpawn) -- register the function to be called on Murky's spawn
--- a/Smolder.lua
+++ b/Smolder.lua
@@ -0,0 +1,84 @@
+local Smolder = {};
+local healthCheck = false;
+
+local function CastFlameBreath(eventId, delay, calls, creature)
+creature:CastSpell(creature:GetVictim(), 23341, true)
+end
+
+local function CastCharredEarth(eventId, delay, calls, creature)
+local targetCount = creature:GetAITargetsCount()
+local randomTarget = math.random(1, targetCount)
+local target = creature:GetAITargets()
+creature:CastSpell(target[randomTarget], 100148, true)
+end
+
+local function CastPyroblast(eventId, delay, calls, creature)
+local targets = {}
+for i = 1, 3 do
+local targetCount = creature:GetAITargetsCount()
+local randomTarget = math.random(1, targetCount)
+local target = creature:GetAITargets()
+table.insert(targets, target[randomTarget])
+end
+for k, v in pairs(targets) do
+creature:CastSpell(v, 27132, true)
+end
+end
+
+local function CastSummonElemental(eventId, delay, calls, creature)
+creature:SendUnitYell("Minions of fire, rise and serve your master!", 0)
+creature:PlayDirectSound(20422)
+creature:CastSpell(creature, 364728, true)
+end
+
+local function CastTailSweep(eventId, delay, calls, creature)
+creature:CastSpell(creature:GetVictim(), 52144, true)
+end
+
+local function CastScorch(eventId, delay, calls, creature)
+creature:CastSpell(creature:GetVictim(), 42858, true)
+end
+
+local function CastBellowingRoar(eventId, delay, calls, creature)
+creature:SendUnitYell("Feel the power of my roar!", 0)
+creature:PlayDirectSound(20421)
+creature:CastSpell(creature, 22686, true)
+end
+
+local function OnEnterCombat(event, creature, target)
+creature:SendUnitYell("Feel the heat of my flame and know your end is near!", 0)
+creature:PlayDirectSound(20419)
+creature:RegisterEvent(CastScorch, 6000, 0)
+creature:RegisterEvent(CastFlameBreath, 13000, 0)
+creature:RegisterEvent(CastCharredEarth, 12000, 0)
+creature:RegisterEvent(CastPyroblast, 10000, 0)
+creature:RegisterEvent(CastSummonElemental, 60000, 0)
+creature:RegisterEvent(CastTailSweep, 8000, 0)
+creature:RegisterEvent(CastBellowingRoar, 33000, 0)
+end
+
+local function OnLeaveCombat(event, creature)
+creature:RemoveEvents()
+end
+
+local function OnDied(event, creature, killer)
+creature:SendUnitYell("My fire...extinguished...", 0)
+creature:PlayDirectSound(20420)
+creature:RemoveEvents()
+end
+
+local function OnDamageTaken(event, creature, attacker, damage)
+if (creature:HealthBelowPct(15) and not healthCheck) then
+creature:SendUnitYell("My power is waning, but I will fight until my last flame burnsout!", 0)
+creature:PlayDirectSound(20423)
+healthCheck = true
+end
+end
+
+RegisterCreatureEvent(83001, 1, OnEnterCombat)
+RegisterCreatureEvent(83001, 2, OnLeaveCombat)
+RegisterCreatureEvent(83001, 4, OnDied)
+RegisterCreatureEvent(83001, 9, OnDamageTaken)
+
+
+
--- a/.lua
+++ b/.lua
@@ -23,7 +23,7 @@ creature:SendUnitSay("The socket enchant has been added to your inventory.", 0)
 ExchangeCount = ExchangeCount + 1 -- Increase the number of successful exchanges
 if (ExchangeCount >= 3) then -- If the number of successful exchanges is 3 or more
 creature:SendUnitSay("Thanks a bunch! See you next week!", 0)
-creature:DespawnOrUnsummon(1000) -- Despawn the creature with a 2 second delay
+creature:DespawnOrUnsummon(1000) -- Despawn the creature with a 1 second delay
 end
 player:GossipComplete()
 else