L2Tower Discord Let's keep the community alive with discord. Discussions about plugins and scripts L2Tower Discord
Lineage 2 Tower Forum / Lineage 2 Tower - General / General Discussion - English v / PP BUFFS

Thread Closed 
 
Thread Rating:
  • 16 Vote(s) - 3.25 Average
  • 1
  • 2
  • 3
  • 4
  • 5
PP BUFFS
Author Message
Sholer Offline
Elpy
*

Posts: 2
Joined: Aug 2012
Reputation: 0
Version: 1.4.1.101
Post: #21
RE: PP BUFFS

(05-30-2012 18:13 PM)TheBl4ckPhoenix Wrote:  Post it here

So it should be like this:

    LUA Programming 
ShowToClient("SYS","Script for buff detect started");
PPName = " xxx "; --here write name of your PPname
DDName = " yyy "; --write name of char you want buff
 
SendInvIfBufferInRange = 800;
----------------------------------------------------------------
WhoToInv = nil;
 
 
repeat
if(GetUserByName(PPName) == nil)then
ShowToClient("SYS","Your buffer is out of range, w8ing on him");
repeat
Sleep(1000);
until (GetUserByName(PPName) ~= nil);
ShowToClient("SYS","Your buffer is in range");
WhoToInv = GetUserByName(PPName);
elseif(GetUserByName(PPName) ~= nil)then
WhoToInv = GetUserByName(PPName);
end;
 
if((GetMe():GotBuff(1035) == false) or -- Mental Shield
(GetMe():GotBuff(1036) == false) or -- Magic Barrier
(GetMe():GotBuff(1040) == false) or -- Shield 
(GetMe():GotBuff(1045) == false) or -- Blessed Body
(GetMe():GotBuff(1048) == false) or -- Blessed Soul
(GetMe():GotBuff(1077) == false) or -- Focus
(GetMe():GotBuff(1240) == false) or -- Guidance
(GetMe():GotBuff(1242) == false) or -- Death Whisper
(GetMe():GotBuff(1243) == false) or -- Bless Shield
(GetMe():GotBuff(1204) == false) or -- Wind Walk
(GetMe():GotBuff(1086) == false) or -- Haste
(GetMe():GotBuff(1068) == false) or -- Might
(GetMe():GotBuff(1044) == false) or -- Regeneration
(GetMe():GotBuff(1388) == false)) and -- Greater Might
 
(WhoToInv ~= nil) and 
(WhoToInv:IsMyPartyMember() == false) and
(GetMe():GetRangeTo(WhoToInv) < SendInvIfBufferInRange)then
 
ShowToClient("SYS", "Inviting " ..PPName .. " for buff");
Sleep(800);
Command("/invite "..PPName);
 
repeat 
Sleep(500);
 
until((GetMe():GotBuff(1035) ) and -- Mental Shield
(GetMe():GotBuff(1036) ) and -- Magic Barrier
(GetMe():GotBuff(1040) ) and -- Shield 
(GetMe():GotBuff(1045) ) and -- Blessed Body
(GetMe():GotBuff(1048) ) and -- Blessed Soul
(GetMe():GotBuff(1077) ) and -- Focus
(GetMe():GotBuff(1240) ) and -- Guidance
(GetMe():GotBuff(1242) ) and -- Death Whisper
(GetMe():GotBuff(1243) ) and -- Bless Shield
(GetMe():GotBuff(1204) ) and -- Wind Walk
(GetMe():GotBuff(1086) ) and -- Haste
(GetMe():GotBuff(1068) ) and -- Might
(GetMe():GotBuff(1044) ) and -- Regeneration
(GetMe():GotBuff(1388) )) and -- Greater Might
(WhoToInv:IsMyPartyMember() == true);
 
ShowToClient("SYS", "Buffs up, leaving pt...");
Sleep(8000);
Command("/dismiss "..PPName); 
Sleep(800);
end;
Sleep(1000);
until false;


[/quote]

I converted the script, but I do not know whether correctly. My WC adds to the party, but does not give buffs and for a moment dismiss following step.

This is my script:

ShowToClient("SYS","Script for buff detect started");
PPName = ""; --here write name of your PPname
DDName = ""; --write name of char you want buff

SendInvIfBufferInRange = 800;
----------------------------------------------------------------
WhoToInv = nil;


repeat
if(GetUserByName(PPName) == nil)then
ShowToClient("SYS","Your buffer is out of range, w8ing on him");
repeat
Sleep(1000);
until (GetUserByName(PPName) ~= nil);
ShowToClient("SYS","Your buffer is in range");
WhoToInv = GetUserByName(PPName);
elseif(GetUserByName(PPName) ~= nil)then
WhoToInv = GetUserByName(PPName);
end;

if(GetMe():GotBuff(1006) == false) or -- Chant of Fire
(GetMe():GotBuff(1007) == false) or -- Chant of Battle
(GetMe():GotBuff(1009) == false) or -- Chant of Shielding
(GetMe():GotBuff(1310) == false) or -- Chant of Vampire
(GetMe():GotBuff(1253) == false) or -- Chant of Rage
(GetMe():GotBuff(1252) == false) or -- Chant of Evasion
(GetMe():GotBuff(1251) == false) or -- Chant of Fury
(GetMe():GotBuff(1308) == false) or -- Chant of Predator
(GetMe():GotBuff(1309) == false) or -- Chant of Eagle
(GetMe():GotBuff(1390) == false) or -- War Chant

(WhoToInv ~= nil) and
(WhoToInv:IsMyPartyMember() == false) and
(GetMe():GetRangeTo(WhoToInv) < SendInvIfBufferInRange)then

ShowToClient("SYS", "Inviting " ..PPName .. " for buff");
Sleep(800);
Command("/invite "..PPName);

repeat
Sleep(500);

until(GetMe():GotBuff(1006) == false) or -- Chant of Fire
(GetMe():GotBuff(1007) == false) or -- Chant of Battle
(GetMe():GotBuff(1009) == false) or -- Chant of Shielding
(GetMe():GotBuff(1310) == false) or -- Chant of Vampire
(GetMe():GotBuff(1253) == false) or -- Chant of Rage
(GetMe():GotBuff(1252) == false) or -- Chant of Evasion
(GetMe():GotBuff(1251) == false) or -- Chant of Fury
(GetMe():GotBuff(1308) == false) or -- Chant of Predator
(GetMe():GotBuff(1309) == false) or -- Chant of Eagle
(GetMe():GotBuff(1390) == false) or -- War Chant

(WhoToInv:IsMyPartyMember() == true);

ShowToClient("SYS", "Buffs up, leaving pt...");
Sleep(8000);
Command("/dismiss "..PPName);
Sleep(800);
end;
Sleep(1000);
until false;
(This post was last modified: 08-25-2012 19:08 PM by Sholer.)
08-25-2012 19:08 PM
Find all posts by this user
Thread Closed 


Messages In This Thread
PP BUFFS - pegas20 - 05-29-2012, 02:22 AM
RE: PP BUFFS - TheBl4ckPhoenix - 05-29-2012, 05:39 AM
RE: PP BUFFS - pegas20 - 05-29-2012, 22:45 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 01:45 AM
RE: PP BUFFS - pegas20 - 05-30-2012, 15:25 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 16:51 PM
RE: PP BUFFS - pegas20 - 05-30-2012, 18:08 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 18:13 PM
RE: PP BUFFS - pegas20 - 05-30-2012, 18:37 PM
RE: PP BUFFS - TheBl4ckPhoenix - 06-30-2012, 19:37 PM
RE: PP BUFFS - Sholer - 08-25-2012 19:08 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 18:58 PM
RE: PP BUFFS - pegas20 - 05-30-2012, 19:18 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 19:23 PM
RE: PP BUFFS - pegas20 - 05-30-2012, 20:04 PM
RE: PP BUFFS - GrieverFX - 07-07-2012, 16:44 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 20:20 PM
RE: PP BUFFS - pegas20 - 05-30-2012, 20:24 PM
RE: PP BUFFS - TheBl4ckPhoenix - 05-30-2012, 20:29 PM
RE: PP BUFFS - pegas20 - 05-30-2012, 20:37 PM
RE: PP BUFFS - TheBl4ckPhoenix - 07-07-2012, 18:16 PM

Possibly Related Threads...
Thread: Author Replies: Views: Last Post
  //cfg party buffs cant make them work (help) drake182 3 4,106 01-02-2016 05:47 AM
Last Post: Wazzapkhv
  party buffs stopped work buybuy 2 2,923 09-01-2015 19:54 PM
Last Post: buybuy
Thumbs Up Iss Buffs fotarastm 5 6,940 08-29-2015 00:55 AM
Last Post: jokerakos
  Can BOT automate to go back to city for buffs and get back XP? Dmoppers 2 2,963 01-02-2015 21:18 PM
Last Post: tophersoccer
  ISS BUFFS lampie2000 0 2,890 08-15-2014 10:09 AM
Last Post: lampie2000
  L2 Tower v1.4.1.119 Erro = Assist , Follow.Party Buffs penetrafox 12 8,923 05-06-2014 05:31 AM
Last Post: UDP
  For those having trouble w/ h5 auto-party buffs loosefingerz 0 2,225 08-23-2013 06:33 AM
Last Post: loosefingerz
Information Delay between buffs/skills Pauli88 2 3,342 08-12-2013 00:39 AM
Last Post: Pauli88
  Party buffs norvegas25 6 10,053 07-28-2013 16:45 PM
Last Post: jacka147
  bot with out buffs takissss 2 3,224 07-25-2013 00:37 AM
Last Post: wasty



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

Contact Us | Lineage 2 Tower | Return to Top | Return to Content | Lite (Archive) Mode | RSS Syndication