Lua (programmeringssprog): Forskelle mellem versioner
Content deleted Content added
Linje 31:
unit:FullCastSpell(12)
end
Fuldt Script:
function winterchill_start(pUnit, Event)
pUnit:SendChatMessage(14, 0, "The Legion's final conquest has begun! Once again the subjugation of this world is within our grasp. Let none survive!");
pUnit:PlaySoundToSet(11022);
pUnit:RegisterEvent("winterchill_dnd", 100, 0); -- Death and Decay
pUnit:RegisterEvent("winterchill_fa", 100, 0); -- Frost Armor
pUnit:RegisterEvent("winterchill_enrage", 600000, 0); -- Enrage after 10 Minutes
end
function winterchill_dnd(pUnit, Event)
pUnit:RemoveEvents();
local speach = math.random(1, 2);
if (speach == 1) then
pUnit:SendChatMessage(14, 0, "Crumble and rot!");
pUnit:PlaySoundToSet(11023);
elseif (speach == 2) then
pUnit:SendChatMessage(14, 0, "Ashes to ashes, dust to dust");
pUnit:PlaySoundToSet(11055);
end
local oncast = pUnit:GetRandomPlayer(0);
if (oncast ~= nil) then
pUnit:FullCastSpellOnTarget(39658, oncast);
end
-- Next Cast:
local randomtimer = math.random(30000, 60000); -- Timer, as I do not know how often Rage spams his skills, would be nice if anyone could provide me this info
local nextcast = math.random(1, 2);
if (nextcast == 1) then
pUnit:RegisterEvent("winterchill_fb", randomtimer, 0); -- Frost Bolt
elseif (nextcast == 2) then
pUnit:RegisterEvent("winterchill_fn", randomtimer, 0); -- Frost Nova
end
end
function winterchill_fb(pUnit, Event)
pUnit:RemoveEvents();
local speach = math.random(1, 2);
if (speach == 1) then
pUnit:SendChatMessage(14, 0, "Succumb to the icy chill ... of death!");
-- pUnit:PlaySoundToSet(ID); Would be nice if someone has an ID list for me, I didn't find any
elseif (speach == 2) then
pUnit:SendChatMesasge(13, 0, "It will be much colder in your grave.");
-- pUnit:PlaySoundToSet(ID); Would be nice if someone has an ID list for me, I didn't find any
end
local oncast = pUnit:GetRandomPlayer(0);
if (oncast ~= nil) then
pUnit:CastSpellOnTarget(41486, oncast);
end
-- Next Cast:
local randomtimer = math.random(30000, 60000); -- Timer, as I do not know how often Rage spams his skills, would be nice if anyone could provide me this info
local nextcast = math.random(1, 2);
if (nextcast == 1) then
pUnit:RegisterEvent("winterchill_dnd", randomtimer, 0); -- Death and Decay
elseif (nextcast == 2) then
pUnit:RegisterEvent("winterchill_fn", randomtimer, 0); -- Frost Nova
end
end
function winterchill_fn(pUnit, Event)
pUnit:RemoveEvents();
local speach = math.random(1, 2);
if (speach == 1) then
pUnit:SendChatMessage(14, 0, "Succumb to the icy chill ... of death!");
-- pUnit:PlaySoundToSet(ID); Would be nice if someone has an ID list for me, I didn't find any
elseif (speach == 2) then
pUnit:SendChatMesasge(13, 0, "It will be much colder in your grave.");
-- pUnit:PlaySoundToSet(ID); Would be nice if someone has an ID list for me, I didn't find any
end
local oncast = pUnit:GetRandomPlayer(0);
if (oncast ~= nil) then
pUnit:CastSpellOnTarget(31250, oncast);
end
-- Next Cast:
local randomtimer = math.random(30000, 60000); -- Timer, as I do not know how often Rage spams his skills, would be nice if anyone could provide me this info
local nextcast = math.random(1, 2);
if (nextcast == 1) then
pUnit:RegisterEvent("winterchill_dnd", randomtimer, 0); -- Death and Decay
elseif (nextcast == 2) then
pUnit:RegisterEvent("winterchill_fb", randomtimer, 0); -- Frost Bolt
end
end
function winterchill_fa(pUnit, Event)
pUnit:RemoveEvents();
pUnit:CastSpellOnTarget(31256, pUnit);
local randomtimer = math.random(30000, 60000);
pUnit:RegisterEvent("winterchill_fa", randomtimer, 0); -- Frost Armor
end
function winterchill_enrage(pUnit, Event)
pUnit:RemoveEvents();
pUnit:CastSpellOnTarget(46587, pUnit);
end
function winterchill_killplayer(pUnit, Event)
pUnit:RemoveEvents();
local speach = math.random(1, 3);
if (speach == 1) then
pUnit:SendChatMessage(14, 0, "All life must perish!");
pUnit:PlaySoundToSet(11025);
elseif (speach == 2) then
pUnit:SendChatMessage(14, 0, "Your world is ours now!");
pUnit:PlaySoundToSet(11056);
elseif (speach == 3) then
pUnit:SendChatMessage(14, 0, "Victoy to the Legion!");
pUnit:PlaySoundToSet(11057);
end
end
function winterchill_death(pUnit, Event)
pUnit:SendChatMessage(14, 0, "You have won this battle, but not ... the ... war");
pUnit:PlaySoundToSet(11026);
pUnit:RemoveEvents();
end
RegisterUnitEvent(17767, 1, "winterchill_start");
RegisterUnitEvent(17767, 3, "winterchill_killplayer");
RegisterUnitEvent(17767, 4, "winterchill_death");
RegisterUnitEvent(17767, 5, "winterchill_dnd"); --What is AI_Tick?
RegisterUnitEvent(17767, 5, "winterchill_fb");
RegisterUnitEvent(17767, 5, "winterchill_fn");
RegisterUnitEvent(17767, 5, "winterchill_fa");
RegisterUnitEvent(17767, 5, "winterchill_enrage");
== Litteratur ==
| |||