Надеюсь на помощь

[Deffol]

Приветствую, в общем в игре есть серии ударов, то есть если один скилл кастуешь, после него можно кастовать другим из этой серии...
Я решил сделать, чтоб самому не жать на серию, так, чтоб при посылке скила из первой серии, сразу посылался скилл из второй серии ударов!
Но у меня появилась проблема, вот допустим 1 скил на разных мобах:

('CF 57 6C 50 05 09 00 51 B8 1E 00 9B 02 05 E9 00 00')
('CF 57 6C 50 05 09 00 CE 93 1E 00 9B 02 05 E9 00 00')

первые 9 пар байтов - это ID скилла, после него идет ID моба, там еще что-то в пакете после ID моба, я не разобрался, но в принципе оно не нужно
Если послать только ID скилла, то на любом мобе он сработает нормально.
Вот я не знаю как при посылке скилла на разных мобах, объяснить скрипту, чтоб он ловил только ID скилла, ну а потом посылал бы ID другого скила, как послать я разберусь!
Подскажите какой командой ловить ID скилла, то есть первые 9 пар байтов

Добавлено через 26 минут
вот я сам попробовал:

begin
    if FromClient and (pck[1]=#$CF) and (ReadH(4)=1360) then
begin
    buf:=HStr('CF 57 6C 61 06 01 00'); 
    SendToServer;
end;
end.

Вроде работает, может его можно чем то дополнить, или так оставить?

Добавлено через 18 минут
у меня почему-то 2й пакеот отправляется быстрей чем первый, как сделать, чтоб поочереди они шли?

Добавлено через 39 минут
в принципе, после того как идет чтение 2х байтов скила, можно послать этот же скил, затем тот, который дальше по серии, это будет правильно или можно проще сделать?

Вот скрипт:

begin
    if FromClient and (pck[1]=#$CF) and (ReadH(4)=1360) then
begin
    buf:=HStr('CF 57 6C 50 05 09 00');
    SendToServer;
    buf:=HStr('CF 57 6C 56 05 09 00'); 
    SendToServer;
end;
end.

Добавлено через 1 час 6 минут
после каста скилла который читается с помощью Read, идет пакет на этот же скилл, это правильно? просто вроде на сервер посылается инфа о том, что я начал каст, а ним же опять посылается вроде этот пакет...я еще не проверял. Но если посылается 2 пакета на 1 скилл, можно сделать так, чтоб после Read, посылался 1й скилл, а потом уже 2й...а то палевно, что сначала у меня идет скилл второй по серии, а потом уже первый... и не хочется, чтоб на 1 скилл посылалось 2 пакета

[SeregaZ]

посылка 2-3-10 пакетов по идее не страшна, так как сервер должен думать, что ты зажал кнопку скила с панели и удерживаешь её.

я правда не совсем понял что именно ты спрашиваешь

[Deffol]

ну во первых, хочу спросить, верный ли скрипт...
и можно ли, чтоб после чтения первого скилла, он сначала послался, а потом бы уже посылался мой второй пакет?

[Kilatif]

Что бы отправить сначала отловленный пакет, а затем свой просто сделай так:
...
buf := pck;
SendToServer;

buf := //что-то чем ты его заполняешь
SendToServer;
...

[Deffol]

о спасибо))) блин, до самого скрипта додумался, а до этого нет!!

[Deffol]

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

Добавлено через 27 минут
вот наглядно таймер со скилами

const
name='Deffol'; 
var
    Timer:TTimer;
    TimerMyPck:byte;
procedure Init;
begin
    TimerMyPck:=1;
    Timer:=TTimer.Create(nil);
    Timer.OnTimer:=@OnTimer;
    Timer.enabled:=false;
    Timer.interval:=1;
end;

procedure Free;
begin
    Timer.free;
end;

procedure OnTimer(Sender: TObject);
begin
case TimerMyPck of
    1:
    begin
        buf:=HStr('');     //первый скил в серии
        SendToServer; 
        Inc(TimerMyPck);
    end;
    2:
    begin
        buf:=Hstr('');    //второй
        SendToServer;      
        Inc(TimerMyPck);
    end;
    3:
    begin
        buf:=HStr('');      //третий
        SendToServer;
        Timer.interval:=1;   //не придумал еще время
    end;  
end;
end;

begin
//первый скил в серии
    if FromClient and (pck[1]=#$CF) and (ReadH(4)=123) and (ConnectName=name) then 
        Timer.enabled:=true;
        Timer.enabled:=false; 
end.

ну так вот такие таймеры например мне на 3 скила, всего 3 таймера, а я хочу совместить их, чтоб места не занимали, а то у мну этих скриптов...я уже в них запутался

Добавлено через 6 минут
сорь забыл в процедуре таймера Ex(name) в посылку добавить, ну это не суть

[NLObP]

Сообщение от Deffol

например 3 пакета в каждой серии, мне надо чтоб таймер включался на каждую серию именно по конкретному пакету, чтоб не все вместе юзались возможно так??

Каждую серию в отдельный таймер засунь. И проверки сделай чтобы одновременно не запускались.

[Deffol]

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

[SeregaZ]

эм... я бы наверное сделал фиксацию времени использования последнего скила, потом при срабатывании таймера сравнение текущего времени с тем, которое время срабатывания. и если разница получится меньше 2 секунд к примеру, то чтобы скилы не стартанули.

[Deffol]

привет все еще раз!
помогите со скриптом. в общем у меня таймер, мне надо, чтоб когда приходил пакет типа #$2E активировался таймер и главное, чтоб с этого пакета как то взять 4 байта в середине, и засунуло их в отправку пакета уже в таймере который
вот например пакет:
2E 54 CD 85 7B BD 44 CD D4 EF 44 27 B1 78 43 B5 D0 18 00 00 00 00 00 37 1E 06 00 01 00 2F A2 B6 0A 00 00 00 00 00 00 00 64
Каждый раз он меняется, но это не важно, мне нужен ID таргета, который обозначен красным и вставить этот ИД вот сюда:
B5 57 72 xx xx xx xx
в таймере я разберусь, помогите с тем, как реализовать эту вставку ID таргета