22:24 | 21.11.2017
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Форум » Lineage 2 » Adrenalin бот » Скрипты для Adrenalin » Очередь в пайлоку
Очередь в пайлоку
Sonik · Offline · Дата: Суббота, 05.12.2015, 14:20 | Сообщение # 1

  • Подполковник
  • Сообщений: 143
 
3
 
Очередь в пайлоку - если есть очередь на вход в пайлоку, запускаем скрипт и персонаж будет автоматички пытаться войти в пайлоку поторяя попытки через указанное в скрипте время.

Код
var
    obj: TL2NPC;
const
    //StartNPC = 32498; // 61
    StartNPC = 32499;  // 73
begin
    Engine.SetTarget (StartNPC);
    while (Engine.delay (900)) do
    begin
        Engine.DlgOpen;
        delay (100);
        Engine.DlgSel (1);
        delay (100);
        Engine.DlgSel (1);
        delay (100);
        Engine.GetNpcList.ByID(StartNPC, obj);
        if ((User.DistTo (obj)) > 200) then
        begin
            Engine.BlinkWindow(true);
            PlaySound('Sounds/sirena.wav',false);
            delay (10000);
            StopSound;
        end;
    end;
end.


Другой вариант

Код
begin
while 1<>2 do begin
Engine.SetTarget(32498);
Engine.DlgOpen;
Engine.Delay(100);
Engine.DlgSel(1);
Engine.Delay(100);
Engine.DlgSel(1);
Engine.Delay(100);
Engine.CancelTarget;
end;
end.



Третий вариант просто выбрать НПЦ

Код
begin
while 1<>2 do begin
Engine.DlgOpen();                    // открываем диалог с NPC
Engine.DlgSel(1);                    //  выбираем строчку под номером 1 (меняем как нада)
Engine.DlgSel(1);                    //  выбираем строчку под номером 1 (меняем как нада)
end;
end.

Форум » Lineage 2 » Adrenalin бот » Скрипты для Adrenalin » Очередь в пайлоку
Страница 1 из 11
Поиск: