[Скрипт] 2 скрипта для Ассасина.

[K911]

1- Speed atack SIN 1 (Для Ассассинов)
Активируется "Рев зверя"
2- Auto PvP
На 2.8 секунде отчёта кидается засада вашему противнику
1

begin
if(fromclient)and(pck[1]=#$CF) and (ReadH(4)= 875)then
begin
buf:=hstr('CF 57 6C 5C 03 05 00 ');
writeD(readD(8));
buf:=buf+hstr('F0 00 79 41 00 00');
sendtoserver;
end;
end.
begin
if(fromclient)and(pck[1]=#$CF) and (ReadH(4)= 875)then
begin
buf:=hstr('CF 57 6C 3E 08 04 00');
writeD(readD(8));
buf:=buf+hstr('A0 02 79 AD 00 00');
sendtoserver;
end;
end.
begin
if(fromclient)and(pck[1]=#$CF) and (ReadH(4)= 875)then
begin
buf:=hstr('CF 57 6C 49 08 01 00');
writeD(readD(8));
buf:=buf+hstr('50 01 F9 E6 00 00');
sendtoserver;
end;
end.

2

const
    tt=2801;
var

    timer:TTimer;
 conid:Integer; 
 targetId:Integer; 
 procedure Log(msg:String); //Вызывается при включении скрипта
begin
    //sendMSG('Using conid:' + IntToStr(useforconnectid));
    buf:=HStr('17 50 D4 19 00 00 00 00 00 00 00');
    WriteS(msg);
    SendToClient;
end;
procedure Init; //Вызывается при включении скрипта
begin
      timer:=TTimer.Create(nil);
     timer.OnTimer:=@OnHTimer;
        timer.Interval:=tt;
        timer.Enabled:=false; 
end;

procedure Free; //Вызывается при выключении скрипта
begin
 
end;

procedure OnHTimer(Sender: TObject);
begin
        If (targetId <> 0) then
    begin   
        useforconnectid := conid;
        //CF 57 6C 4E 08 01 00 19 8E 00 
       // CF 57 6C 42 08 01 00 19 8E 00
       
        buf:=hstr('CF 57 6C 4E 08 01 00');
        WriteD(targetId);
        buf:=buf+hstr('00 00 98 6C 00 00');
        SendToServer;    
        Delay(100);
         buf:=hstr('CF 57 6C 42 08 01 00');
        WriteD(targetId);
        buf:=buf+hstr('2A 02 05 0E 00 00');
        SendToServer;
         timer.enabled:=false;

    end;
end;
procedure usecon(cid:Integer);
begin
    if(cid <> 0) then conid := cid;
    useforconnectid := conid;
end;


//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
         usecon(ConnectID);
        if(fromserver) and (pck[1]=#$B6) then
        begin
            targetId:=ReadD(5);
            timer.enabled:=true; 
            
        end;
end.

[Drelann]

в чем смысл 2 скрипта?!

[OsacurO]

Ну как бы многие понимают как юзать скрипты, но довольно печально сидеть и расшифровывать каждый пакет чтобы понять что скрипты делают. Было бы неплохо описывать действие скрипта.

[CoJIoBeu]

Кто тестил?У кого работают данные скрипты?Пробовал первый скрипт на атк спд и при нажатии на скил Рев зверя ничего не происходит(как я понял должен повышатся атк спд в статах)И такой вопрос,скрипты работают на багах и если баг используемый в скрипте пофикшен значит и скрипт можно выкинуть,я правильно понял?

[hromik]

тоже первый скрипт не работает(

[blekkill]

Автор обьясни для чего 2 скрипт

[Dpakyla]

1- Speed atack SIN 1 (Для Ассассинов)
Активируется "Рев зверя"
2- Auto PvP
На 2.8 секунде отчёта кидается засада вашему противнику
__________________________________________________ ___
1 скрипт Speed atack Активируется "Рев зверя" не работает вообще, после скила Рев зверя не возможно использовать следующие скилы в серии
2 скрипт не понятно для чего

тестил на фрии

[Drelann]

по поводу 1ого скрипта:
- активизируется при [Ссылки могут видеть только зарегистрированные пользователи. ]
- потом вылетает Удар зверя III
- одновременно вылетает Бросок зверя II
- и Чудовищный шрам IV

[bububa]

чудовищный шрам верхняя ветка, значит не будет работать при стоящей нижней?))
p.s. более подробное описание теме бы не помешало.

[sergey125]

извените за тупой вопрос но что такое скрипты, куда их встовлять и как применять?

[fsk123]

через L2PH

Добавлено через 5 часов 48 минут
афтар я не могу понять где в скрипте данные которые видят что я нажимаю "Рев зверя" и срабатывает скрипт , вижу тока 3 скила которые идут следом обьясни плиз а то хочу сделать также с другими последовательными скилами.