Jump to content
MaxCheaters Official Group on Discord
Top.MaxCheaters.com is now OPEN – Lineage 2 Top Listing

Adrenaline Scripts Free

la2enigma

By la2enigma
in Botting [English]

 Share

Recommended Posts

la2enigma Newbie

la2enigma

Posted
Posted

Auto Agument

var 
L2Skill: TL2Skill; 
skill1: TL2Skill; 
skill2: TL2Skill; 
skill3: TL2Skill; 
skill4: TL2Skill; 
NovObj: TL2Skill; 
NovEngine: TL2Control; 
buff: TL2Buff; function keybd_event (bVk, bScan: byte; dwFlags, dwExtraInfo: integer): integer ; stdcall; external 'user32.dll'; function SetCursorPos (x, y: integer): boolean; stdcall; external 'user32.dll'; function mouse_event (dwFlags, dx, dy, dwData: byte; dwExtraInfo: integer): void; stdcall; external 'user32.dll'; function GetSkill (const Control: String; const ID: Cardinal): TL2Skill; begin NovEngine: = GetControl (control); if Assigned (NovEngine) and NovEngine.GetSkillList.ByID (ID, NovObj) then Result : = NovObj; delay (10000) end; procedure pressKey (hexCode: BYTE); begin   keybd_event (hexCode, 45, 1, 0);   delay (200); end; procedure mouseClick (x, y, _delay: integer); begin   SetCursorPos (x, y);   mouse_event ($ 2, 0, 0, 0, 0);   delay (_delay);   mouse_event ($ 4, 0, 0, 0, 0); end; procedure mouseDown (x, y, _delay: integer ); begin   SetCursorPos (x, y);   mouse_event ($ 2, 0, 0, 0, 0);   // delay (_delay);   // mouse_event ($ 4, 0, 0, 0, 0); end; procedure mouseUp ( x, y, _delay: integer); begin   SetCursorPos (x, y);   // mouse_event ($ 2, 0, 0, 0, 0);   // delay (_delay);   mouse_event ($ 4, 0, 0, 0, 0 ); end; // coordinate of the higher edge of the box augmentation \\ \\ 486 144 // coordinate of the higher edge of the box cancel \\ \\ 485 413 // coordinate of the higher edge of the box inventory \\ 203 \\ 1072 // active REFRESH 3199 // Reflect active 3204 // virgin 3158 // active PvP Mait 3134 // Passive Reflect 3259 // active refresh2 3202 // weight limit 3251 // Passive pvp Mait 3243 begin delay (10,000); while 1 <> 2 do begin if (not SkillList.ByID (3243, skill1)) then begin // remove augment      mouseDown (884, 1010, 1000); // click on the feathers (coordinate location puhi. it must necessarily be in the hands of)      delay (300);      mouseUp (486, 700, 1000); // Fluff drag the window aukmenta cancellation and release      delay (300);      mouseClick (445, 829, 200); // Confirm cancellation augment (augment cancel confirmation button)      delay (3000); // Waiting for the augmentation      mouseClick (445, 829, 200); // Push for the next augmentation (after HP pulled out)      delay (300); // insert the new augment      mouseDown (884, 1010, 1000); // click on the feathers (coordinate location puhi. it must necessarily be in the hands of)      delay (300);      mouseUp (446, 390, 1000); // Aukmenta drag the window and release      delay (300);      mouseDown (1156 897 1000); // click on the LAN      delay (300);      mouseUp (526, 392, 1000); // Aukmenta drag the window and release      delay (300);      mouseDown (1197, 897, 1000); // click on gemston      delay (300);      mouseUp (485, 432, 1000); // Aukmenta drag the window and release      delay (300);      mouseClick (440, 562, 200); // Confirm augment      delay (4300); // Waiting for the augmentation      mouseClick (440, 562, 200); // Push for the next augmentation      delay (100);      end; if (SkillList.ByID (3243, skill2)) then begin PlaySound (exepath + '\ sounds \' + 'dc' + '.wav', False); delay ( 5000); end; end; end.

Auto SOS charging

const
SOS_ID = 789;//Spirit of Shilen
POS_ID = 788;//Pain of Shilen
TRIGGER_ID = 5564;//Pain of Shilen trigger
ATTACK_PET = false;
var
sosSkill,posSkill: TL2skill;
sosBuff,triggerBuff: TL2buff;
begin
  while true do begin
    if not user.buffs.byid(SOS_ID,sosBuff) then begin
      if (skilllist.byid(SOS_ID,sosSkill) and (sosSkill.endtime = 0)) and (skilllist.byid(POS_ID,posSkill) and (posSkill.endtime = 0)) then begin
        engine.useskill(posSkill);
        delay(500);
        print('Triggering lvl3 of '+posSkill.name);
        while user.buffs.byid(TRIGGER_ID,triggerBuff) and not (triggerBuff.level >= 3) do begin
          if ATTACK_PET and (petlist.count > 0) then begin
             if (user.target.name = '') then engine.settarget(petlist.items(0));
             engine.attack(true);
          end;
          delay(150);
        end;
        if (triggerBuff.level >= 3) then begin
          print('Using '+sosSkill.name);
          engine.useskill(sosSkill);
        end;
      end;
    end;
    delay(500);
  end;
end.

Anti Disarm

var
item: TL2Item;

begin
while true do begin
delay(500);

if inventory.user.byid(10771, item) and not (Item.Equipped) then begin
Delay(500);
Engine.UseItem(10771); <<< Replace with ur weapon id
Delay(800);
end;

Imperial Tomb Auto Farm LS

uses sysutils;

Procedure shotaipotai;
var
potion,shotuS,spirit,shotuB: tl2item;
 begin
while true do begin
delay(100000);
if inventory.user.byid(3031,spirit) and ((spirit.count)< 1000) then
engine.say(inttostr(spirit.count)+' spirit orie',3,'nick');
if not inventory.user.byid(3031,spirit) then
engine.say('spirit ore end!',3,'nick');
if inventory.user.byid(728,potion) and ((potion.count)< 100) then
engine.say(inttostr(potion.count)+' manos',3,'nick');
if not inventory.user.byid(728,potion)  then
engine.say('mana end!!',3,'nick');
if inventory.user.byid(3952,shotuS) and ((shotuS.count)< 1100) then
engine.say(inttostr(shotuS.count)+' S shots',3,'nick');
if not inventory.user.byid(3952,shotuS)  then
engine.say('S shots ended',3,'nick');
end;
end;

procedure bufai;
var
buff1: TL2Effect;
item: TL2Item;
function CheckBuff: Boolean;
begin
if not user.buffs.byid(1204, buff1) then begin / wind walk
        Result:=false;
        Print('Buffs are needed. Buffing...');
        engine.bypasstoserver('custom_dobuff ProfBuffs MAGE');  // change mage to your scheme name 
        Print('Buffed.');  
      exit;
    end;
Result:=true;
end;

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

begin
while true do begin
delay(150);
CheckStatus;
if user.inrange(146272, -58176, -2976, 450)
  then
    begin
    Engine.MoveTo(147593, -58103, -3007);
    Engine.MoveTo(147727, -57141, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(145264, -57680, -2976, 450)
  then
    begin
    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, 450)
  then
    begin
    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, 450)
  then
    begin
    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, 450)
  then
    begin
    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, 450)
  then
    begin
    Engine.MoveTo(147706, -58107, -3007);
    Engine.MoveTo(147751, -56737, -2807);
    Engine.MoveTo(147936, -55368, -2760); 
    end;
    
if user.inrange(150400, -56752, -2976, 450)
  then
    begin
    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, 450)
  then
    begin
    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, 450)
  then
    begin
    Engine.MoveTo(147727, -57141, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(148288, -58304, -2976, 450)
  then
    begin
    Engine.MoveTo(147738, -58050, -3007);
    Engine.MoveTo(147727, -57141, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(147232, -58480, -2976, 450)
  then
    begin
    Engine.MoveTo(147677, -58063, -3007);
    Engine.MoveTo(147727, -57141, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(149088, -56256, -2776, 450)
  then
    begin
    Engine.MoveTo(147854, -56054, -2807);
    Engine.MoveTo(147934, -55354, -2760);
    end;
if user.inrange(146832, -55904, -2776, 450)
  then
    begin
    Engine.MoveTo(147529, -56046, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(146368, -56256, -2776, 450)
  then
    begin
    Engine.MoveTo(147529, -56046, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(147664, -56464, -2776, 450)
  then
    begin
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(147680, -56928, -2776, 450)
  then
    begin
    Engine.MoveTo(147810, -56110, -2807);
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
if user.inrange(148560, -55904, -2776, 450)
  then
    begin
    Engine.MoveTo(147936, -55368, -2760);
    end;
    
    if user.inrange(149872, -57424, -2976, 450)  
  then
    begin
    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, 450)  
  then
    begin
    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, 450)  
  then
    begin
    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, 450) 
  then 
   begin
        Engine.MoveTo(146347, -56305, -2779);
        Engine.MoveTo(147514, -56003, -2772);
        Engine.MoveTo(147936, -55368, -2760);
    end;
    
    if user.inrange(147936, -55368, -2760, 350) then begin
        CheckBuff;
    end;
    if user.inrange(147932, -55213, -2735, 3000) and User.Buffs.ByID(1204, Buff1) then begin
        Print('Going back to spot.');
        Engine.SetTarget(31275);
        Engine.DlgOpen;
        Delay(2111);
        Engine.DlgSel('I want to use the Noblesse Only: Teleport');
        Delay(2111);
        engine.bypasstoserver('npc_268467360_Chat 2');   //must change npc numbers by your server
        Delay(2111);
        engine.bypasstoserver('npc_268467360_goto 9067');  //must change npc numbers by your server
        Delay(5000);
    end;
    if user.inrange(178113, -84441, -7211, 500) then begin
        Print('Varka Silenos Village. Moving to exping place.');
 Engine.MoveTo(178284, -83352, -7245);
 Engine.MoveTo(177850, -83240, -7246);
 Engine.MoveTo(178035, -82322, -7246);
 Engine.MoveTo(181003, -82492, -6621);
 Engine.MoveTo(181306, -83988, -6621);
 Engine.MoveTo(183715, -83856, -5993);
 Engine.MoveTo(183715, -81567, -5360);
 Engine.MoveTo(183657, -81287, -5320);
 
        Print('Exp mode: ON');
        Delay(500);
        Engine.FaceControl(0, true);
    end;
end;
end;
begin //start of main body
Script.NewThread(@shotaipotai); delay(60);
Script.NewThread(@bufai);
end. //end of main body

Auto Mana Burn Enemys Healer

procedure burn (p: pointer);
var
P1, P2 : pointer;
Actor: TL2Live;
begin
try
    while Engine.Status = lsOnline do begin
        Engine.WaitAction([laCast], P1, P2);
        Actor := TL2Live(P1);
        if (not (Actor.IsMember) and (Actor.Cast.ID = 123) and (User.DistTo(Actor)<900)) then
            begin
            if Engine.SetTarget(Actor.Name) then
                Engine.UseSkill(3110); //mana burn
            end;
    end;
except
    print ('ProtectCaster error');
end;
end;

begin
Script.NewThread(@burn);
end.

enjoy  :not bad:

valentin Apprentice

valentin

Posted
Posted (edited)

pvp assist does not work, but nothing I tried with conditions,

need the answer 

Edited by valentin
adr.bot Rookie

adr.bot

Posted
Posted

pvp assist does not work, but nothing I tried with conditions,

need the answer 

if you use Party Settings>Assist , then need put skills to Attack to make assist work

valentin Apprentice

valentin

Posted
Posted (edited)

if you use Party Settings>Assist , then need put skills to Attack to make assist work

does not work, I can justify

I tried all methods,Only monsters works

Edited by valentin
  • 2 months later...
zoreiagyn Newbie

zoreiagyn

Posted
Posted
Some script to healer? My bot is buggy, sometimes happens a bug using the configurations of own bot and he spends the full mana and not to give heal.

 

If someone ttiver a script to heal in a party, would help a lot!

Murzyn Newbie

Murzyn

Posted
Posted (edited) 
procedure burn (p: pointer);
var
P1, P2 : pointer;
Actor: TL2Live;
begin
try
while Engine.Status = lsOnline do begin
Engine.WaitAction([laCast], P1, P2);
Actor := TL2Live(P1);
if (not (Actor.IsMember) and (Actor.Cast.ID = 123) and (User.DistTo(Actor)<900)) then
begin
if Engine.SetTarget(Actor.Name) then
Engine.UseSkill(3110); //mana burn
end;
end;
except
print ('ProtectCaster error');
end;
end;

begin
Script.NewThread(@burn);
end.

Someone know how to add to this script , the target does not take players from my clan or ally.

 

In Lineage 2 Interlude!

if (not (Actor.IsMember) and (Actor.Cast.ID = 123) and (User.DistTo(Actor)<900)) and (actor.clan=XXX) then

it does not work in this chronicle , because l2 adr not read clans in l2 interlude

Edited by Murzyn

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing


  • Posts

    • L2DamageCom
      [L2J] L2DAMAGE

      By L2DamageCom · Posted

      WIPE ! NEW SEASON GRAND OPENING FROM TODAY ! - 23/01/2026, FRIDAY, 20:00 +3 GMT !
    • VPSLab
      — VPSLAB — Fast & Private RDP/VPS | 100% Instant Setup

      By VPSLab · Posted

      https://vpslab.cloud/ Premium DDoS Protection now included with every server.
    • L2Gold.eu
      [L2OFF] L2GOLD.CO + L2GOLD.CC - 30 January (All Stars)

      By L2Gold.eu · Posted

      Thx!
    • bomarket
      ⭐️BUYING CSGO SKINS⭐️INSTANT CRYPTO / BANK

      By bomarket · Posted

      Bump
    • Maxtor
      Lineage 2 Top.MaxCheaters.com Changelog updates **

      By Maxtor · Posted

      # Changelog - Public Updates   This changelog tracks user-facing updates and improvements to Top.MaxCheaters.com.   ---   ## [1.2.0] - 2026-01-XX   ### ⚡ Performance Improvements - **Faster Page Loads**: Implemented intelligent caching system that makes pages load significantly faster - **My Servers Page**: Now loads instantly when revisiting (no more loading delays) - **Main Page**: Server listings and filters now load faster on repeat visits - **Premium Ads**: Pricing information loads instantly - **Overall Performance**: Site now loads 60-80% faster with reduced server load   ### 🔄 Improvements - Pages now remember recent data, reducing wait times when navigating - Automatic cache refresh ensures you always see up-to-date information - Better user experience with instant page loads on repeat visits   ---   ## [1.1.1] - 2026-01-XX   ### 🐛 Bug Fixes - **VIP Server Filter**: Fixed "VIP L2 Servers" filter to correctly show all premium tier servers (VIP, Gold VIP, and Pinned) - **Ad Pricing Display**: Fixed ad pricing on Premium Ads page to automatically update when changed in admin panel   ### 🔄 Improvements - Ad pricing now syncs automatically across all pages - More accurate server filtering by tier   ---   ## [1.1.0] - 2026-01-XX   ### ✨ New Features - **Complete Chronicle List**: All chronicle options are now available in server forms and filters, including the latest Lineage 2 chronicles - **Improved Chronicle Display**: Server rows now show cleaner, shorter chronicle names for better readability   ### 🐛 Bug Fixes - **Chronicle Filter**: Fixed issue where "Infinite Odyssey" chronicle filter was not working correctly - **Missing Chronicles**: Fixed missing chronicle options in server creation and editing forms   ### 🔄 Improvements - Chronicle filters and dropdowns now stay in sync with the latest available chronicles - Better chronicle name formatting in server listings for improved visual clarity   ---   ## [1.0.0] - Initial Release   ### Features - 🎮 Server listings with multiple tiers (Normal, VIP, Gold VIP, Pinned) - 📊 Click tracking and server statistics - 🌍 Multi-language support (English, Spanish, Portuguese, Greek, Russian) - 💳 Payment system for premium server features - 🔐 Secure authentication system - 👑 Admin panel for server management - 📱 Fully responsive design for all devices - 🔍 Advanced filtering system (by chronicle, rate, server type, date) - 📅 Server opening date tracking - 🎯 Two viewing modes: By Date and By Votes (coming soon for all users)   ---   ## About This Changelog   This changelog focuses on updates that directly impact the user experience. Internal development changes and technical improvements are not included here.   For questions or feedback, please contact support.v

  • Topics

×
×
  • Create New...

Important Information

This community uses essential cookies to function properly. Non-essential cookies and third-party services are used only with your consent. Read our Privacy Policy and We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue..