Jump to content

Recommended Posts

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

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

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

 

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



  • Posts

    • https://l2goldcustom.online/
    • do u have the full source code for it  coz the one i have does not have code to read ukx files
    • 🎨 Design & edit without limits: Canva Pro & CapCut Pro subscriptions restocked and active with instant automated delivery!     FINAL CALL: Google is Shutting This Down After October 2026! Google will NEVER bring back this window of opportunity again. Once this month ends, this massive backdoor upgrade is gone permanently!  BUY 2, GET 1 FREE IS STILL LIVE! Stock up now for yourself, your family, your business, and your friends! Think about it: Every single person you know uses a Gmail account, and everyone is running out of storage. Don't let your loved ones get trapped paying $20–$30 every single month when you can set them up with 5TB Cloud Storage + Gemini Advanced (12–18 Months) right now for only $15! Why Buy Bulk Activations Today? Instant Gift Value: Perfect lifetime-style gift for clients, family, or team members. 100% Private & Safe: Activates on personal Gmails—zero passwords or logins required. Global Access: Works worldwide with zero VPN hassles. Instant Automated Delivery: Receive your activation links in seconds 24/7! ‍ Time is running out fast—secure your extra free licenses before the October deadline hits! Order Your Bundle Now on the Website
    • VAELOR Lineage II Interlude · L2OFF · x12   OPEN BETA 9 October 2026 · 17:00 UTC   GRAND OPENING 23 October 2026 · 17:00 UTC   Website: https://l2vaelor.com/ Discord: https://discord.gg/qMgPxH2fd4   ━━━━━━━━━━━━━━━━━━━━━━   WHAT VAELOR AIMS TO BE   Vaelor is an international L2OFF Interlude x12 server built to preserve the original Interlude experience. Combat, classes, crafting, sieges, Olympiad and progression remain close to retail. The changes are limited to the pace and convenience features that make sense on an x12 server.   RATES   EXP and SP: x12 Party EXP and SP: x13.2 Adena: x10 Drop: x5 Spoil: x9 Quest EXP and SP: x3 Quest Adena: x3 Raid Boss Drop: x3   SERVER INFORMATION   Server location: France Main language: English Level cap: 80 Safe enchant: +3, or +4 for full body armor Maximum enchant: +16 Enchant through +15: 70% physical weapons, 40% magic weapons, 66% armor Final step to +16: 35% physical weapons, 20% magic weapons, 66% armor Buff slots: 20 First and second class changes: free Third class change: original quest Game windows: 3   GAMEPLAY   No auto-farm or custom equipment. Level-scaled buffer with presets, custom schemes and support for both players and pets. The available buffs are gradually reduced as the character levels, helping early progression without replacing support classes later in the game. The Global Gatekeeper only connects towns and villages. Travel is free below level 40, then uses level-based Adena fees, with half-price travel between 18:00 and 06:00 UTC. There are no direct teleports to farming zones. The Alt+B Market is a centralized convenience shop containing only consumables and utility items already sold without limits by regular town merchants. Its prices are deliberately higher, so visiting the original NPC merchants remains the economical choice. It does not sell equipment, crafting materials, enchant scrolls or Life Stones. Drop Search finds either an item or a monster and shows where items drop or can be spoiled, including the server rates and the viewing character's level penalty. Player Shop Search and Offline Shop make it easier to find and trade with actual player-run stores while keeping the economy in players' hands. Offline shops remain active for up to 48 hours. Rankings and live Raid Boss and Grand Boss status are available through Alt+B. Character PIN and Computer Lock provide additional account and character protection. Restored and corrected Interlude content includes the Frozen Labyrinth and Ice Queen quest chain, Primeval Isle and Sailren, Wild Beast Reserve, Rainbow Springs Hall, Pagan Temple, and quests around Pavel Ruins and the Plunderous Plains. Auto learn and auto loot are enabled. Castle sieges every two weeks Olympiad daily from 18:00 to 00:00 UTC   PREMIUM AND STORE   Premium grants +15% EXP and SP, +5% Adena, Drop and Spoil, one additional game window and convenience features. The store is limited to Premium, cosmetic accessories and character services. Equipment, enchants, combat stats and access to content are not sold.   ━━━━━━━━━━━━━━━━━━━━━━   If you know Interlude well, come test the server and tell us honestly what feels wrong.   Create account: https://l2vaelor.com/register Download: https://l2vaelor.com/#download Discord: https://discord.gg/qMgPxH2fd4
  • 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..