22 Мая 2019 17:54 
Навигация
 +  - 
Скачать игры
Сейчас на сайте
21.05.2019
Warhangel
18:42:55
offline
21.05.2019
Apa4u
1 день
offline
20.05.2019
Inert
1 день
offline
18.05.2019
batalkin20
4 дней
offline
16.05.2019
saagrig
6 дней
offline
Последние фото
Game of Blocks : WesterosCraft and Game of Thrones
Game of Blocks : Wes...
Альбом: Скриншоты

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



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

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

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

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

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

Видео Live Cam, Central Memorial Park, Calgary, Alberta : Central Memorial Park is a park located in central Calgary\

Онлайн камеры:  Live Cam, Central Memorial Park, Calgary, Alberta

Наша кнопочка
FAQ7.ru
Код:
RSS каналы
Новости
Комменты
Форум
Статьи
Фото
Файлы
Ссылки
Объявления
Реклама
Регистрация сайта в каталогах, раскрутка и оптимизация сайта, контекстная реклама
Автор темы: Warhangel
ID темы: 1894
Информация о теме:
Имеются 1 сообщений по данной теме, которая была просмотрена 1768 раз.
Реклама
livecoin Обменник
Просмотр темы
Логин:
Пароль:  
Форум » Игровые форумы » Lineage » Боты и скрипты
Просмотр темы
Текущий рейтинг: (Всего: 0 голосов)  
Ответить
Иконка 
Адреналин: cкрипт для мага поле/олимпиада
Наверх Распечатать сообщение #1
Опубликовано 18-03-2016 17:25
Аватар пользователя

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



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

Зарегистрирован: 24.03.10
Со дня регистрации: 3346
Откуда: Россия
Пол: Мужской

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


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

Скрипт для мага поле/олимпиада.
В скрипте есть информер, который оповещает в пм о юзе и окончание того или иного скилла, антибек через скилл Curse Weakness (id можно поменять на любой другой, который понравится)
Информер можно дополнять + присутствует HoldTarget.


uses sysutils,classes;


 procedure holdtarget;
var
charT:tl2live;
obj:tl2effect;

begin
 while engine.status = lsonline do begin
  if (user.target.valid) then      chart:=user.target;
  if not user.target.valid then while not (User.Target.name = chart.name) do Engine.SetTarget(chart.name);
 delay(100);
 end;
end;


procedure tank;
var
eu,char2:tl2char;
obj,obj1,cast:tl2effect;
i,j,g,pis,pis2 :integer;



function proxy : boolean;

begin
result:=false;

for i := 0 to CharList.count -1 do begin
Char2 := CharList.Items(i);

if (char2.cast.endtime>0)and not (char2.ismember) and (char2.cast.id=916)  and not (char2.dead)  and
(User.DistTo(char2)<5200)
then begin
delay(500);
engine.say('Юзает Зеркало   ->>' + char2.name , 2 , User.name);
delay(7100);
engine.say('Зеркало офф ->>' + char2.name, 2 , user.name );break
end;

if (char2.cast.endtime>0) and  (Char2.cast.id=3284) and not (char2.dead)  and
(User.DistTo(char2)<1200)
then begin
delay(500);
engine.say('Юзает Талик УД   ->>' + char2.name , 2 , user.name);
delay(9100);
engine.say('Талик УД офф ->>' + char2.name, 2 , user.name);break
end;

if (char2.cast.endtime>0) and (char2.cast.id=1476) and not (char2.dead)
then begin
delay(500);
engine.say(' apetit ' + char2.name ,2,user.name);
delay(30000);
engine.say('apetit off ' , 2 , user.name);break
end;

if (char2.cast.endtime>0) and (char2.cast.id=789) then begin
delay(500);
engine.say('WILKU UZAET -> ' +char2.name,2,user.name);
delay(59000);
engine.say('wilka off' ,2 , user.name);break
end;

if (char2.cast.endtime>0) and (char2.cast.id=3282) and not (char2.dead)
then begin
engine.say('Maximum clarity   ->' + char2.name , 2 , user.name);
delay(120000);
engine.say('max clarity off -->> ' + char2.name , 2 ,user.name ) ;break
end;

if (char2.cast.endtime>0) and (char2.cast.id=1532) and not (char2.dead)
then begin
engine.say('Prosvet   ->' + char2.name , 2 , user.name);
delay(20000);
engine.say('Prosvet off -->> ' + char2.name , 2 ,user.name ) ;break
end;


end;
result:=true;
end;


begin
while engine.status = lsonline do begin
if proxy then delay(1);
Delay(1);
end;
end;




procedure antiback;
var
eu,char2:tl2char;
obj,obj1,cast:tl2effect;
i,j,g,pis, pis2:integer;
item: TL2Item;


function proxy : boolean;

begin
result:=false;

for i := 0 to CharList.count -1 do begin
Char2 := CharList.Items(i);

if (char2.cast.endtime > 0) and  (User.DistTo(char2)<100) and (char2.cast.id=30)  and not (char2.dead) and

(User.DistTo(char2)<100)
then begin

Engine.SetTarget(char2.name);
Engine.USeSkill(1164,true);
en d;
end;


result:=true;
end;


begin
while engine.status = lsonline do begin
if proxy then delay(100);
Delay(100);
end;
end;

procedure antihide;
var
eu,char2:tl2char;
obj,obj1,cast:tl2effect;
i,j,g,pis, pis2:integer;
item: TL2Item;


function proxy : boolean;

begin
result:=false;

for i := 0 to CharList.count -1 do begin
Char2 := CharList.Items(i);

if (char2.cast.endtime > 0) and  (User.DistTo(char2)<250) and (char2.cast.id=922)  and not (char2.dead) and

(User.DistTo(char2)<100)
then begin

Engine.USekey('2');
end;
end;


result:=true;
en d;


begin
while engine.status = lsonline do begin
if proxy then delay(100);
Delay(100);
end;
end;

begin
script.newthread(@antihi de);
script.newthread(@antiback);
script.newthread(@tank);
script.ne wthread(@holdtarget);
end.
 Offline
 
Посетить сайт автора
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

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

Последние объявления
ФотоЗаголовокГородРазмещено
ЗАО «РУСАЛ Глобал Менеджмент Б.В.» (филиал в г. Москве) реализует неликвиды
• Хозяйство - Оборудование Цена: 1 1
Другой06.05.2019
(на 1 месяц)
Справка о несудимости в Москве
• Работа и бизнес - Разное Цена: 1 1
Москва05.12.2018
(на 24 месяца)
Универсальный гипермаркет Gecsa
• Развлечения - Туризм Цена: 1 1
Казань06.11.2017
(на 24 месяца)
Продажа опрессовочного оборудования для РВД
• Хозяйство - Оборудование Цена: 1 1
Москва18.10.2017
(на 24 месяца)
Облако тегов тем форума
Предупреждение таблеткам для похудания, Сборка сервера от L2UP, Что же будем делать в ArcheAge?, Маленькие хитрости при приготовлении рыбы., Количество установленных криптоматов продолжает расти, Что делать если выкидывает при перехода с общих серверов, Интервью Рагнара Торнквиста для французского фан-сайта, 10 Функций Телефона, о Которых вы Даже Не Подозревали, Квест на трансформацию, Расы в Eve online, Итоги первого Всероссийского Турнира кланов LOMA., Зеркала Козырева., Путь воина, Смартфон больших скоростей Tag Heuer Racer, На создание ушло 17 месяцев
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Поиск по торрентам Радио Видеочат
Яндекс.Метрика
Powered by PHP-Fusion copyright © 2002 - 2019 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.