L2-Community.com - Bce o Lineage II  
Главная Регистрация Справка Пользователи Поиск Сообщения за день Все разделы прочитаны
 
 

Вернуться   L2-Community.com - Bce o Lineage II > Форум Lineage II > Боты и эмуляторы > Скрипты

Ответ
 
Опции темы Опции просмотра
Старый 05.08.2015, 16:28   #1
dimanasik
No Active
 
Регистрация: 05.08.2015
Сообщений: 2
Вы сказали Спасибо: 0
Поблагодарили: 0 раз(а) в 0 сообщениях
Хорошо Скрипт для заряда иконы шк об пета

удалить на***

Последний раз редактировалось dimanasik; 28.05.2017 в 16:51..
dimanasik вне форума   Ответить с цитированием
Sponsored Links
Старый 02.09.2015, 11:58   #2
Creagen
No Active
 
Регистрация: 30.08.2015
Сообщений: 20
Вы сказали Спасибо: 0
Поблагодарили: 0 раз(а) в 0 сообщениях
По умолчанию

а ты только один продаешь скрипт или есть еще?
Creagen вне форума   Ответить с цитированием
Старый 10.11.2015, 21:55   #3
dimanasik
No Active
 
Регистрация: 05.08.2015
Сообщений: 2
Вы сказали Спасибо: 0
Поблагодарили: 0 раз(а) в 0 сообщениях
По умолчанию

йцуйцуйцуйцуйцу

Последний раз редактировалось dimanasik; 28.05.2017 в 16:51..
dimanasik вне форума   Ответить с цитированием
Старый 19.11.2015, 14:06   #4
RoyJons
No Active
 
Регистрация: 19.11.2015
Сообщений: 5
Вы сказали Спасибо: 0
Поблагодарили: 0 раз(а) в 0 сообщениях
По умолчанию

А че он 1 раз только заряжает то?
RoyJons вне форума   Ответить с цитированием
Старый 24.01.2016, 14:54   #5
dudu
No Active
 
Регистрация: 24.01.2016
Сообщений: 1
Вы сказали Спасибо: 0
Поблагодарили: 0 раз(а) в 0 сообщениях
По умолчанию

var allBuffs: TBuffList;
c: TL2Char;
y,i: Integer;

procedure shilka;
begin
Engine.UseSkill(788, True, False);
y:=0;
while y < 3 do begin
engine.SetTarget(petlist.items(0));
engine.attack(200, true);
delay(100);

for i := 0 to allBuffs.Count-1 do begin

Case allBuffs.Items(i).id of
5564 : begin
if allBuffs.Items(i).level = 3 then begin
Engine.UseSkill(789, True, False);
delay(110000);
y:=3;
print('buff');

end;
end;
end;
end;
end;
end;


begin

allBuffs := User.Buffs;
while Engine.Status = lsOnline do begin

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

if (c.name='Ник Вашей основы') or (c.name='Или второго чара') //Сюда пишем ник !!!!!! Сохраняя Регистр
and (user.distto(c) < 900)
and not (c.dead) then begin

shilka;
delay(500);
end;
end;
end;
delay(500);
end.

Нестоит благодарности
dudu вне форума   Ответить с цитированием
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход




Powered by vBulletin® Version 3.7.5
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd. Перевод: zCarot
Advertisement System V2.5 By   Branden
L2-Community ©2008-2015


Еще можно прочесть: