Jump to content

Recommended Posts

Posted

well as i said, somewhere i see it, that means i just see, but i dont have it, if good remember i see it ~2year ago at l2bot.eu (now lineage2bot.com)

Thanks for your info! i'll try search deeper.

  • 3 weeks later...
  • 1 month later...
Posted

Good morning people

 

i have paid version of adrenaline i am playing at la2dreams at the moment. ( Interlude)

 

I woulk like to know if there is any script for mass sweep in interlude.

 

thank you in advance 

 

 

P.S   Show me love please no hate !! :) 

Posted

Good morning people

 

i have paid version of adrenaline i am playing at la2dreams at the moment. ( Interlude)

 

I woulk like to know if there is any script for mass sweep in interlude.

 

thank you in advance 

 

 

P.S   Show me love please no hate !! :)

var
int: integer;
mob: tl2npc;
sweep: tl2skill;

begin
while true do begin
    for int:=0 to npclist.count-1 do begin
        mob := npclist.items(int);
        if mob.valid and mob.dead and mob.sweepable and (skilllist.byid(42,sweep) and (sweep.endtime = 0)) then
            if (user.distto(mob) < 300) then //max range of sweeping
                if engine.settarget(mob) then engine.useskill(sweep);
    end;
delay(100);
end;
end.

author krn (if im not wrong)

Posted

I'm having a hard time dropping the Sage's Stone that can help me.


thank you so much



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';

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;


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

begin
Delay(1000);
Engine.UseItem(7130);
Delay(30000);
Engine.SetTarget('Karin');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(4);
Delay(3000);
Engine.SetTarget('Ladd');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(4);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(3000);
Engine.SetTarget('Merian');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(3000);
Engine.MoveTo(84972,16390,-4296);
Delay(500);
Engine.MoveTo(85622,16722,-4296);
Delay(500);
Engine.SetTarget('Wesley');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(5);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.MoveTo(85541,16213,-4280);
Delay(500);
Engine.SetTarget('Alchemist''s Mixing Urn');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(2);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(14);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(3);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.MoveTo(85475,15797,-4272);
Delay(500);
Engine.MoveTo(84856,15882,-4296);
Delay(500);
Engine.SetTarget('Karin');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(4);
Delay(3000);
Engine.SetTarget('Ladd');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(4);
Delay(1500);
Engine.DlgSel(1);
Delay(3000);
Engine.SetTarget('Merian');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(4);
Delay(3000);
Engine.SetTarget('Joan');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(5);
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(1);
Delay(3000);
Engine.SetTarget('Mariell');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(2);
Delay(3000);
Engine.SetTarget('Verona');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(3);
Delay(4);
Engine.SetTarget('Elisa');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel(1);
Delay(1500);
Engine.DlgSel(17);
Delay(3000);
Engine.MoveTo(171939,56504,-5280);
Delay(500);
Engine.MoveTo(173247,56470,-5840);
Delay(500);
Engine.CancelTarget;
if not (Inventory.Quest.ByID(6322, QuestItem) = true) then begin
Engine.FaceControl(0,true);
end;
Engine.FaceControl(0,false);
end.
end.

Posted
var
int: integer;
mob: tl2npc;
sweep: tl2skill;

begin
while true do begin
    for int:=0 to npclist.count-1 do begin
        mob := npclist.items(int);
        if mob.valid and mob.dead and mob.sweepable and (skilllist.byid(42,sweep) and (sweep.endtime = 0)) then
            if (user.distto(mob) < 300) then //max range of sweeping
                if engine.settarget(mob) then engine.useskill(sweep);
    end;
delay(100);
end;
end.

author krn (if im not wrong)

 

Thank you for the answer bro i will test it

Posted (edited)

Hi all, 

 

I'm playing on Gracia Final and I need your help for a part of Antharas Quest that I'd like to script. 

 

In Windy Hill, I need to kill Abyssal Jewel (ID: 27165 ) to obtain 1st Fragment of Abyss Jewel (ID:3859 ). Once it's dead, many Jewel Guardian Mara (ID: 27168 ) appear and will drop Mara Fang (Id:3862).

 

Here is what I need: 

 

- Get The 2 quest Items 

- Kill all the mobs in zone (especialy Jewel Guardian Mara) 

- Use SOE

 

On the script I wrote here, bot stop hitting mobs when he got the 2 quest items. Consequence: the non-killed mobs break my SOE and I can't go away. 

 

 
Var
Item: TL2Item;
begin
 
              engine.moveto( -81233 , 75608, -3360);
              delay(500);
              engine.FaceControl(0,true);
              delay(500);
              Engine.AutoTarget(600, 200) ;
              delay (15000);
   
  
              if Inventory.Quest.ByID(3862, Item) and  Inventory.Quest.ByID(3859, Item)  and (Item.count > 0) and not user.incombat  then begin     
  
              Engine.MoveTo( -81363 , 76025,-3376 ) ;
              delay (500) ; 
             Engine.FaceControl(0,false);
            delay (2000);
             Engine.UseItem (736) ;
            delay (20000);
 
             end;
end.

 

 

Thx for your upcoming replies.

 

Beloves.         

Edited by Beloves
  • 2 weeks later...
Posted
Hello everyone!

 

I'm playing on a pvp server, and the farm area is in Field of Silence, I have only one problem: when my char dies, he goes back to town, but I can not rebuff because of Heine's random respawn.

 

What I need: a script for the char to go near the normal gk, because the npcs buffer and global gk are very close, so I can rebuff and teleport to the farm zone.

 

Please help me, already tried to edit with Engine.MoveTo but it is kind of complicated because it always hangs somewhere.

 

Thanks in advance!

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

    • Hi, great work! Are there any bugs? And will it work with a high five?
    • For others that would like to understand in more details:   The login server also uses a protocol (sent by the server to the client in the very first packet). For instance, the C4 client (the one I'm developing my emulator for) expects the protocol number `50721` (or `0xc621`) which works as follow (from what I've gathered): Preamble: L2 packets are divided into two parts: size and payload; As mentioned, every packet starts with two bytes containing the whole packet size (thus including those two bytes, e.g. a packet of size 15 will have the number `15` written onto its first two bytes and a following payload of 13 bytes); For login server, first byte of the payload is the opcode (game server must deal with variable-sized opcodes); Next bytes are the packet content; Before sending the packet, its buffer size (minus the initial two bytes) is padded to 8 bytes (required by upcoming Blowfish encoding); A checksum of the packet is appended at the end, then the payload is again padded to 8 bytes; If the opcode is not `0` (also written as `0x00`), then the payload is encoded by Blowfish; Packet is sent over the network. You can have a look at my implementation (in C++) here (do note I'm assuming little-endian).   In this protocol, the auth packet (`0x00`) sent back by the client is RSA encrypted using the RSA modulus sent in the first server packet, inserted right after the protocol number.  
    • Hello guys I wanna buy some  Lessons for an L2J Developer
    • Let me give you something for inspiration and get you addicted to bot AI     And a siege 😛     What I have notice helps a lot the LLM to act real, is to give it a real-persons background. So for each LLM in the context beggining, besides the L2 facts, give it a real-life back story "You are a 67 years old retired nurse who plays Lineage 2 while her husband reads his newspaper, you are calm, collected but get mad if insulted". But that makes for a creative bot but its repetitive. So what you can also do, is pick random 20 news sites and for each bot every 2-3 days, initialize a context that is affected by the "news" the bot reads in the "real world".  So for example there's Iran - US war ok ? You take the news, put it in an LLM and ask it, extract the "abstract feelings" that this news piece invokes into you without mentioning anything related to the news. Then you take the result and inject it to the bots LLM prompt after its backstory.  This leads to some VERY human-like behavior from bots. 
  • 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..