17 Июня 2021 04:59 
Заработай шерингом
Навигация
 +  - 
Скачать игры
Сейчас на сайте
17.06.2021
Warhangel
00:50:08
offline
14.06.2021
AlJaday
2 дней
offline
12.06.2021
v1tam1n
4 дней
offline
06.06.2021
Dima159
1 неделя
offline
05.06.2021
drweper
1 неделя
offline
Последние фото
Game of Blocks : WesterosCraft and Game of Thrones
Game of Blocks : Wes...
Альбом: Скриншоты

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



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

Последние видео
Видео The Heretic: the complete short film : The Heretic is a short film created by Unity’s Demo team. After debuting its first part at GDC 2019, the completed short is now available to watch in its entirety.

Игрофильмы:  The Heretic: the complete short film

Видео ТРИ СУДЬБЫ - Короткометражный фэнтези-боевик : Короткометражный CGI-фильм, посвященный игре The Elder Scrolls Online.

Игрофильмы:  ТРИ СУДЬБЫ - Короткометражный фэнтези-боевик

Видео Rhine Falls : Rhine Falls Live Camera streeeam

Онлайн камеры:  Rhine Falls

Наша кнопочка
FAQ7.ru
Код:
RSS каналы
Новости
Комменты
Форум
Статьи
Фото
Файлы
Ссылки
Объявления
Реклама
Регистрация сайта в каталогах, раскрутка и оптимизация сайта, контекстная реклама
Автор темы: Warhangel
ID темы: 2144
Информация о теме:
Имеются 2 сообщений по данной теме, которая была просмотрена 1112 раз.  Имеются также вложенные файлы.
Реклама
Обменник
Просмотр темы
Логин:
Пароль:  
Форум » Игровые форумы » Lineage » Боты и скрипты
Просмотр темы
Текущий рейтинг: (Всего: 0 голосов)  
Ответить
Иконка 
Адреналин: Авто-поиск РБ в Зале Иллюзий
Наверх Распечатать сообщение #1
Опубликовано 21-03-2019 02:39
Аватар пользователя

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



Сообщений: 2531
Вас поблагодарили: 21
раз(а) в 21 сообщениях

Зарегистрирован: 24.03.10
Со дня регистрации: 4103
Откуда: Россия

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


Пожаловаться на это сообщение 

Авто-поиск РБ в Зале Иллюзий

(X) Для просмотра скрытого текста ( зарегистрируйтесь | зайдите под своим ником )
Warhangel присоединил файл:
rbsearch.rar [240.81кБ, скачали 130 раз(а)]
 Offline
 
Посетить сайт автора
Цитировать
Наверх Распечатать сообщение #2
Опубликовано 21-03-2019 02:40
Аватар пользователя

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



Сообщений: 2531
Вас поблагодарили: 21
раз(а) в 21 сообщениях

Зарегистрирован: 24.03.10
Со дня регистрации: 4103
Откуда: Россия

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


Пожаловаться на это сообщение 
Иконка 
RE: Адреналин: Авто-поиск РБ в Зале Иллюзий

вариант 2

uses
  SysUtils, Classes;
   
var
  i, Count_Room, Count_Enter : integer;
  Gate: TL2Npc;
 
const // Самый важный раздел, прежде чем запускать скрипт - проверьте ID NPC в ЗИ на вашем сервере и выставьте актуальные
 
  Eastern = 32658; // Восток - фарм для милишников, РБ без отката
  Western = 32659; // Запад - фарм для лукарей, РБ без отката
  South = 32660; // Юг - фарм для магов, РБ без отката
  North = 32661; // Север - фарм для копейщиков, РБ без отката
  Great = 32662; // Площадь, слабый РБ, откат по вики - 24 часа
  Tower = 32663; // Башня, сильный РБ, откат по вики - 24 часа
 
  Escape = 32664; // НПС, который появляется внутри комнаты - через него можно 1 раз сменить комнату или выйти наружу
 
begin
 
i := 0;
Count_Enter := 0;
 
print('Приступаем к поиску РБ');
while Engine.Status = lsOnline do
begin
  for i:=0 to NpcList.count-1 do // По факту приближения к нужному киперу на 100 едениц будет произведен вход в инст и начат поиск РБ
  begin
    if ((NpcList.items(i).ID = Eastern)
    or (NpcList.items(i).ID = Western)
    or (NpcList.items(i).ID = South)
    or (NpcList.items(i).ID = North)
    or (NpcList.items(i).ID = Great)
    or (NpcList.items(i).ID = Tower))
    and (User.DistTo(NpcList.items(i)) < 100) then // Проверяем, что подошли именно к нужному нам НПС и он находится достаточно близко от нас
    begin
      Count_Room := 1; // Передали в переменную, что заходим в первую комнату
      inc(Count_Enter); // Увеличили счетчик проходов на 1
      Gate := NpcList.items(i); // Передали в переменную НПС рядом с которым мы находимся
      Engine.SetTarget(Gate); // Взяли в таргет НПС, рядом с которым мы находимся
      Engine.DlgOpen; // Открыли диалог   
      Engine.DlgSel(1); // Выбрали первую строку в диалоге, зашли в инст
      Delay(100); // Данную задержку можно увеличить до времени ожидания телепорта и прогрузки НПС в комнате, если вам не хочется сильно нагружать ЦПУ
    end;
  end;
 
  for i:=0 to NpcList.count-1 do // Попадаем в цикл как только в комнате отреспится наш "Escape" НПС
  begin
    if (NpcList.items(i).ID = Escape)
    and (User.DistTo(NpcList.items(i)) < 150) then // Проверка на дистанцию тут нужна, чтобы не пытаться бежать начинать диалог с "Escape" НПС из другой комнаты
    begin
      if user.InRange(-108062, -154692, -6672, 500, 250) // Проверяем не попали ли мы в комнату к РБ
      or user.InRange(-121465, -154628, -6704, 500, 250) then // Это координаты центров комнат в которых появляются РБ
      begin
        print('Нашли РБ с прохода № '+inttostr(Count_Enter)); // Если проверка на нахождение в комнате с РБ успешна, оповещаем игрока, останавливаем скрипт
        PlaySound('Sounds/target.wav',false); // Проигрываем звук из папки Sounds находящейся в папке с ADR
        Engine.BlinkWindow(true); // Мигаем окном игры в котором найден РБ
        exit;
      end
      else
      begin
        if Count_Room < 2 then // Тут мы проверяем, меняли мы уже комнату или нет
        begin
          inc(Count_Room); // Увеличили счетчик комнат, чтобы в следующей комнате выйти из инста, а не пытаться сменить комнату
          Engine.SetTarget(Escape); // Взяли в таргет нашего НПС
          Engine.DlgOpen; // Открыли диалог   
          Engine.DlgSel(1); // Выбрали первую строку в диалоге, сменили комнату
          delay(100); // Данную задержку можно увеличить до времени ожидания телепорта и прогрузки НПС в комнате, если вам не хочется сильно нагружать ЦПУ
        end
        else
        begin
          Engine.SetTarget(Escape); // Взяли в таргет нашего НПС
          Engine.DlgOpen; // Открыли диалог   
          Engine.DlgSel(2); // Выбрали вторую строку в диалоге, вышли из инста
          print('Закончили проход № '+inttostr(Count_Enter));
          delay(100); // Данную задержку можно увеличить до времени ожидания телепорта и прогрузки НПС в комнате, если вам не хочется сильно нагружать ЦПУ
        end;
      end;
    end;
  end;
delay(250); // Данная задержка определяет, как часто проверяется наличие рядом с вами нужных НПС. Если её убрать или поставить 0, то ADR будет сильно загружать ЦПУ.
end;
 
print('Персонаж перешел в режим OFFLINE - завершаем работу скрипта');
end.
 Offline
 
Посетить сайт автора
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

« Предыдущая тема | Следующая тема »
 RSS Перейти на форум:
Розыгрыши 728х90

Последние объявления
ФотоЗаголовокГородРазмещено
ООО «Техно Сталь» постоянно покупает КАНАТЫ СТАЛЬНЫЕ с хранения, неликвидные
• Хозяйство - Сырье и материалы Цена: 1 1
Уфа28.05.2021
(на 1 месяц)
Тайские Лекарства от целлюлита помагают сбросить лишний вес
• Для дома - Здоровье Цена: 1 1
Санкт-Петербург10.10.2020
(на 24 месяца)
Магазин абразивных материалов «Абразивмастер»
• Хозяйство - Оборудование Цена: 1 1
Москва17.06.2020
(на 24 месяца)
Самое лучшее для похудения помогают народные рецепты для похудения в аптеке
• Для дома - Здоровье Цена: 1 1
Москва20.02.2020
(на 24 месяца)
Аптека поможет похудеть эффективно и продает капсулы самая лучшая диета
• Для дома - Здоровье Цена: 1 1
Ярославль22.12.2019
(на 24 месяца)
Облако тегов тем форума
Регуляторы США создадут рабочую группу по регулированию криптовалют, Элегия vs красивая венера рар heavy, Квест на куски к А оружию, Сборка сервера RusDev (GoD), Технология SATA 3.2 обеспечит скорость до 2 ГБ/с, Осады., Новости Lineage 2 (rss), Техника Прицеливания, LOST ARK, Гленн Фогель: «использование цифровых валют на основе блокчейна будет расти», Смартфон Phab 2 Pro с дополненной реальностью, SUN Онлайн - идет альфа-тестирование русской версии игры, Запретить загрузку файлов в браузере, Скандальная правда о компании Apple!, Космический лифт будет готов к 2030 году
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Торренты Радио Видеочат
Яндекс.Метрика
Powered by PHP-Fusion copyright © 2002 - 2021 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.