capucine 
 
 
		
			Expired VIP Member 
			   
			
			 
			
Posts: 1,083 
Joined: Jan 2013
 Reputation: 208
 
Version: 
1.4.2.142
  
		
	 | 
	
		
			
RE: Solo iss+summoner scripts combo 
			 
			
				 (08-02-2014 01:45 AM)pushiputak Wrote:  is it possible guys with this script pet summons to use skills also :? 
Here is the script im using for "mage" summons and it uses aoe skill...
 
+2 rep me if it helped you...!
     LUA Programming
	me = GetMe();
 
TankAura = true;					-- Auto Tank Aura (false/true)(enables auto Rage aura, etc)
CubicSummon = true;					-- Auto Summon Cubic (atm only for dark elf tank)
TankAuraSkillId = 10030;				-- 10028:Rage, 10032:Iron, 10030:Challenge (find id of skill for tank auras)
TankAuraSkill = GetSkills():FindById(TankAuraSkillId);	-- 
 
DualHPSkillId = 1986;					-- Dual Maximum HP
DualHPSkill = GetSkills():FindById(DualHPSkillId);	-- 
 
WynPetSummon = true;					-- Auto Summon Pets & Shots (false/true)
WhenManaPercentIsOver = 0;				-- 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 = 1135; 					-- 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 = 1141; 					-- 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 = -1129; 					-- 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;
 
 
--   AEORE   --
if (me:GetClass() == 179) or (me:GetClass() == 180) or (me:GetClass() == 181) then
	ShowOnScreen(2,1000,0,"Auras ON - AERO");
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if not me:GotBuff(1939) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(1939) ~= nil) and not me:GotBuff(1939) then
					UseSkillRaw(1939,false,false);
					Sleep(2500);
				end;
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
end;
 
---- SIGEL ----
if (me:GetClass() == 148) or (me:GetClass() == 149)  or (me:GetClass() == 150)  or (me:GetClass() == 151) then
	ShowOnScreen(2,1000,0,"Auras ON - Sigel");
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if CubicSummon then
				if not me:HaveCubic(16) then
					if (MySkills:FindById(10043) ~= nil) then
						UseSkillRaw(10043,false,false); -- Summon Knight Cubic
						Sleep(1000);
					end;
				end;
				if (me:GetClass() == 151) then			
					if not me:HaveCubic(21) then
						if (MySkills:FindById(10080) ~= nil) then
							UseSkillRaw(10080,false,false); -- Summon Hex Cubic
							Sleep(1500);
						end;
					end;
					if not me:HaveCubic(20) then
						if (MySkills:FindById(10079) ~= nil) then
							UseSkillRaw(10079,false,false); -- Summon Phantom Cubic
							Sleep(1500);
						end;
					end;
				end;
			end;
 
			if not me:GotBuff(1927) or not me:GotBuff(TankAuraSkillId) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(1927) ~= nil) and not me:GotBuff(1927) then
					UseSkillRaw(1927,false,false);
					Sleep(2500);
				end;
				if TankAura then
					if (TankAuraSkill ~= nil) and not me:GotBuff(TankAuraSkillId) then
						UseSkillRaw(TankAuraSkillId,false,false);
						Sleep(2500);
					end;
				end;
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
 
end;
 
---- WYNN ----
if (me:GetClass() == 176) or (me:GetClass() == 177) or (me:GetClass() == 178) then
	ShotsActivated = false;
	ShowOnScreen(2,1000,0,"Auras ON - WYNN");
 
	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);
						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(400);
						end;
					end;
				end;
				if not (ShotsActivated) and (GetSummonCount() > 0) and (GetItemAmountByName(BeastSS) > 5) then
					ActivateSoulShot(ShotsDisId, true);
					ShotsActivated = true;
					Sleep(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(400);
						end;
					end;
				end;
			end;
		end;
	Sleep(1*1000);
	until false;
 
 
end;
 
---- FEOH ----
if (me:GetClass() == 166) or (me:GetClass() == 167) or (me:GetClass() == 168) or (me:GetClass() == 169)  or (me:GetClass() == 170) then
	ShowOnScreen(2,1000,0,"Auras ON - FEOH");
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if not me:GotBuff(1935) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(1935) ~= nil) and not me:GotBuff(1935) then
					UseSkillRaw(1935,false,false);
					Sleep(2500);
				end;
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
 
end;
 
---- OTHELL ----
if (me:GetClass() == 158) or (me:GetClass() == 159) or (me:GetClass() == 160) or (me:GetClass() == 161) then
	ShowOnScreen(2,1000,0,"Auras ON - OTHELL");
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if not me:GotBuff(1931) or not me:GotBuff(DualHPSkillId)  then
				if (MySkills:FindById(1931) ~= nil) and not me:GotBuff(1931) then
					UseSkillRaw(1931,false,false);
					Sleep(2500);
				end;
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
 
end;
 
---- YUL ----
if (me:GetClass() == 162) or (me:GetClass() == 163) or (me:GetClass() == 164) or (me:GetClass() == 165)then
	ShowOnScreen(2,1000,0,"Auras ON - YUL");
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if not me:GotBuff(1933) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(1933) ~= nil) and not me:GotBuff(1933) then
					UseSkillRaw(1933,false,false);
					Sleep(2500);
				end;
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
 
end;
 
---- TYRR ----
if (me:GetClass() == 152) or (me:GetClass() == 153) or (me:GetClass() == 154) or (me:GetClass() == 155) or (me:GetClass() == 156) or (me:GetClass() == 157) then
	ShowOnScreen(2,1000,0,"Auras ON - TYRR");
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if not me:GotBuff(1929) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(1929) ~= nil) and not me:GotBuff(1929) then
					UseSkillRaw(1929,false,false);
					Sleep(2500);
				end;
 
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
 
end;
 
---- ISS ----
if (me:GetClass() == 171) or (me:GetClass() == 172) or (me:GetClass() == 173) or (me:GetClass() == 174) or (me:GetClass() == 175) then
	ShowOnScreen(2,1000,0,"Auras ON - ISS");
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if not me:GotBuff(DualHPSkillId) then
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(2500);
				end;
			end;
		end;
	Sleep(10*1000);
	until false;
 
end;  
			 
			
			
			
		 |  
	 
 |