DualHPSkillId = 1986; -- Dual Maximum HP
DualHPSkill = GetSkills():FindById(DualHPSkillId); --
WynPetSummon = true; -- Auto Summon Pets & Shots (false/true)
WhenManaPercentIsOver = 50; -- Transfer Pain (101 to not use, 0 to use all time)
SummonType = "m"; -- Changes pet type to summon, (m: magic summons, t: tanking summons, w: warrior summons)
BeastSSSummon = true; -- Auto Shot summon (false/true)
BeastSSMinCount = 5000; -- value * 1k to start shot summon
BeastSS = "Beast Soulshot"; -- Shot name for pets
CrystalNameCount = "Crystal (R-grade)"; -- Crystal Name
-- if you want you servitors to use any particular skill they have otherwise set it -1, for list of servitor/pets skill Ids check each class description
if (me:GetClass() == 177) then -- Wynn Elemental Master
PetActionID = -1; -- Merrow (1130 Unicorn's Aggression, 1131 Unicorn's Stun), Magnus (1132 Unicorn's Bite, 1133 Unicorn's Pounce), Seraphim (1134 Unicorn's Touch, 1135 Unicorn's Power)
elseif (me:GetClass() == 178) then -- Wynn Spectral Master
PetActionID = -1; -- Nightshade (1136 Phantom Aggression, 1137 Phantom Stun), Spectral Lord (1138 Phantom Bite, 1139 Phantom Pounce), Soulless (1140 Phantom Touch, 1141 Phantom Power)
elseif (me:GetClass() == 176) then -- Wynn Arcana Lord
PetActionID = -1; -- Kai the Cat (1124 Feline Aggression, 1125 Feline Stun), Feline King (1126 Feline Bite, 1127 Feline Pounce), Feline Queen (1128 Feline Touch, 1129 Feline Power)
end;
function SummonPetsType(tips)
local me = GetMe();
if (me:GetClass() == 177) then
if (tips == "m") then
return 11331;
elseif (tips == "w") then
return 11330;
elseif (tips == "t") then
return 11329;
end;
end;
if (me:GetClass() == 178) then
if (tips == "m") then
return 11340;
elseif (tips == "w") then
return 11339;
elseif (tips == "t") then
return 11338;
end;
end;
if (me:GetClass() == 176) then
if (tips == "m") then
return 11322;
elseif (tips == "w") then
return 11321;
elseif (tips == "t") then
return 11320;
end;
end;
return -1;
end;
function isTransferPainNeedActivation()
if (me:GetMpPercent() > WhenManaPercentIsOver) then
return true;
end;
return false;
end;
function GetItemAmountByName(name)
local invList = GetInventory();
for item in invList.list do
if (item.Name == name) then
ShotsDisId = item.displayId;
return item.ItemNum;
end;
end;
return 0;
end;
function GetSummonCount()
local petlistaround = GetPetList();
local count = 0;
for Apet in petlistaround.list do
if (Apet:GetNickName() == me:GetName()) then
count = count +1;
end;
end;
return count;
end;
---- WYNN ----
if (me:GetClass() == 176) or (me:GetClass() == 177) or (me:GetClass() == 178) then
ShotsActivated = false;
ShowToClient("Auras","WYNN ON");
me = GetMe();
MySkills = GetSkills();
repeat
target = GetTarget();
if (GetMe():IsAlikeDeath() == true)then
Sleep(5*1000)
repeat
Sleep(1000);
until (GetMe():IsAlikeDeath() == false);
end;
if (me ~= nil) then
if not me:GotBuff(1937) or not me:GotBuff(DualHPSkillId) then
if (MySkills:FindById(1937) ~= nil) and not me:GotBuff(1937) then
UseSkillRaw(1937,false,false);
Sleep(2500);
end;
if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
UseSkillRaw(DualHPSkillId,false,false);
Sleep(2500);
end;
end;
if WynPetSummon then
if not me:GotBuff(11270) then
if isTransferPainNeedActivation() then
if (MySkills:FindById(11270) ~= nil) and not me:GotBuff(11270) then
UseSkillRaw(11270,false,false);
Sleep(4*1000);
end;
end;
end;
if (GetSummonCount() < 2) then
if (GetSummonCount() == 0) then
ShotsActivated = false;
end;
if (SummonPetsType(SummonType) > 0) then
UseSkillRaw(SummonPetsType(SummonType),false,false);
Sleep(1000*2);
ShotsActivated = false;
end;
end;
if BeastSSSummon then
if (GetItemAmountByName(BeastSS) < BeastSSMinCount*1000) then
if (GetItemAmountByName(BeastSS) == 0) then
ShotsActivated = false;
end;
if (MySkills:FindById(11316) ~= nil) and GetItemAmountByName(CrystalNameCount) > 0 and(MySkills:FindById(11316):IsSkillAvailable()) then
UseSkillRaw(11316,false,false);
Sleep(5000);
end;
end;
end;
if not (ShotsActivated) and (GetSummonCount() > 0) and (GetItemAmountByName(BeastSS) > 5) then
ActivateSoulShot(ShotsDisId, true);
ShotsActivated = true;
Sleep(2*1000);
end;
if (target ~= nil) and (me ~= nil) and target:IsMonster() and (GetSummonCount() > 0) and (target:GetDistance() < 1000) then
if not (target:IsAlikeDeath()) then
if (PetActionID > 0) then
Action(PetActionID,false,false);
Sleep(1000);
end;
end;
end;
end;
end;
Sleep(5*1000);
until false;
end;
PUSH IF HELPED
(This post was last modified: 05-08-2014 14:15 PM by TheQQmaster.)
This AllWynPetSummon works perfect except the pets skills (tested after ertheia update ) and if you can add pet heal it would be awesome, thank you for sharing it
since we talking about summoners here anyone have a script for sh2 i wanan hit yin to summon mobs then attack mobs not just keep attacking yin cause it never goes away
have a qustion ill show the script i use for arcana lord summoner but it wont switch betweens summons to heal only heals the summon thats first any idea