pegas20
Goblin Grave Robber
Posts: 12
Joined: May 2012
Reputation: 0
Version:
1.4.1.118
|
RE: PP BUFFS
(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 ?!
|
|
05-30-2012 19:18 PM |
|
pegas20
Goblin Grave Robber
Posts: 12
Joined: May 2012
Reputation: 0
Version:
1.4.1.118
|
RE: PP BUFFS
(05-30-2012 19:23 PM)TheBl4ckPhoenix Wrote: yes.
click both buttons
XD 50% works inv and got buffs but no dismiss from pt
|
|
05-30-2012 20:04 PM |
|
pegas20
Goblin Grave Robber
Posts: 12
Joined: May 2012
Reputation: 0
Version:
1.4.1.118
|
RE: PP BUFFS
(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
|
|
05-30-2012 20:24 PM |
|
pegas20
Goblin Grave Robber
Posts: 12
Joined: May 2012
Reputation: 0
Version:
1.4.1.118
|
RE: PP 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
(This post was last modified: 05-30-2012 21:10 PM by pegas20.)
|
|
05-30-2012 20:37 PM |
|
TheBl4ckPhoenix
(^.^)
Posts: 1,871
Joined: Mar 2012
Reputation: 601
Version:
1.4.3.143
|
RE: PP BUFFS
(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;
|
|
06-30-2012 19:37 PM |
|
GrieverFX
Goblin Grave Robber
Posts: 16
Joined: Oct 2011
Reputation: 0
Version:
1.4.3.143
|
RE: PP BUFFS
(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.
|
|
07-07-2012 16:44 PM |
|