L2Tower Discord Let's keep the community alive with discord. Discussions about plugins and scripts L2Tower Discord

Post Reply 
 
Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
TOGGLE SKILLS
Author Message
aut0matic Offline
Expired VIP Member
**

Posts: 107
Joined: Aug 2014
Reputation: 4
Version: 1.4.3.143
Post: #1
TOGGLE SKILLS

is there a plugin where toggle skills like forces and dual maximum HP are activated?
05-15-2015 18:10 PM
Find all posts by this user Quote this message in a reply
capucine Offline
Expired VIP Member
**

Posts: 1,083
Joined: Jan 2013
Reputation: 208
Version: 1.4.2.142
Post: #2
RE: TOGGLE SKILLS

(05-15-2015 18:10 PM)aut0matic Wrote:  is there a plugin where toggle skills like forces and dual maximum HP are activated?

there was a DD AIO script that was posted, don't remember the exact name

try search ddaio or something like that...
05-15-2015 18:27 PM
Find all posts by this user Quote this message in a reply
Fox Away
Fraka-kaka-kaka-kaka-kow!
******

Posts: 5,632
Joined: Oct 2011
Reputation: -6666548
Version: 1.4.2.142
Post: #3
RE: TOGGLE SKILLS

you don't need scripts for this set them up in party buff by user whit no T requred

Heart
05-15-2015 20:10 PM
Visit this user's website Find all posts by this user Quote this message in a reply
TheQQmaster Offline
Trolling the Trolls
*****

Posts: 1,532
Joined: Jun 2012
Reputation: 642
Version: 1.4.2.133
Post: #4
RE: TOGGLE SKILLS

    LUA Programming
me = GetMe();
 
DelaySleepSkill = 500;					-- delay after skill use
DelaySleepRepeat = 3*1000;				-- dealy repeat loop
 
DualHPSkillId = 1986;					-- Dual Maximum HP
DualHPSkill = GetSkills():FindById(DualHPSkillId);
 
TankAura = true;					-- Auto Tank Aura (false/true)(enables auto Rage aura, etc)
CubicSummon = true;					-- Auto Summon Cubic (atm only for dark elf tank)
 
 
AuraResistanceID = 10034;				-- Aura Resistance
ChallengeAuraID = 10030;				-- Challenge Aura
IronAuraID = 10032;					-- Iron Aura
RageAuraID = 10028;					-- Rage Aura
RecoveryAuraID = 10036;					-- Recovery Aura
SpiritAuraID = 10038;					-- Spirit Aura
 
DefaultTankSelfAura = ChallengeAuraID;			-- default aura, if u enable other, it will not switch it, only enables if no aura @ all
 
 
FeohPetSummon = true;					-- feoh pet summon
 
 
TankPetSummon = true;					-- eanbale tank pet summon, DA
TankPetActionID = 1143;					--(1142	Panther Roar, 1143 Panther Stun)
 
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)
BeastSS = "Beast Soulshot";				-- Shot name for pets
BeastSSMinCount = 5000;					-- value * 1k to start shot summon
CrystalNameCount = "Crystal (R-grade)";			-- Crystal Name
CubicSummonWyn = true;					-- Wynn cubic summon after it ends
 
 
 
-- CAN I USE SKILL
function SkillUsageChecker(skillID)
	local Skill = GetSkills():FindById(skillID);
	if (Skill ~= nil) and (Skill:IsSkillAvailable()) and (Skill:CanBeUsed()) then		
		UseSkillRaw(skillID, false, false);
		Sleep(DelaySleepSkill);
	end;	
end;
 
-- 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()
 local me = GetMe();
	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;
 
 
----------------------------
----------- MAIN -----------
----------------------------
 
 
-- SIGEL
if (me:GetClass() == 148) or (me:GetClass() == 149)  or (me:GetClass() == 150)  or (me:GetClass() == 151) then
	ShowToClient(tostring(os.date("%X")),"SIGEL AURA ON",3);
 
	ShotsActivated = false;
	me = GetMe();
	MySkills = GetSkills();
	repeat
		target = GetTarget();
		pet = GetPet();
		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(1000);
						end;
					end;
					if not me:HaveCubic(20) then
						if (MySkills:FindById(10079) ~= nil) then
							UseSkillRaw(10079,false,false); -- Summon Phantom Cubic
							Sleep(1000);
						end;
					end;
				end;
			end;	
			if (me:GetClass() == 149) then
				if TankPetSummon then
					if pet == nil then
						UseSkillRaw(10068,false,false); 
						ShotsActivated = false;
						Sleep(1000);
					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 (TankPetActionID > 0) then
								Action(TankPetActionID,false,false);
								Sleep(1000);
							end;
						end;
					end;
				end;
			end;
			if not me:GotBuff(1927) or not me:GotBuff(DefaultTankSelfAura) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(1927) ~= nil) and not me:GotBuff(1927) then
					UseSkillRaw(1927,false,false);
					Sleep(1000);
				end;
				if TankAura then
					if not me:GotBuff(AuraResistanceID) and not (me:GotBuff(ChallengeAuraID)) and not (me:GotBuff(IronAuraID)) and not (me:GotBuff(RageAuraID)) and not (me:GotBuff(RecoveryAuraID)) and not (me:GotBuff(SpiritAuraID)) then
						SkillUsageChecker(DefaultTankSelfAura);
					end;
				end;
				if (DualHPSkill ~= nil) and not me:GotBuff(DualHPSkillId) then
					UseSkillRaw(DualHPSkillId,false,false);
					Sleep(1000);
				end;
			end;
		end;
	Sleep(1000);
	until false;
 
end;
 
 
--   Eviscerator
if (me:GetClass() == 188) then
	ShowToClient(tostring(os.date("%X")),"EVISCERATOR AURA ON",3);
	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(30602) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(30602) ~= nil) and not me:GotBuff(30602) then
					UseSkillRaw(30602,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;
 
 
--  Sayhas Seer
if (me:GetClass() == 189) then
	ShowToClient(tostring(os.date("%X")),"SAYHAS SEER AURA ON",3);
	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(30605) or not me:GotBuff(DualHPSkillId) then
				if (MySkills:FindById(30605) ~= nil) and not me:GotBuff(30605) then
					UseSkillRaw(30605,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;
 
 
 
 
--  AEORE
if (me:GetClass() == 179) or (me:GetClass() == 180) or (me:GetClass() == 181) then
	ShowToClient(tostring(os.date("%X")),"AERO AURA ON",3);
	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;
 
 
---- WYNN ----
if (me:GetClass() == 176) or (me:GetClass() == 177) or (me:GetClass() == 178) then
	ShotsActivated = false;
	ShowToClient(tostring(os.date("%X")),"WYNN AURA ON",3);
 
	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 CubicSummonWyn then
				if not me:HaveCubic(15) then
					if (MySkills:FindById(11268) ~= nil) then
						UseSkillRaw(11268,false,false); -- Summon Avenging Cubic
						Sleep(1000);
					end;
				end;
			end;	
 
 
 
			if WynPetSummon then
				if not me:GotBuff(11270) then
					if isTransferPainNeedActivation() then
						if (MySkills:FindById(11270) ~= nil) 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
	ShowToClient(tostring(os.date("%X")),"FEOH AURA ON",3);
 
	me = GetMe();
	MySkills = GetSkills();
	repeat
		pet = GetPet();
		if (GetMe():IsAlikeDeath() == true)then
			Sleep(5*1000)
			repeat
				Sleep(1000);
			until (GetMe():IsAlikeDeath() == false);
		end;
 
		if (me ~= nil) then
			if (me:GetClass() == 167) then
				if FeohPetSummon then
					if pet == nil then
						UseSkillRaw(1129,false,false); 
						Sleep(1000);
					end;
				end;
				if not me:GotBuff(1262) then
					if isTransferPainNeedActivation() then
						if (MySkills:FindById(1262) ~= nil) then
							UseSkillRaw(1262,false,false);
							Sleep(4*1000);
						end;
					end;
				end;
			end;
 
 
			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
	ShowToClient(tostring(os.date("%X")),"OTHELL AURA ON",3);
 
	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
	ShowToClient(tostring(os.date("%X")),"YUL AURA ON",3);
 
	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
	ShowToClient(tostring(os.date("%X")),"TYRR AURA ON",3);
 
	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
	ShowToClient(tostring(os.date("%X")),"ISS DUAL HP Skill ON",3);
 
	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;


PUSH [Image: knUu53] IF HELPED
(This post was last modified: 05-15-2015 21:22 PM by TheQQmaster.)
05-15-2015 21:21 PM
Visit this user's website Find all posts by this user Quote this message in a reply
 Reputed by : benbt91(+2) , eau2lourde(+1)
Post Reply 


Possibly Related Threads...
Thread: Author Replies: Views: Last Post
  Interlude skills help evapore 2 2,743 08-02-2015 02:41 AM
Last Post: Fox
  about skills drake182 0 2,086 05-27-2015 23:12 PM
Last Post: drake182
  [BUG] Ertheia Skills veinha 3 3,815 04-11-2015 12:12 PM
Last Post: plixplox
  Pet Skills lilscout 3 4,607 03-29-2015 18:07 PM
Last Post: capucine
  Open Window Skills Table benbt91 8 5,252 03-22-2015 08:13 AM
Last Post: benbt91
  percentage skills reus xanoch666 3 3,386 11-05-2014 16:08 PM
Last Post: Vinter
Information Load or save Skills Setup !! JuZioo 1 2,375 11-01-2014 11:58 AM
Last Post: plixplox
  It recognises chr's item-hp-skills etc but doesn't work d3adlock 0 2,102 09-30-2014 17:11 PM
Last Post: d3adlock
  Shield Focus Toggle Script tophersoccer 3 2,585 08-13-2014 20:34 PM
Last Post: tophersoccer
Information Tyrr maestro stops use nukes and toggle skill Botter100 5 5,188 06-24-2014 08:37 AM
Last Post: vochikien



User(s) browsing this thread: 1 Guest(s)