Lineage 2 Tower Forum

Lineage 2 Tower Forum > Lineage 2 Tower - General > General Discussion - English > Solo iss+summoner scripts combo
Full Version: Solo iss+summoner scripts combo
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Pages: 1 2 3 4 5 6 7 8 9 10 11 12

capucine

08-02-2014, 01:57 AM
(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;

dalmas

08-09-2014, 22:02 PM
The AioSummoner v3 script worked like a charm until ertheia update. Now it does summon pets but it doesn't do any heal, any solution?
Big GrinBig GrinBig Grin

zition

08-18-2014, 00:09 AM
edit skills id
PHP Code:
function GetServitorHealSkill()
    ServitorHealSkill = nil;
    ServitorHealSkill = MySkills:FindById(11302); -- Major Servitor heal
    if (ServitorHealSkill == nil) or not ServitorHealSkill:IsSkillAvailable() then    
 ServitorHealSkill = MySkills:FindById(1127); -- Servitor Heal
    end;
    
    if (ServitorHealSkill == nil) or not ServitorHealSkill:IsSkillAvailable() then    
 ServitorHealSkill = MySkills:FindById(11755); -- Radiant Heal
    end;    
    
    if (ServitorHealSkill == nil) or not ServitorHealSkill:IsSkillAvailable() then    
 ServitorHealSkill = MySkills:FindById(11756); -- Panic Heal
    end; 
    
    if (ServitorHealSkill == nil) or not ServitorHealSkill:IsSkillAvailable() then    
 ServitorHealSkill = MySkills:FindById(1218); --Greater Battle Heal
    end;
    
    if (ServitorHealSkill == nil) or not ServitorHealSkill:IsSkillAvailable() then    
 ServitorHealSkill = MySkills:FindById(1015); -- battle heal
    end;
end; 

macacoprego

08-21-2014, 14:44 PM
it work for like an hour, then i got critical error on the inviter box.

Manboi_74

09-03-2014, 10:25 AM
These has to be an easier way to set up Servitor skill usage then a massively drawn out script like that, surely.

Maybe have the Servitor assist the Master and have a Nuke check list similar to the Masters?

capucine

09-03-2014, 14:11 PM
(09-03-2014 10:25 AM)Manboi_74 Wrote: [ -> ]These has to be an easier way to set up Servitor skill usage then a massively drawn out script like that, surely.

Maybe have the Servitor assist the Master and have a Nuke check list similar to the Masters?

Can't be simpler then this... Put the pet skill on your bar 1 position 6 or modify the script for your shortcut...

+2 rep me if it helped you...!

Since there is no condition at all, it may crash or take more cpu resources...

    LUA Programming 
repeat
 
   Command("/useshortcut 1 6");   
   Sleep(1*1000);    -- 1000ms = 1 sec
 
until false;

Archerakosss

09-10-2014, 22:02 PM
hi guyz i have problem with the leader script or even with the issLindvior script
the leader doesnt kick the iss or iss leave party after buff

anyone knows why?

llbean4106

01-10-2015, 10:11 AM
ya i need some assistance with this here, I powerlevel with my summoner but my iss is to high of a level, I just want my summoner to invite when need buffs and iss will buff then either leave or summoner will kick the iss.

rhadamants

05-10-2015, 00:50 AM
ID skil Greater Servitor Might Wynn Summoner Spectral?

Morgal904

06-09-2015, 14:21 PM
hello have someone ID new summons? for example commando cat and witch cat??
Pages: 1 2 3 4 5 6 7 8 9 10 11 12
Lineage 2 Tower Forum > Lineage 2 Tower - General > General Discussion - English > Solo iss+summoner scripts combo
Reference URL's