Адреналин: клановый баф и фарм

Навигация

+ -

Скачать игры

Сейчас на сайте

19.05.2026

lekso1001

15:06:41

18.05.2026

Warhangel

2 дней

17.05.2026

AlexZz

2 дней

15.05.2026

cthfabvec

4 дней

14.05.2026

Derelict

5 дней

Показать статистику

Последние фото

Game of Blocks : WesterosCraft and Game of Thrones

Game of Blocks : Wes...
Альбом: Скриншоты

Вынос трёх пати куполом
Альбом: Скриншоты

Альбом: Флора

Последние видео

Видео THE WORLD LIVE - since 2008 | earthTV : So thank you for the many views of this stream, please enjoy the original classic television version of THE WORLD LIVE, first uploaded here for you in 2008 with just 7 locations.

Онлайн камеры: THE WORLD LIVE - since 2008 | earthTV

$Видео The Best Of Norway's Railway Cab Views : I\$

Онлайн камеры: The Best Of Norway's Railway Cab Views

Видео 130 LIVE World Cameras : 130 LIVE World Cameras, Relaxing Music, Map, Daily Timelapse - Your Armchair Travel

Онлайн камеры: 130 LIVE World Cameras

Наша кнопочка

Код:

<a href="http://faq7.ru/" target="_blank"><img border="0" src="http://faq7.ru/images/banner88.gif" width="88" height="31" alt="FAQ7.ru"></a>

RSS каналы

RU CLICKSРусский трафик

О нет! Где JavaScript?
У Вашего браузера отключен JavaScript или он просто не поддерживает JavaScript. Пожалуйста включите JavaScript на Вашем веб-браузере для нормального просмотра данного веб-сайта,
или обновите свой браузер на поддерживаемый JavaScript; Firefox, Safari, Opera, Chrome или Internet Explorer не ниже, чем версия 6.

Автор темы: Warhangel
ID темы: 2990

Информация о теме:

Имеются 1 сообщений по данной теме, которая была просмотрена 213 раз.

Просмотр темы

Главная страница

Регистрация

Поиск

Форум » Игровые форумы » Lineage » Боты и скрипты

Просмотр темы

Текущий рейтинг: (Всего: 0 голосов)

Поиск в этой теме

Опции темы

Адреналин: клановый баф и фарм

Warhangel

Опубликовано 06-04-2026 04:23

Супер Администратор

Сообщений: 2731
Вас поблагодарили: 32
раз(а) в 27 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5901

Откуда: Россия

Скрыть награды

header=[Награда №1] body=[Медаль Создателя]

Взять клан баф и на фарм

Код выделить всё



 var

  Ch1, Ch2, Ch3, Ch4, Ch5, Ch6: TL2Char;

  NomeEu: String;



procedure teleport1;

begin

     // Community Board Teleport Sequence

     Engine.Facecontrol(0,False);

     delay(2000);

     engine.bypasstoserver('_bbsloc');

     delay(2000);

     engine.bypasstoserver( '_bbstop;51');

     delay(2000);

     engine.bypasstoserver('_bbstop;512');

     delay(2000);

     engine.bypasstoserver('_bbsteleport;teleport; 82698 148638 -3473 5000');

     delay(10000);

end;



procedure teleport2;

begin

     // Gatekeeper and Movement Sequence

     Engine.Facecontrol(0,False);

     delay(2000);

     Engine.MoveTo(83400, 147944, -3400);  

     Delay(5000);

     Engine.SetTarget(30080);  // Target GK NPC

     Delay(2000);

     Engine.DlgOpen; // Opens NPC dialogue

     Delay(2000);

     Engine.DlgSel(1);

     Delay(2000);

     Engine.DlgSel(15);

     Delay(2000);

     Engine.SetTarget(31115); // Gatekeeper Ziggurat

     Delay(2000);

     Engine.DlgOpen; // Opens NPC dialogue

     Delay(2000);

     Engine.DlgSel(1);

     Delay(2000);



     // Walking to specific farm coordinates

     Engine.MoveTo(47368, 170312, -4976); 

     Engine.MoveTo(47400, 170600, -4976); 

     Engine.MoveTo(48168, 170600, -4976); 

     Engine.MoveTo(48424, 170296, -4976); 

     Engine.MoveTo(50536, 170296, -4976);

     Engine.MoveTo(51208, 170328, -4976); 



     Engine.LoadZone('DovBranded.zmap'); // Load farm zone

     Engine.Facecontrol(0,True); // Enable bot combat

end;



procedure buff2;

begin

    // Buffing Routine at NPC

    Engine.Facecontrol(0,False);

    Engine.EnterText('/Stand');



     // Return to buffer if not in range

     if not user.inrange(143992, 27092, -2248, 500) then begin

       Engine.UseItem(1829); // Scroll of Escape

       Delay(40000);

     end;



  Engine.MoveTo(-144200, 27144, -2248);

  Engine.SetTarget(35447); // Clan hall manager

  Delay(1500);

  Engine.DlgOpen;

  Delay(1500);

  Engine.BypassToServer('npc_268470824_functions');

  Delay(500);

  Engine.BypassToServer('npc_268470824_functions support');

  Delay(500);

  

  // Specific Buff Bypasses

  Engine.BypassToServer('npc_268470824_support 4342 2'); // Wind Walk

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4344 3'); // Shield

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4346 4'); // Mental Shield

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4345 3'); // Might

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4347 6'); // Bless the Body

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4349 2'); // Magic Barrier

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4350 4'); // Resist Shock

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4348 6'); // Bless the Soul

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4351 6'); // Concentration

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4352 2'); // Berserker Spirit

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4353 6'); // Bless Shield

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4358 3'); // Guidance

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4354 4'); // Vampiric Rage

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4355 1'); // Acumen

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4356 1'); // Empower

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4357 1'); // Haste

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4359 1'); // Focus

  Delay(500);

  Engine.BypassToServer('npc_268470824_support 4360 1'); // Death Whisper

end;



begin

  NomeEu := User.Name;



  // Starts infinite loop while script is active

  while true do begin // Checks every 2000ms

    delay(2000);

    

    // Safety check: is the user at the gathering point?

    if user.inrange(143992, 27092, -2248, 500) then begin

      

      // Check if all party members are present or if it's the current user

      if ((NomeEu = 'Dov')     or (CharList.ByName('Dov', Ch1))) and

          ((NomeEu = 'Narakas') or (CharList.ByName('Narakas', Ch2))) and

          ((NomeEu = 'Alfwod')  or (CharList.ByName('Alfwod', Ch3))) and

          ((NomeEu = 'Faneth')  or (CharList.ByName('Faneth', Ch4))) and

          ((NomeEu = 'Leliar')  or (CharList.ByName('Leliar', Ch5))) and

          ((NomeEu = 'Baleak')  or (CharList.ByName('Baleak', Ch6))) then

      begin

        Print('All allies (except me, ' + NomeEu + ') are present!');



        buff2;

        teleport1;

        teleport2; // Proceed to farm routines



        Script.Stop;

      end

      else

      begin

        // Logic for missing party members

        Print('ERROR: Someone moved away or logged out! Waiting.');

      end;

      

    end

    else

    begin

      // If user is lost or not at the start point, use escape

      Engine.UseItem(1829); // Return to town for safety

      Delay(40000);

    end;    

  end;

end.



 



Extract the HTML file from the Clan Hall Manager:



uses classes;

begin

with Tstringlist.create do

try

  Text := Engine.DlgText;

  SaveToFile(exepath+'show dlg'+'.txt');

finally

  Free;

 end;

end.

Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

« Предыдущая тема | Следующая тема »

Перейти на форум:

Последние объявления

Фото	Заголовок	Город	Размещено
	Игра Stark World 2024 • Игры - Игровые ресурсы Цена: 1 1	Волгоград	11.07.2024 (на 24 месяца)

Облако тегов тем форума

Playstation 5 выйдет в 2018 году, The Insane - Чокнутый - Достижение, Деми Мур снялась полуголой для Twitter, Восстановление хорошего здоровья, Зов Дракона, Первая помощь 1 - 450 (Руководство), S4 League, Шесть центральных банков совместно с BIS создали группу для изучения криптовалют ЦБ, Source сервера Lineage2 Interlude от команды la2base, Квест на Bounty Hunter, Усиление металлоконструкциями, Квест на Paladin, De Beers представила первую платформу для добычи алмазов на блокчейне, Gyo - рыбье гуро одним глазком, Производители ASIC-майнеров вернулись к разработке чипов для ИИ

Game новости

Game сервисы

Инфо сервисы