Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local BOSSID = 178903
- local FATHERID = 127093
- function Go_OnSpawn(Unit, event, pMISC)
- Go = Unit
- end
- RegisterGameObjectEvent(45879, 2, "Go_OnSpawn")
- function Sarg_OnSpawn(Unit, event)
- Sarg = Unit
- end
- RegisterUnitEvent(36960, 18, "Sarg_OnSpawn")
- function Reaver_OnSpawn(Unit, event)
- Reaver = Unit
- end
- RegisterUnitEvent(36957, 18, "Reaver_OnSpawn")
- function Saurfang_OnSpawn(Unit, event)
- Saurfang = Unit
- end
- RegisterUnitEvent(FATHERID, 18, "Saurfang_OnSpawn")
- function JR_OnSpawn(Unit, event)
- Jr = Unit
- end
- RegisterUnitEvent(BOSSID, 18, "JR_OnSpawn")
- function Saurfang_OnTalk(Unit, event, player)
- Saurfang:GossipCreateMenu(100, player, 0)
- Saurfang:GossipMenuAddItem(0,"We are ready to enter the inner citadel!", 1, 0)
- Saurfang:GossipSendMenu(player)
- end
- function Saurfang_OnSelect(Unit, event, player, id, intid, code)
- if(intid == 1) then
- if (Reaver ~=nil and Sarg ~=nil and Go ~=nil) then
- Saurfang:PlaySoundToSet(17103)
- Saurfang:SendChatMessage(12, 0, "Kor'kron, move out! Champions, watch your backs. The Scourge have been cr...")
- Saurfang:SpawnCreature(BOSSID, -471.705, 2211.423, 541.113, 3.1, 35, 0)
- Jr:MoveTo(-494.424, 2212.159, 541.113)
- Jr:ModifyWalkSpeed(8)
- player:GossipComplete()
- Saurfang:SetNPCFlags(4)
- Go:Activate()
- Saurfang:RegisterEvent("Saurfang_Start_Cin", 8000, 1)
- elseif(Reaver ~=nil== false and Sarg ~=nil == false and Go ~=nil == false) then
- SendWorldMessage("Script Err: ICC_Saurfang is un-responsive please report this to Dragon", 2)
- Saurfang:GossipCreateMenu(100, player, 0)
- Saurfang:GossipMenuAddItem(0,"Force run script", 100, 0)
- Saurfang:GossipSendMenu(player)
- end
- end
- if(intid == 100) then
- local x = Saurfang:GetX();
- local y = saurfang:GetY();
- local z = Saurfang:GetZ();
- local o = Saurfang:GetO();
- Saurfang:SpawnCreature(36957, x-10, y, z, o, 35, 0)
- Saurfang:SpawnCreature(36960, x+10, y, z, o, 35, 0)
- player:GossipComplete()
- Saurfang:SetNPCFlags(4)
- Saurfang:RegisterEvent("Saurfang_Run_Force", 4000, 1)
- end
- end
- RegisterUnitGossipEvent(FATHERID, 1, "Saurfang_OnTalk")
- RegisterUnitGossipEvent(FATHERID, 2, "Saurfang_OnSelect")
- function Saurfang_Run_Force(Unit, event)
- Saurfang:RegisterEvent("Saurfang_Start_Cin", 1000, 1)
- end
- function Saurfang_Start_Cin(Unit, event)
- Go:Activate()
- Jr:PlaySoundToSet(16704)
- Jr:SendChatMessage(14, 0, "Join me father, Join me and we will crush this world in the name of the scourge. for the glory of the lich king!")
- Jr:Emote(1, 3000)
- Saurfang:RegisterEvent("Saurfang_Talk_To_Son_One", 10000, 1)
- end
- function Saurfang_Talk_To_Son_One(Unit, event)
- Saurfang:SendChatMessage(12, 0, "My boy died at the wrath gate. I am here only to collect his body!")
- Saurfang:PlaySoundToSet(17097)
- Saurfang:Emote(1, 8000)
- Saurfang:RegisterEvent("Saurfang_Talk_To_Son_Two", 10000, 1)
- end
- function Saurfang_Talk_To_Son_Two(Unit, event)
- Jr:SendChatMessage(14, 0, "Stubern and old. What chance do you have? I am stronger and more powerful than you ever were!")
- Jr:PlaySoundToSet(16705)
- Jr:Emote(1, 10000)
- Saurfang:RegisterEvent("Saurfang_Talk_To_Son_Three", 10000, 1)
- end
- function Saurfang_Talk_To_Son_Three(Unit, event)
- Saurfang:SendChatMessage(12, 0, "We named him Dranosh. It means Heart of Draenor in orcish. I would not let the warlocks take him. My boy would be safe, hidden away by the elders of Garadar.")
- Saurfang:PlaySoundToSet(17098)
- Saurfang:Emote(1, 12000)
- Saurfang:RegisterEvent("Saurfang_Talk_To_Son_Four", 15000, 1)
- end
- function Saurfang_Talk_To_Son_Four(Unit, event)
- Saurfang:SendChatMessage(12, 0, "I made a promise to his mother before she died, that I would cross the Dark Portal alone whether I lived or died, my son would be safe. Untainted.")
- Saurfang:Emote(1, 12000)
- Saurfang:PlaySoundToSet(17099)
- Saurfang:RegisterEvent("Saurfang_Talk_To_Son_Five", 15000, 1)
- end
- function Saurfang_Talk_To_Son_Five(Unit, event)
- Saurfang:SendChatMessage(12, 0, "Today, I fulfill that promise!")
- Saurfang:PlaySoundToSet(17100)
- Saurfang:Emote(29, 0)
- Saurfang:RegisterEvent("Saurfang_Charge", 3000, 1)
- end
- function Saurfang_Charge(Unit, event)
- Saurfang:ModifyWalkSpeed(8)
- Saurfang:MoveTo(-505, 2211.7, 539.2, 6.2)
- Reaver:MoveTo(-517.347,2202.218, 539.289)
- Reaver:ModifyWalkSpeed(8)
- Sarg:MoveTo(-516.532, 2222.955, 539.289)
- Sarg:ModifyWalkSpeed(8)
- Saurfang:RegisterEvent("Saurfang_Fly_Up_To_His_Doom_Pre", 3000, 1)
- end
- function Saurfang_Fly_Up_To_His_Doom_Pre(Unit, event)
- Saurfang:MoveTo(-504.149, 2210.314, 556.569)
- Saurfang:PlaySoundToSet(17104)
- Sarg:MoveTo(-505.429, 2219.8188, 555.422)
- Sarg:ModifyWalkSpeed(8)
- Reaver:MoveTo(-502.786, 2202.295, 553.395)
- Saurfang:RegisterEvent("Saurfang_Move_Up", 3000, 1)
- end
- function Saurfang_Move_Up(Unit, event)
- Saurfang:CastSpell(43489)
- Sarg:CastSpell(43489)
- Reaver:CastSpell(43489)
- Jr:SendChatMessage(14, 0, "Pathetic old orc. Come then heroes. Come and face the might of the Scourge!")
- Jr:PlaySoundToSet(16706)
- Saurfang:RegisterEvent("Saurfang_Fight_Start", 1200, 1)
- end
- function Saurfang_Fight_Start(Unit, event)
- Jr:SetFaction(14)
- Saurfang:CastSpell(43489)
- end
- function Jr_OnDeath(Unit, event)
- Jr:RemoveEvents()
- Jr:SendChatMessage(14, 0, "I... am... released")
- Jr:PlaySoundToSet(16697)
- Jr:SpawnGameObject(202239, -497.325, 2175.1, 539.2, 300, 360000)
- Saurfang:MoveTo(-544, 2211, 539.2, 0)
- Saurfang:PlaySoundToSet(17105)
- Reaver:Despawn(1000, 0)
- Sarg:Despawn(1000, 0)
- Saurfang:RemoveAura(43489)
- Go:Activate()
- Go:Despawn(1000, 0)
- Saurfang:RegisterEvent("Saurfang_Move_To_Son", 6000, 1)
- end
- RegisterUnitEvent(BOSSID, 4, "Jr_OnDeath")
- function Saurfang_Move_To_Son(Unit, event)
- Saurfang:MoveTo(Jr:GetX(), Jr:GetY(), Jr:GetZ())
- Saurfang:ModifyWalkSpeed(4)
- Saurfang:RegisterEvent("Saurfang_Talk_End_Pre", 10000, 1)
- end
- function Saurfang_Talk_End_Pre(Unit, event)
- Saurfang:SendChatMessage(12, 0, "You will have a proper ceremony in Nagrand next to the pyres of your mother and ancestors")
- Saurfang:PlaySoundToSet(17101)
- Saurfang:Emote(18, 4000)
- Jr:Despawn(3000, 0)
- Saurfang:MoveTo(-549.393, 2211.132, 539.290)
- Saurfang:RegisterEvent("Saurfang_Talk_End_Faceing", 16000, 1)
- end
- function Saurfang_Talk_End_Faceing(Unit, event)
- Saurfang:SetFacing(6.2)
- Saurfang:RegisterEvent("Saurfang_Talk_End_Final", 2000, 1)
- end
- function Saurfang_Talk_End_Final(Unit, event)
- Saurfang:SendChatMessage(12, 0, "Honor yount heros... No matter how dire the battle... Never forsake it!")
- Saurfang:PlaySoundToSet(17102)
- Saurfang:Emote(1, 3000)
- Saurfang:Despawn(5000, 0)
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement