Jump to content

L2 Adrenaline Scripts.


Recommended Posts

11 minutes ago, the_martines said:

Thanks a lot @Vinter! I've almost lost hope this is possible at all. 

Yeah np if you have any problems hit me up on PMs. I tested this on protocol 152 so it might not work on your version depending if the packets have changed or not. I also didn't make a buy store script cause I usually find myself doing it manually, but it can be easily modified to add buy store aswell.

Again make sure you have the items in your inventory and that you have the amount or you're gonna send a bad packet to the server which might do nothing or straight up ban you right there and then.  

Also because the packet uses objectId instead of itemId, if you have 2 items that are not stackable (ex a +16 B grade bow and a +0 B grade bow) the script will pick the first one it finds in your inventory, so be careful about that too. I know pretty shoddy code but that's how I roll.

Link to comment
Share on other sites

4 hours ago, MrAnGel_700 said:

Script for L2Reality.com  Auto Captcha (Captcha Anti Bot with photo.. ) 
 

Plz help me 

 

A little tip for next time, if you want someone to actually help you, provide actual information. There are dozens of catpchas going around, and most use "photos." What you need to do in this case is post a screenshot of your captcha, and if possible the full HTML window code. (please, with proper CODE tags, it's the symbol "<>" avobe the text body when you post.) If we don't have this information, unless we download whatever system your server runs and create a character ourselves (which guess what I'm not gonna do) people can't help you. Do that and the people that would help you, will.

Link to comment
Share on other sites

On 1/9/2018 at 2:12 AM, Vinter said:

 

A little tip for next time, if you want someone to actually help you, provide actual information. There are dozens of catpchas going around, and most use "photos." What you need to do in this case is post a screenshot of your captcha, and if possible the full HTML window code. (please, with proper CODE tags, it's the symbol "<>" avobe the text body when you post.) If we don't have this information, unless we download whatever system your server runs and create a character ourselves (which guess what I'm not gonna do) people can't help you. Do that and the people that would help you, will.

thx you for info bro chek  AntiBot  Captcha
 


4Photo ELF  HUMAN  LINEAGE  DARK ELF 

Screenshot_1.png

Link to comment
Share on other sites

  • 2 weeks later...

I've been trying to make a script to automatically farm this quest. Basically, I need my char to farm mobs until 300 items (quest goes to stage 2), then he has to turn quest in and reopen it and restart the farming.


Here's what I've done this far:

       var
item: TL2Item;

function deadCheck: Boolean;
begin
Result := false;
    if User.Dead then begin
        Print('Dead. Pressing to clanhall.');
        Delay(1000);
        Engine.FaceControl(0,false);
        Engine.GoHome(rtClanHall);
        Delay(10000);
   end;
end;
procedure script1;
begin
engine.settarget('Tunatun');
delay(1000);
engine.dlgopen;
delay(1000);
engine.dlgsel('Quest');
delay(1000);
engine.dlgsel('Home Security');
delay(1000);
engine.dlgsel('Listen to his concern');
delay(1000);
engine.dlgsel('Offer to help');
delay(5000);
end;
procedure script2;
begin
while true do begin
delay(150);

  if User.Dead then begin
    deadCheck;
    end;

      Engine.MoveTo(53131,-84124,-2720);
        Delay(500);
        Engine.MoveTo(53736,-87114,-2456);
        Delay(500);
    if Engine.QuestStatus(278, 1) then begin
        Engine.FaceControl(0,true);
        Engine.LoadZone('BeastFarm');
    end;
    if Engine.QuestStatus(278, 2) then begin
    script3
    end;
    end;
end;

procedure script3;
begin
while true do begin
delay(150);

  if User.Dead then begin
    deadCheck;
    end;
    if Engine.QuestStatus(278, 2) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(53736,-87114,-2456);
        Delay(500);
        Engine.MoveTo(53131,-84124,-2720);
        Delay(500);
        Engine.MoveTo(53658, -83826, -2720);
        Delay(500);
        engine.settarget('Tunatun');
        delay(500);
        engine.dlgopen;
        delay(500);
        engine.dlgsel('Quest');
        delay(500);
        engine.dlgsel('Home Security');
        delay(500);
        engine.dlgsel('Accept Reward');
        delay(1000);
        if Engine.QuestStatus(278, 0) then begin
    script1
    end;
    end;
     end;
end;
begin
Script.NewThread(@script1);
Script.NewThread(@script2);
Script.NewThread(@script3);
end.


I'm encountering 2 issues with this: first, while farming mobs sometimes my char seems to try to go to the next point, then he resumes kiling mobs, he goes a little batshit crazy, so I gues it's an indicator of something going wrong. 

The main issue though, is that it seems I can't make the procedures go into a loop, after he turns the quest in he doesn't restart from the beginning. I'm really not good at programmin, I've just been using the guide found on this forum and went for trial and errors, but at this point it seems I can't make it right.

Any help, pleaaaase?

Link to comment
Share on other sites

  • 3 weeks later...

hello to all!! any1 know how can i take buffs with .buffer ? i mean in the server i am playing i must type .buffer and i open the dialogue.. my problem is how to stop attacking and type .buffer

Link to comment
Share on other sites

On 1/2/2018 at 7:31 PM, Manowar81 said:

I've been trying to make a script to automatically farm this quest. Basically, I need my char to farm mobs until 300 items (quest goes to stage 2), then he has to turn quest in and reopen it and restart the farming.


Here's what I've done this far:

 


       var
item: TL2Item;

function deadCheck: Boolean;
begin
Result := false;
    if User.Dead then begin
        Print('Dead. Pressing to clanhall.');
        Delay(1000);
        Engine.FaceControl(0,false);
        Engine.GoHome(rtClanHall);
        Delay(10000);
   end;
end;
procedure script1;
begin
engine.settarget('Tunatun');
delay(1000);
engine.dlgopen;
delay(1000);
engine.dlgsel('Quest');
delay(1000);
engine.dlgsel('Home Security');
delay(1000);
engine.dlgsel('Listen to his concern');
delay(1000);
engine.dlgsel('Offer to help');
delay(5000);
end;
procedure script2;
begin
while true do begin
delay(150);

  if User.Dead then begin
    deadCheck;
    end;

      Engine.MoveTo(53131,-84124,-2720);
        Delay(500);
        Engine.MoveTo(53736,-87114,-2456);
        Delay(500);
    if Engine.QuestStatus(278, 1) then begin
        Engine.FaceControl(0,true);
        Engine.LoadZone('BeastFarm');
    end;
    if Engine.QuestStatus(278, 2) then begin
    script3
    end;
    end;
end;

procedure script3;
begin
while true do begin
delay(150);

  if User.Dead then begin
    deadCheck;
    end;
    if Engine.QuestStatus(278, 2) then begin
    Engine.FaceControl(0,false);
        Engine.MoveTo(53736,-87114,-2456);
        Delay(500);
        Engine.MoveTo(53131,-84124,-2720);
        Delay(500);
        Engine.MoveTo(53658, -83826, -2720);
        Delay(500);
        engine.settarget('Tunatun');
        delay(500);
        engine.dlgopen;
        delay(500);
        engine.dlgsel('Quest');
        delay(500);
        engine.dlgsel('Home Security');
        delay(500);
        engine.dlgsel('Accept Reward');
        delay(1000);
        if Engine.QuestStatus(278, 0) then begin
    script1
    end;
    end;
     end;
end;
begin
Script.NewThread(@script1);
Script.NewThread(@script2);
Script.NewThread(@script3);
end.

 


I'm encountering 2 issues with this: first, while farming mobs sometimes my char seems to try to go to the next point, then he resumes kiling mobs, he goes a little batshit crazy, so I gues it's an indicator of something going wrong. 

The main issue though, is that it seems I can't make the procedures go into a loop, after he turns the quest in he doesn't restart from the beginning. I'm really not good at programmin, I've just been using the guide found on this forum and went for trial and errors, but at this point it seems I can't make it right.

Any help, pleaaaase?

 

here u have test it:

 

item: TL2Item;
procedure checkDeath;
begin
  if (User.Dead) then
  begin
    Print('Dead. Pressing to clanhall.');
    Delay(1000);
    Engine.FaceControl(0,false);
    Engine.GoHome(rtClanHall);
    Delay(10000);
  end;
end;
procedure tunatun;
begin
  Engine.SetTarget('Tunatun');
  Delay(1000);
  Engine.DlgOpen;
  Delay(1000);
  Engine.DlgSel('Quest');
  Delay(1000);
  Engine.DlgSel('Home Security');
  Delay(1000);
  Engine.DlgSel('Listen to his concern');
  Delay(1000);
  Engine.DlgSel('Offer to help');
  Delay(1000);
if (not Engine.QuestStatus(278, 1)) then
  tunatun;
end;
procedure moveToSpot;
begin
  Engine.MoveTo(53131,-84124,-2720);
  Delay(500);
  Engine.MoveTo(53736,-87114,-2456);
  Delay(500);
end;
procedure itemSelMahumManeQuest;
begin
  Engine.LoadConfig(script.path+'BeastFarm');
  Engine.CancelTarget;
  Engine.FaceControl(0, true);
  repeat
    Delay(100);
    checkDeath;
  until ((Inventory.Quest.ById(15531, item)) and (item.Count >= 300));
  if (not Engine.QuestStatus(278, 1)) then
  itemSelMahumManeQuest;
  Engine.FaceControl(0, false);
  Delay(1000);
end;
procedure moveToReward;
begin
  Engine.MoveTo(53736,-87114,-2456);
  Delay(500);
  Engine.MoveTo(53131,-84124,-2720);
  Delay(500);
  Engine.MoveTo(53658, -83826, -2720);
  Delay(500);
  Engine.SetTarget('Tunatun');
  Delay(500);
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Home Security');
  Delay(500);
  Engine.dlgSel('Accept Reward');
  Delay(1000);
end;
begin
  while true do
  begin
  Delay(100);
  tunatun;
  moveToSpot;
  itemSelMahumManeQuest;
  moveToReward;
  end;
end.

 

Edited by catamen
Link to comment
Share on other sites

Hello guys , i am new in botting , just got my first adrenaline. 

I came with an ask .. i need a script for farming Ancient Adena for example , does some1 has it to share it ? 

Thanks !

Link to comment
Share on other sites

1 minute ago, siriys_blek said:

I came with an ask .. i need a script for farming Ancient Adena for example , does some1 has it to share it ?

 

just let a char farm on catas for seal stones,why u need scrip?

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

    • I also think this feature would bring more harm than good... another example is a dwarf rushing against your mobs so he takes priority, then he plays fake death and proceeds to grief the shit out of you. A minimum damage threshold is necessary, which would basically converge to what is the default feature (i.e. biggest damage dealer)
    • I bought the premium to watch the video and it's private. 😢
    • For some Majestic reason OP can't edit their topics anymore?    Let me update the potential offers, I got up to 2 spots to fill.   CONTACT TELEGRAM ONLY: https://t.me/asupport_g1     A credible team that SGuard represents is looking for java developers.    These positions is full time only i.e. your time is mostly dedicated within the team and team tasks, side gigs are fine, as long as you are able to combine your gig and main.  All necessary tools are provided.  The team is consistent with > 10 team members and the team is looking to expand to meet various goals. A decent Lineage 2 Essense OR Main (GOD) knowledge is needed.  Experience with l2r/l2p/l2s. mobius is fine too for referrence only. The team is friendly and goal oriented, very active and resourceful.   Requirements are standard, java knowledge is optional.  Multi language is a plus but not necessary (English/Russian), any is accepted.   Terms and conditions including compensation are reasonable and considered to be up for the industry standards. Details are negotiable with suitable candidates.   You will need to have a headset and a mic just for the initial processing, there're no team meetings or conferences after that. There's a small 30min interview process to demonstrate knowledge and just to meet each other.   The team has decided it is in their best interest to not publish their information at this time. Details will be available only for suitable candidates.   CONTACT TELEGRAM ONLY: https://t.me/asupport_g1
    • Thanks for the detailed info. I also have some ideas in mind but the execution may be hard. Thanks again!
    • There are as many approaches as stars in the sky, for all I know. You could create a class variable in MonsterInstance.java, which will hold the Object_ID of its first aggressor/dmg_dealer. From there, you will have to add a check in the RequestAttack and RequestMagicSkillUse packets and/or in some doDamage()/reduceHp() method, which will check if the damage dealer is the first aggressor, and if not - reduce the damage to 0. But you also have to be mindful about special cases, such as: - what happens when a Warlord runs around an area, provoking everything just to trigger the aggression and then just goes to town waiting for someone else to kill the said mobs so that the WL can collect free rewards? You might have to play with the DefaulAI, or the AI of monsters and hook a function that would reset the aggressor_id value under certain conditions, such as - the aggressor is not in X range or the aggressor is dead, or the aggressor is not online, or the NPC/Monster's AI is in INACTIVE state, which would indicate they are not in combat. - what happens when the aggressor is in party? should the said aggressor/dmg_dealer variable be a List/Set of players which are all eligible to deal dmg or receive rewards?  
  • Topics

×
×
  • Create New...