Lineage 2 Tower Forum

Full Version: PP BUFFS
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Pages: 1 2 3
(05-30-2012 18:58 PM)TheBl4ckPhoenix Wrote: [ -> ]fixed:

    LUA Programming
ShowToClient("SYS","Script for buff detect started");
PPName = "Annouche"; --here write name of your PPname
DDName = "BoufihBoufih"; --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) == false) and -- Mental Shield
(GetMe():GotBuff(1036) == false) and -- Magic Barrier
(GetMe():GotBuff(1040) == false) and -- Shield 
(GetMe():GotBuff(1045) == false) and -- Blessed Body
(GetMe():GotBuff(1048) == false) and -- Blessed Soul
(GetMe():GotBuff(1077) == false) and -- Focus
(GetMe():GotBuff(1240) == false) and -- Guidance
(GetMe():GotBuff(1242) == false) and -- Death Whisper
(GetMe():GotBuff(1243) == false) and -- Bless Shield
(GetMe():GotBuff(1204) == false) and -- Wind Walk
(GetMe():GotBuff(1086) == false) and -- Haste
(GetMe():GotBuff(1068) == false) and -- Might
(GetMe():GotBuff(1044) == false) and -- Regeneration
(GetMe():GotBuff(1388) == false))and -- Greater Might
(WhoToInv:IsMyPartyMember() == true);
 
ShowToClient("SYS", "Buffs up, leaving pt...");
Sleep(8000);
Command("/dismiss "..PPName); 
Sleep(800);
end;
Sleep(1000);
until false;


you have change something ? and to activat script i have to click th play button right ?!
yes.

click both buttons
(05-30-2012 19:23 PM)TheBl4ckPhoenix Wrote: [ -> ]yes.

click both buttons


XD 50% works inv and got buffs but no dismiss from pt Exclamation
becouse you didn't set up ALL THE BUFFs,

check again buff list....

it will leave pt only when all buffs are up...
(05-30-2012 20:20 PM)TheBl4ckPhoenix Wrote: [ -> ]becouse you didn't set up ALL THE BUFFs,

check again buff list....

it will leave pt only when all buffs are up...

i'm perty sure that i set up all buffs but no in order .. and i add more but no leave
check again... they must be 14 buffs
He buff 1st 2 buffs then he leave and invite again 2 more buffs and leave then invite again buff all buffs and no /dismiss
(05-30-2012 18:37 PM)pegas20 Wrote: [ -> ]
(05-30-2012 18:13 PM)TheBl4ckPhoenix Wrote: [ -> ]Post it here


ShowToClient("SYS","Script for buff detect started");
DCName = "Annouche"; --here write name of your DoomCryer
DDName = "BoufihBoufih"; --write name of char you want buff

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


repeat
if(GetUserByName(DCName) == nil)then
ShowToClient("SYS","Your buffer is out of range, w8ing on him");
repeat
Sleep(1000);
until (GetUserByName(DCName) ~= nil);
ShowToClient("SYS","Your buffer is in range");
WhoToInv = GetUserByName(DCName);
elseif(GetUserByName(DCName) ~= nil)then
WhoToInv = GetUserByName(DCName);
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)) -- Greater Might



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

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

repeat
Sleep(500);

until((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)) -- Greater Might

(WhoToInv:IsMyPartyMember() == true);

ShowToClient("SYS", "Buffs up, leaving pt...");
Sleep(8000);
Command("/dismiss "..DCName);
Sleep(800);
end;
Sleep(1000);
until false;

LOL DUDE, i just discovered that the script doesn't work properly coz when i gave you the script you ,instead of add buffs id, modified(wrong) it... Then when i was trying to fix it i didn't noticed what u have done...

In the second part of script, the second buff list, the " == false" line must be deleted...

So it should be like this:

    LUA Programming
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(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;

(05-30-2012 19:23 PM)TheBl4ckPhoenix Wrote: [ -> ]click both buttons
You mean click the '>' and the 'circle arrow' button? Because often that when I click one of the button then the button become 1 'x' button.
Your script above, after it runs for couple of hours, it will not dismiss PP even after all buffs are up. I don't know what is wrong but maybe you can help me with this.
With ' > ' it will run script 1 time
With ' > ' + ' circle' it will run in loop the script, then it will appear a ' x ' (use it to STOP the script)


If after a while the script stop working is becouse of your pc, it isn't a script problem
Pages: 1 2 3
Reference URL's