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

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

    • ⚔️ LINEAGE II KHADIA ⚔️ Interlude PTS (L2OFF) • Mid Rate PvP • Custom Endgame Experience 🔥 NOT JUST ANOTHER SERVER — A REAL BATTLEFIELD 🔥 Welcome to L2Khadia, where classic Interlude meets competitive PvP and custom progression. No fake numbers, no empty promises — only action, economy, war and long-term gameplay. ━━━━━━━━━━━━━━━━━━━━━━ 📊 SERVER RATES EXP: x100 SP: x150 Adena: x300 Spoil: x15 ━━━━━━━━━━━━━━━━━━━━━━ ⚔️ WHY KHADIA? ✔ Original Interlude Mechanics & Formulas ✔ Mid Rate PvP Balance ✔ Real Clan Wars / Sieges / Olympiad ✔ Stable & Fair Economy ✔ Active Staff Team ✔ Long-Term Project Vision ━━━━━━━━━━━━━━━━━━━━━━ 🗡️ KHADIA CUSTOM CONTENT 🔥 Khadia Weapons – Unique power & visuals 🛡 Khadia Armor – Raid Boss drops & crafting 🧥 Khadia Cloaks – Endgame progression items 💎 Designed for competitive PvP ━━━━━━━━━━━━━━━━━━━━━━ 🎁 REWARD SYSTEMS 🏆 PvP / PK Reward System 📦 Daily PvP Reward Package 👑 Raid Package from Boss Extract Rewards 🗳 Vote Reward System 📈 Rankings: PvP / PK / Clans / Castles ━━━━━━━━━━━━━━━━━━━━━━ 💎 VIP FEATURES ✔ VIP Buff Coin ✔ Nick / Title Colors ✔ Special VIP Chat ( ^ Key ) ✔ Exclusive VIP Benefits ━━━━━━━━━━━━━━━━━━━━━━ 🎮 QUALITY OF LIFE ✔ Auto Loot for Farm ✔ Auto Loot Disabled for Raid Boss ✔ Offline Shop System ✔ Remote Buff Coin ✔ RaidBoss Status NPC ✔ PvP / PK Ranking NPC ━━━━━━━━━━━━━━━━━━━━━━ 🌍 FARM ZONES • Elven Fortress [80] – Medium • Cave of Trials [80+] – Party Hard • Monastery of Silence [80] – Medium • PvP Zones Around Raid Bosses ━━━━━━━━━━━━━━━━━━━━━━ 🏰 CLAN & SIEGE SYSTEM ✔ Full Interlude Clan System ✔ Max Clan Level 8 + Clan Skills ✔ Max 3 Clans per Alliance ✔ No Kick / Leave Penalty ✔ Weekly Castle Sieges ━━━━━━━━━━━━━━━━━━━━━━ 🚀 JOIN NOW – START YOUR LEGEND 🚀 🌐 Website: www.l2khadia.com 💬 Discord: https://discord.gg/DnZrgWn77n ━━━━━━━━━━━━━━━━━━━━━━ No Pay To Win • Fair Gameplay • Real PvP • Custom Endgame Content       We Wish you the best game ! 
    • First of all, he doesn’t even know English. He needs to learn it first.
    • Which copies are you talking about? Hahaha, stop crying, everyone knows you're a copy-paste, you can't even program "hello world".
    • Imagine if gustavo cuts cocaine and skylord stops flaming him and this two motherfuckers work together, they can do very good stuff... But.. yeah
  • 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..