Jump to content

L2 Adrenaline Scripts.


Recommended Posts

If you can't copy/paste some text and change two numbers then I am afraid you are beyond redemption.

im sure for him change numbers its hard when dont know what that commands means xd

 

 

can u make with video sir?,im already try it,i dont know why still not work

if rly i dont know what in video i need to show xd anyway 

mouseDown (1156 897 1000); //1156 desktop X, 897 desktop Y, 1000 delay 1second

like example this command press and hold on weapon

mouseUp (446, 390, 1000);

this release to add weapon in augment window

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 (10000); 
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. 

here i litle bit corected that script becouse after copy all script become in 1line, i guess now other better can understand where what is xd 

 

PS. not i translated descriptions from russ to eng

Edited by adr.bot
Link to comment
Share on other sites

im sure for him change numbers its hard when dont know what that commands means xd

 

 

if rly i dont know what in video i need to show xd anyway 

mouseDown (1156 897 1000); //1156 desktop X, 897 desktop Y, 1000 delay 1second

like example this command press and hold on weapon

mouseUp (446, 390, 1000);

this release to add weapon in augment window

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.

here i litle bit corected that script becouse after copy all script become in 1line, i guess now other better can understand where what is xd 

 

PS. not i translated descriptions from russ to eng

im try to change number and still not work,plis correct my script,what wrong? :(

var

item: TL2Item;
 
begin
while true do begin
delay(500);
 
if inventory.user.byid(15866, item) and not (Item.Equipped) then begin
Delay(500);
Engine.UseItem(15866);'Finale Blade'
Delay(800);
end;
Edited by vensia
Link to comment
Share on other sites

 

im try to change number and still not work,plis correct my script,what wrong? :(

var

item: TL2Item;
 
begin
while true do begin
delay(500);
 
if inventory.user.byid(15866, item) and not (Item.Equipped) then begin
Delay(500);
Engine.UseItem(15866);'Finale Blade'
Delay(800);
end;

 

var
item: TL2Item;
 
begin
while true do begin
delay(500);
 
if inventory.user.byid(15866, item) and not (Item.Equipped) then begin
Delay(500);
Engine.UseItem(15866);//'Finale Blade'
Delay(800);
end;
end;
end.
Link to comment
Share on other sites

var
item: TL2Item;
 
begin
while true do begin
delay(500);
 
if inventory.user.byid(15866, item) and not (Item.Equipped) then begin
Delay(500);
Engine.UseItem(15866);//'Finale Blade'
Delay(800);
end;
end;
end.

omg work ,tq so much sir :lol:

Link to comment
Share on other sites

can someone share script auto rush-impact kamael,if u have it  :D

tell more

 

 

Hallo

 

 

Can sameone write a script to farm ( buff + anty bot system) on server l2 toxic ? In a free time afc.

 

Or maby samone alredy have one and can share.

captcha i guess you dont get for free, becouse who know how make that only sell it

Link to comment
Share on other sites

tell more

 

 

captcha i guess you dont get for free, becouse who know how make that only sell it

 

tell more

 

 

captcha i guess you dont get for free, becouse who know how make that only sell it

im read in forum someone sell script like this

maybe always change target when have target in radius 200-600,just like using next-target

http://forum.lineage2bot.com/viewtopic.php?f=11&t=119&p=453&hilit=anti+disarm#p453

Edited by vensia
Link to comment
Share on other sites

hmm i dont know xd, maybe this 

procedure RushTarget(MinR, MaxR:Cardinal);
var
i:integer;
begin
for i:=0 to CharList.Count-1 do begin
if (User.DistTo(CharList.Items(i))>MinR) and
(User.DistTo(CharList.Items(i))<MaxR)then
begin
Engine.SetTarget(CharList.Items(i));
Break;
end;
end;

end;

begin
while true do begin
delay(50);
SetPVPTarget(200,600); //200min range, 600max range
end;
end.

it will target closer player

Edited by adr.bot
Link to comment
Share on other sites

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.




  • Posts

    • We do sell www.l2top.co with: Host Domain Script Forum Database   DM on discord for more info:  pigasos Or admin@athena-project.eu
    • We do sell l2top.co with host, domain and script. DM on discord: pigasos
    • Are you L2 Server Owner? We have the best #1 marketing promo [ CODE: MXCPR200] offer for your L2Server from 1500€ !NOW! 200€ EXPIRES 30-06-2024   What we offer you? Tag @followers and Post in our L2Fan pages with total of 8000 L2Players community. Tag @everyone in 20 Discord owned groups so everyone can see your post, tag @everyone in 15 Mixed L2Discord community groups Aprox 100.000 L2Players. Post in 500 L2Groups in Facebook Aprox 750.000 L2Players 1 Month banner in L2Top Co and 1000 free votes (1200 daily visitors). 1 Week Sponsored advert with our L2 Audience remarketing list through Facebook and Instagram Aprox 1.000.000 L2Players target. 500 Direct messages to L2Player through our fan pages chat.   DM me on discord @Pigasos or send email at admin@athena-project.eu Other offers https://athena-project.eu/l2j-packs/ or https://athena-project.eu/shop/
    • 🔶🔶🔶 LIMITED OFFERS EXPIRE 30th JUNE, COMPLETE L2 SERVER PACKS WITH ADDONS 🔶🔶🔶  Athena Project 🔥 June Offers for creating your successful server!   🔸 Interlude Custom PvP Servers: range from 199€ - 799€ 🔸 Interlude No Custom PvP Servers: range from 599€ - 999€ 🔸 Highfive No Custom Low/Mid/PvP Servers: range from 599€ - 999€   📌 All our packs include in this offer: Dedicated Server ✓ DDoS Protection ✓ Web Hosting ✓ Domain Name ✓ Website Design ✓ Automated Donation Panel ✓ Support 2 Weeks ✓ Free Installation and Guide ✓ Delivery in 48 hours ✓   Check our new offers here: https://athena-project.eu/l2j-packs
    • Welcome to my store : https://topestore.mysellix.io/fr/ 2015-2022 Aged Discord Account 2015 Discord Account : 60.99 $ 2016 Discord Account : 10.50 $ 2017 Discord Account :4.99 $ 2018 Discord Account : 3.99 $ 2019 Discord Account : 2.99 $ 2020 Discord Account :1.99$ 2021 Discord Account :1.50$ 2022 Discord Account :0.99$ Warranty :Lifetime Payment Methods : Crypto/ PayPal Contact Me On Discord Or Telegram Discord : @ultrasstore11 Telegram : https://t.me/ultrastore11 Whatsapp ; +212614849119 Welcome to my store : https://topestore.mysellix.io/fr/ 2015-2022 Aged Discord Account 2015 Discord Account : 60.99 $ 2016 Discord Account : 10.50 $ 2017 Discord Account :4.99 $ 2018 Discord Account : 3.99 $ 2019 Discord Account : 2.99 $ 2020 Discord Account :1.99$ 2021 Discord Account :1.50$ 2022 Discord Account :0.99$ Warranty :Lifetime Payment Methods : Crypto/ PayPal Contact Me On Discord Or Telegram Discord : @ultrasstore11 Telegram : https://t.me/ultrastore11 Whatsapp ; +212614849119 ULTRAS Store Back again For Discord Accounts With Cheap Prices    🎃 AGED OLD DISCORD ACCOUNTS [ AUTO-BUY ] 🎃   Ful Acces   INSTANT DELIVERY   2015 Discord Account : 50.99 $   2016 Discord Account : 10 $   2017 Discord Account :3.99 $   2018 Discord Account : 2.99 $   2019 Discord Account : 2.50$   2020 Discord Account :1.50$   2021 Discord Account :0.99$   2022 Discord Account :0.70$   PAYMENT METHODS : CRYPTO / paypal   You can buy here From our Store : ultrasstore11.mysellix.io   Or from my Telegram user :https://t.me/ultrastore11   Or from my Discord user : @ULTRASstore11 ULTRAS Store Back again For Discord Accounts With Cheap Prices     AGED OLD DISCORD ACCOUNTS [ AUTO-BUY ]    Ful Acces   INSTANT DELIVERY   2015 Discord Account : 50.99 $   2016 Discord Account : 10 $   2017 Discord Account :3.99 $   2018 Discord Account : 2.99 $   2019 Discord Account : 2.50$   2020 Discord Account :1.50$   2021 Discord Account :0.99$   2022 Discord Account :0.70$   PAYMENT METHODS : CRYPTO / paypal   You can buy here From our Store : ultrasstore11.mysellix.io   Or from my Telegram user :https://t.me/ultrastore11
  • Topics

×
×
  • Create New...