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
Is Possible to Use a PP Buffs out off pt or Maybe Buff and leave party ?!! Angel Well I'm playing Interlud ...
Use command in chat /recstart_"scriptname" to register your skill's Id by using them, then /recstop
Open the file .txt saved into your script folder with l2scripteditor, then on a new "page" paste this script (last post) that i made yesterday for WC's buffs, and just change buff's ID With yours....

http://forum.l2tower.eu/showthread.php?tid=3463

    LUA Programming
ShowToClient("SYS","Script for buff detect started");
DCName = ""; --here write name of your DoomCryer
DDName = ""; --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(1002) == false) or  --Flame chant
		(GetMe():GotBuff(1562) == false) or -- Chant of Berserkeror 
		(GetMe():GotBuff(1006) == false) or -- Chant of Fire 
		(GetMe():GotBuff(1309) == false) or -- Chant of Eagle
		(GetMe():GotBuff(1362) == false) or -- Chant of Spirit or
		(GetMe():GotBuff(1390) == false) or -- War Chant
		(GetMe():GotBuff(1461) == false) or -- Chant of Protection
		(GetMe():GotBuff(1284) == false) or -- Chant of Revenge
		(GetMe():GotBuff(1535) == false) or -- Chant of Movement
		(GetMe():GotBuff(1519) == false) or -- Chant of Blood Awakening
		(GetMe():GotBuff(1518) == false) or -- Chant of Critical Attack
		(GetMe():GotBuff(1517) == false) or -- Chant of Combat
		(GetMe():GotBuff(1549) == false) or -- Chant of Elements
		(GetMe():GotBuff(1363) == false)) -- Chant of Victory
 
 
 
		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(1002)) or  --Flame chant
		(GetMe():GotBuff(1562)) or -- Chant of Berserkeror 
		(GetMe():GotBuff(1006)) or -- Chant of Fire 
		(GetMe():GotBuff(1309)) or -- Chant of Eagle
		(GetMe():GotBuff(1362)) or -- Chant of Spirit or
		(GetMe():GotBuff(1390)) or -- War Chant
		(GetMe():GotBuff(1461)) or -- Chant of Protection
		(GetMe():GotBuff(1284)) or -- Chant of Revenge
		(GetMe():GotBuff(1535)) or -- Chant of Movement
		(GetMe():GotBuff(1519)) or -- Chant of Blood Awakening
		(GetMe():GotBuff(1518)) or -- Chant of Critical Attack
		(GetMe():GotBuff(1517)) or -- Chant of Combat
		(GetMe():GotBuff(1549)) or -- Chant of Elements
		(GetMe():GotBuff(1363)))and -- Chant of Victory
 
		(WhoToInv:IsMyPartyMember() == true);
 
		ShowToClient("SYS", "Buffs up, leaving pt...");
		Sleep(8000);
		Command("/dismiss "..DCName); 
        Sleep(800);
	end;
	Sleep(1000);
until false;

Thanks Man Tongue Gona try it and Coming bakc if i had some problems Wink

Won't Work i Change buffs Id and write Dcname and ddname but nothing
.... You have to set up buffs with normal l2tower settings and then activate script only on char that must be buffed, and auto party accept on pp...
(05-30-2012 01:45 AM)TheBl4ckPhoenix Wrote: [ -> ].... You have to set up buffs with normal l2tower settings and then activate script only on char that must be buffed, and auto party accept on pp...

Oks Gona try it and back Wink Smile

(05-30-2012 15:25 PM)pegas20 Wrote: [ -> ]
(05-30-2012 01:45 AM)TheBl4ckPhoenix Wrote: [ -> ].... You have to set up buffs with normal l2tower settings and then activate script only on char that must be buffed, and auto party accept on pp...

Oks Gona try it and back Wink Smile

I do every thing you said and when i use //Cfg --> Script --> 123456.lua he write me C:\User...Tower\Script\123456.lua:66: and wont work
.... Did you add buffer name (DCname = " ") and main char name (DDname = " ") in the script?
(05-30-2012 16:51 PM)TheBl4ckPhoenix Wrote: [ -> ].... Did you add buffer name (DCname = " ") and main char name (DDname = " ") in the script?

Yep Sure !! and change the buffs ID
Post it here
(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;
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;

Pages: 1 2 3
Reference URL's