Будьте любезны, помогите со скриптом.

[Deffol]

ладно забудь

Помоги пожалуйста...
Вот скрипт мой:

begin
if FromClient and (pck[1]=#$23) and (ConnectName=name) then
begin
buf:=pck;
for i:=1 to 2000 do
SendToServerEx(name)
end;

begin
if FromServer and (pck[1]=#$EA) and (ConnectName=name) then
begin
Timer01.enabled:=false;
end;
end;
end.

Но когда идет пакет EA, скрипт не останавливается...я не могу понять почему...бьет моба когда тот уже мертв, 2000 раз, лагает из за этого у всех кто рядом стоит)

Добавлено через 5 минут
может вот так надо в конце?

begin
if FromServer and (pck[1]=#$EA) and (ConnectName=name) then
begin
Timer01.enabled:=false;
i:=0;
end;
end;
end.