[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) в посылку добавить, ну это не суть