Request L2 Adrenaline Scripts.

[Alessonborges]

function SetForegroundWindow(hwnd: integer) : Boolean; stdcall;
    external 'user32.dll';

    function captcha:boolean; begin
             if engine.dlgtext.contains('Refresh') or
             engine.dlgtext.contains('Captcha') or
             engine.dlgtext.contains('60 seconds') or
             engine.dlgtext.contains('Bot')   then begin
       SetForegroundWindow(Engine.GameWindow);             
      PlaySound(exepath+'\sounds\'+'PlayerAlarm'+'.wav');
      delay(500);  
      StopSound;
          end;   
  end;
begin
  while true do begin
  delay(300);
   captcha();
end;
end.
 

this script worked and alert when you open the captcha windows

 

[cagebg]

script for invite. just pm to your bot "invite" or word what you want and will invite you

 

begin
while delay(555) do begin
if (ChatMessage.Text = 'invite') and ChatMessage.Unread then
if (ChatMessage.ChatType = ctPrivate) then
Engine.InviteParty(chatmessage.sender, ldRandomSpoil);
end;
end.

 

[OLSI]

I need an auto-farm script for MOS/rebuff after 1hour and teleport again to mos is someone able to help me?

[cagebg]

hello. lf how to find alt+B but easest way :) i playing on l2age and have protection. if somone have alt+B command for this server pls share with me.

thank you , cheers

[ShuN^]

Is there any script or setting so you can make your char "walk" from one point to the other and use skills? For example i have a warlord and i wanna provoke an entire room for farming but in order to do that my char needs to walk back and forth.

 

Thanks in advance.

Edited October 28, 2017 by ShuN^

[kirk7183]

Hi all, I made a very good script for delusion and i test it like 12 h non-stop . My problem is how to i make it take crystal stage 10 any color from my wh and when its lvl up to stage 14 put it in my wh and take another one. TNX a lot 

[alexamorimm2]

Hey guys. I'm creating my own script for TTs Quests (Egg delivery, Liquor delivery) based on yours but the Script for taking the quest is not working  at the opion "I'll deliver your eggs.", like: 
 

Quote

engine.bypasstoserver ('Quest 621_EggDelivery 31543-1.htm');

delay (1500);

Engine.DlgSel (1);

delay (1500);

Engine.DlgSel ('I'll deliver your eggs.'); 

delay (1500);

mouseClick (764, 509, 2000);

delay (1500);

**Red line over all.**

* Server (L2DREAM)  *

I spent a day trying on it but nothing is working. Thank you for your time!

special thank to Adr.bot your professional mechanics to scripting are insane. You are the best!!  

 

[adr.bot]

9 hours ago, alexamorimm2 said:

Hey guys. I'm creating my own script for TTs Quests (Egg delivery, Liquor delivery) based on yours but the Script for taking the quest is not working  at the opion "I'll deliver your eggs.", like: 
 

**Red line over all.**

* Server (L2DREAM)  *

I spent a day trying on it but nothing is working. Thank you for your time!

special thank to Adr.bot your professional mechanics to scripting are insane. You are the best!!  

 

as i know mouse clicks doesnt work with smart guard, u need use engine.bypasstoserver(string); if engine.dlgsel(string/index); doesnt work

[ApoLo_dps]

I would like to help you guys, I use this script without serving to play, and I would like to add a line so he can check the amount of adena and exchange for gold bar through the alt + b menu if it repeats all as times that reach x of adena for example. I'm noob in the script so give that strength there.

 

var Figth_Flag:boolean;
     Item: TL2Item;
     Npc: TL2Npc;
     Obj: TL2Buff;
     IdBuff: integer;
     Buffs:TL2Buff;
var L2Skill: TL2Skill;


procedure toVillage;
begin
Print('To Village');
  Delay(100);
    if (User.HP=0) then
      begin
       Delay(2000);
       Engine.GoHome;
       Engine.Facecontrol(0,False);
       Buff;
      end;
end;


procedure buff;
begin
		Engine.BypassToServer('_bbshome');
		Delay(2000);
		Engine.BypassToServer('_bbsloc');
		Delay(2000);
		Engine.BypassToServer('_bbsloc_buffer');
		Delay(2000);
		Engine.BypassToServer('_bbsloc_functions_buffer_showProfiles_buffforme');
		Delay(2000);
		Engine.BypassToServer('_bbsloc_functions_buffer_buffforme_ Fighter');
		Delay(2000);
		Engine.BypassToServer('_bbshome');
		Delay(2000);
		Engine.BypassToServer('_bbsloc');
		Delay(2000);
		Engine.BypassToServer('_bbsloc;gmshop');
		Delay(2000);
		Engine.BypassToServer('_bbsloc_sendMultisell 65045');
		Delay(2000);
		Engine.NpcExchange(3470, 199);
		Delay(2000);
   RunTo;
end;


procedure RunTo;
begin
		Engine.BypassToServer('_bbshome');
		Delay(2000);
		Engine.BypassToServer('_bbsloc');
		Delay(2000);
		Engine.BypassToServer('_bbsloc;gatekeeper;main_gk');
		Delay(2000);
		Engine.BypassToServer('_bbsloc_teleport 11');
		Delay(2000);
		Engine.BypassToServer('_bbshome');
		Delay(2000);
     Fight;
end;


procedure toBuff;
  begin
  IdBuff:=1040 ;  //Check BUFF
   while not User.Buffs.ById(IdBuff,obj) do begin
        Print('Check Buff');
        Delay(3000);
        buff;
   end;
end;


procedure Fight;
   begin
   Print('Fight zone');
    Engine.MoveTo(-82474, 150832, -2995);
    Delay(500);
    Engine.LoadConfig('1');    //Название Вашего конфига
    Engine.LoadZone('Gludin Adena.zmap');   //zona de combat
    Print('Фарм');
    toVillage;
    Engine.Facecontrol(0,True);
end;


//-----------------------------------------------------------------------------
begin    //repete novamente o script
Print('repete novamente');
  repeat
   toBuff;
   toVillage;
  until Engine.Status = lsOffline;
  Delay(5000);
end.

I tried to put something like this but it did not work because it does not constantly check

 

        Engine.BypassToServer('_bbshome');
        Delay(2000);
      	Engine.BypassToServer('_bbsloc');
        Delay(2000);
      Engine.BypassToServer('_bbsloc_sendMultisell 65045');
	      Delay(2000);
	      Engine.NpcExchange(3470, 199);
	      Delay(2000);

 

[Omigis]

Hello guyz i want  a script to summon Fenir .

Thnx.

Edited November 7, 2017 by Omigis

[Zamba23]

Hi men,

 

1st request: Could you please write me some respawn scripts for cities??? Oren /Aden / Hunter / Rune /Stuttgard ???

2nd request: Is existed some script for auto Cleanse for cardinal??? 

Thank you so much!

[zes]

On 10/10/2017 at 8:31 AM, Alessonborges said:

dlgtext

 

On 10/10/2017 at 8:31 AM, Alessonborges said:

function SetForegroundWindow(hwnd: integer) : Boolean; stdcall;
    external 'user32.dll';

    function captcha:boolean; begin
             if engine.dlgtext.contains('Refresh') or
             engine.dlgtext.contains('Captcha') or
             engine.dlgtext.contains('60 seconds') or
             engine.dlgtext.contains('Bot')   then begin
       SetForegroundWindow(Engine.GameWindow);             
      PlaySound(exepath+'\sounds\'+'PlayerAlarm'+'.wav');
      delay(500);  
      StopSound;
          end;   
  end;
begin
  while true do begin
  delay(300);
   captcha();
end;
end.

This script does not work on L2Toxic server. Have any solution for detecting the Anti Bot (AFK) system? 

Anti Bot image:

[adr.bot]

1 hour ago, zes said:

 

This script does not work on L2Toxic server. Have any solution for detecting the Anti Bot (AFK) system? 

Anti Bot image:

its not regular dialog, so that script not gonna work, find in mxc, somewhere i posted example how to play sound on specific packet id, that can be used alarm for tutorial window

[Bennett]

Hello guys, is there any shared lizardman quest script? ( holy cry,ews,eas )?

Or who could help me to write it?

Ty

[SmOkeHoMeStudio]

Hellou guys , I want  scripts/settings  to develel character  with npc on town.(guards) tower maybe Oren, godgard, shuttgard etc.. thanks for help