Jump to content

Recommended Posts

Posted

I need script, to teleport to town with scrool after 3 hours go to npc buffer rebuff and teleport to farm zone. as an example. ty

that doesnt need script afaik.

  • 2 weeks later...
Posted (edited)

Enjoy :D this is just example, need rewrite script for your server


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 adr.bot
Posted

yes. i want to get buffs from alt + b .. and maybe some shots :)

you need this http://rghost.net/8fSPmFjhKthis is example with bot interface buff  https://www.youtube.com/watch?v=sfveVFRYExw&feature=player_embedded in script you can write like that 

Engine.BypassToServer('_bbshome');

and etc.

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

    • Thanks for the collection and the free advertising! These files have been in the public domain for a long time — you just saved people the trouble of searching. A true fan. 😄 Just to clarify for everyone reading: these files have nothing to do with this topic. They are 10+ year old builds, and since various third-party modifications exist in the wild, we cannot guarantee what may have been added or changed in those versions. Use them at your own risk. We have absolutely no judgment toward those who are on a tight budget and can't afford our current builds — these old shared files might genuinely help you get started. Just use them carefully and at your own risk. And please don't judge developers for the mistakes they made early in their careers — every developer goes through stages of growth, and what you see in those old builds is simply a snapshot of where we were back then. We've come a long way since. If you're interested in our older builds, we have a dedicated thread for that with significantly reduced prices — very accessible for any budget. We have also recently resumed full technical support for legacy builds, handled by a separate team that doesn't interfere with our private development direction for larger projects. You can find our legacy builds here: Our OLd L2-scripts Packs Actual revisions Our current private sources are a completely different story — which is exactly what this thread is about. Too bad all your time goes into collecting other people's old code instead of developing your own project. Though judging by "L2MID is currently offline, we will come back soon in 2026" — you clearly have plenty of time on your hands. 😉
    • SHARED alreaxy! Are these files yours? https://fex.net/ru/s/kdop2z4
    • You asked for examples of coping projects, we provided them, you asked for feedback from our clients, some of them wrote their reviews on the same mmodev, what else can I prove to you? you just asked your friends from mmodev to write nasty things, they have never been our customers and never will be, because they are used to downloading only free products and hacking it. You just don't respect the work of others, this is the conclusion that can be drawn from your inflammatory topic on mmodev, where there are many people who once could not buy our assemblies or whom we kicked out of work or for some other reason. But you are completely wrong and you are behaving very lowly. But let it be on your conscience. Good luck, keep busy with your project, and don't interfere with others.
    • I will never use L2J as the basis for my project but what i saw in MMODEV was enough for me. GL    
  • 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..