[Lf]Adrenaline Scripts

OLSI · March 3, 2017

Im looking for 2 scripts:

Kill/Res to feed PvP/Pk
After buffs expiring go automatic to Village make the buffs(Scheme) and go back where the farm zone is

camenomat0 · March 6, 2017

Im looking for 2 scripts:

Kill/Res to feed PvP/Pk

After buffs expiring go automatic to Village make the buffs(Scheme) and go back where the farm zone is

for kill/res just create from event window.It's easy to make feed pvp this way.make char attack bot till death,use res when enemy dead and make bot window accept it.run it and you're fine feeding pvp.

As for village rebuff try some shared scripts,just change id buffer,buffs you want to take and locations coordinates

OLSI · March 6, 2017

for kill/res just create from event window.It's easy to make feed pvp this way.make char attack bot till death,use res when enemy dead and make bot window accept it.run it and you're fine feeding pvp.

As for village rebuff try some shared scripts,just change id buffer,buffs you want to take and locations coordinates

How i can make via Event window make the player accept the ressurection?

Edited March 6, 2017 by OLSI

OLSI · March 6, 2017

for kill/res just create from event window.It's easy to make feed pvp this way.make char attack bot till death,use res when enemy dead and make bot window accept it.run it and you're fine feeding pvp.

As for village rebuff try some shared scripts,just change id buffer,buffs you want to take and locations coordinates

var Figth_Flag:boolean;
     Item: TL2Item;
     Npc: TL2Npc;
     Obj: TL2Buff;
     IdBuff: integer;
     Buffs:TL2Buff;
var L2Skill: TL2Skill;


procedure toVillage;
begin
Print('To Village');
  Delay(100);
    if (User.HP=0) then
      begin
       Delay(2000);
       Engine.GoHome;
       Engine.Facecontrol(0,False);
       Buff;
      end;
end;


procedure buff;
begin
     Print('Go Buffer');
     Engine.Settarget(35650); 
     Delay(15000);
     Engine.Settarget(35650);
     Delay(15000);
     Engine.DlgOpen;
     Delay(15000);
     Engine.DlgSel(1);
     Delay(800);
     Engine.DlgSel(5);   //Wind Walk
     Delay(400);
     Engine.DlgSel(7);   //Shield
     Delay(300);
     Engine.DlgSel(8);   //Mental Shield
     Delay(300);
     Engine.DlgSel(9);   //Blessed Body
     Delay(300);
     Engine.DlgSel(10);   //Blessed Soul
     Delay(300);
     Engine.DlgSel(11);   //Magic Barrier
     Delay(300);
     Engine.DlgSel(12);   //Concentration
     Delay(300);
     Engine.DlgSel(13);   //Berserker Spirit
     Delay(300);
     Engine.DlgSel(15);    // Acumen
     Delay(300);
     Engine.DlgSel(16);  //Concentration
     Delay(300);
     Engine.DlgSel(22);  // Greater Shield
     Delay(300);
     Engine.DlgSel(24); //Wild Magic
     Delay(300);
     Engine.DlgSel(25);  // Resist Shock
     Delay(300);
     Engine.DlgSel(26); //Clarity
     Delay(300);
     Engine.DlgSel(2);  //SONGS
     Delay(300);
     Engine.DlgSel(5);   //Song EARTH
     Delay(400);
     Engine.DlgSel(7);   //Song Water
     Delay(300);
     Engine.DlgSel(8);   //Song Warding
     Delay(300);
     Engine.DlgSel(9);   //Song Wind
     Delay(300);
     Engine.DlgSel(11);   //Song Vitality
     Delay(300);
     Engine.DlgSel(13);   //Song Renewal
     Delay(300);
     Engine.DlgSel(3);   // DANCE 
     Delay(300);
     Engine.DlgSel(7);  //Dance Mystic
     Delay(300);
     Engine.DlgSel(10);  // Dance Concentration
     Delay(500);
     Engine.DlgSel(12);  //Dance Siren
     Delay(500);
     Engine.DlgSel(14);  // Dance Earth Guard
     Delay(600);
     Engine.DlgSel(4);  // Other
     Delay(500);
     Engine.DlgSel(8);  //Magnus
     Delay(500);
     Engine.DlgSel(10);  //Paagrio Fist
     Delay(500);
     Engine.DlgSel(14);  //Elem. Protection
     Delay(500);
     Engine.DlgSel(23);  //Gift Seraphin
     Delay(500); 
   RunTo;
end;


procedure RunTo;
begin
     Print('Go Teleporte');
     Engine.SetTarget('GK');  //Target do NCP GK
     Delay(1500);
     Engine.DlgOpen; // abre chat combat npc
     Delay(1500);
     Engine.DlgSel(3);
     Delay(1500);
     Engine.DlgSel(1);
     Delay(1500);
     Fight;
end;


procedure toBuff;
  begin
  IdBuff:=1204 ;  //Check BUFF
   while not User.Buffs.ById(IdBuff,obj) do begin
        Print('Check Buff');
        Engine.UseItem(736);  //Scroll Escape
        Delay(7000);
        buff;
   end;
end;


procedure Fight;
   begin
   Print('Fight zone');
    Engine.MoveTo(146952, -70120, -3664);
    Delay(500);
    Engine.MoveTo(146872, -70424, -3560);
    Delay(500);
    Engine.MoveTo(145624, -73352, -4336);
    Delay(500);
    Engine.LoadConfig('1');    //Νΰηβΰνθε Βΰψεγξ κξντθγΰ
    Engine.LoadZone('zona2.zmap');   //zona de combat
    Print('Τΰπμ');
    toVillage;
    Engine.Facecontrol(0,True);
end;


//-----------------------------------------------------------------------------
begin    //repete novamente o script
Print('repete novamente');
  repeat
   toBuff;
   toVillage;
  until Engine.Status = lsOffline;
  Delay(5000);
end.

i find this scripts but idk if it will work

Edited March 6, 2017 by OLSI

Anitah · March 7, 2017

var Figth_Flag:boolean;
     Item: TL2Item;
     Npc: TL2Npc;
     Obj: TL2Buff;
     IdBuff: integer;
     Buffs:TL2Buff;
var L2Skill: TL2Skill;


procedure toVillage;
begin
Print('To Village');
  Delay(100);
    if (User.HP=0) then
      begin
       Delay(2000);
       Engine.GoHome;
       Engine.Facecontrol(0,False);
       Buff;
      end;
end;


procedure buff;
begin
     Print('Go Buffer');
     Engine.Settarget(35650); 
     Delay(15000);
     Engine.Settarget(35650);
     Delay(15000);
     Engine.DlgOpen;
     Delay(15000);
     Engine.DlgSel(1);
     Delay(800);
     Engine.DlgSel(5);   //Wind Walk
     Delay(400);
     Engine.DlgSel(7);   //Shield
     Delay(300);
     Engine.DlgSel(8);   //Mental Shield
     Delay(300);
     Engine.DlgSel(9);   //Blessed Body
     Delay(300);
     Engine.DlgSel(10);   //Blessed Soul
     Delay(300);
     Engine.DlgSel(11);   //Magic Barrier
     Delay(300);
     Engine.DlgSel(12);   //Concentration
     Delay(300);
     Engine.DlgSel(13);   //Berserker Spirit
     Delay(300);
     Engine.DlgSel(15);    // Acumen
     Delay(300);
     Engine.DlgSel(16);  //Concentration
     Delay(300);
     Engine.DlgSel(22);  // Greater Shield
     Delay(300);
     Engine.DlgSel(24); //Wild Magic
     Delay(300);
     Engine.DlgSel(25);  // Resist Shock
     Delay(300);
     Engine.DlgSel(26); //Clarity
     Delay(300);
     Engine.DlgSel(2);  //SONGS
     Delay(300);
     Engine.DlgSel(5);   //Song EARTH
     Delay(400);
     Engine.DlgSel(7);   //Song Water
     Delay(300);
     Engine.DlgSel(8);   //Song Warding
     Delay(300);
     Engine.DlgSel(9);   //Song Wind
     Delay(300);
     Engine.DlgSel(11);   //Song Vitality
     Delay(300);
     Engine.DlgSel(13);   //Song Renewal
     Delay(300);
     Engine.DlgSel(3);   // DANCE 
     Delay(300);
     Engine.DlgSel(7);  //Dance Mystic
     Delay(300);
     Engine.DlgSel(10);  // Dance Concentration
     Delay(500);
     Engine.DlgSel(12);  //Dance Siren
     Delay(500);
     Engine.DlgSel(14);  // Dance Earth Guard
     Delay(600);
     Engine.DlgSel(4);  // Other
     Delay(500);
     Engine.DlgSel(8);  //Magnus
     Delay(500);
     Engine.DlgSel(10);  //Paagrio Fist
     Delay(500);
     Engine.DlgSel(14);  //Elem. Protection
     Delay(500);
     Engine.DlgSel(23);  //Gift Seraphin
     Delay(500); 
   RunTo;
end;


procedure RunTo;
begin
     Print('Go Teleporte');
     Engine.SetTarget('GK');  //Target do NCP GK
     Delay(1500);
     Engine.DlgOpen; // abre chat combat npc
     Delay(1500);
     Engine.DlgSel(3);
     Delay(1500);
     Engine.DlgSel(1);
     Delay(1500);
     Fight;
end;


procedure toBuff;
  begin
  IdBuff:=1204 ;  //Check BUFF
   while not User.Buffs.ById(IdBuff,obj) do begin
        Print('Check Buff');
        Engine.UseItem(736);  //Scroll Escape
        Delay(7000);
        buff;
   end;
end;


procedure Fight;
   begin
   Print('Fight zone');
    Engine.MoveTo(146952, -70120, -3664);
    Delay(500);
    Engine.MoveTo(146872, -70424, -3560);
    Delay(500);
    Engine.MoveTo(145624, -73352, -4336);
    Delay(500);
    Engine.LoadConfig('1');    //Νΰηβΰνθε Βΰψεγξ κξντθγΰ
    Engine.LoadZone('zona2.zmap');   //zona de combat
    Print('Τΰπμ');
    toVillage;
    Engine.Facecontrol(0,True);
end;


//-----------------------------------------------------------------------------
begin    //repete novamente o script
Print('repete novamente');
  repeat
   toBuff;
   toVillage;
  until Engine.Status = lsOffline;
  Delay(5000);
end.

i find this scripts but idk if it will work

so try it lol

and edit for you server

camenomat0 · March 7, 2017

How i can make via Event window make the player accept the ressurection?

make bot char accept all chats by everyone on settings,and make bot char for it to autohit the nearest flagged (your 1st char) instantly when he get up.make the event on first char,2nd just use settings to get up and autohit the 1st (nearest flagged player),no need to create event for second,tho you can use both simple settings or make event for bot character

Murzyn · May 27, 2017

https://scr.hu/dRMOn1

If someone interesed contact me on Skype : adi_0894@o2.pl

camenomat0 · May 27, 2017

https://scr.hu/dRMOn1

If someone interesed contact me on Skype : adi_0894@o2.pl

what's that?

Murzyn · May 27, 2017

its menu from my script . is full working scripts for pvp. I make it for interlude its will be work on other chronicle.

soon i will make video for this script.

[Lf]Adrenaline Scripts

Recommended Posts

OLSI

camenomat0

OLSI

OLSI

Anitah

camenomat0

Murzyn

camenomat0

Murzyn

Create an account or sign in to comment

Create an account

Sign in

Posts

Topics

Browse

Activity

Store