Jump to content
--> Place your ad text here <--
Get Free Banners - Giveaway MaxCheaters.com
We're Rebuilding – Join Our Staff Team

L2 Adrenaline Scripts.

hornas

By hornas
in Request Botting [English]

 Share

Recommended Posts

sellis Newbie

sellis

Posted
Posted

i play an interlude server that adrenaline works! if anyone has script for tatteosian quest in hotsprings "egg delivery" please share it!! thanks a lot

adr.bot Rookie

adr.bot

Posted
Posted

thanks a lot my friend! but i have a problem i cant understand what exactly need to change

if server use quest named at npc in english not russ then i think no need change

BouKipiKe Newbie

BouKipiKe

Posted
Posted (edited)

HI all

 

adr.bot i need ur help i have red error at the end of the script "end." is in red and scripte doesn't start :/

ty for ur help :)

 

HI all

 

adr.bot i need ur help i have red error at the end of the script "end." is in red and scripte doesn't start :/

var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
    if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('sa rebuff poto');
        Engine.MoveTo(87181,-143445,-1288);
        Delay(500);
        Engine.SetTarget(35650); // NPC ID
        Delay(500);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('buff');
        Delay(500);
        Engine.bypasstoserver('custom_dobuff MakeBuffs WindWalk231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Shield231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Might231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs MagicBarrier231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs BerserkerSpirit231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs VampiricRage231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs BlessedBody231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff Chat 1');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Haste231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Focus231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DeathWhisper231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Guidance231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs ResistShock231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Songs');
        Delay(500);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofEarth231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofWarding231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofWind231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofVitality231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofHunter231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Dances');
        Delay(500);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceofWarior231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceofFire231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceofFury231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceoftheVampire231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Etc Buff');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs ChantofVictory231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs GreaterMight231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('HP/MP/CP');
        Delay(1000);        
        Print('ok chui paré.');
        Engine.MoveTo(87130,-143446,-1319);        
    end;
Result:=false;
end;

function deadCheck: Boolean;
function GoHome(ResType: TRestartType = rtClanHoll): Boolean;
begin
Result := false;
    if User.Dead then begin
        Result := true;
        Print('Dead. Pressing to village.');
        Delay(1000);
        Engine.FaceControl(0,false);
        Engine.GOHome;
        Delay(10000);
    end;
end;

begin
while true do begin
delay(150);

if User.inrange(86574,-141897,-1323, 250, 150) then begin    // ch
        Engine.MoveTo(86780,-142217,-1320);
        Engine.MoveTo(87103,-142760,-1320);
        Engine.MoveTo(87164,-143449,-1288);
    end;
    if user.inrange(87164,-143449,-1288, 500) then begin
        buffCheck;
    end;    
    
    if user.inrange(87164,-143449,-1288, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Engine.SetTarget(31964);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('teleport');
        Delay(500);
        Engine.DlgSel('Town of Goddard');
        Delay(10000);
        Engine.SetTarget(31275);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('teleport');
        Delay(500);
        Engine.DlgSel('Hot Springs');
        Delay(1000);
    end;    
                          
    if user.inrange(149575,-112710,-2060, 500) then begin
        Print('cest parti');
      Engine.MoveTo(149606,-110577,-2298);
      Engine.MoveTo(149161,-109035,-2529);
      Engine.MoveTo(147956,-108811,-2836);
      Engine.MoveTo(145523,-109075,-3449);
      Engine.MoveTo(143923,-110626,-3597);
        Print('Yatta');
        Delay(500);
        Engine.FaceControl(0, true);
        while not deadCheck do delay(1000); //while not dead, do nothing and wait.
    end;
end;
end.

ty for ur help :)

Edited by BouKipiKe
adr.bot Rookie

adr.bot

Posted
Posted (edited)

you need to try, now no red line

var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
    if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('sa rebuff poto');
        Engine.MoveTo(87181,-143445,-1288);
        Delay(500);
        Engine.SetTarget(35650); // NPC ID
        Delay(500);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('buff');
        Delay(500);
        Engine.bypasstoserver('custom_dobuff MakeBuffs WindWalk231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Shield231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Might231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs MagicBarrier231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs BerserkerSpirit231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs VampiricRage231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs BlessedBody231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff Chat 1');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Haste231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Focus231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DeathWhisper231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs Guidance231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs ResistShock231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Songs');
        Delay(500);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofEarth231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofWarding231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofWind231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofVitality231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs SongofHunter231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Dances');
        Delay(500);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceofWarior231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceofFire231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceofFury231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs DanceoftheVampire231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Etc Buff');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs ChantofVictory231');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff MakeBuffs GreaterMight231');
        Delay(1000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('HP/MP/CP');
        Delay(1000);        
        Print('ok chui paré.');
        Engine.MoveTo(87130,-143446,-1319);        
    end;
Result:=false;
end;

function deadCheck: Boolean;
begin
Result := false;
    if User.Dead then begin
        Result := true;
        Print('Dead. Pressing to village.');
        Delay(1000);
        Engine.FaceControl(0,false);
        Engine.GOHome(rtTown);  ///here change to town or other
        Delay(10000);
    end;
end;

begin
while true do begin
delay(150);

if User.inrange(86574,-141897,-1323, 250, 150) then begin    // ch
        Engine.MoveTo(86780,-142217,-1320);
        Engine.MoveTo(87103,-142760,-1320);
        Engine.MoveTo(87164,-143449,-1288);
    end;
    if user.inrange(87164,-143449,-1288, 500) then begin
        buffCheck;
    end;    
    
    if user.inrange(87164,-143449,-1288, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Engine.SetTarget(31964);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('teleport');
        Delay(500);
        Engine.DlgSel('Town of Goddard');
        Delay(10000);
        Engine.SetTarget(31275);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('teleport');
        Delay(500);
        Engine.DlgSel('Hot Springs');
        Delay(1000);
    end;    
                          
    if user.inrange(149575,-112710,-2060, 500) then begin
        Print('cest parti');
      Engine.MoveTo(149606,-110577,-2298);
      Engine.MoveTo(149161,-109035,-2529);
      Engine.MoveTo(147956,-108811,-2836);
      Engine.MoveTo(145523,-109075,-3449);
      Engine.MoveTo(143923,-110626,-3597);
        Print('Yatta');
        Delay(500);
        Engine.FaceControl(0, true);
        while not deadCheck do delay(1000); //while not dead, do nothing and wait.
    end;
end;
end.
Edited by adr.bot
mariuda Newbie

mariuda

Posted
Posted (edited)

if server l2redemption then dont work

 

A cannot use any bot/walker/sniffer on this server (here is the patch)  is H5 oficial files. with cliext shield 1.0.0.9.

 

Any idea for this server?

 

PD: patch is .exe if you dont want it i can upload my system in .rar

 

 

Pd2: for problem with antivirus, firewall, pin use, the GM disable the anticheat for 2 days for make a loging in 101 guide.

 

Hvusvoa.png

Edited by mariuda
adr.bot Rookie

adr.bot

Posted
Posted

Thx Again Adr.bot U so pro all work perfect :)

Ty vm for ur help :good sir:

np  

 

 

 

 

A cannot use any bot/walker/sniffer on this server (here is the patch)  is H5 oficial files. with cliext shield 1.0.0.9.

 

Any idea for this server?

 

PD: patch is .exe if you dont want it i can upload my system in .rar

 

 

Pd2: for problem with antivirus, firewall, pin use, the GM disable the anticheat for 2 days for make a loging in 101 guide.

 

Hvusvoa.png

 give test account or something, becouse your server language.....

marcin1987 Newbie

marcin1987

Posted
Posted (edited)

var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
     if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('Buffs are needed. Buffing...');
        
        Delay(500);
        Engine.SetTarget(35650); // NPC ID
        Engine.MoveToTarget(-20);
        Delay(500);
        Engine.DlgOpen;
        Delay(1000);
        Engine.BypassToServer('custom_dobuff Chat 99');
        Delay(1000);
        Engine.BypassToServer('custom_dobuff ProfBuffs th');
        delay(1000);
        Engine.DlgOpen;
        Engine.BypassToServer('custom_dobuff RestoreAll');
        delay(1000);
        Print('Buffed.');
        Engine.MoveTo(147970, -55256, -2759);
    end;
Result:=false;
end;

function deadCheck: Boolean;
begin
Result := false;
    if User.Dead then begin
        Result := true;
        Print('Dead. Pressing to village.');
        Delay(1000);
        Engine.FaceControl(0,false);
        Engine.GoHome;
        Delay(1);
    end;
end;

begin
while true do begin
delay(150);

    if user.inrange(146272, -58176, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147593, -58103, -3007);
        Engine.MoveTo(147727, -57141, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;
        if user.inrange(145264, -57680, -2976, 250, 150) then begin
        Engine.FaceControl(0,false);
        Engine.MoveTo(145588, -56926, -3007);
        Engine.MoveTo(146673, -56095, -2807);
        Engine.MoveTo(147543, -56054, -2807);
        Engine.MoveTo(147936, -55368, -2760);  
    end;  
    if user.inrange(145696, -57696, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(145510, -56930, -3007);
        Engine.MoveTo(146499, -56202, -2807);
        Engine.MoveTo(147481, -56031, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;  
    if user.inrange(144944, -55392, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(145153, -56813, -3007);
        Engine.MoveTo(145569, -56855, -3007);
        Engine.MoveTo(146467, -56271, -2807);
        Engine.MoveTo(147566, -56034, -2807);
        Engine.MoveTo(147936, -55368, -2760);   
    end;  
    if user.inrange(144752, -56752, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(145534, -56884, -3007);
        Engine.MoveTo(146265, -56418, -2807);
        Engine.MoveTo(147407, -56063, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;  
    if user.inrange(149120, -58064, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147706, -58107, -3007);
        Engine.MoveTo(147751, -56737, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;  
    if user.inrange(150400, -56752, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(149935, -56870, -3007);
        Engine.MoveTo(149139, -56390, -2807);
        Engine.MoveTo(147929, -56063, -2807);
        Engine.MoveTo(147936, -55368, -2760);   
    end;  
    if user.inrange(150704, -55744, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(149935, -56870, -3007);
        Engine.MoveTo(149139, -56390, -2807);
        Engine.MoveTo(147929, -56063, -2807);
        Engine.MoveTo(147936, -55368, -2760);   
    end;  
    if user.inrange(147680, -58208, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147727, -57141, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;  
    if user.inrange(148288, -58304, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147738, -58050, -3007);
        Engine.MoveTo(147727, -57141, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;  
    if user.inrange(147232, -58480, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147677, -58063, -3007);
        Engine.MoveTo(147727, -57141, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;  
    if user.inrange(149088, -56256, -2776, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147854, -56054, -2807);
        Engine.MoveTo(147934, -55354, -2760);   
    end;
    if user.inrange(146832, -55904, -2776, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147529, -56046, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(146368, -56256, -2776, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147529, -56046, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(147664, -56464, -2776, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(147680, -56928, -2776, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147810, -56110, -2807);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(148560, -55904, -2776, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(149872, -57424, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(149897, -56910, -2979);
        Engine.MoveTo(149230, -56412, -2779);
        Engine.MoveTo(147939, -55999, -2772);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(144960, -56224, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(145458, -56853, -2979);
        Engine.MoveTo(146343, -56326, -2779);
        Engine.MoveTo(147625, -55995, -2772);
        Engine.MoveTo(147936, -55368, -2760);
    end;   
    if user.inrange(144496, -55088, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(145327, -56873, -2979);
        Engine.MoveTo(146337, -56445, -2779);
        Engine.MoveTo(147533, -55963, -2766);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(145392, -56960, -2976, 250, 150) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(146347, -56305, -2779);
        Engine.MoveTo(147514, -56003, -2772);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    if user.inrange(147917, -55358, -2759, 250) then begin
    Engine.FaceControl(0,false);
        buffCheck;
   
    end;                                                
    
    if user.inrange(147936, -55368, -2760, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Print('Teleport to Apostate.');
        Engine.SetTarget(31275);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel(1);
        Delay(500);
        Engine.DlgSel(9);
        Delay(5000);
    end;    
                          
    if user.inrange(125537, -40961, -3748, 150) then begin
        Print('Apostate. Moving to spot');
      Engine.MoveTo(125737, -41087, -3749);
    Engine.MoveTo(125000, -41957, -3573);
    Engine.MoveTo(124310, -42993, -3379);
    Engine.MoveTo(123386, -44432, -3273);
    Engine.MoveTo(122475, -45692, -3012);
    Engine.MoveTo(120522, -46382, -2888);
        Print('AA farm: ON!');
        Delay(500);
        Engine.FaceControl(0, true);
        while not deadCheck do delay(1); //while not dead, do nothing and wait.
    end;
end;
end.

 

 

(rewrite for back to varka)

 

its mine script for back to location
 why when i run it bot got pause in fight 5-6 sec
 target mobs,kiling pause 5,6sec and target next mobs

Edited by marcin1987

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to topic listing


×
×
  • Create New...

AdBlock Extension Detected!

Our website is made possible by displaying online advertisements to our members.

Please disable AdBlock browser extension first, to be able to use our community.

I've Disabled AdBlock