Jump to content
MaxCheaters Official Group on Discord
Top.MaxCheaters.com is now OPEN – Lineage 2 Top Listing
L2JForge.live Interlude Premium Emulator

L2 Adrenaline Scripts.

hornas

By hornas
in Request Botting [English]

 Share

Recommended Posts

powercheats Newbie

powercheats

Posted
Posted (edited)

How do i for the program read the "msg system server". Like GM's 

uses sysutils,classes;
begin
   while Engine.Status = lsOnline do begin
        if (ChatMessage.ChatType = mtSystem) and ChatMessage.Unread then
      begin
        if (ChatMessage.Text = 'TvT Event has begin') then  Engine.EnterText('.jointvt'); 
    delay(2000);
      end;
    end;
end.
Edited by powercheats
Cruz59 Newbie

Cruz59

Posted
Posted

hey, autobuff is not working for me. is there any script/way to rebuff myself after 1h playtime in alt+b?

 

i'ld highly appreciate an answer.

 

 

Regards,

Cruz

fAkeN Apprentice

fAkeN

Posted
Posted

hey, autobuff is not working for me. is there any script/way to rebuff myself after 1h playtime in alt+b?

 

i'ld highly appreciate an answer.

 

 

Regards,

Cruz

uses SysUtils, Classes;
var A:TStringList;
begin
  A:= TStringList.create;
  A.Text:= Engine.CbText;
  A.SaveToFile(Script.Path + 'CbText.txt');
  A.Free;
end.

Find bypass you need on Community board, and make a function for rebuff (use search to find function examples).

tuan10163 Newbie

tuan10163

Posted
Posted (edited)

hi, how do rework a script invite on pm

 

 eror in line 1 T_T

 

it working :D

 Procedure invitePM;
 
 begin
       while true do begin
        if (ChatMessage.unread and (integer(ChatMessage.chattype) = 2))  then begin //u can add as many senders as u want. change nick to your nicks
        if ((ChatMessage.sender = 'nick1') or 
            (ChatMessage.sender = 'nick2') or 
            (ChatMessage.sender = 'nick3') or 
            (ChatMessage.sender = 'nick4') or 
            (ChatMessage.sender = 'nick5') or 
            (ChatMessage.sender = 'nick6')) and (ChatMessage.text = 'inv') then begin //u can change *inv* to any trigger u want
                print(ChatMessage.sender);
                engine.inviteparty(ChatMessage.sender);
                print('Aproved, inviting!') ;
            end;
        end;
     delay(1000);
   end;
 end;

    begin //start of main body
    Script.NewThread(@invitePM);
    end. //end of main body
Edited by tuan10163
yoejoe Newbie

yoejoe

Posted
Posted

 

hi, how do rework a script invite on pm

 

 eror in line 1 T_T

 

it working :D

 Procedure invitePM;
 
 begin
       while true do begin
        if (ChatMessage.unread and (integer(ChatMessage.chattype) = 2))  then begin //u can add as many senders as u want. change nick to your nicks
        if ((ChatMessage.sender = 'nick1') or 
            (ChatMessage.sender = 'nick2') or 
            (ChatMessage.sender = 'nick3') or 
            (ChatMessage.sender = 'nick4') or 
            (ChatMessage.sender = 'nick5') or 
            (ChatMessage.sender = 'nick6')) and (ChatMessage.text = 'inv') then begin //u can change *inv* to any trigger u want
                print(ChatMessage.sender);
                engine.inviteparty(ChatMessage.sender);
                print('Aproved, inviting!') ;
            end;
        end;
     delay(1000);
   end;
 end;

    begin //start of main body
    Script.NewThread(@invitePM);
    end. //end of main body

still not working :/

  • 1 month later...
deviouz1 Newbie

deviouz1

Posted
Posted (edited)

anyone have a wolf quest script already written? I'm in the process of doing it myself, based on ADR's egg delivery script, but i've run across a few things im not sure how to do (no surprise there) and i'm fairly sure the server i'm on has some unique things it does, like change the amount it costs to teleport based on your level which changes the links listed in the teleport dialogue pages.

here is what i have so far and it seems to work but i'm not sure how to make it hunt until i have all 50 bloody fangs (quest items arent showing up in the User > Inventory > Quest report, so im not sure how to reference the items or how to get their counts) so i've inserted a delay of 20 minutes to allow for that much hunting. pretty sure thats too long but too many times it tried to SOE before i had all 50 so i over estimated to account for time variations. 

It's only for TH's and it doesn't do the test for you, as i'm not exactly sure how to dynamically select the correct answers since the questions aren't always the same ones, and they're never in the same order.

Any insight on any of this would be much appreciated.

  

begin
  Engine.SetTarget(30731);                                      ///Martin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Ask Detailed Questions');
  Delay(500);
  Engine.DlgSel('I will take the task.');
  Delay(500);
  Engine.MoveTo(-83091,150837,-3104);
  Delay(500);
  Engine.SetTarget(31076);                                      ///Newb Helper
  Engine.DlgOpen;
  Engine.DlgSel('See the list of available supplemental magic.');
  Delay(500);
  Engine.DlgSel('Receive supplemental magic');
  Delay(500);
  Engine.MoveTo(-80885,150073,-3070);
  Delay(500);
  Engine.MoveTo(-80769,149819,-3070);
  Engine.SetTarget(30320);					///Richlin
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('Talking Island Village - 9400 Adena ');
  Delay(3000);
  Engine.SetTarget(30006);					///? TI GK
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('Talking Island, Northern Territory - 1000 Adena ');
  Delay(3000);
  Engine.MoveTo(-109317,215731,-3266);
  Delay(500);
  Engine.MoveTo(-111372,217019,-3266);
  Delay(1200000);
  Engine.UseItem(736);  //Scroll Escape
  Delay(30000);
  Engine.MoveTo(-85292,243739,-3728);
  Delay(500);
  Engine.MoveTo(-84136,244612,-3140);
  Delay(500);
  Engine.SetTarget(30006);					///? TI GK
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Village of Gludin - 18000 Adena ');
  Delay(3000);
  Engine.MoveTo(-81056,150257,-3056);
  Delay(500);
  Engine.MoveTo(-84605,150799,-3155);
  Delay(500);
  Engine.SetTarget(30731);                                      ///Martin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Ask about the next task');
  Delay(500);
  Engine.MoveTo(-81056,150257,-3056);
  Delay(500);
  Engine.MoveTo(-80769,149819,-3070);
  Engine.SetTarget(30320);					///Richlin
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Village of Gludio - 7300 Adena ');
  Delay(3000);
  Engine.SetTarget(30256);                                      ///Bella
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('I wish to learn about pets.');
  Delay(500);
  Engine.DlgSel('Next.');
  Delay(500);
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Dion - 17000 Adena ');
  Delay(3000);
  Engine.MoveTo(16157,144732,-3048);
  Delay(500);
  Engine.MoveTo(17019,147030,-3127);
  Delay(500);
  Engine.MoveTo(17433,147423,-3120);
  Delay(500);
  Engine.MoveTo(17479,147622,-3112);
  Delay(500);
  Engine.SetTarget(30072);                                      ///Metty
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Tell me about the pets.');
  Delay(500);
  Engine.MoveTo(17840,145972,-3122);
  Delay(500);
  Engine.MoveTo(16527,144335,-3013);
  Delay(500);
  Engine.MoveTo(15608,142908,-2732);
  Delay(500);
  Engine.SetTarget(30059);                                      ///Trisha
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Giran - 6800 Adena ');
  Delay(3000);
  Engine.MoveTo(80818,148577,-3495);
  Delay(500);
  Engine.MoveTo(79764,148865,-3559);
  Delay(500);
  Engine.MoveTo(80040,149459,-3512);
  Delay(500);
  Engine.MoveTo(80441,149255,-3504);
  Delay(500);
  Engine.SetTarget(30091);                                      ///Ellie
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('[Get a Pet (In Progress)]');
  Delay(500);
  Engine.DlgSel('I wish to learn about pets');
  Delay(500);
  Engine.MoveTo(80441,149255,-3504);
  Delay(500);
  Engine.MoveTo(80040,149459,-3512);
  Delay(500);
  Engine.MoveTo(79764,148865,-3559);
  Delay(500);
  Engine.MoveTo(80818,148577,-3495);
  Delay(500);
  Engine.MoveTo(83401,147924,-3400);
  Delay(500);
  Engine.SetTarget(30080);                                      ///Clarissa
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Dion - 38000 Adena ');
  Delay(3000);
  Engine.SetTarget(30059);                                      ///Trisha
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Gludio - 3400 Adena ');
  Delay(3000);
  Engine.SetTarget(30256);                                      ///Bella
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Village of Gludin - 3400 Adena ');
  Delay(3000);
  Engine.MoveTo(-81072,150275,-3056);
  Delay(500);
  Engine.MoveTo(-83128,150720,-3120);
  Delay(500);
  Engine.MoveTo(-84614,150810,-3155);
  Delay(500);
 end.

 

Edited by deviouz1
deviouz1 Newbie

deviouz1

Posted
Posted

Updated. it works, with some help. I'm not sure how to turn targeting on and off via script, so you have to set several mobs to do not attack via the GUI, and i still havent the slightest idea how to get the test dialogues automated so you still have to take the test as well, but other than that, this has worked out for me pretty well. just start the script while standing next to Martin and it does all the leg work for me. just hit go, and check back later to do the test. 

begin
  Engine.SetTarget(30731);                                      ///Martin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Ask Detailed Questions');
  Delay(500);
  Engine.DlgSel('I will take the task.');
  Delay(500);
  Engine.MoveTo(-83091,150837,-3104);
  Delay(500);
  Engine.SetTarget(31076);                                      ///Newb Helper
  Engine.DlgOpen;
  Engine.DlgSel('See the list of available supplemental magic.');
  Delay(500);
  Engine.DlgSel('Receive supplemental magic');
  Delay(500);
  Engine.MoveTo(-80885,150073,-3070);
  Delay(500);
  Engine.MoveTo(-80769,149819,-3070);
  Engine.SetTarget(30320);					///Richlin
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('Talking Island Village - 9400 Adena ');
  Delay(3000);
  Engine.SetTarget(30006);					///? TI GK
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('Talking Island, Northern Territory - 1000 Adena ');
  Delay(3000);
  Engine.MoveTo(-109317,215731,-3266);
  Delay(500);
  Engine.MoveTo(-111372,217019,-3266);
  Delay(300000);
  Print('15 minutes remaining');
  Delay(300000);
  Print('10 minutes remaining');
  Delay(300000);
  Print('5 minutes remaining');
  Delay(300000);
  Print('Hunting time expired, using SOE now');
  Engine.UseItem(736);  //Scroll Escape
  Delay(30000);
  Engine.MoveTo(-85292,243739,-3728);
  Delay(500);
  Engine.MoveTo(-84136,244612,-3140);
  Delay(500);
  Engine.SetTarget(30006);					///? TI GK
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Village of Gludin - 18000 Adena ');
  Delay(3000);
  Engine.MoveTo(-81056,150257,-3056);
  Delay(500);
  Engine.MoveTo(-84605,150799,-3155);
  Delay(500);
  Engine.SetTarget(30731);                                      ///Martin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Ask about the next task');
  Delay(500);
  Engine.MoveTo(-81056,150257,-3056);
  Delay(500);
  Engine.MoveTo(-80769,149819,-3070);
  Engine.SetTarget(30320);					///Richlin
  Engine.DlgOpen;
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Gludio - 7300 Adena ');
  Delay(3000);
  Engine.SetTarget(30256);                                      ///Bella
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('I wish to learn about pets.');
  Delay(500);
  Engine.DlgSel('Next.');
  Delay(500);
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Dion - 17000 Adena ');
  Delay(3000);
  Engine.MoveTo(16157,144732,-3048);
  Delay(500);
  Engine.MoveTo(17019,147030,-3127);
  Delay(500);
  Engine.MoveTo(17433,147423,-3120);
  Delay(500);
  Engine.MoveTo(17479,147622,-3112);
  Delay(500);
  Engine.SetTarget(30072);                                      ///Metty
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Tell me about the pets.');
  Delay(500);
  Engine.MoveTo(17840,145972,-3122);
  Delay(500);
  Engine.MoveTo(16527,144335,-3013);
  Delay(500);
  Engine.MoveTo(15608,142908,-2732);
  Delay(500);
  Engine.SetTarget(30059);                                      ///Trisha
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Giran - 6800 Adena ');
  Delay(3000);
  Engine.MoveTo(80818,148577,-3495);
  Delay(500);
  Engine.MoveTo(79764,148865,-3559);
  Delay(500);
  Engine.MoveTo(80040,149459,-3512);
  Delay(500);
  Engine.MoveTo(80441,149255,-3504);
  Delay(500);
  Engine.SetTarget(30091);                                      ///Ellie
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('[Get a Pet (In Progress)]');
  Delay(500);
  Engine.DlgSel('I wish to learn about pets');
  Delay(500);
  Engine.MoveTo(80441,149255,-3504);
  Delay(500);
  Engine.MoveTo(80040,149459,-3512);
  Delay(500);
  Engine.MoveTo(79764,148865,-3559);
  Delay(500);
  Engine.MoveTo(80818,148577,-3495);
  Delay(500);
  Engine.MoveTo(83401,147924,-3400);
  Delay(500);
  Engine.SetTarget(30080);                                      ///Clarissa
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Dion - 38000 Adena ');
  Delay(3000);
  Engine.SetTarget(30059);                                      ///Trisha
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Town of Gludio - 3400 Adena ');
  Delay(3000);
  Engine.SetTarget(30256);                                      ///Bella
  Engine.DlgOpen;
  Delay(500);
  Engine.DlgSel('Teleport');
  Delay(500);
  Engine.DlgSel('The Village of Gludin - 33000 Adena ');
  Delay(3000);
  Engine.MoveTo(-81072,150275,-3056);
  Delay(500);
  Engine.MoveTo(-83128,150720,-3120);
  Delay(500);
  Engine.MoveTo(-84614,150810,-3155);
  Delay(500);
 end.

 

AlmostGood Enthusiast

AlmostGood

Posted
Posted (edited)
On 24.09.2017 at 9:09 PM, takoulas said:

is that possible to do it?  

 

on 0:30 sec u can see s part of the script :) ...any hlp?

server shows number of registered chars via npc dialog, so all this script does is talking to npc each 1 sec and sending number found in html to party chat.

Edited by AlmostGood
  • 2 weeks later...
takoulas Newbie

takoulas

Posted
Posted
On 9/27/2017 at 4:31 PM, AlmostGood said:

server shows number of registered chars via npc dialog, so all this script does is talking to npc each 1 sec and sending number found in html to party chat.

ty for your answer

any chance to help me write this script?

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
 Share
Go to topic listing


  • Posts

    • Celestine
      WTS L2Elegant server pack - L2Pride Gracia Final replica

      By Celestine · Posted

      I had friends who played on Elegant and I can confirm it wasn't a bad server. I don't know about the AI bots running around, but in my opinion the price is simply too high. I don't think many people will spend that much money on Lineage 2 files when alternatives like L2Scripts already exist.   Of course it's all about personal preference, but for such an old chronicle the price seems ridiculously expensive. Modern chronicles usually offer more value.   Anyway, I wish you the best of luck with the sale. This is just my personal opinion. Whoever likes it, good for them, and whoever doesn't, that's fine too. Everyone has different preferences.
    • gerardas
      L2Avokado | Active Development

      By gerardas · Posted

      https://l2avokado.com/ Hello everyone,   After some time of development, we've decided to open L2Avokado to the public in its current development stage. We're looking for players who enjoy Interlude and would like to help shape the project before its official release.   This isn't a "launch" announcement. Instead, we're inviting the community to log in, explore the server, test the systems we've built, and provide honest feedback. Whether it's bug reports, balance suggestions, progression ideas, or quality-of-life improvements, we'd love to hear them.   Our goal has always been to create an Interlude server that feels familiar while offering a fresh progression experience. We've intentionally avoided custom weapons, armor, and client modifications. Instead, we've focused on redesigning progression through reworked hunting grounds, quests, crafting, and gameplay systems while remaining compatible with a clean Interlude client.   At this stage, the core progression path has been implemented, including the main hunting grounds, quests, custom systems, and events. However, as the project is still under active development, there will inevitably be bugs, balance issues, and areas that require further polishing.   This is exactly why we'd like your help.   We're looking for players who are willing to: Test gameplay and progression. Report bugs and exploits. Suggest balance improvements. Share ideas for new features or quality-of-life changes. Help us build a server that the community genuinely enjoys playing.   The Client and System downloads are already available on our website, so you can jump straight into the game. We're also working on a dedicated launcher that will simplify installation and future updates.   If you're interested in helping develop a unique Interlude project and want your feedback to genuinely influence the direction of the server, we'd love to have you with us.   We look forward to seeing you in-game and hearing your thoughts on Discord. https://l2avokado.com/
    • Dragic
      La2Tools — Lineage 2 Texture Pack Editor 3.0.3

      By Dragic · Posted

      Μoved to the correct section..    
    • Atom
      La2Tools — Lineage 2 Texture Pack Editor 3.0.3

      By Atom · Posted

      Looks great share tools!
    • Atom
      WTS L2Elegant server pack - L2Pride Gracia Final replica

      By Atom · Posted

      Mate your server used to play with full of bots, from where you find that revenue? 

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