Jump to content

Recommended Posts

Posted
Hello guys. 

I want to ask something..

I use adrenaline for over 3 months, but I can't find a way to make my bot to do teleport in a position.

For example: When my bot dies, I want to take re-buffs and teleport in a zone. After this, to walk arround in another locations. 

 

Sorry for my bad english.. 

Posted

 

Hello guys. 
I want to ask something..
I use adrenaline for over 3 months, but I can't find a way to make my bot to do teleport in a position.
For example: When my bot dies, I want to take re-buffs and teleport in a zone. After this, to walk arround in another locations. 
 
Sorry for my bad english.. 

 

I think these options and script exist in the latest version,but you have to pay for those services.Idk if there is a way for free version to do this.

Posted (edited)

I think these options and script exist in the latest version,but you have to pay for those services.Idk if there is a way for free version to do this.

I've the latest version. 

No as free version!

 

I can do the bot to move arround, it's not this the problem.

All I want, it's to do buffs/teleport. Nothing else.

Maybe I will try to re-write a ready script. I don't think I will help here..

 

 

 

 

 

Hey adr.bot!

Yes, I think this one can be help me. 

 

Thank you!

 

 

var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
if not User.Buffs.ByID(1204, buff) then begin
Result:=true;
Print('Buffs are needed. Buffing...');
Engine.MoveTo(82968, 53240, -1488);
Delay(500);
Engine.SetTarget(30176); // NPC ID
Delay(500);
Engine.DlgOpen;
Delay(500);
Engine.DlgSel(1);
Delay(500);
Print('Buffed.');
Engine.MoveTo(82968, 53208, -1488); 
end;
Result:=false;
end;

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

begin
while true do begin
delay(150);

if User.inrange(80334,54400,-1552, 250, 150) then begin
        Engine.MoveTo(80334,54400,-1552);
        Engine.MoveTo(80969,53698,-1558);
        Engine.MoveTo(81540,53454,-1494);
        Engine.MoveTo(82480,53340,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82323,55466,-1520, 250, 150) then begin
        Engine.MoveTo(82323,55466,-1520);
        Engine.MoveTo(82403,54498,-1523);
        Engine.MoveTo(82589,53861,-1486);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82123,53535,-1488, 250, 150) then begin
        Engine.MoveTo(82123,53535,-1488);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(80304,56241,-1552, 250, 150) then begin
        Engine.MoveTo(80304,56241,-1552);
        Engine.MoveTo(81470,55682,-1523);
        Engine.MoveTo(82256,55294,-1523);
        Engine.MoveTo(82510,54035,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82445,56012,-1520, 250, 150) then begin
        Engine.MoveTo(82445,56012,-1520);
        Engine.MoveTo(82341,54950,-1523);
        Engine.MoveTo(82574,53833,-1486);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(80054,53209,-1552, 250, 150) then begin
        Engine.MoveTo(80054,53209,-1552);
        Engine.MoveTo(80624,53611,-1558);
        Engine.MoveTo(81772,53468,-1494);
        Engine.MoveTo(82289,53472,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(80513,52980,-1552, 250, 150) then begin
        Engine.MoveTo(80513,52980,-1552);
        Engine.MoveTo(80165,53065,-1558);
        Engine.MoveTo(80630,53610,-1558);
        Engine.MoveTo(81688,53447,-1494);
        Engine.MoveTo(82303,53338,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(80267,55497,-1552, 250, 150) then begin
        Engine.MoveTo(80267,55497,-1552);
        Engine.MoveTo(80359,54536,-1558);
        Engine.MoveTo(80792,53785,-1558);
        Engine.MoveTo(81495,53421,-1494);
        Engine.MoveTo(82323,53362,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(79933,55752,-1552, 250, 150) then begin
        Engine.MoveTo(79933,55752,-1552);
        Engine.MoveTo(80349,55208,-1558);
        Engine.MoveTo(80470,54217,-1558);
        Engine.MoveTo(81053,53602,-1558);
        Engine.MoveTo(81974,53465,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
    if User.inrange(80594,55837,-1552, 250, 150) then begin
        Engine.MoveTo(80594,55837,-1552);
        Engine.MoveTo(81899,55492,-1523);
        Engine.MoveTo(82240,55142,-1523);
        Engine.MoveTo(82531,53946,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82213,53964,-1488, 250, 150) then begin
        Engine.MoveTo(82213,53964,-1488);
        Engine.MoveTo(82668,53709,-1486);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(83327,55410,-1520, 250, 150) then begin
        Engine.MoveTo(83327,55410,-1520);
        Engine.MoveTo(82607,55592,-1523);
        Engine.MoveTo(82184,54809,-1523);
        Engine.MoveTo(82563,53882,-1488);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(79706,52986,-1552, 250, 150) then begin
        Engine.MoveTo(79706,52986,-1552);
        Engine.MoveTo(80427,53549,-1558);
        Engine.MoveTo(80812,53655,-1558);
        Engine.MoveTo(81979,53439,-1494);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82880,55390,-1520, 250, 150) then begin
        Engine.MoveTo(82880,55390,-1520);
        Engine.MoveTo(82375,55524,-1523);
        Engine.MoveTo(82367,54313,-1493);
        Engine.MoveTo(82651,53734,-1486);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82552,53447,-1488, 250, 150) then begin
        Engine.MoveTo(82552,53447,-1488);
        Engine.MoveTo(82950,53186,-1494);
end;
if User.inrange(82638,53885,-1488, 250, 150) then begin
        Engine.MoveTo(82638,53885,-1488);
        Engine.MoveTo(82950,53186,-1494);
end;
if user.inrange(82888, 53240, -1488, 500) then begin
buffCheck;
end; 

if user.inrange(82968, 53208, -1488, 150) and User.Buffs.ByID(1204, buffCheck) then begin
Print('Teleport to Apostate.');
Engine.SetTarget(30832);
Engine.DlgOpen;
Delay(500);
Engine.DlgSel('Catacomb');
Delay(500);
Engine.DlgSel('Apostate');
Delay(5000);
end; 

if user.inrange(-20237, -250797, -8163, 500) then begin
Print('Apostate. Moving to spot');
    Engine.MoveTo(-20168,-250744,-8160);
    Engine.MoveTo(-19304,-250728,-8160);
    Engine.MoveTo(-18968,-250504,-8160);
    Engine.MoveTo(-18456,-250504,-8160);
    Engine.MoveTo(-16792,-250536,-8160);
    Engine.MoveTo(-16424,-250760,-8160);
    Engine.MoveTo(-14888,-250776,-8160);
    Engine.MoveTo(-14536,-250424,-8160);
    Engine.MoveTo(-14408,-249160,-8160);
    Engine.MoveTo(-13768,-249064,-8160);
    Engine.MoveTo(-13736,-247848,-8160);
Print('AA farm: ON!');
Delay(500);
Engine.FaceControl(0, true);
while not deadCheck do delay(1000); //while not dead, do nothing and wait.
end;
end;
end.
Edited by 'Baggos'
Posted

pseudo code:

 

begin

while true do begin

if user dead then begin

go to village

check position and act accordingly (ei. if in point A move to point F then move to G then to H and if in point B move to point I then J then H)

rebuff at point H

port to zone

end;

end.

 

this is what you are looking for?

Posted

pseudo code:

 

begin

while true do begin

if user dead then begin

go to village

check position and act accordingly (ei. if in point A move to point F then move to G then to H and if in point B move to point I then J then H)

rebuff at point H

port to zone

end;

end.

 

this is what you are looking for?

Yes. I was looking for this.

  • 1 month later...

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

    • pm me your discord or write it in comments.  buying through paypal. depending on the price around 5kk or item worth 5kk - both are good. 
    • We're looking for an experienced Java developer with deep knowledge of Lineage 2 private servers (L2J, Lucera, aCis, etc.). The ideal candidate has 5+ years of Java experience and has previously worked on customizing server mechanics, fixing bugs, and implementing new game features. Must be comfortable working independently and have a strong understanding of game systems like skills, classes, and PvP balance.
    • Hello, contact me on telegram Williams0ff
    • I have not touched a L2J style server in probably 13-14 years, as part of my "re-education" on server stuff I decided to build a installation script, hope some of you find it useful. NOTE: This script should only be run on a fresh Ubuntu 22/24 install, must be ran as root. I have only tested on 22 so far. What it does: - Checks to make sure you are root and are using Ubuntu 22/24 - Creates a system user for running aCis - Installs java jdk 21, Mariadb, Apache2 + PHP, Adminer, Ant - Created user and database for gameserver and login server - Creates user for Adminer - Adds second layer of security for Adminer (apache2 auth) - Runs secure_installation on Mariadb - Makes all .sh files executeable - Fills in Mariadb database information in database_installer.sh, config/server.properties, config/loginserver.properties - Runs database_installer.sh - Fetches aCis repository and builds it (supports public and private repo) - Moves all needed files into <user>/acis-built - Enables UFW and opens needed ports: 22, 80, 2106, 7777 - Installs fail2ban and configures protection for sshd (max 3 fails) - Retrieves geodata from http://anothercrappyinterludeserver.com/files/ and unpacks it in correct place - Fills in server IP in loginserver.properties Script is here: https://github.com/Salty-Dragon/aCis-installer-ubuntu   Help etc hop on Discord: https://discord.gg/QuZTw8pn3E    
    • Do your self a favour and keep your mouth shut up. I'm really getting tired of people like you. It seems like this forum has the most toxic members.  Can you share those „unsolved“ bugs? Just bla, bla, bla, but nothing to prove, right? Always the same with you  when you see my project name and always you got what to say bad about me or my project. This is your plan write something bad about others just to get more customers to yourself? Ah, those rotten people everywhere around us.
  • 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