Jump to content

Recommended Posts

Posted

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

i dont know for change number  :D ,can u give me example?

Posted (edited)

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
Posted (edited)

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
Posted

 

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.
Posted
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:

Posted

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.

Posted

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

Posted (edited)

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
Posted (edited)

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

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



  • Posts

    • TELEGRAM SEO TRAINING (Bot Ranking in Search) I teach a complete system for ranking Telegram bots at the top of search results by keywords and countries. The method works for services, shops, crypto projects, and any type of Telegram bot. You can also direct the traffic to your groups, channels, websites, or sales funnels. ⸻  Countries I work with USA, Israel, Russia, India, Turkey, China, Ukraine, Uzbekistan. If you need another country — message me, we’ll find a solution. ⸻ ️ Results First search results appear in 2–3 days. ⸻  What’s included in the training • how the Telegram search algorithm works and key ranking factors • keyword research for your country and niche • bot optimization: description, settings, greeting text • fixing and maintaining positions • specific promotion nuances for different countries ⸻  What you will receive • a complete system for ranking bots in search • understanding how to work with keywords, traffic, and positions • a skill you can use to promote your own projects or earn from clients ⸻  Who this training is for • beginners with zero experience — I explain everything from scratch • those who don’t have a bot — I provide a ready one for practice • anyone who wants to learn promotion and earn from this service ⸻  Why learn from me • doing Telegram SEO since 2021 • over 1000 successful orders • my own panel SMMTG.PRO and private databases • experience working with markets of Russia, Uzbekistan, Ukraine, Israel, USA, Turkey, China, India, Vietnam, Europe, and more ⸻  For pricing — message me t.me/smmtg_link
    • Hey everyone, I was wondering if anyone knows where the client loads all the .dat files. Is there some kind of manifest or list you can specify which dat files the client loads?
    • 🔥 Welcome to Lineage 2 Haruna x3 – True Classic Interlude Experience 🔥 At Haruna x3, we’re bringing back the true essence of Interlude – slow, meaningful progression where every level matters, every item has value, and PvP is real. We’re not about fast servers, pay-to-win advantages, or fake populations. Our goal is simple: create a fair, stable, and long-term server where players can enjoy real competition, strategic clan warfare, and the thrill of open-world PvP. 💎 What Makes Haruna x3 Special? x3 Rates – Perfect for steady, rewarding progression Classic Interlude Mechanics – Relive the nostalgia of Interlude Stable & Lag-Free Gameplay – Optimized for thousands of players online Fair & Balanced – No pay-to-win, every victory is earned PvP & Clan Warfare Focused – Every battle counts 🌟 Quality of Life Features to Enhance Your Experience We keep the classic feel while adding features that make the game more convenient and enjoyable, including: Shift + Click to view monster droplists Free item mail and buy/sell via Adena Daily login rewards & Stream Rewards ALT+K Skill Panel & Alt+Click buffs removal Offline shop system Captcha for security Donate Coins currency (cannot be traded, dropped, or destroyed) Classic P110 client – no custom interface 🏰 Our Philosophy We believe Lineage 2 is about the journey, not just the destination. Haruna x3 is designed for months and years of growth, not weeks. We provide a community-driven environment where honest gameplay, fair competition, and strategic teamwork are at the forefront. 🌍 Join Our Community Whether you’re a veteran of Interlude or a returning player seeking a true classic experience, Haruna x3 offers a place to fight, trade, and grow alongside dedicated players. Step into the world of Haruna x3 – where every decision matters, every fight counts, and every victory is yours to earn. Discord: https://discord.gg/7DDC9Dsxnh Website : www.l2haruna.com
    • No, the real purpose is cheating and custom  development for games.  I'm building a custom AI moderator specially for checking illegal activity and flag current topica.
  • Topics

×
×
  • 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