RU CLICKSРусский трафик
О нет! Где
JavaScript ?
У Вашего браузера отключен JavaScript или он просто не поддерживает JavaScript. Пожалуйста
включите JavaScript на Вашем веб-браузере для нормального просмотра данного веб-сайта,
или
обновите свой браузер на поддерживаемый JavaScript;
Firefox ,
Safari ,
Opera ,
Chrome или
Internet Explorer не ниже, чем версия 6.
Информация о теме:
Имеются 1 сообщений по данной теме,
которая была просмотрена 42 раз.
Просмотр темы
Текущий рейтинг: (Всего: 0 голосов )
Адреналин: клановый баф и фарм
Опубликовано 06-04-2026 04:23
Супер Администратор
Сообщений: 2718
Вас поблагодарили: 32 раз(а) в 27 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5861
Откуда: Россия
Скрыть награды
Взять клан баф и на фарм
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)
Перейти на форум:
- Игровые форумы -- Lineage --- Серверная --- Лаборатория --- Боты и скрипты --- Квесты и гайды -- Aion --- Серверная --- Квесты и гайды -- World of Warcraft --- Серверная --- Квесты и гайды -- Tera --- Серверная --- Квесты и гайды -- Archeage -- EVE online -- Diablo 3 -- Сounter-strike -- Point Blank -- Minecraft - Mmorpg и online -- Серверная -- Обзоры серверов -- Квесты и гайды -- Лаборатория -- Реклама - PC -- Чит коды -- Квесты и гайды - Консоли - Другие игры - Торговля
- События и встречи - Аниме - Музон - Видео - Софт - Железо - Мобильники - Финансы - Интернет -- Социальные сети -- Blockchain - Операционные системы -- Windows -- Linux - Программирование -- PHP -- C++ -- PERL -- Java -- Flash - Юмор - Отношения - За рулем - Спорт - Здоровье - Культура и наука - Непознанное -- Сонники -- Эзотерика - Религия - Природа - Кулинария - Дизайн
- Флуд -- For English - speaking users - Реклама - Архив
- Техничка
Последние объявления
Фото Заголовок Город Размещено Игра Stark World 2024 • Игры - Игровые ресурсы Цена: 1 1 Волгоград 11.07.2024(на 24 месяца)
Янукович выступил с заявлением , Первая помощь 1 - 450 (Руководство) , Квест на Orc Monk , Facebook обеспечит стейблкоин Libra пятью национальными валютами , Компиляция ядра для линукс (ArcEmu) , Немного о современном Aion-е и взгляд в его будущее , Душевая кабина , Русский досвидос: Лизонька против Аниме , Победители Евровидения с 1956 по 2018 год , Адреналин: Скрипт на фарм катакомб , Beat Hazard Abuse , Дрова на 7ку для игрушки Blood , Коммьюнити-менеджер покинул Aion , Battle: Los Angeles, Priest и Pirates of the Caribbean , Джамп-клоны